Who here is VERY good at troubleshooting QB programs?

[Moneo]

in that case, let me ask a few quations on the coding.

1. Why is "GOTO" used?
2. In "PICKED = I: nx(I) = 1" what is ":"
3. Is "flag" just a variable?

(1) There's only one GOTO used. That's in the the NUMBERS subroutine where it does a GOTO 1. The label 1 is in the subroutine HOME. This is a very bad practice. However, if this logic is working, leave it alone for now.

(2) The ":" between these two statements is the same as having written them on separate lines, like
PICKED = I
nx(I) = 1
Some programmers like to put multiple statements on the same line separating them with colons ":". This was mostly done by older QB programmers before the concept of structured programming came about. It is annoying when reading someone else's code.

(3) "flag" is just a variable like any other. It is not a reserved word.

Good! Sounds like you're trying to understand the code. Keep it up.
*****