11-01-2005, 09:07 AM
Code:
FOR I=1 TO 10
INPUT "ENTER THE NUMBERS FOR THIS FIRST ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT FOR THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY(I,1) = A
ENTRY(I,2) = B
ENTRY(I,3) = C
ENTRY(I,4) = D
ENTRY(I,5) = E
ENTRY(I,6) = F
ENTRY(I,7) = G
ENTRY(I,8) = H
ENTRY(I,9) = I
ENTRY(I,10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
NEXT
Not yet Snake! It's not over yet!