10-06-2005, 06:54 AM
[code]
REM Lottery Probability
REM By Tom White
CLS
REM %=INTEGER
REM array declaration
DIM ENTRY1%(1 TO 10)
DIM ENTRY2%(1 TO 10)
DIM ENTRY3%(1 TO 10)
DIM ENTRY4%(1 TO 10)
DIM ENTRY5%(1 TO 10)
DIM ENTRY6%(1 TO 10)
DIM ENTRY7%(1 TO 10)
DIM ENTRY8%(1 TO 10)
DIM ENTRY9%(1 TO 10)
DIM ENTRY10%(1 TO 10)
ONES = 0
TWOS = 0
THREES = 0
FOURS = 0
FIVES = 0
SIXES = 0
SEVENS = 0
EIGHTS = 0
NINES = 0
TENS = 0
ELEVENS = 0
TWELVES = 0
THIRTEENS = 0
FOURTEENS = 0
FIFTEENS = 0
SIXTEENS = 0
SEVENTEENS = 0
EIGHTEENS = 0
NINETEENS = 0
TWENTIES = 0
TWENTY1 = 0
TWENTY2 = 0
TWENTY3 = 0
TWENTY4 = 0
TWENTY5 = 0
TWENTY6 = 0
TWENTY7 = 0
TWENTY8 = 0
TWENTY9 = 0
THIRTY = 0
THIRTY1 = 0
THIRTY2 = 0
THIRTY3 = 0
THIRTY4 = 0
THIRTY5 = 0
THIRTY6 = 0
THIRTY7 = 0
THIRTY8 = 0
THIRTY9 = 0
FOURTY = 0
FOURTY1 = 0
FOURTY2 = 0
FOURTY3 = 0
FOURTY4 = 0
FOURTY5 = 0
FOURTY6 = 0
FOURTY7 = 0
FOURTY8 = 0
FOURTY9 = 0
FIFTY = 0
FIFTY1 = 0
FIFTY2 = 0
PRINT "WELCOME TO MY LOTTERY PROBABILITY PROGRAM."
PRINT "THIS PROGRAM WILL BASICALLY TELL YOU WHICH NUMBERS COME UP THE MOST AND LEAST."
PRINT "I HAVE NO IDEA IF YOU'LL WIN OR NOT...IT'S SUPPOSEDLY RANDOM."
PRINT
PRINT "YOU CAN ENTER UP TO 10 SETS OF NUMBERS."
PRINT "YOU CAN ENTER A MAXIMUM OF 10 NUMBERS PER SET. IF THERE ARE LESS"
PRINT "THAN 10 NUMBERS PER SET, JUST USE 0'S FOR THOSE EXTRA SPACES"
PRINT
PRINT
PRINT
PRINT "PRESS ANY KEY TO CONTINUE"
SLEEP 40
PRINT
PRINT "LETS GET STARTED."
PLACE = 0
DO
IF PLACE = 0 THEN GOSUB HOME
IF PLACE = 1 THEN GOSUB NUMBERS
IF PLACE = 2 THEN GOSUB PROB
IF PLACE = 3 THEN GOSUB SAVE
IF PLACE = 4 THEN GOSUB LOAD
IF PLACE = 5 THEN END
LOOP
HOME:
PRINT
1 PRINT "MAIN"
PRINT "HERE ARE YOUR CHOICES"
PRINT "1. START PUTTING IN NUMBERS"
PRINT "2. SHOW PROBABILITIES"
PRINT "3. SAVE NUMBERS"
PRINT "4. LOAD NUMBERS"
PRINT "5. QUIT"
DO
INPUT PLACE
PLACE = INT(PLACE)
LOOP UNTIL (PLACE > 0) AND (PLACE < 6)
RETURN
NUMBERS:
PRINT
PRINT "I HAVEN'T REALLY MADE THIS DUMMY PROOF, SO IF YOU MESS UP, YOU'RE IN TROUBLE."
PRINT "SO REMEMBER...PLACE ZEROES INTO THE EXTRA SPACES. THERE ARE 10 SPACES IN ALL."
PRINT "AFTER EACH ENTRY PRESS ENTER. AND FOLLOW THE DIRECTIONS!"
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
ENTRY1(1) = A
ENTRY1(2) = B
ENTRY1(3) = C
ENTRY1(4) = D
ENTRY1(5) = E
ENTRY1(6) = F
ENTRY1(7) = G
ENTRY1(8) = H
ENTRY1(9) = I
ENTRY1(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY2(1) = A
ENTRY2(2) = B
ENTRY2(3) = C
ENTRY2(4) = D
ENTRY2(5) = E
ENTRY2(6) = F
ENTRY2(7) = G
ENTRY2(8) = H
ENTRY2(9) = I
ENTRY2(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY3(1) = A
ENTRY3(2) = B
ENTRY3(3) = C
ENTRY3(4) = D
ENTRY3(5) = E
ENTRY3(6) = F
ENTRY3(7) = G
ENTRY3(8) = H
ENTRY3(9) = I
ENTRY3(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY4(1) = A
ENTRY4(2) = B
ENTRY4(3) = C
ENTRY4(4) = D
ENTRY4(5) = E
ENTRY4(6) = F
ENTRY4(7) = G
ENTRY4(8) = H
ENTRY4(9) = I
ENTRY4(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY5(1) = A
ENTRY5(2) = B
ENTRY5(3) = C
ENTRY5(4) = D
ENTRY5(5) = E
ENTRY5(6) = F
ENTRY5(7) = G
ENTRY5(8) = H
ENTRY5(9) = I
ENTRY5(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY6(1) = A
ENTRY6(2) = B
ENTRY6(3) = C
ENTRY6(4) = D
ENTRY6(5) = E
ENTRY6(6) = F
ENTRY6(7) = G
ENTRY6(8) = H
ENTRY6(9) = I
ENTRY6(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY7(1) = A
ENTRY7(2) = B
ENTRY7(3) = C
ENTRY7(4) = D
ENTRY7(5) = E
ENTRY7(6) = F
ENTRY7(7) = G
ENTRY7(8) = H
ENTRY7(9) = I
ENTRY7(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY8(1) = A
ENTRY8(2) = B
ENTRY8(3) = C
ENTRY8(4) = D
ENTRY8(5) = E
ENTRY8(6) = F
ENTRY8(7) = G
ENTRY8(8) = H
ENTRY8(9) = I
ENTRY8(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY9(1) = A
ENTRY9(2) = B
ENTRY9(3) = C
ENTRY9(4) = D
ENTRY9(5) = E
ENTRY9(6) = F
ENTRY9(7) = G
ENTRY9(8) = H
ENTRY9(9) = I
ENTRY9(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS FIRST ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY10(1) = A
ENTRY10(2) = B
ENTRY10(3) = C
ENTRY10(4) = D
ENTRY10(5) = E
ENTRY10(6) = F
ENTRY10(7) = G
ENTRY10(8) = H
ENTRY10(9) = I
ENTRY10(10) = J
PLACE = 0
RETURN
PROB:
PRINT "GETTING THE PROBABILITY OF THE NUMBERS(MOST COMMON)."
REM entry 1
FOR X = 1 TO 10
IF ENTRY1(X) = 1 THEN ONES = ONES + 1
IF ENTRY1(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY1(X) = 3 THEN THREES = THREES + 1
IF ENTRY1(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY1(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY1(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY1(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY1(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY1(X) = 9 THEN NINES = NINES + 1
IF ENTRY1(X) = 10 THEN TENS = TENS + 1
IF ENTRY1(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY1(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY1(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY1(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY1(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY1(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY1(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY1(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY1(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY1(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY1(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY1(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY1(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY1(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY1(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY1(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY1(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY1(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY1(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY1(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY1(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY1(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY1(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY1(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY1(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY1(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY1(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY1(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY1(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY1(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY1(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY1(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY1(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY1(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY1(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY1(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY1(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY1(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY1(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY1(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY1(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY1(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry2
FOR X = 1 TO 10
IF ENTRY2(X) = 1 THEN ONES = ONES + 1
IF ENTRY2(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY2(X) = 3 THEN THREES = THREES + 1
IF ENTRY2(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY2(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY2(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY2(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY2(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY2(X) = 9 THEN NINES = NINES + 1
IF ENTRY2(X) = 10 THEN TENS = TENS + 1
IF ENTRY2(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY2(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY2(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY2(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY2(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY2(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY2(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY2(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY2(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY2(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY2(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY2(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY2(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY2(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY2(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY2(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY2(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY2(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY2(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY2(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY2(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY2(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY2(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY2(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY2(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY2(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY2(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY2(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY2(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY2(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY2(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY2(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY2(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY2(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY2(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY2(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY2(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY2(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY2(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY2(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY2(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY2(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry3
FOR X = 1 TO 10
IF ENTRY3(X) = 1 THEN ONES = ONES + 1
IF ENTRY3(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY3(X) = 3 THEN THREES = THREES + 1
IF ENTRY3(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY3(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY3(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY3(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY3(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY3(X) = 9 THEN NINES = NINES + 1
IF ENTRY3(X) = 10 THEN TENS = TENS + 1
IF ENTRY3(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY3(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY3(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY3(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY3(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY3(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY3(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY3(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY3(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY3(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY3(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY3(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY3(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY3(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY3(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY3(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY3(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY3(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY3(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY3(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY3(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY3(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY3(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY3(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY3(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY3(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY3(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY3(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY3(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY3(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY3(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY3(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY3(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY3(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY3(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY3(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY3(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY3(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY3(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY3(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY3(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY3(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry4
FOR X = 1 TO 10
IF ENTRY4(X) = 1 THEN ONES = ONES + 1
IF ENTRY4(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY4(X) = 3 THEN THREES = THREES + 1
IF ENTRY4(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY4(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY4(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY4(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY4(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY4(X) = 9 THEN NINES = NINES + 1
IF ENTRY4(X) = 10 THEN TENS = TENS + 1
IF ENTRY4(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY4(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY4(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY4(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY4(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY4(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY4(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY4(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY4(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY4(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY4(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY4(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY4(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY4(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY4(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY4(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY4(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY4(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY4(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY4(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY4(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY4(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY4(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY4(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY4(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY4(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY4(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY4(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY4(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY4(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY4(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY4(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY4(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY4(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY4(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY4(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY4(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY4(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY4(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY4(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY4(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry5
FOR X = 1 TO 10
IF ENTRY5(X) = 1 THEN ONES = ONES + 1
IF ENTRY5(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY5(X) = 3 THEN THREES = THREES + 1
IF ENTRY5(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY5(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY5(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY5(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY5(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY5(X) = 9 THEN NINES = NINES + 1
IF ENTRY5(X) = 10 THEN TENS = TENS + 1
IF ENTRY5(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY5(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY5(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY5(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY5(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY5(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY5(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY5(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY5(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY5(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY5(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY5(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY5(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY5(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY5(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY5(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY5(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY5(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY5(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY5(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY5(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY5(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY5(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY5(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY5(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY5(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY5(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY5(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY5(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY5(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY5(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY5(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY5(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY5(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY5(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY5(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY5(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY5(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY5(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY5(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY5(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY5(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry6
FOR X = 1 TO 10
IF ENTRY6(X) = 1 THEN ONES = ONES + 1
IF ENTRY6(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY6(X) = 3 THEN THREES = THREES + 1
IF ENTRY6(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY6(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY6(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY6(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY6(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY6(X) = 9 THEN NINES = NINES + 1
IF ENTRY6(X) = 10 THEN TENS = TENS + 1
IF ENTRY6(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY6(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY6(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY6(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY6(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY6(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY6(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY6(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY6(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY6(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY6(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY6(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY6(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY6(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY6(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY6(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY6(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY6(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY6(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY6(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY6(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY6(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY6(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY6(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY6(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY6(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY6(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY6(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY6(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY6(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY6(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY6(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY6(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY6(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY6(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY6(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY6(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY6(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY6(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY6(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY6(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY6(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry7
FOR X = 1 TO 10
IF ENTRY7(X) = 1 THEN ONES = ONES + 1
IF ENTRY7(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY7(X) = 3 THEN THREES = THREES + 1
IF ENTRY7(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY7(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY7(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY7(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY7(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY7(X) = 9 THEN NINES = NINES + 1
IF ENTRY7(X) = 10 THEN TENS = TENS + 1
IF ENTRY7(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY7(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY7(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY7(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY7(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY7(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY7(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY7(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY7(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY7(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY7(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY7(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY7(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY7(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY7(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY7(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY7(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY7(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY7(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY7(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY7(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY7(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY7(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY7(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY7(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY7(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY7(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY7(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY7(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY7(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY7(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY7(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY7(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY7(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY7(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY7(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY7(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY7(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY7(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY7(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY7(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY7(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry8
FOR X = 1 TO 10
IF ENTRY8(X) = 1 THEN ONES = ONES + 1
IF ENTRY8(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY8(X) = 3 THEN THREES = THREES + 1
IF ENTRY8(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY8(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY8(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY8(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY8(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY8(X) = 9 THEN NINES = NINES + 1
IF ENTRY8(X) = 10 THEN TENS = TENS + 1
IF ENTRY8(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY8(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY8(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY8(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY8(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY8(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY8(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY8(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY8(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY8(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY8(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY8(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY8(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY8(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY8(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY8(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY8(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY8(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY8(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY8(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY8(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY8(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY8(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY8(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY8(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY8(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY8(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY8(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY8(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY8(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY8(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY8(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY8(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY8(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY8(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY8(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY8(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY8(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY8(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY8(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY8(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY8(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry9
FOR X = 1 TO 10
IF ENTRY9(X) = 1 THEN ONES = ONES + 1
IF ENTRY9(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY9(X) = 3 THEN THREES = THREES + 1
IF ENTRY9(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY9(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY9(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY9(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY9(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY9(X) = 9 THEN NINES = NINES + 1
IF ENTRY9(X) = 10 THEN TENS = TENS + 1
IF ENTRY9(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY9(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY9(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY9(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY9(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY9(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY9(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY9(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY9(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY9(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY9(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY9(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY9(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY9(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY9(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY9(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY9(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY9(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY9(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY9(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY9(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY9(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY9(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY9(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY9(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY9(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY9(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY9(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY9(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY9(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY9(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY9(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY9(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY9(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY9(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY9(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY9(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY9(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY9(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY9(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY9(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY9(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry10
FOR X = 1 TO 10
IF ENTRY10(X) = 1 THEN ONES = ONES + 1
IF ENTRY10(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY10(X) = 3 THEN THREES = THREES + 1
IF ENTRY10(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY10(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY10(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY10(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY10(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY10(X) = 9 THEN NINES = NINES + 1
IF ENTRY10(X) = 10 THEN TENS = TENS + 1
IF ENTRY10(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY10(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY10(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY10(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY10(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY10(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY10(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY10(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY10(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY10(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY10(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY10(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY10(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY10(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY10(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY10(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY10(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY10(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY10(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY10(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY10(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY10(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY10(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY10(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY10(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY10(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY10(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY10(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY10(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY10(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY10(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY10(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY10(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY10(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY10(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY10(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY10(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY10(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY10(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY10(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY10(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY10(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
FIRST = 0
SECOND = 0
THIRD = 0
FOURTH = 0
FIFTH = 0
SIXTH = 0
SEVENTH = 0
EIGHTH = 0
NINETH = 0
TENTH = 0
PICKED = 0
N1 = 0
N2 = 0
N3 = 0
N4 = 0
N5 = 0
N6 = 0
N7 = 0
N8 = 0
N9 = 0
N10 = 0
N11 = 0
N12 = 0
N13 = 0
N14 = 0
N15 = 0
N16 = 0
N17 = 0
N18 = 0
N19 = 0
N20 = 0
N21 = 0
N22 = 0
N23 = 0
N24 = 0
N25 = 0
N26 = 0
N27 = 0
N28 = 0
N29 = 0
N30 = 0
N31 = 0
N32 = 0
N33 = 0
N34 = 0
N35 = 0
N36 = 0
N37 = 0
N38 = 0
N39 = 0
N40 = 0
N41 = 0
N42 = 0
N43 = 0
N44 = 0
N45 = 0
N46 = 0
N47 = 0
N48 = 0
N49 = 0
N50 = 0
N51 = 0
N52 = 0
FOR Z = 1 TO 10
IF (PICKED < ONES) AND (N1 = 0) THEN
PICKED = 1
N1 = 1
END IF
IF (PICKED < TWOS) AND (N2 = 0) THEN
PICKED = 2
N2 = 1
END IF
IF (PICKED < THREES) AND (N3 = 0) THEN
PICKED = 3
N3 = 1
END IF
IF (PICKED < FOURS) AND (N4 = 0) THEN
PICKED = 4
N4 = 1
END IF
IF (PICKED < FIVES) AND (N5 = 0) THEN
PICKED = 5
N5 = 1
END IF
IF (PICKED < SIXES) AND (N6 = 0) THEN
PICKED = 6
N6 = 0
END IF
IF (PICKED < SEVENS) AND (N7 = 0) THEN
PICKED = 7
N7 = 1
END IF
IF (PICKED < EIGHTS) AND (N8 = 0) THEN
PICKED = 8
N8 = 1
END IF
IF (PICKED < NINES) AND (N9 = 0) THEN
PICKED = 9
N9 = 1
END IF
IF (PICKED < TENS) AND (N10 = 0) THEN
PICKED = 10
N10 = 1
END IF
IF (PICKED < ELEVENS) AND (N11 = 0) THEN
PICKED = 11
N11 = 1
END IF
IF (PICKED < TWELVES) AND (N12 = 0) THEN
PICKED = 12
N12 = 1
END IF
IF (PICKED < THIRTEENS) AND (N13 = 0) THEN
PICKED = 13
N13 = 1
END IF
IF (PICKED < FOURTEENS) AND (N14 = 0) THEN
PICKED = 14
N14 = 1
END IF
IF (PICKED < FIFTEENS) AND (N15 = 0) THEN
PICKED = 15
N15 = 1
END IF
IF (PICKED < SIXTEENS) AND (N16 = 0) THEN
PICKED = 16
N16 = 1
END IF
IF (PICKED < SEVENTEENS) AND (N17 = 0) THEN
PICKED = 17
N17 = 1
END IF
IF (PICKED < EIGHTEENS) AND (N18 = 0) THEN
PICKED = 18
N18 = 1
END IF
IF (PICKED < NINETEENS) AND (N19 = 0) THEN
PICKED = 19
N19 = 1
END IF
IF (PICKED < TWENTIES) AND (N20 = 0) THEN
PICKED = 20
N20 = 1
END IF
IF (PICKED < TWENTY1) AND (N21 = 0) THEN
PICKED = 21
N21 = 1
END IF
IF (PICKED < TWENTY2) AND (N22 = 0) THEN
PICKED = 21
N22 = 1
END IF
IF (PICKED < TWENTY3) AND (N23 = 0) THEN
PICKED = 23
N23 = 1
END IF
IF (PICKED < TWENTY4) AND (N24 = 0) THEN
PICKED = 24
N24 = 1
END IF
IF (PICKED < TWENTY5) AND ((FIRST > TWENTY5) OR (FIRST < TWENTY5)) AND ((SECOND > TWENTY5) OR (SECOND < TWENTY5)) AND ((THIRD > TWENTY5) OR (THIRD < TWENTY5)) AND ((FOURTH > TWENTY5) OR (FOURTH < TWENTY5)) AND ((FIFTH > TWENTY5) OR (FIFTH < TWENTY5)) AND ((SIXTH > TWENTY5) OR (SIXTH < TWENTY5)) AND ((SEVENTH > TWENTY5) OR (SEVENTH < TWENTY5)) AND ((EIGHTH > TWENTY5) OR (EIGHTH < TWENTY5)) AND ((NINETH > TWENTY5) OR (NINETH < TWENTY5)) AND ((TENTH > TWENTY5) OR (TENTH < TWENTY5)) THEN
PICKED = 25
END IF
IF (PICKED < TWENTY6) AND ((FIRST > TWENTY6) OR (FIRST < TWENTY6)) AND ((SECOND > TWENTY6) OR (SECOND < TWENTY6)) AND ((THIRD > TWENTY6) OR (THIRD < TWENTY6)) AND ((FOURTH > TWENTY6) OR (FOURTH < TWENTY6)) AND ((FIFTH > TWENTY6) OR (FIFTH < TWENTY6)) AND ((SIXTH > TWENTY6) OR (SIXTH < TWENTY6)) AND ((SEVENTH > TWENTY6) OR (SEVENTH < TWENTY6)) AND ((EIGHTH > TWENTY6) OR (EIGHTH < TWENTY6)) AND ((NINETH > TWENTY6) OR (NINETH < TWENTY6)) AND ((TENTH > TWENTY6) OR (TENTH < TWENTY6)) THEN
PICKED = 26
END IF
IF (PICKED < TWENTY7) AND ((FIRST > TWENTY7) OR (FIRST < TWENTY7)) AND ((SECOND > TWENTY7) OR (SECOND < TWENTY7)) AND ((THIRD > TWENTY7) OR (THIRD < TWENTY7)) AND ((FOURTH > TWENTY7) OR (FOURTH < TWENTY7)) AND ((FIFTH > TWENTY7) OR (FIFTH < TWENTY7)) AND ((SIXTH > TWENTY7) OR (SIXTH < TWENTY7)) AND ((SEVENTH > TWENTY7) OR (SEVENTH < TWENTY7)) AND ((EIGHTH > TWENTY7) OR (EIGHTH < TWENTY7)) AND ((NINETH > TWENTY7) OR (NINETH < TWENTY7)) AND ((TENTH > TWENTY7) OR (TENTH < TWENTY7)) THEN
PICKED = 27
END IF
IF (PICKED < TWENTY8) AND ((FIRST > TWENTY8) OR (FIRST < TWENTY8)) AND ((SECOND > TWENTY8) OR (SECOND < TWENTY8)) AND ((THIRD > TWENTY8) OR (THIRD < TWENTY8)) AND ((FOURTH > TWENTY8) OR (FOURTH < TWENTY8)) AND ((FIFTH > TWENTY8) OR (FIFTH < TWENTY8)) AND ((SIXTH > TWENTY8) OR (SIXTH < TWENTY8)) AND ((SEVENTH > TWENTY8) OR (SEVENTH < TWENTY8)) AND ((EIGHTH > TWENTY8) OR (EIGHTH < TWENTY8)) AND ((NINETH > TWENTY8) OR (NINETH < TWENTY8)) AND ((TENTH > TWENTY8) OR (TENTH < TWENTY8)) THEN
PICKED = 28
END IF
IF (PICKED < TWENTY9) AND ((FIRST > TWENTY9) OR (FIRST < TWENTY9)) AND ((SECOND > TWENTY9) OR (SECOND < TWENTY9)) AND ((THIRD > TWENTY9) OR (THIRD < TWENTY9)) AND ((FOURTH > TWENTY9) OR (FOURTH < TWENTY9)) AND ((FIFTH > TWENTY9) OR (FIFTH < TWENTY9)) AND ((SIXTH > TWENTY9) OR (SIXTH < TWENTY9)) AND ((SEVENTH > TWENTY9) OR (SEVENTH < TWENTY9)) AND ((EIGHTH > TWENTY9) OR (EIGHTH < TWENTY9)) AND ((NINETH > TWENTY9) OR (NINETH < TWENTY9)) AND ((TENTH > TWENTY9) OR (TENTH < TWENTY9)) THEN
PICKED = 29
END IF
IF (PICKED < THIRTY) AND ((FIRST > THIRTY) OR (FIRST < THIRTY)) AND ((SECOND > THIRTY) OR (SECOND < THIRTY)) AND ((THIRD > THIRTY) OR (THIRD < THIRTY)) AND ((FOURTH > THIRTY) OR (FOURTH < THIRTY)) AND ((FIFTH > THIRTY) OR (FIFTH < THIRTY)) AND ((SIXTH > THIRTY) OR (SIXTH < THIRTY)) AND ((SEVENTH > THIRTY) OR (SEVENTH < THIRTY)) AND ((EIGHTH > THIRTY) OR (EIGHTH < THIRTY)) AND ((NINETH > THIRTY) OR (NINETH < THIRTY)) AND ((TENTH > THIRTY) OR (TENTH < THIRTY)) THEN
PICKED = 30
END IF
IF (PICKED < THIRTY1) AND ((FIRST > THIRTY1) OR (FIRST < THIRTY1)) AND ((SECOND > THIRTY1) OR (SECOND < THIRTY1)) AND ((THIRD > THIRTY1) OR (THIRD < THIRTY1)) AND ((FOURTH > THIRTY1) OR (FOURTH < THIRTY1)) AND ((FIFTH > THIRTY1) OR (FIFTH < THIRTY1)) AND ((SIXTH > THIRTY1) OR (SIXTH < THIRTY1)) AND ((SEVENTH > THIRTY1) OR (SEVENTH < THIRTY1)) AND ((EIGHTH > THIRTY1) OR (EIGHTH < THIRTY1)) AND ((NINETH > THIRTY1) OR (NINETH < THIRTY1)) AND ((TENTH > THIRTY1) OR (TENTH < THIRTY1)) THEN
PICKED = 31
END IF
IF (PICKED < THIRTY2) AND ((FIRST > THIRTY2) OR (FIRST < THIRTY2)) AND ((SECOND > THIRTY2) OR (SECOND < THIRTY2)) AND ((THIRD > THIRTY2) OR (THIRD < THIRTY2)) AND ((FOURTH > THIRTY2) OR (FOURTH < THIRTY2)) AND ((FIFTH > THIRTY2) OR (FIFTH < THIRTY2)) AND ((SIXTH > THIRTY2) OR (SIXTH < THIRTY2)) AND ((SEVENTH > THIRTY2) OR (SEVENTH < THIRTY2)) AND ((EIGHTH > THIRTY2) OR (EIGHTH < THIRTY2)) AND ((NINETH > THIRTY2) OR (NINETH < THIRTY2)) AND ((TENTH > THIRTY2) OR (TENTH < THIRTY2)) THEN
PICKED = 32
END IF
IF (PICKED < THIRTY3) AND ((FIRST > THIRTY3) OR (FIRST < THIRTY3)) AND ((SECOND > THIRTY3) OR (SECOND < THIRTY3)) AND ((THIRD > THIRTY3) OR (THIRD < THIRTY3)) AND ((FOURTH > THIRTY3) OR (FOURTH < THIRTY3)) AND ((FIFTH > THIRTY3) OR (FIFTH < THIRTY3)) AND ((SIXTH > THIRTY3) OR (SIXTH < THIRTY3)) AND ((SEVENTH > THIRTY3) OR (SEVENTH < THIRTY3)) AND ((EIGHTH > THIRTY3) OR (EIGHTH < THIRTY3)) AND ((NINETH > THIRTY3) OR (NINETH < THIRTY3)) AND ((TENTH > THIRTY3) OR (TENTH < THIRTY3)) THEN
PICKED = 33
END IF
IF (PICKED < THIRTY4) AND ((FIRST > THIRTY4) OR (FIRST < THIRTY4)) AND ((SECOND > THIRTY4) OR (SECOND < THIRTY4)) AND ((THIRD > THIRTY4) OR (THIRD < THIRTY4)) AND ((FOURTH > THIRTY4) OR (FOURTH < THIRTY4)) AND ((FIFTH > THIRTY4) OR (FIFTH < THIRTY4)) AND ((SIXTH > THIRTY4) OR (SIXTH < THIRTY4)) AND ((SEVENTH > THIRTY4) OR (SEVENTH < THIRTY4)) AND ((EIGHTH > THIRTY4) OR (EIGHTH < THIRTY4)) AND ((NINETH > THIRTY4) OR (NINETH < THIRTY4)) AND ((TENTH > THIRTY4) OR (TENTH < THIRTY4)) THEN
PICKED = 34
END IF
IF (PICKED < THIRTY5) AND ((FIRST > THIRTY5) OR (FIRST < THIRTY5)) AND ((SECOND > THIRTY5) OR (SECOND < THIRTY5)) AND ((THIRD > THIRTY5) OR (THIRD < THIRTY5)) AND ((FOURTH > THIRTY5) OR (FOURTH < THIRTY5)) AND ((FIFTH > THIRTY5) OR (FIFTH < THIRTY5)) AND ((SIXTH > THIRTY5) OR (SIXTH < THIRTY5)) AND ((SEVENTH > THIRTY5) OR (SEVENTH < THIRTY5)) AND ((EIGHTH > THIRTY5) OR (EIGHTH < THIRTY5)) AND ((NINETH > THIRTY5) OR (NINETH < THIRTY5)) AND ((TENTH > THIRTY5) OR (TENTH < THIRTY5)) THEN
PICKED = 35
END IF
IF (PICKED < THIRTY6) AND ((FIRST > THIRTY6) OR (FIRST < THIRTY6)) AND ((SECOND > THIRTY6) OR (SECOND < THIRTY6)) AND ((THIRD > THIRTY6) OR (THIRD < THIRTY6)) AND ((FOURTH > THIRTY6) OR (FOURTH < THIRTY6)) AND ((FIFTH > THIRTY6) OR (FIFTH < THIRTY6)) AND ((SIXTH > THIRTY6) OR (SIXTH < THIRTY6)) AND ((SEVENTH > THIRTY6) OR (SEVENTH < THIRTY6)) AND ((EIGHTH > THIRTY6) OR (EIGHTH < THIRTY6)) AND ((NINETH > THIRTY6) OR (NINETH < THIRTY6)) AND ((TENTH > THIRTY6) OR (TENTH < THIRTY6)) THEN
PICKED = 36
END IF
IF (PICKED < THIRTY7) AND ((FIRST > THIRTY7) OR (FIRST < THIRTY7)) AND ((SECOND > THIRTY7) OR (SECOND < THIRTY7)) AND ((THIRD > THIRTY7) OR (THIRD < THIRTY7)) AND ((FOURTH > THIRTY7) OR (FOURTH < THIRTY7)) AND ((FIFTH > THIRTY7) OR (FIFTH < THIRTY7)) AND ((SIXTH > THIRTY7) OR (SIXTH < THIRTY7)) AND ((SEVENTH > THIRTY7) OR (SEVENTH < THIRTY7)) AND ((EIGHTH > THIRTY7) OR (EIGHTH < THIRTY7)) AND ((NINETH > THIRTY7) OR (NINETH < THIRTY7)) AND ((TENTH > THIRTY7) OR (TENTH < THIRTY7)) THEN
PICKED = 37
END IF
IF (PICKED < THIRTY8) AND ((FIRST > THIRTY8) OR (FIRST < THIRTY8)) AND ((SECOND > THIRTY8) OR (SECOND < THIRTY8)) AND ((THIRD > THIRTY8) OR (THIRD < THIRTY8)) AND ((FOURTH > THIRTY8) OR (FOURTH < THIRTY8)) AND ((FIFTH > THIRTY8) OR (FIFTH < THIRTY8)) AND ((SIXTH > THIRTY8) OR (SIXTH < THIRTY8)) AND ((SEVENTH > THIRTY8) OR (SEVENTH < THIRTY8)) AND ((EIGHTH > THIRTY8) OR (EIGHTH < THIRTY8)) AND ((NINETH > THIRTY8) OR (NINETH < THIRTY8)) AND ((TENTH > THIRTY8) OR (TENTH < THIRTY8)) THEN
PICKED = 38
END IF
IF (PICKED < THIRTY9) AND ((FIRST > THIRTY9) OR (FIRST < THIRTY9)) AND ((SECOND > THIRTY9) OR (SECOND < THIRTY9)) AND ((THIRD > THIRTY9) OR (THIRD < THIRTY9)) AND ((FOURTH > THIRTY9) OR (FOURTH < THIRTY9)) AND ((FIFTH > THIRTY9) OR (FIFTH < THIRTY9)) AND ((SIXTH > THIRTY9) OR (SIXTH < THIRTY9)) AND ((SEVENTH > THIRTY9) OR (SEVENTH < THIRTY9)) AND ((EIGHTH > THIRTY9) OR (EIGHTH < THIRTY9)) AND ((NINETH > THIRTY9) OR (NINETH < THIRTY9)) AND ((TENTH > THIRTY9) OR (TENTH < THIRTY9)) THEN
PICKED = 39
END IF
IF (PICKED < FOURTY) AND ((FIRST > FOURTY) OR (FIRST < FOURTY)) AND ((SECOND > FOURTY) OR (SECOND < FOURTY)) AND ((THIRD > FOURTY) OR (THIRD < FOURTY)) AND ((FOURTH > FOURTY) OR (FOURTH < FOURTY)) AND ((FIFTH > FOURTY) OR (FIFTH < FOURTY)) AND ((SIXTH > FOURTY) OR (SIXTH < FOURTY)) AND ((SEVENTH > FOURTY) OR (SEVENTH < FOURTY)) AND ((EIGHTH > FOURTY) OR (EIGHTH < FOURTY)) AND ((NINETH > FOURTY) OR (NINETH < FOURTY)) AND ((TENTH > FOURTY) OR (TENTH < FOURTY)) THEN
PICKED = 40
END IF
IF (PICKED < FOURTY1) AND ((FIRST > FOURTY1) OR (FIRST < FOURTY1)) AND ((SECOND > FOURTY1) OR (SECOND < FOURTY1)) AND ((THIRD > FOURTY1) OR (THIRD < FOURTY1)) AND ((FOURTH > FOURTY1) OR (FOURTH < FOURTY1)) AND ((FIFTH > FOURTY1) OR (FIFTH < FOURTY1)) AND ((SIXTH > FOURTY1) OR (SIXTH < FOURTY1)) AND ((SEVENTH > FOURTY1) OR (SEVENTH < FOURTY1)) AND ((EIGHTH > FOURTY1) OR (EIGHTH < FOURTY1)) AND ((NINETH > FOURTY1) OR (NINETH < FOURTY1)) AND ((TENTH > FOURTY1) OR (TENTH < FOURTY1)) THEN
PICKED = 41
END IF
IF (PICKED < FOURTY2) AND ((FIRST > FOURTY2) OR (FIRST < FOURTY2)) AND ((SECOND > FOURTY2) OR (SECOND < FOURTY2)) AND ((THIRD > FOURTY2) OR (THIRD < FOURTY2)) AND ((FOURTH > FOURTY2) OR (FOURTH < FOURTY2)) AND ((FIFTH > FOURTY2) OR (FIFTH < FOURTY2)) AND ((SIXTH > FOURTY2) OR (SIXTH < FOURTY2)) AND ((SEVENTH > FOURTY2) OR (SEVENTH < FOURTY2)) AND ((EIGHTH > FOURTY2) OR (EIGHTH < FOURTY2)) AND ((NINETH > FOURTY2) OR (NINETH < FOURTY2)) AND ((TENTH > FOURTY2) OR (TENTH < FOURTY2)) THEN
PICKED = 42
END IF
IF (PICKED < FOURTY3) AND ((FIRST > FOURTY3) OR (FIRST < FOURTY3)) AND ((SECOND > FOURTY3) OR (SECOND < FOURTY3)) AND ((THIRD > FOURTY3) OR (THIRD < FOURTY3)) AND ((FOURTH > FOURTY3) OR (FOURTH < FOURTY3)) AND ((FIFTH > FOURTY3) OR (FIFTH < FOURTY3)) AND ((SIXTH > FOURTY3) OR (SIXTH < FOURTY3)) AND ((SEVENTH > FOURTY3) OR (SEVENTH < FOURTY3)) AND ((EIGHTH > FOURTY3) OR (EIGHTH < FOURTY3)) AND ((NINETH > FOURTY3) OR (NINETH < FOURTY3)) AND ((TENTH > FOURTY3) OR (TENTH < FOURTY3)) THEN
PICKED = 43
END IF
IF (PICKED < FOURTY4) AND ((FIRST > FOURTY4) OR (FIRST < FOURTY4)) AND ((SECOND > FOURTY4) OR (SECOND < FOURTY4)) AND ((THIRD > FOURTY4) OR (THIRD < FOURTY4)) AND ((FOURTH > FOURTY4) OR (FOURTH < FOURTY4)) AND ((FIFTH > FOURTY4) OR (FIFTH < FOURTY4)) AND ((SIXTH > FOURTY4) OR (SIXTH < FOURTY4)) AND ((SEVENTH > FOURTY4) OR (SEVENTH < FOURTY4)) AND ((EIGHTH > FOURTY4) OR (EIGHTH < FOURTY4)) AND ((NINETH > FOURTY4) OR (NINETH < FOURTY4)) AND ((TENTH > FOURTY4) OR (TENTH < FOURTY4)) THEN
PICKED = 44
END IF
IF (PICKED < FOURTY5) AND ((FIRST > FOURTY5) OR (FIRST < FOURTY5)) AND ((SECOND > FOURTY5) OR (SECOND < FOURTY5)) AND ((THIRD > FOURTY5) OR (THIRD < FOURTY5)) AND ((FOURTH > FOURTY5) OR (FOURTH < FOURTY5)) AND ((FIFTH > FOURTY5) OR (FIFTH < FOURTY5)) AND ((SIXTH > FOURTY5) OR (SIXTH < FOURTY5)) AND ((SEVENTH > FOURTY5) OR (SEVENTH < FOURTY5)) AND ((EIGHTH > FOURTY5) OR (EIGHTH < FOURTY5)) AND ((NINETH > FOURTY5) OR (NINETH < FOURTY5)) AND ((TENTH > FOURTY5) OR (TENTH < FOURTY5)) THEN
PICKED = 45
END IF
IF (PICKED < FOURTY6) AND ((FIRST > FOURTY6) OR (FIRST < FOURTY6)) AND ((SECOND > FOURTY6) OR (SECOND < FOURTY6)) AND ((THIRD > FOURTY6) OR (THIRD < FOURTY6)) AND ((FOURTH > FOURTY6) OR (FOURTH < FOURTY6)) AND ((FIFTH > FOURTY6) OR (FIFTH < FOURTY6)) AND ((SIXTH > FOURTY6) OR (SIXTH < FOURTY6)) AND ((SEVENTH > FOURTY6) OR (SEVENTH < FOURTY6)) AND ((EIGHTH > FOURTY6) OR (EIGHTH < FOURTY6)) AND ((NINETH > FOURTY6) OR (NINETH < FOURTY6)) AND ((TENTH > FOURTY6) OR (TENTH < FOURTY6)) THEN
PICKED = 46
END IF
IF (PICKED < FOURTY7) AND ((FIRST > FOURTY7) OR (FIRST < FOURTY7)) AND ((SECOND > FOURTY7) OR (SECOND < FOURTY7)) AND ((THIRD > FOURTY7) OR (THIRD < FOURTY7)) AND ((FOURTH > FOURTY7) OR (FOURTH < FOURTY7)) AND ((FIFTH > FOURTY7) OR (FIFTH < FOURTY7)) AND ((SIXTH > FOURTY7) OR (SIXTH < FOURTY7)) AND ((SEVENTH > FOURTY7) OR (SEVENTH < FOURTY7)) AND ((EIGHTH > FOURTY7) OR (EIGHTH < FOURTY7)) AND ((NINETH > FOURTY7) OR (NINETH < FOURTY7)) AND ((TENTH > FOURTY7) OR (TENTH < FOURTY7)) THEN
PICKED = 47
END IF
IF (PICKED < FOURTY8) AND ((FIRST > FOURTY8) OR (FIRST < FOURTY8)) AND ((SECOND > FOURTY8) OR (SECOND < FOURTY8)) AND ((THIRD > FOURTY8) OR (THIRD < FOURTY8)) AND ((FOURTH > FOURTY8) OR (FOURTH < FOURTY8)) AND ((FIFTH > FOURTY8) OR (FIFTH < FOURTY8)) AND ((SIXTH > FOURTY8) OR (SIXTH < FOURTY8)) AND ((SEVENTH > FOURTY8) OR (SEVENTH < FOURTY8)) AND ((EIGHTH > FOURTY8) OR (EIGHTH < FOURTY8)) AND ((NINETH > FOURTY8) OR (NINETH < FOURTY8)) AND ((TENTH > FOURTY8) OR (TENTH < FOURTY8)) THEN
PICKED = 48
END IF
IF (PICKED < FOURTY9) AND ((FIRST > FOURTY9) OR (FIRST < FOURTY9)) AND ((SECOND > FOURTY9) OR (SECOND < FOURTY9)) AND ((THIRD > FOURTY9) OR (THIRD < FOURTY9)) AND ((FOURTH > FOURTY9) OR (FOURTH < FOURTY9)) AND ((FIFTH > FOURTY9) OR (FIFTH < FOURTY9)) AND ((SIXTH > FOURTY9) OR (SIXTH < FOURTY9)) AND ((SEVENTH > FOURTY9) OR (SEVENTH < FOURTY9)) AND ((EIGHTH > FOURTY9) OR (EIGHTH < FOURTY9)) AND ((NINETH > FOURTY9) OR (NINETH < FOURTY9)) AND ((TENTH > FOURTY9) OR (TENTH < FOURTY9)) THEN
PICKED = 49
END IF
IF (PICKED < FIFTY) AND ((FIRST > FIFTY) OR (FIRST < FIFTY)) AND ((SECOND > FIFTY) OR (SECOND < FIFTY)) AND ((THIRD > FIFTY) OR (THIRD < FIFTY)) AND ((FOURTH > FIFTY) OR (FOURTH < FIFTY)) AND ((FIFTH > FIFTY) OR (FIFTH < FIFTY)) AND ((SIXTH > FIFTY) OR (SIXTH < FIFTY)) AND ((SEVENTH > FIFTY) OR (SEVENTH < FIFTY)) AND ((EIGHTH > FIFTY) OR (EIGHTH < FIFTY)) AND ((NINETH > FIFTY) OR (NINETH < FIFTY)) AND ((TENTH > FIFTY) OR (TENTH < FIFTY)) THEN
PICKED = 50
END IF
IF (PICKED < FIFTY1) AND ((FIRST > FIFTY1) OR (FIRST < FIFTY1)) AND ((SECOND > FIFTY1) OR (SECOND < FIFTY1)) AND ((THIRD > FIFTY1) OR (THIRD < FIFTY1)) AND ((FOURTH > FIFTY1) OR (FOURTH < FIFTY1)) AND ((FIFTH > FIFTY1) OR (FIFTH < FIFTY1)) AND ((SIXTH > FIFTY1) OR (SIXTH < FIFTY1)) AND ((SEVEN
REM Lottery Probability
REM By Tom White
CLS
REM %=INTEGER
REM array declaration
DIM ENTRY1%(1 TO 10)
DIM ENTRY2%(1 TO 10)
DIM ENTRY3%(1 TO 10)
DIM ENTRY4%(1 TO 10)
DIM ENTRY5%(1 TO 10)
DIM ENTRY6%(1 TO 10)
DIM ENTRY7%(1 TO 10)
DIM ENTRY8%(1 TO 10)
DIM ENTRY9%(1 TO 10)
DIM ENTRY10%(1 TO 10)
ONES = 0
TWOS = 0
THREES = 0
FOURS = 0
FIVES = 0
SIXES = 0
SEVENS = 0
EIGHTS = 0
NINES = 0
TENS = 0
ELEVENS = 0
TWELVES = 0
THIRTEENS = 0
FOURTEENS = 0
FIFTEENS = 0
SIXTEENS = 0
SEVENTEENS = 0
EIGHTEENS = 0
NINETEENS = 0
TWENTIES = 0
TWENTY1 = 0
TWENTY2 = 0
TWENTY3 = 0
TWENTY4 = 0
TWENTY5 = 0
TWENTY6 = 0
TWENTY7 = 0
TWENTY8 = 0
TWENTY9 = 0
THIRTY = 0
THIRTY1 = 0
THIRTY2 = 0
THIRTY3 = 0
THIRTY4 = 0
THIRTY5 = 0
THIRTY6 = 0
THIRTY7 = 0
THIRTY8 = 0
THIRTY9 = 0
FOURTY = 0
FOURTY1 = 0
FOURTY2 = 0
FOURTY3 = 0
FOURTY4 = 0
FOURTY5 = 0
FOURTY6 = 0
FOURTY7 = 0
FOURTY8 = 0
FOURTY9 = 0
FIFTY = 0
FIFTY1 = 0
FIFTY2 = 0
PRINT "WELCOME TO MY LOTTERY PROBABILITY PROGRAM."
PRINT "THIS PROGRAM WILL BASICALLY TELL YOU WHICH NUMBERS COME UP THE MOST AND LEAST."
PRINT "I HAVE NO IDEA IF YOU'LL WIN OR NOT...IT'S SUPPOSEDLY RANDOM."
PRINT "YOU CAN ENTER UP TO 10 SETS OF NUMBERS."
PRINT "YOU CAN ENTER A MAXIMUM OF 10 NUMBERS PER SET. IF THERE ARE LESS"
PRINT "THAN 10 NUMBERS PER SET, JUST USE 0'S FOR THOSE EXTRA SPACES"
PRINT "PRESS ANY KEY TO CONTINUE"
SLEEP 40
PRINT "LETS GET STARTED."
PLACE = 0
DO
IF PLACE = 0 THEN GOSUB HOME
IF PLACE = 1 THEN GOSUB NUMBERS
IF PLACE = 2 THEN GOSUB PROB
IF PLACE = 3 THEN GOSUB SAVE
IF PLACE = 4 THEN GOSUB LOAD
IF PLACE = 5 THEN END
LOOP
HOME:
1 PRINT "MAIN"
PRINT "HERE ARE YOUR CHOICES"
PRINT "1. START PUTTING IN NUMBERS"
PRINT "2. SHOW PROBABILITIES"
PRINT "3. SAVE NUMBERS"
PRINT "4. LOAD NUMBERS"
PRINT "5. QUIT"
DO
INPUT PLACE
PLACE = INT(PLACE)
LOOP UNTIL (PLACE > 0) AND (PLACE < 6)
RETURN
NUMBERS:
PRINT "I HAVEN'T REALLY MADE THIS DUMMY PROOF, SO IF YOU MESS UP, YOU'RE IN TROUBLE."
PRINT "SO REMEMBER...PLACE ZEROES INTO THE EXTRA SPACES. THERE ARE 10 SPACES IN ALL."
PRINT "AFTER EACH ENTRY PRESS ENTER. AND FOLLOW THE DIRECTIONS!"
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
ENTRY1(1) = A
ENTRY1(2) = B
ENTRY1(3) = C
ENTRY1(4) = D
ENTRY1(5) = E
ENTRY1(6) = F
ENTRY1(7) = G
ENTRY1(8) = H
ENTRY1(9) = I
ENTRY1(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY2(1) = A
ENTRY2(2) = B
ENTRY2(3) = C
ENTRY2(4) = D
ENTRY2(5) = E
ENTRY2(6) = F
ENTRY2(7) = G
ENTRY2(8) = H
ENTRY2(9) = I
ENTRY2(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY3(1) = A
ENTRY3(2) = B
ENTRY3(3) = C
ENTRY3(4) = D
ENTRY3(5) = E
ENTRY3(6) = F
ENTRY3(7) = G
ENTRY3(8) = H
ENTRY3(9) = I
ENTRY3(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY4(1) = A
ENTRY4(2) = B
ENTRY4(3) = C
ENTRY4(4) = D
ENTRY4(5) = E
ENTRY4(6) = F
ENTRY4(7) = G
ENTRY4(8) = H
ENTRY4(9) = I
ENTRY4(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY5(1) = A
ENTRY5(2) = B
ENTRY5(3) = C
ENTRY5(4) = D
ENTRY5(5) = E
ENTRY5(6) = F
ENTRY5(7) = G
ENTRY5(8) = H
ENTRY5(9) = I
ENTRY5(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY6(1) = A
ENTRY6(2) = B
ENTRY6(3) = C
ENTRY6(4) = D
ENTRY6(5) = E
ENTRY6(6) = F
ENTRY6(7) = G
ENTRY6(8) = H
ENTRY6(9) = I
ENTRY6(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY7(1) = A
ENTRY7(2) = B
ENTRY7(3) = C
ENTRY7(4) = D
ENTRY7(5) = E
ENTRY7(6) = F
ENTRY7(7) = G
ENTRY7(8) = H
ENTRY7(9) = I
ENTRY7(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY8(1) = A
ENTRY8(2) = B
ENTRY8(3) = C
ENTRY8(4) = D
ENTRY8(5) = E
ENTRY8(6) = F
ENTRY8(7) = G
ENTRY8(8) = H
ENTRY8(9) = I
ENTRY8(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY9(1) = A
ENTRY9(2) = B
ENTRY9(3) = C
ENTRY9(4) = D
ENTRY9(5) = E
ENTRY9(6) = F
ENTRY9(7) = G
ENTRY9(8) = H
ENTRY9(9) = I
ENTRY9(10) = J
DO
INPUT "DO YOU WANT TO STOP?(Y/N)"; DONE$
IF (DONE$ = "Y") THEN GOTO 1
LOOP UNTIL DONE$ = "N"
INPUT "ENTER THE NUMBERS FOR THIS FIRST ENTRY, EACH FOLLOWED BY A COMMA, EXCEPT THE LAST ONE"; A, B, C, D, E, F, G, H, I, J
ENTRY10(1) = A
ENTRY10(2) = B
ENTRY10(3) = C
ENTRY10(4) = D
ENTRY10(5) = E
ENTRY10(6) = F
ENTRY10(7) = G
ENTRY10(8) = H
ENTRY10(9) = I
ENTRY10(10) = J
PLACE = 0
RETURN
PROB:
PRINT "GETTING THE PROBABILITY OF THE NUMBERS(MOST COMMON)."
REM entry 1
FOR X = 1 TO 10
IF ENTRY1(X) = 1 THEN ONES = ONES + 1
IF ENTRY1(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY1(X) = 3 THEN THREES = THREES + 1
IF ENTRY1(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY1(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY1(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY1(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY1(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY1(X) = 9 THEN NINES = NINES + 1
IF ENTRY1(X) = 10 THEN TENS = TENS + 1
IF ENTRY1(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY1(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY1(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY1(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY1(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY1(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY1(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY1(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY1(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY1(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY1(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY1(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY1(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY1(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY1(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY1(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY1(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY1(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY1(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY1(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY1(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY1(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY1(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY1(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY1(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY1(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY1(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY1(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY1(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY1(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY1(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY1(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY1(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY1(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY1(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY1(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY1(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY1(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY1(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY1(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY1(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY1(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry2
FOR X = 1 TO 10
IF ENTRY2(X) = 1 THEN ONES = ONES + 1
IF ENTRY2(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY2(X) = 3 THEN THREES = THREES + 1
IF ENTRY2(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY2(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY2(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY2(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY2(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY2(X) = 9 THEN NINES = NINES + 1
IF ENTRY2(X) = 10 THEN TENS = TENS + 1
IF ENTRY2(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY2(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY2(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY2(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY2(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY2(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY2(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY2(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY2(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY2(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY2(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY2(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY2(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY2(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY2(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY2(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY2(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY2(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY2(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY2(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY2(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY2(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY2(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY2(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY2(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY2(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY2(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY2(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY2(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY2(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY2(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY2(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY2(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY2(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY2(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY2(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY2(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY2(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY2(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY2(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY2(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY2(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry3
FOR X = 1 TO 10
IF ENTRY3(X) = 1 THEN ONES = ONES + 1
IF ENTRY3(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY3(X) = 3 THEN THREES = THREES + 1
IF ENTRY3(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY3(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY3(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY3(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY3(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY3(X) = 9 THEN NINES = NINES + 1
IF ENTRY3(X) = 10 THEN TENS = TENS + 1
IF ENTRY3(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY3(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY3(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY3(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY3(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY3(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY3(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY3(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY3(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY3(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY3(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY3(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY3(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY3(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY3(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY3(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY3(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY3(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY3(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY3(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY3(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY3(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY3(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY3(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY3(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY3(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY3(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY3(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY3(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY3(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY3(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY3(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY3(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY3(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY3(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY3(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY3(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY3(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY3(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY3(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY3(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY3(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry4
FOR X = 1 TO 10
IF ENTRY4(X) = 1 THEN ONES = ONES + 1
IF ENTRY4(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY4(X) = 3 THEN THREES = THREES + 1
IF ENTRY4(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY4(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY4(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY4(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY4(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY4(X) = 9 THEN NINES = NINES + 1
IF ENTRY4(X) = 10 THEN TENS = TENS + 1
IF ENTRY4(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY4(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY4(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY4(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY4(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY4(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY4(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY4(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY4(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY4(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY4(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY4(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY4(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY4(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY4(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY4(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY4(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY4(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY4(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY4(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY4(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY4(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY4(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY4(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY4(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY4(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY4(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY4(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY4(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY4(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY4(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY4(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY4(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY4(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY4(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY4(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY4(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY4(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY4(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY4(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY4(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry5
FOR X = 1 TO 10
IF ENTRY5(X) = 1 THEN ONES = ONES + 1
IF ENTRY5(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY5(X) = 3 THEN THREES = THREES + 1
IF ENTRY5(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY5(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY5(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY5(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY5(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY5(X) = 9 THEN NINES = NINES + 1
IF ENTRY5(X) = 10 THEN TENS = TENS + 1
IF ENTRY5(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY5(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY5(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY5(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY5(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY5(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY5(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY5(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY5(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY5(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY5(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY5(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY5(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY5(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY5(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY5(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY5(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY5(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY5(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY5(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY5(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY5(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY5(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY5(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY5(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY5(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY5(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY5(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY5(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY5(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY5(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY5(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY5(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY5(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY5(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY5(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY5(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY5(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY5(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY5(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY5(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY5(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry6
FOR X = 1 TO 10
IF ENTRY6(X) = 1 THEN ONES = ONES + 1
IF ENTRY6(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY6(X) = 3 THEN THREES = THREES + 1
IF ENTRY6(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY6(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY6(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY6(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY6(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY6(X) = 9 THEN NINES = NINES + 1
IF ENTRY6(X) = 10 THEN TENS = TENS + 1
IF ENTRY6(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY6(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY6(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY6(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY6(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY6(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY6(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY6(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY6(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY6(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY6(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY6(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY6(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY6(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY6(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY6(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY6(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY6(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY6(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY6(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY6(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY6(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY6(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY6(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY6(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY6(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY6(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY6(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY6(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY6(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY6(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY6(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY6(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY6(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY6(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY6(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY6(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY6(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY6(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY6(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY6(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY6(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry7
FOR X = 1 TO 10
IF ENTRY7(X) = 1 THEN ONES = ONES + 1
IF ENTRY7(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY7(X) = 3 THEN THREES = THREES + 1
IF ENTRY7(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY7(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY7(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY7(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY7(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY7(X) = 9 THEN NINES = NINES + 1
IF ENTRY7(X) = 10 THEN TENS = TENS + 1
IF ENTRY7(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY7(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY7(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY7(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY7(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY7(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY7(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY7(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY7(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY7(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY7(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY7(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY7(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY7(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY7(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY7(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY7(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY7(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY7(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY7(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY7(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY7(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY7(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY7(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY7(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY7(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY7(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY7(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY7(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY7(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY7(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY7(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY7(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY7(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY7(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY7(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY7(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY7(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY7(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY7(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY7(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY7(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry8
FOR X = 1 TO 10
IF ENTRY8(X) = 1 THEN ONES = ONES + 1
IF ENTRY8(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY8(X) = 3 THEN THREES = THREES + 1
IF ENTRY8(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY8(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY8(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY8(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY8(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY8(X) = 9 THEN NINES = NINES + 1
IF ENTRY8(X) = 10 THEN TENS = TENS + 1
IF ENTRY8(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY8(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY8(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY8(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY8(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY8(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY8(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY8(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY8(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY8(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY8(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY8(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY8(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY8(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY8(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY8(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY8(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY8(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY8(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY8(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY8(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY8(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY8(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY8(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY8(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY8(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY8(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY8(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY8(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY8(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY8(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY8(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY8(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY8(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY8(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY8(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY8(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY8(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY8(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY8(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY8(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY8(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry9
FOR X = 1 TO 10
IF ENTRY9(X) = 1 THEN ONES = ONES + 1
IF ENTRY9(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY9(X) = 3 THEN THREES = THREES + 1
IF ENTRY9(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY9(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY9(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY9(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY9(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY9(X) = 9 THEN NINES = NINES + 1
IF ENTRY9(X) = 10 THEN TENS = TENS + 1
IF ENTRY9(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY9(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY9(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY9(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY9(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY9(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY9(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY9(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY9(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY9(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY9(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY9(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY9(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY9(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY9(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY9(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY9(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY9(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY9(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY9(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY9(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY9(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY9(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY9(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY9(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY9(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY9(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY9(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY9(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY9(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY9(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY9(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY9(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY9(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY9(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY9(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY9(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY9(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY9(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY9(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY9(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY9(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
REM entry10
FOR X = 1 TO 10
IF ENTRY10(X) = 1 THEN ONES = ONES + 1
IF ENTRY10(X) = 2 THEN TWOS = TWOS + 1
IF ENTRY10(X) = 3 THEN THREES = THREES + 1
IF ENTRY10(X) = 4 THEN FOURS = FOURS + 1
IF ENTRY10(X) = 5 THEN FIVES = FIVES + 1
IF ENTRY10(X) = 6 THEN SIXES = SIXES + 1
IF ENTRY10(X) = 7 THEN SEVENS = SEVENS + 1
IF ENTRY10(X) = 8 THEN EIGHTS = EIGHTS + 1
IF ENTRY10(X) = 9 THEN NINES = NINES + 1
IF ENTRY10(X) = 10 THEN TENS = TENS + 1
IF ENTRY10(X) = 11 THEN ELEVENS = ELEVENS + 1
IF ENTRY10(X) = 12 THEN TWELVES = TWELVES + 1
IF ENTRY10(X) = 13 THEN THIRTEENS = THIRTEENS + 1
IF ENTRY10(X) = 14 THEN FOURTEENS = FOURTEENS + 1
IF ENTRY10(X) = 15 THEN FIFTEENS = FIFTEENS + 1
IF ENTRY10(X) = 16 THEN SIXTEENS = SIXTEENS + 1
IF ENTRY10(X) = 17 THEN SEVENTEENS = SEVENTEENS + 1
IF ENTRY10(X) = 18 THEN EIGHTEENS = EIGHTEENS + 1
IF ENTRY10(X) = 19 THEN NINETEENS = NINETEENS + 1
IF ENTRY10(X) = 20 THEN TWENTIES = TWENTIES + 1
IF ENTRY10(X) = 21 THEN TWENTY1 = TWENTY1 + 1
IF ENTRY10(X) = 22 THEN TWENTY2 = TWENTY2 + 1
IF ENTRY10(X) = 23 THEN TWENTY3 = TWENTY3 + 1
IF ENTRY10(X) = 24 THEN TWENTY4 = TWENTY4 + 1
IF ENTRY10(X) = 25 THEN TWENTY5 = TWENTY5 + 1
IF ENTRY10(X) = 26 THEN TWENTY6 = TWENTY6 + 1
IF ENTRY10(X) = 27 THEN TWENTY7 = TWENTY7 + 1
IF ENTRY10(X) = 28 THEN TWENTY8 = TWENTY8 + 1
IF ENTRY10(X) = 29 THEN TWENTY9 = TWENTY9 + 1
IF ENTRY10(X) = 30 THEN THIRTY = THIRTY + 1
IF ENTRY10(X) = 31 THEN THIRTY1 = THIRTY1 + 1
IF ENTRY10(X) = 32 THEN THIRTY2 = THIRTY2 + 1
IF ENTRY10(X) = 33 THEN THIRTY3 = THIRTY3 + 1
IF ENTRY10(X) = 34 THEN THIRTY4 = THIRTY4 + 1
IF ENTRY10(X) = 35 THEN THIRTY5 = THIRTY5 + 1
IF ENTRY10(X) = 36 THEN THIRTY6 = THIRTY6 + 1
IF ENTRY10(X) = 37 THEN THIRTY7 = THIRTY7 + 1
IF ENTRY10(X) = 38 THEN THIRTY8 = THIRTY8 + 1
IF ENTRY10(X) = 39 THEN THIRTY9 = THIRTY9 + 1
IF ENTRY10(X) = 40 THEN FOURTY = FOURTY + 1
IF ENTRY10(X) = 41 THEN FOURTY1 = FOURTY1 + 1
IF ENTRY10(X) = 42 THEN FOURTY2 = FOURTY2 + 1
IF ENTRY10(X) = 43 THEN FOURTY3 = FOURTY3 + 1
IF ENTRY10(X) = 44 THEN FOURTY4 = FOURTY4 + 1
IF ENTRY10(X) = 45 THEN FOURTY5 = FOURTY5 + 1
IF ENTRY10(X) = 46 THEN FOURTY6 = FOURTY6 + 1
IF ENTRY10(X) = 47 THEN FOURTY7 = FOURTY7 + 1
IF ENTRY10(X) = 48 THEN FOURTY8 = FOURTY8 + 1
IF ENTRY10(X) = 49 THEN FOURTY9 = FOURTY9 + 1
IF ENTRY10(X) = 50 THEN FIFTY = FIFTY + 1
IF ENTRY10(X) = 51 THEN FIFTY1 = FIFTY1 + 1
IF ENTRY10(X) = 52 THEN FIFTY2 = FIFTY2 + 1
NEXT X
FIRST = 0
SECOND = 0
THIRD = 0
FOURTH = 0
FIFTH = 0
SIXTH = 0
SEVENTH = 0
EIGHTH = 0
NINETH = 0
TENTH = 0
PICKED = 0
N1 = 0
N2 = 0
N3 = 0
N4 = 0
N5 = 0
N6 = 0
N7 = 0
N8 = 0
N9 = 0
N10 = 0
N11 = 0
N12 = 0
N13 = 0
N14 = 0
N15 = 0
N16 = 0
N17 = 0
N18 = 0
N19 = 0
N20 = 0
N21 = 0
N22 = 0
N23 = 0
N24 = 0
N25 = 0
N26 = 0
N27 = 0
N28 = 0
N29 = 0
N30 = 0
N31 = 0
N32 = 0
N33 = 0
N34 = 0
N35 = 0
N36 = 0
N37 = 0
N38 = 0
N39 = 0
N40 = 0
N41 = 0
N42 = 0
N43 = 0
N44 = 0
N45 = 0
N46 = 0
N47 = 0
N48 = 0
N49 = 0
N50 = 0
N51 = 0
N52 = 0
FOR Z = 1 TO 10
IF (PICKED < ONES) AND (N1 = 0) THEN
PICKED = 1
N1 = 1
END IF
IF (PICKED < TWOS) AND (N2 = 0) THEN
PICKED = 2
N2 = 1
END IF
IF (PICKED < THREES) AND (N3 = 0) THEN
PICKED = 3
N3 = 1
END IF
IF (PICKED < FOURS) AND (N4 = 0) THEN
PICKED = 4
N4 = 1
END IF
IF (PICKED < FIVES) AND (N5 = 0) THEN
PICKED = 5
N5 = 1
END IF
IF (PICKED < SIXES) AND (N6 = 0) THEN
PICKED = 6
N6 = 0
END IF
IF (PICKED < SEVENS) AND (N7 = 0) THEN
PICKED = 7
N7 = 1
END IF
IF (PICKED < EIGHTS) AND (N8 = 0) THEN
PICKED = 8
N8 = 1
END IF
IF (PICKED < NINES) AND (N9 = 0) THEN
PICKED = 9
N9 = 1
END IF
IF (PICKED < TENS) AND (N10 = 0) THEN
PICKED = 10
N10 = 1
END IF
IF (PICKED < ELEVENS) AND (N11 = 0) THEN
PICKED = 11
N11 = 1
END IF
IF (PICKED < TWELVES) AND (N12 = 0) THEN
PICKED = 12
N12 = 1
END IF
IF (PICKED < THIRTEENS) AND (N13 = 0) THEN
PICKED = 13
N13 = 1
END IF
IF (PICKED < FOURTEENS) AND (N14 = 0) THEN
PICKED = 14
N14 = 1
END IF
IF (PICKED < FIFTEENS) AND (N15 = 0) THEN
PICKED = 15
N15 = 1
END IF
IF (PICKED < SIXTEENS) AND (N16 = 0) THEN
PICKED = 16
N16 = 1
END IF
IF (PICKED < SEVENTEENS) AND (N17 = 0) THEN
PICKED = 17
N17 = 1
END IF
IF (PICKED < EIGHTEENS) AND (N18 = 0) THEN
PICKED = 18
N18 = 1
END IF
IF (PICKED < NINETEENS) AND (N19 = 0) THEN
PICKED = 19
N19 = 1
END IF
IF (PICKED < TWENTIES) AND (N20 = 0) THEN
PICKED = 20
N20 = 1
END IF
IF (PICKED < TWENTY1) AND (N21 = 0) THEN
PICKED = 21
N21 = 1
END IF
IF (PICKED < TWENTY2) AND (N22 = 0) THEN
PICKED = 21
N22 = 1
END IF
IF (PICKED < TWENTY3) AND (N23 = 0) THEN
PICKED = 23
N23 = 1
END IF
IF (PICKED < TWENTY4) AND (N24 = 0) THEN
PICKED = 24
N24 = 1
END IF
IF (PICKED < TWENTY5) AND ((FIRST > TWENTY5) OR (FIRST < TWENTY5)) AND ((SECOND > TWENTY5) OR (SECOND < TWENTY5)) AND ((THIRD > TWENTY5) OR (THIRD < TWENTY5)) AND ((FOURTH > TWENTY5) OR (FOURTH < TWENTY5)) AND ((FIFTH > TWENTY5) OR (FIFTH < TWENTY5)) AND ((SIXTH > TWENTY5) OR (SIXTH < TWENTY5)) AND ((SEVENTH > TWENTY5) OR (SEVENTH < TWENTY5)) AND ((EIGHTH > TWENTY5) OR (EIGHTH < TWENTY5)) AND ((NINETH > TWENTY5) OR (NINETH < TWENTY5)) AND ((TENTH > TWENTY5) OR (TENTH < TWENTY5)) THEN
PICKED = 25
END IF
IF (PICKED < TWENTY6) AND ((FIRST > TWENTY6) OR (FIRST < TWENTY6)) AND ((SECOND > TWENTY6) OR (SECOND < TWENTY6)) AND ((THIRD > TWENTY6) OR (THIRD < TWENTY6)) AND ((FOURTH > TWENTY6) OR (FOURTH < TWENTY6)) AND ((FIFTH > TWENTY6) OR (FIFTH < TWENTY6)) AND ((SIXTH > TWENTY6) OR (SIXTH < TWENTY6)) AND ((SEVENTH > TWENTY6) OR (SEVENTH < TWENTY6)) AND ((EIGHTH > TWENTY6) OR (EIGHTH < TWENTY6)) AND ((NINETH > TWENTY6) OR (NINETH < TWENTY6)) AND ((TENTH > TWENTY6) OR (TENTH < TWENTY6)) THEN
PICKED = 26
END IF
IF (PICKED < TWENTY7) AND ((FIRST > TWENTY7) OR (FIRST < TWENTY7)) AND ((SECOND > TWENTY7) OR (SECOND < TWENTY7)) AND ((THIRD > TWENTY7) OR (THIRD < TWENTY7)) AND ((FOURTH > TWENTY7) OR (FOURTH < TWENTY7)) AND ((FIFTH > TWENTY7) OR (FIFTH < TWENTY7)) AND ((SIXTH > TWENTY7) OR (SIXTH < TWENTY7)) AND ((SEVENTH > TWENTY7) OR (SEVENTH < TWENTY7)) AND ((EIGHTH > TWENTY7) OR (EIGHTH < TWENTY7)) AND ((NINETH > TWENTY7) OR (NINETH < TWENTY7)) AND ((TENTH > TWENTY7) OR (TENTH < TWENTY7)) THEN
PICKED = 27
END IF
IF (PICKED < TWENTY8) AND ((FIRST > TWENTY8) OR (FIRST < TWENTY8)) AND ((SECOND > TWENTY8) OR (SECOND < TWENTY8)) AND ((THIRD > TWENTY8) OR (THIRD < TWENTY8)) AND ((FOURTH > TWENTY8) OR (FOURTH < TWENTY8)) AND ((FIFTH > TWENTY8) OR (FIFTH < TWENTY8)) AND ((SIXTH > TWENTY8) OR (SIXTH < TWENTY8)) AND ((SEVENTH > TWENTY8) OR (SEVENTH < TWENTY8)) AND ((EIGHTH > TWENTY8) OR (EIGHTH < TWENTY8)) AND ((NINETH > TWENTY8) OR (NINETH < TWENTY8)) AND ((TENTH > TWENTY8) OR (TENTH < TWENTY8)) THEN
PICKED = 28
END IF
IF (PICKED < TWENTY9) AND ((FIRST > TWENTY9) OR (FIRST < TWENTY9)) AND ((SECOND > TWENTY9) OR (SECOND < TWENTY9)) AND ((THIRD > TWENTY9) OR (THIRD < TWENTY9)) AND ((FOURTH > TWENTY9) OR (FOURTH < TWENTY9)) AND ((FIFTH > TWENTY9) OR (FIFTH < TWENTY9)) AND ((SIXTH > TWENTY9) OR (SIXTH < TWENTY9)) AND ((SEVENTH > TWENTY9) OR (SEVENTH < TWENTY9)) AND ((EIGHTH > TWENTY9) OR (EIGHTH < TWENTY9)) AND ((NINETH > TWENTY9) OR (NINETH < TWENTY9)) AND ((TENTH > TWENTY9) OR (TENTH < TWENTY9)) THEN
PICKED = 29
END IF
IF (PICKED < THIRTY) AND ((FIRST > THIRTY) OR (FIRST < THIRTY)) AND ((SECOND > THIRTY) OR (SECOND < THIRTY)) AND ((THIRD > THIRTY) OR (THIRD < THIRTY)) AND ((FOURTH > THIRTY) OR (FOURTH < THIRTY)) AND ((FIFTH > THIRTY) OR (FIFTH < THIRTY)) AND ((SIXTH > THIRTY) OR (SIXTH < THIRTY)) AND ((SEVENTH > THIRTY) OR (SEVENTH < THIRTY)) AND ((EIGHTH > THIRTY) OR (EIGHTH < THIRTY)) AND ((NINETH > THIRTY) OR (NINETH < THIRTY)) AND ((TENTH > THIRTY) OR (TENTH < THIRTY)) THEN
PICKED = 30
END IF
IF (PICKED < THIRTY1) AND ((FIRST > THIRTY1) OR (FIRST < THIRTY1)) AND ((SECOND > THIRTY1) OR (SECOND < THIRTY1)) AND ((THIRD > THIRTY1) OR (THIRD < THIRTY1)) AND ((FOURTH > THIRTY1) OR (FOURTH < THIRTY1)) AND ((FIFTH > THIRTY1) OR (FIFTH < THIRTY1)) AND ((SIXTH > THIRTY1) OR (SIXTH < THIRTY1)) AND ((SEVENTH > THIRTY1) OR (SEVENTH < THIRTY1)) AND ((EIGHTH > THIRTY1) OR (EIGHTH < THIRTY1)) AND ((NINETH > THIRTY1) OR (NINETH < THIRTY1)) AND ((TENTH > THIRTY1) OR (TENTH < THIRTY1)) THEN
PICKED = 31
END IF
IF (PICKED < THIRTY2) AND ((FIRST > THIRTY2) OR (FIRST < THIRTY2)) AND ((SECOND > THIRTY2) OR (SECOND < THIRTY2)) AND ((THIRD > THIRTY2) OR (THIRD < THIRTY2)) AND ((FOURTH > THIRTY2) OR (FOURTH < THIRTY2)) AND ((FIFTH > THIRTY2) OR (FIFTH < THIRTY2)) AND ((SIXTH > THIRTY2) OR (SIXTH < THIRTY2)) AND ((SEVENTH > THIRTY2) OR (SEVENTH < THIRTY2)) AND ((EIGHTH > THIRTY2) OR (EIGHTH < THIRTY2)) AND ((NINETH > THIRTY2) OR (NINETH < THIRTY2)) AND ((TENTH > THIRTY2) OR (TENTH < THIRTY2)) THEN
PICKED = 32
END IF
IF (PICKED < THIRTY3) AND ((FIRST > THIRTY3) OR (FIRST < THIRTY3)) AND ((SECOND > THIRTY3) OR (SECOND < THIRTY3)) AND ((THIRD > THIRTY3) OR (THIRD < THIRTY3)) AND ((FOURTH > THIRTY3) OR (FOURTH < THIRTY3)) AND ((FIFTH > THIRTY3) OR (FIFTH < THIRTY3)) AND ((SIXTH > THIRTY3) OR (SIXTH < THIRTY3)) AND ((SEVENTH > THIRTY3) OR (SEVENTH < THIRTY3)) AND ((EIGHTH > THIRTY3) OR (EIGHTH < THIRTY3)) AND ((NINETH > THIRTY3) OR (NINETH < THIRTY3)) AND ((TENTH > THIRTY3) OR (TENTH < THIRTY3)) THEN
PICKED = 33
END IF
IF (PICKED < THIRTY4) AND ((FIRST > THIRTY4) OR (FIRST < THIRTY4)) AND ((SECOND > THIRTY4) OR (SECOND < THIRTY4)) AND ((THIRD > THIRTY4) OR (THIRD < THIRTY4)) AND ((FOURTH > THIRTY4) OR (FOURTH < THIRTY4)) AND ((FIFTH > THIRTY4) OR (FIFTH < THIRTY4)) AND ((SIXTH > THIRTY4) OR (SIXTH < THIRTY4)) AND ((SEVENTH > THIRTY4) OR (SEVENTH < THIRTY4)) AND ((EIGHTH > THIRTY4) OR (EIGHTH < THIRTY4)) AND ((NINETH > THIRTY4) OR (NINETH < THIRTY4)) AND ((TENTH > THIRTY4) OR (TENTH < THIRTY4)) THEN
PICKED = 34
END IF
IF (PICKED < THIRTY5) AND ((FIRST > THIRTY5) OR (FIRST < THIRTY5)) AND ((SECOND > THIRTY5) OR (SECOND < THIRTY5)) AND ((THIRD > THIRTY5) OR (THIRD < THIRTY5)) AND ((FOURTH > THIRTY5) OR (FOURTH < THIRTY5)) AND ((FIFTH > THIRTY5) OR (FIFTH < THIRTY5)) AND ((SIXTH > THIRTY5) OR (SIXTH < THIRTY5)) AND ((SEVENTH > THIRTY5) OR (SEVENTH < THIRTY5)) AND ((EIGHTH > THIRTY5) OR (EIGHTH < THIRTY5)) AND ((NINETH > THIRTY5) OR (NINETH < THIRTY5)) AND ((TENTH > THIRTY5) OR (TENTH < THIRTY5)) THEN
PICKED = 35
END IF
IF (PICKED < THIRTY6) AND ((FIRST > THIRTY6) OR (FIRST < THIRTY6)) AND ((SECOND > THIRTY6) OR (SECOND < THIRTY6)) AND ((THIRD > THIRTY6) OR (THIRD < THIRTY6)) AND ((FOURTH > THIRTY6) OR (FOURTH < THIRTY6)) AND ((FIFTH > THIRTY6) OR (FIFTH < THIRTY6)) AND ((SIXTH > THIRTY6) OR (SIXTH < THIRTY6)) AND ((SEVENTH > THIRTY6) OR (SEVENTH < THIRTY6)) AND ((EIGHTH > THIRTY6) OR (EIGHTH < THIRTY6)) AND ((NINETH > THIRTY6) OR (NINETH < THIRTY6)) AND ((TENTH > THIRTY6) OR (TENTH < THIRTY6)) THEN
PICKED = 36
END IF
IF (PICKED < THIRTY7) AND ((FIRST > THIRTY7) OR (FIRST < THIRTY7)) AND ((SECOND > THIRTY7) OR (SECOND < THIRTY7)) AND ((THIRD > THIRTY7) OR (THIRD < THIRTY7)) AND ((FOURTH > THIRTY7) OR (FOURTH < THIRTY7)) AND ((FIFTH > THIRTY7) OR (FIFTH < THIRTY7)) AND ((SIXTH > THIRTY7) OR (SIXTH < THIRTY7)) AND ((SEVENTH > THIRTY7) OR (SEVENTH < THIRTY7)) AND ((EIGHTH > THIRTY7) OR (EIGHTH < THIRTY7)) AND ((NINETH > THIRTY7) OR (NINETH < THIRTY7)) AND ((TENTH > THIRTY7) OR (TENTH < THIRTY7)) THEN
PICKED = 37
END IF
IF (PICKED < THIRTY8) AND ((FIRST > THIRTY8) OR (FIRST < THIRTY8)) AND ((SECOND > THIRTY8) OR (SECOND < THIRTY8)) AND ((THIRD > THIRTY8) OR (THIRD < THIRTY8)) AND ((FOURTH > THIRTY8) OR (FOURTH < THIRTY8)) AND ((FIFTH > THIRTY8) OR (FIFTH < THIRTY8)) AND ((SIXTH > THIRTY8) OR (SIXTH < THIRTY8)) AND ((SEVENTH > THIRTY8) OR (SEVENTH < THIRTY8)) AND ((EIGHTH > THIRTY8) OR (EIGHTH < THIRTY8)) AND ((NINETH > THIRTY8) OR (NINETH < THIRTY8)) AND ((TENTH > THIRTY8) OR (TENTH < THIRTY8)) THEN
PICKED = 38
END IF
IF (PICKED < THIRTY9) AND ((FIRST > THIRTY9) OR (FIRST < THIRTY9)) AND ((SECOND > THIRTY9) OR (SECOND < THIRTY9)) AND ((THIRD > THIRTY9) OR (THIRD < THIRTY9)) AND ((FOURTH > THIRTY9) OR (FOURTH < THIRTY9)) AND ((FIFTH > THIRTY9) OR (FIFTH < THIRTY9)) AND ((SIXTH > THIRTY9) OR (SIXTH < THIRTY9)) AND ((SEVENTH > THIRTY9) OR (SEVENTH < THIRTY9)) AND ((EIGHTH > THIRTY9) OR (EIGHTH < THIRTY9)) AND ((NINETH > THIRTY9) OR (NINETH < THIRTY9)) AND ((TENTH > THIRTY9) OR (TENTH < THIRTY9)) THEN
PICKED = 39
END IF
IF (PICKED < FOURTY) AND ((FIRST > FOURTY) OR (FIRST < FOURTY)) AND ((SECOND > FOURTY) OR (SECOND < FOURTY)) AND ((THIRD > FOURTY) OR (THIRD < FOURTY)) AND ((FOURTH > FOURTY) OR (FOURTH < FOURTY)) AND ((FIFTH > FOURTY) OR (FIFTH < FOURTY)) AND ((SIXTH > FOURTY) OR (SIXTH < FOURTY)) AND ((SEVENTH > FOURTY) OR (SEVENTH < FOURTY)) AND ((EIGHTH > FOURTY) OR (EIGHTH < FOURTY)) AND ((NINETH > FOURTY) OR (NINETH < FOURTY)) AND ((TENTH > FOURTY) OR (TENTH < FOURTY)) THEN
PICKED = 40
END IF
IF (PICKED < FOURTY1) AND ((FIRST > FOURTY1) OR (FIRST < FOURTY1)) AND ((SECOND > FOURTY1) OR (SECOND < FOURTY1)) AND ((THIRD > FOURTY1) OR (THIRD < FOURTY1)) AND ((FOURTH > FOURTY1) OR (FOURTH < FOURTY1)) AND ((FIFTH > FOURTY1) OR (FIFTH < FOURTY1)) AND ((SIXTH > FOURTY1) OR (SIXTH < FOURTY1)) AND ((SEVENTH > FOURTY1) OR (SEVENTH < FOURTY1)) AND ((EIGHTH > FOURTY1) OR (EIGHTH < FOURTY1)) AND ((NINETH > FOURTY1) OR (NINETH < FOURTY1)) AND ((TENTH > FOURTY1) OR (TENTH < FOURTY1)) THEN
PICKED = 41
END IF
IF (PICKED < FOURTY2) AND ((FIRST > FOURTY2) OR (FIRST < FOURTY2)) AND ((SECOND > FOURTY2) OR (SECOND < FOURTY2)) AND ((THIRD > FOURTY2) OR (THIRD < FOURTY2)) AND ((FOURTH > FOURTY2) OR (FOURTH < FOURTY2)) AND ((FIFTH > FOURTY2) OR (FIFTH < FOURTY2)) AND ((SIXTH > FOURTY2) OR (SIXTH < FOURTY2)) AND ((SEVENTH > FOURTY2) OR (SEVENTH < FOURTY2)) AND ((EIGHTH > FOURTY2) OR (EIGHTH < FOURTY2)) AND ((NINETH > FOURTY2) OR (NINETH < FOURTY2)) AND ((TENTH > FOURTY2) OR (TENTH < FOURTY2)) THEN
PICKED = 42
END IF
IF (PICKED < FOURTY3) AND ((FIRST > FOURTY3) OR (FIRST < FOURTY3)) AND ((SECOND > FOURTY3) OR (SECOND < FOURTY3)) AND ((THIRD > FOURTY3) OR (THIRD < FOURTY3)) AND ((FOURTH > FOURTY3) OR (FOURTH < FOURTY3)) AND ((FIFTH > FOURTY3) OR (FIFTH < FOURTY3)) AND ((SIXTH > FOURTY3) OR (SIXTH < FOURTY3)) AND ((SEVENTH > FOURTY3) OR (SEVENTH < FOURTY3)) AND ((EIGHTH > FOURTY3) OR (EIGHTH < FOURTY3)) AND ((NINETH > FOURTY3) OR (NINETH < FOURTY3)) AND ((TENTH > FOURTY3) OR (TENTH < FOURTY3)) THEN
PICKED = 43
END IF
IF (PICKED < FOURTY4) AND ((FIRST > FOURTY4) OR (FIRST < FOURTY4)) AND ((SECOND > FOURTY4) OR (SECOND < FOURTY4)) AND ((THIRD > FOURTY4) OR (THIRD < FOURTY4)) AND ((FOURTH > FOURTY4) OR (FOURTH < FOURTY4)) AND ((FIFTH > FOURTY4) OR (FIFTH < FOURTY4)) AND ((SIXTH > FOURTY4) OR (SIXTH < FOURTY4)) AND ((SEVENTH > FOURTY4) OR (SEVENTH < FOURTY4)) AND ((EIGHTH > FOURTY4) OR (EIGHTH < FOURTY4)) AND ((NINETH > FOURTY4) OR (NINETH < FOURTY4)) AND ((TENTH > FOURTY4) OR (TENTH < FOURTY4)) THEN
PICKED = 44
END IF
IF (PICKED < FOURTY5) AND ((FIRST > FOURTY5) OR (FIRST < FOURTY5)) AND ((SECOND > FOURTY5) OR (SECOND < FOURTY5)) AND ((THIRD > FOURTY5) OR (THIRD < FOURTY5)) AND ((FOURTH > FOURTY5) OR (FOURTH < FOURTY5)) AND ((FIFTH > FOURTY5) OR (FIFTH < FOURTY5)) AND ((SIXTH > FOURTY5) OR (SIXTH < FOURTY5)) AND ((SEVENTH > FOURTY5) OR (SEVENTH < FOURTY5)) AND ((EIGHTH > FOURTY5) OR (EIGHTH < FOURTY5)) AND ((NINETH > FOURTY5) OR (NINETH < FOURTY5)) AND ((TENTH > FOURTY5) OR (TENTH < FOURTY5)) THEN
PICKED = 45
END IF
IF (PICKED < FOURTY6) AND ((FIRST > FOURTY6) OR (FIRST < FOURTY6)) AND ((SECOND > FOURTY6) OR (SECOND < FOURTY6)) AND ((THIRD > FOURTY6) OR (THIRD < FOURTY6)) AND ((FOURTH > FOURTY6) OR (FOURTH < FOURTY6)) AND ((FIFTH > FOURTY6) OR (FIFTH < FOURTY6)) AND ((SIXTH > FOURTY6) OR (SIXTH < FOURTY6)) AND ((SEVENTH > FOURTY6) OR (SEVENTH < FOURTY6)) AND ((EIGHTH > FOURTY6) OR (EIGHTH < FOURTY6)) AND ((NINETH > FOURTY6) OR (NINETH < FOURTY6)) AND ((TENTH > FOURTY6) OR (TENTH < FOURTY6)) THEN
PICKED = 46
END IF
IF (PICKED < FOURTY7) AND ((FIRST > FOURTY7) OR (FIRST < FOURTY7)) AND ((SECOND > FOURTY7) OR (SECOND < FOURTY7)) AND ((THIRD > FOURTY7) OR (THIRD < FOURTY7)) AND ((FOURTH > FOURTY7) OR (FOURTH < FOURTY7)) AND ((FIFTH > FOURTY7) OR (FIFTH < FOURTY7)) AND ((SIXTH > FOURTY7) OR (SIXTH < FOURTY7)) AND ((SEVENTH > FOURTY7) OR (SEVENTH < FOURTY7)) AND ((EIGHTH > FOURTY7) OR (EIGHTH < FOURTY7)) AND ((NINETH > FOURTY7) OR (NINETH < FOURTY7)) AND ((TENTH > FOURTY7) OR (TENTH < FOURTY7)) THEN
PICKED = 47
END IF
IF (PICKED < FOURTY8) AND ((FIRST > FOURTY8) OR (FIRST < FOURTY8)) AND ((SECOND > FOURTY8) OR (SECOND < FOURTY8)) AND ((THIRD > FOURTY8) OR (THIRD < FOURTY8)) AND ((FOURTH > FOURTY8) OR (FOURTH < FOURTY8)) AND ((FIFTH > FOURTY8) OR (FIFTH < FOURTY8)) AND ((SIXTH > FOURTY8) OR (SIXTH < FOURTY8)) AND ((SEVENTH > FOURTY8) OR (SEVENTH < FOURTY8)) AND ((EIGHTH > FOURTY8) OR (EIGHTH < FOURTY8)) AND ((NINETH > FOURTY8) OR (NINETH < FOURTY8)) AND ((TENTH > FOURTY8) OR (TENTH < FOURTY8)) THEN
PICKED = 48
END IF
IF (PICKED < FOURTY9) AND ((FIRST > FOURTY9) OR (FIRST < FOURTY9)) AND ((SECOND > FOURTY9) OR (SECOND < FOURTY9)) AND ((THIRD > FOURTY9) OR (THIRD < FOURTY9)) AND ((FOURTH > FOURTY9) OR (FOURTH < FOURTY9)) AND ((FIFTH > FOURTY9) OR (FIFTH < FOURTY9)) AND ((SIXTH > FOURTY9) OR (SIXTH < FOURTY9)) AND ((SEVENTH > FOURTY9) OR (SEVENTH < FOURTY9)) AND ((EIGHTH > FOURTY9) OR (EIGHTH < FOURTY9)) AND ((NINETH > FOURTY9) OR (NINETH < FOURTY9)) AND ((TENTH > FOURTY9) OR (TENTH < FOURTY9)) THEN
PICKED = 49
END IF
IF (PICKED < FIFTY) AND ((FIRST > FIFTY) OR (FIRST < FIFTY)) AND ((SECOND > FIFTY) OR (SECOND < FIFTY)) AND ((THIRD > FIFTY) OR (THIRD < FIFTY)) AND ((FOURTH > FIFTY) OR (FOURTH < FIFTY)) AND ((FIFTH > FIFTY) OR (FIFTH < FIFTY)) AND ((SIXTH > FIFTY) OR (SIXTH < FIFTY)) AND ((SEVENTH > FIFTY) OR (SEVENTH < FIFTY)) AND ((EIGHTH > FIFTY) OR (EIGHTH < FIFTY)) AND ((NINETH > FIFTY) OR (NINETH < FIFTY)) AND ((TENTH > FIFTY) OR (TENTH < FIFTY)) THEN
PICKED = 50
END IF
IF (PICKED < FIFTY1) AND ((FIRST > FIFTY1) OR (FIRST < FIFTY1)) AND ((SECOND > FIFTY1) OR (SECOND < FIFTY1)) AND ((THIRD > FIFTY1) OR (THIRD < FIFTY1)) AND ((FOURTH > FIFTY1) OR (FOURTH < FIFTY1)) AND ((FIFTH > FIFTY1) OR (FIFTH < FIFTY1)) AND ((SIXTH > FIFTY1) OR (SIXTH < FIFTY1)) AND ((SEVEN
Not yet Snake! It's not over yet!