'dNN44:P6:C$(13):LF0:FL0:NL04h15,8,15?i(14)[qDD$(200),G(200),TN(NN)rrA(P,200),B(P,200)xNF$"LOTTO WINNERS"zNH$"NUM.DRW"}ND$"LOTDTE"NG$"NUM.DATA"300053280,0:53281,0:1000 ""7)"": 7)"ҠȠӠ٠..."a 7)"" " 1.NTER DATA INTO MEMORY" " 2.NTER WINNING NUMBERS" " 3.EAD NUMBERS" " 4.EAD DRAWINGS" " 5.HOOSE NUMBERS"+ " 6.UIT"V ""z 8)" AKE YOUR CHOICE BY # " "" CC$:CC$""185 CC$"1"2260 CC$"2"250 CC$"3"710 CC$"4"1400 CC$"5"1200! CC$"6"930* 1859 LF0860U "":53280,0:53281,11` 646,7y  **INPUT NUMBERS ** ""4)"" 646,7 3)"NTER HIS EEK'S OTTO 44 UMBERS " "DRAWING DATE:" 18)" MM-DD-YY";:"";DD$ :9 F1P:12)"UMBER ";F;:N(F)Q N(F)1N(F)NN631i S1NN:N(F)S630q :z "" "OU ENTERED:" 8)""; F1P N(F);: :7)"RE NUMBERS ORRECT ? (/) " E$:E$""540 &E$"N"640" 0E$"Y"900+ :540Q D11)" Ӡ "| N6)" NTER ORE UMBERS ? (/) " XQ$:Q$""600 bQ$"Y"450 gQ$"N"2100 l160 vTN(S)TN(S)1:520 wXZ15x"";:8)"UMBER OT ROM 1 TO ";NN zBE1500*{:XZ3""FF1P:S1NNVN(F)S700^:g580~TN(S)TN(S)1:6802,8,2,"@0:"NF$",S,R"S1NN2,TN(S)S:22,8,2,"@0:"ND$",S,R"2,DD$2"O YOU WANT A CERTAIN FREQUENCY MARKED?"&1050E"":53280,0:53281,0:M1ZA1(NN.33)1d4000uA;4);TN(A)CM$"N"732CM$"Y"TN(A)DN5000A"":M2A(NN.33)2(NN.66)2400012);A;2);TN(A)CM$"N"744$CM$"Y"TN(A)DN4900*7"":M3MA(NN.66)3NNW4000m24);A;2);TN(A)~CM$"N"756CM$"Y"TN(A)DN4900646,14""8)"ESULTS AS OF: ";DD$:14)"Ԡ!"Q$:Q$""7661606""L17)"!!!!"y:5);"ɠ'ԠϠӠӠՠ":12)"ŠӠ!!!"X15000::160413)" RESS ANY KEY ">AN$:AN$""830H160R1360\53281,5:646,0:"""_18)"!!!!"Ya:::" ՠ'ԠĠŠӠ "c:9)"F YOU GO ON FROM HERE,":8)"YOU'LL ERASE THE OLD FILES!"e5)"S THAT WHAT YOU WANT TO DO???":17)"(/)fQ$:Q$""870hQ$"N"160 kQ$"Y"n870%NSNS10F1PAA(F,NS)N(F)GWDD$(NS)DD$`590j1100}17)""I1200I5014)"GOOD-BYE!!!!"I10019)"&"I15014)"GOOD-LUCK!!!"15X14000::"": "">""JX121\"$"38)"$"b""""2)" # "30)" # "X19:Y(10(44101)(1))2)""Y29)""Y CM$:CM$"Y"1057 CM$"N"1061*1050[!4)"OW MANY TIMES PICKED DO YOU WANT "s"13);:"MARKED";DN#DN0DN1%""10)"HECKING THE LIST...."'I11000:)L""(142) Q""=R"$$"sS"$$$$"T"$$$$$$"U"$$$$$$$$"!V"$$$$$$$$$$"R[X112:"$$$$$$"28)"$$$$$$":_"$$$$$$$$$$"`"$$$$$$$$"a"$$$$$$"6b"$$$$"jc"$$"e""j"":53280,0:53281,0:646,13"OW WOULD YOU LIKE YOUR NUMBERS PICKED? "3" "N10)"1. ANDOMLY "h10)" """;10)"2. OST REQUENT "10)" """10)"3. EAST REQUENT "10)" """10)"4. IDDLE UMBERS "310)""S""10)"5. N VERAGE "o10)""""10)"6. '  "10)" "" NTER THE NUMBER OF YOUR CHOICE!  "" "'Z$:Z$""12308Z$"1"1240WZ$"2"Z$"3"Z$"4"1270hZ$"5"1350yZ$"6"14751230R1PS(R)(TI):S(R)(44(0))1S(1)S(2)S(1)S(3)S(1)S(4)S(1)S(5)S(1)S(6)1240#S(2)S(3)S(2)S(4)S(2)S(5)S(2)S(6)1240KS(3)S(4)S(3)S(5)S(3)S(6)1240iS(4)S(5)S(4)S(6)1240}S(5)S(6)12406000NS0:BV0:AD0S1NN:TN(S)0:G1NN:TN(G)0:53280,7:53281,7:646,0""2,8,2,"@0:"NH$",S,R"2,NS252,8,2,"@0:"NF$",S,R"AS1NNN2,TN(S)XS:2aAD0"'M GETTING THEM IN ORDER";BVNS01G1NNTN(G)BVADAD1:G(AD)GG:"..";:BV Z$"3"1300 Z$"4"1600/ :4);"HE "P" MOST PICKED NUMBERS ARE:":8);:X1PEG(X);LXj:13)" !!"~Q$:Q$""1298160:4);"HE "P" LEAST PICKED NUMBERS ARE:":8);XAD(ADP)11G(X);X:13)" !!" Q$:Q$""1312%"160X(""8)"OU CAN'T CHOOSE MORE THAN"~)8)"THE NUMBER OF DRAWINGS...."-15)"OU !!!!"0I15500:2<53280,1:53281,1:646,11=""; >"O YOU WANT TO DO MORE THAN 30??"$ ?Q$:Q$""13435 @Q$"N"1347F AQ$"Y"1380P B1343 C"ELL THEN TRY SOMETHING UNDER 30" DX12500::1475 F53281,13:53280,5:"" G2,8,2,"@0:"NH$",S,R" H2,NS:2 !I"HERE ARE "NS" DRAWING IN THE FILE"=!J"OW FAR BACK DO YOU WANT TO AVERAGE";:DBU!KDBNS1320:"":d!LLF11358s!M2320:LF1!NV1P:ABNS(NSDB)11!OZ(V)Z(V)A(V,AB)!P:!Q""!TV1P!UG(V)(Z(V)DB)!V8)""G(V);!W"XV1P:Z(V)0:6"Y:"HESE ARE THE AVERAGE NUMBERS"Y"Z12)"IT A KEY FOR MENU"m"]C$:C$""1373v"_160"d::10);".. BE THAT WAY""g"HIS WILL TAKE ME A COUPLE OF MINUTES...""iZ15000:"j53281,2:53280,10:#xLF02260#y53280,0:53281,11:""+#}SD1NS5#~4030K#:""DD$(SD)3);V#V1Pg#A(V,SD);:Vs#RWRW1#RE10:13)"Ԡ!!":1450:""#RWNS:13)"ĠƠ!!":1460#RERE1#SD:RERE1:WD#$198,0:198,1$H$:H$""1451#$RE0:5$198,0:198,1I$H$:H$""1456\$RE0:RW0:160x$CF0:WD0:AE0:G0:DE0$G1NN:TN(G)0:$FL11490$2,8,2,"@0:"NH$",S,R"$2,NS:2$G1NN:TN(G)0:$FL1$53281,2:53280,10/%" "e%" HERE ARE "NS" DRAWINGS IN THE FILE "t%NL11504%::8)"ETTING INFO...":2320:NL1%8)"OULD ٖOU LIKE TO CHOOSE,"%6)"OR LET ˖ARNAK CHOOSE HOW MANY" &17)"(/) ?"&Q$:Q$""1507.&Q$"Y"1513?&Q$"K"1801I&1507r&"OW MANY GAMES DO YOU WANT TO"&"CHOOSE FROM? (AT LEAST 2)"&"30 RECOMMENDED LIMIT";CF&CFNS1320:15:&CF21513&CF301340''" HECKING THE LAST "CF" DRAWINGS "0'SE0G'YNS(NSCF)11Z'G1NN:V1Pv'A(V,Y)GTN(G)TN(G)1}'V'SECF21567'G:SESE1:DEDE1'" OING BACK"DE" DRAWINGS"'Y:X1500::1700(8)"AVE SOME PATIENCE..."F( 8)"'M GETTING THERE!!!"Q(!SE0:(@:4);"HE "P" NUMBERS IN THE MIDDLE ARE:":8);(EX(AD2)(P5)(AD2)(P5)(P1)(JG(X);(O(Q:13)" !!"(RQ$:Q$""1618)S160 )r53281,0S)s"OULD YOU LIKE ME TO PICK NUMBERS BASED ON THIS INFORMATION?"g)tQ$:Q$""1652x)vQ$"Y"1660)xQ$"N"160)z1652)|"";3))}AEAE3)~" 1";)I1P)AE1AE(NN.59))G(I)G(AE)*G(I);:AEAE7:T11500:*$*AEAE16*:"";3);G*" 2";Z*I(P1)(PP)f*AEAE7*AENNAE(NN.57)1*G(I)G(AE)*G(I);:T11500:**:5)"HESE ARE ' CHOICES"*11)"GIVE THEM A TRY!!"+12);"Ԡ!!""+Q$:Q$""16860+AE0:160:+1686X+53281,0:53280,0:646,12a+""k+1840u+1843~+""+CV601+QA61751+:"HE NUMBERS PICKED "CV" TIMES:"+G1NN+TN(G)CVAEAE1:G(AE)G:""G(AE);,G:QAQA1:CV.,:15)""L,12)"==>IT A EY<=="b,15)""v,Q$:Q$""1735,QA0,1650,:12)"< IT A EY >",Q$:Q$""1753,"",, CF(TI):CF(2(3021)(1)), CF21801;- "ARNAK PICKED "CF"";:" DRAWINGS. ":"S THIS O.K.?";Q$L-Q$"Y"1518l-Q$"N""":4050:1801x-0G1NN-1TN(G)121861-2:-3G1NN:TN(G)61850-4-5-:""-;CV1271.=:"HE NUMBERS PICKED "CV" TIMES:" .?G1NN6.@TN(G)CVAEAE1:G(AE)G:""G(AE);A.AG:CV^.B:12)""r.CQ$:Q$""1859x.D.E"".H:"HE NUMBERS PICKED MORE THAN 12 TIMES:".IG1NN.JTN(G)12AEAE1:G(AE)G:""G(AE)""TN(G)"IMES".K/L:12)""0/MQ$:Q$""18696/NO/453281,5:646,1:""/86);"O YOU WANT TO THIS INFO "/912);"TO THE FILE?"/>"F THE FILES WEREN'T ENTERED, THEY WILL"/?2)"BE REPLACED BY THE NEW INFO ONLY!!!"0@Q$:Q$""21120AQ$"N"16090\ ** WRITE ROUTINE **T0f"":53280,0:53281,00p10)"'M WRITING THIS DOWN."0q11)"OLD YOUR BREATH....."0r2,8,2,"@0:"NH$",S,W"0s2,NS0t20u2,8,2,"@0:"ND$",S,W"0vV1NS1w2,DD$ 1x1y2/1z2,8,2,"@0:"NF$",S,W";1S1NNH12,TN(S)R1S:2n12,8,2,"@0:"NG$",S,W"1WD1NS:V1P12,A(V,WD),C$1V12,DD$(WD)1:21"":8)"O YOU WISH TO QUIT? (/)"1E$:E$""22302E$"Y"15:2E$"N"2256)2223022160H2**READ ROUTINE**c2"":53280,0:53281,0210)"ANG IN THERE PLEASE...."2:210)"'M GATHERING INFO...."2LF122,8,2,"@0:"NH$",S,R"22,NS2 23 2,8,2,"@0:"ND$",S,R"3 2,DD$!3 2=3 2,8,2,"@0:"NF$",S,R"I3 S1NNV3 2,TN(S)`3 S:2|3 2,8,2,"@0:"NG$",S,R"3 WD1NS:V1P3 2,A(V,WD):V3 2,DD$(WD)3 WD:23 CC$"1"1603 3` 53281,5:646,0 4e ""6);" O YOU WANT INSTRUCTIONS ? "44j Q$:Q$""2410E4o Q$"Y"2440U4t Q$"N"160_4v 24104 ". ŠŠŠ........ "4 "HIS STARTS WITH 6 OF 44 NUMBERS."5 " HIS PROGRAM CAN BE ALTERED TO FIT MOST ANY LOTTO GAME. ";P5 "IST LINE 100 AND CHANGE THE VALUES TO THOSE OF THE LOTTO GAME YOU ";5 "PLAY. =THE TOTAL NUMBERS IN THE GAME AND = THE NUMBER OF NUMBERS"5 "THAT ARE PICKED. ŠŠ!"6 " EFORE ENTERING NEW NUMBERS, THE FILES MUST BE PUT INTO MEMORY FIRST"B6 "F NOT, THE OLD DATA WILL BE ERASED!"6 " HEN USING THE PROGRAM FOR THE FIRST TIME, CHOOSE OPTION '2'";6 " AND ANSWER YES WHEN ASKED IF YOU ENTERED THE FILES.";6 "HIS WILL CREATE NEW FILES.17 " PTION '3' GIVES YOU THE REPORT OF HOWMANY TIMES EACH NUMBER";J7 " HAS BEEN PICKED."7 " PTION '4' GIVES YOU THE RESULTS OF EACH DRAWING ENTERED."7 " PTION '5' IS THE ICKER SECTION!!":14)"Ԡ"7 W$:W$""24668 " * 5* "F8 "HERE ARE FIVE (5) WAYS TO PICK NUMBERS.8 "ETHOD '1' IS THE GOOD OLD RANDOM NUMBER GENERATOR"8 "ETHOD '2' IS THE FREQUENTLY PICKED NUMBERS."9 "ETHOD '3' IS THE FREQUENTLY PICKED NUMBERS."F9 "ETHOD '4' IS THE FREQUENTLY PICKED NUMBERS."9 "ETHOD '5' IS AN AVERAGER. HIS WILL GIVE YOU THE AVERAGE OF";9 " THE NUMBERS PICKED. NTERING THE NUMBERS IN NUMERICAL"; : " ORDER MAKES THIS OPTION WORK BETTER.";=: " OU CAN CHOOSE HOW MANY DRAWINGSTO AVERAGE."V: 14)" !!"j: W$:W$""2483: " '6'--' ": "****************************************"; " "N; " HIS OPTION PUTS THE NUMBERS IN THE ORDER OF FREQUENCY DRAWN AND; " CHOOSES THE NUMBERS THAT FALL IN A PRE-SELECTED SPOT.";; " HIS IS ALMOST LIKE THE PING-PONG BALL METHOD.";< " OU CAN ALSO CHOOSE HOW MANY DRAWINGS TO GO BACK TO GET THE INFO."\< " F THE NUMBERS PICKED REPEAT IN THE SAME LINE, -AIL ME ";< "WITH THE LIMITS OF YOUR GAME, AND '̠SEND YOU THE CORREC-TIONS.";< " HAVE TRIED MANY COMBINATIONS BUT THERE MAY BE ONE DIDN'T."7= " OPEFULLY THIS WILL HELP YOU IN THE SEARCH OF WINNING NUMBERS."Z= 8)"Ԡ٠ҠŠ"n= W$:W$""2499w= 160= A$"":"":3110:49152= 49185:3125:"":X4:3090:""= X3:3090:3099> X)"     "Q> X)"       "> X)"       "> X)"       "> X)"       "5? X)"     "u? ""12)" :":14)" "P" OF"NN"? ""12)"IT A KEY FOR MENU!"? ? 49185:198,0:198,1:A$? 49201? 2400@& U4915249272:Q:U,Q:CKCKQ:-@' CK14738"ERROR IN DATA...":M@( T50000500002542:T,0:@) 120,169,127,141,13,220,169,1,141,26,208,169,40,141,18,208,169,27@* 141,17,208,169,81,141,20,3,169,192,141,21,3,88,96,173,18,208A+ 201,38,208,249,173,17,208,73,16,141,17,208,96,120,169,49,141,20`A, 3,169,234,141,21,3,169,240,141,26,208,169,129,141,13,220,173,120A- 195,141,32,208,141,33,208,88,96,169,1,141,25,208,174,18,208,224A. 0,240,20,189,80,195,141,33,208,141,32,208,232,232,142,18,208,104B/ 168,104,170,104,64,169,40,141,18,208,76,49,234%B0 IB5 X0:T50000500002542:T,0:eB6 T5000050000402142|B7 T,7:TTX:XX2:B8 B**COLORSBJK1646,5:JK0:BJK0646,7:JK1:BKL1646,0:KL0:BKL0646,13:KL1: CKL1646,0:KL0:!CKL0646,1:KL1:2C$ MARKERS***BC(TN(A)DNPC.M1CL8_C0M2CL21nC2M3CL34C8"";CL);""C<CCTN(A)DN4900CCp"":53281,5:53280,0:646,0Cq"HESE ARE YOUR RANDOMLY PICKED NUMBERS: "-Dr""aDs"****************************************"lDtR1P}Du9)""S(R);DvDw:"****************************************"Dx""Ez""3E{Z$:Z$""6011FE|Z$(13)1240XE}Z$(32)160bE~6011pEF"Q$"Y"