LOTTERY.C
FILE INFORMATION
FILENAME(S): LOTTERY.C
FILE TYPE(S): PRG
FILE SIZE: 5.6K
FIRST SEEN: 2025-10-19 22:48:29
APPEARS ON: 1 disk(s)
FILE HASH
4d7273fb05fbcbdea4526a21cb47c72f40718befe4b4bbfafcffa829570e5c85
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| TPUG NOV 84 C | LOTTERY.C | PRG | Radd Maxx | 5 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1C 08 0A 00 97 35 33 32 38 30 2C 30 3A 97 |.......53280,0:.|
00000010: 35 33 32 38 31 2C 30 3A A0 33 3A 9C 00 44 08 0F |53281,0:.3:..D..|
00000020: 00 86 50 4E 28 31 35 30 29 2C 4E 24 28 32 35 29 |..PN(150),N$(25)|
00000030: 2C 50 4E 24 28 32 35 29 2C 44 4E 28 32 35 29 3A |,PN$(25),DN(25):|
00000040: 9F 33 2C 30 00 4E 08 14 00 8D 35 30 30 30 00 67 |.3,0.N....5000.g|
00000050: 08 1E 00 99 22 11 11 1D 1D 1D 1D 31 29 20 4C 4F |...."......1) LO|
00000060: 54 54 41 52 49 4F 22 00 80 08 28 00 99 22 11 1D |TTARIO"...(.."..|
00000070: 1D 1D 1D 32 29 20 4C 4F 54 54 4F 20 36 34 39 22 |...2) LOTTO 649"|
00000080: 00 98 08 32 00 99 22 11 1D 1D 1D 1D 33 29 20 57 |...2..".....3) W|
00000090: 49 4E 54 41 52 49 4F 22 00 AB 08 37 00 99 22 11 |INTARIO"...7..".|
000000A0: 1D 1D 1D 1D 34 29 20 45 4E 44 22 00 C3 08 3C 00 |....4) END"...<.|
000000B0: 99 22 11 11 11 1D 1D 1D 1D 53 45 4C 45 43 54 20 |.".......SELECT |
000000C0: 23 3A 22 00 D5 08 46 00 A1 41 24 3A 8B 41 24 B2 |#:"...F..A$:.A$.|
000000D0: 22 22 A7 37 30 00 FE 08 50 00 8B 41 24 B2 22 31 |"".70...P..A$."1|
000000E0: 22 A7 48 4C B2 33 39 3A 58 B2 30 3A 41 24 B2 22 |".HL.39:X.0:A$."|
000000F0: 4C 4F 54 54 41 52 49 4F 22 3A 89 31 36 30 00 28 |LOTTARIO":.160.(|
00000100: 09 5A 00 8B 41 24 B2 22 32 22 A7 48 4C B2 34 39 |.Z..A$."2".HL.49|
00000110: 3A 58 B2 31 3A 41 24 B2 22 4C 4F 54 54 4F 20 36 |:X.1:A$."LOTTO 6|
00000120: 34 39 22 3A 89 31 36 30 00 39 09 64 00 8B 41 24 |49":.160.9.d..A$|
00000130: B2 22 33 22 A7 33 30 35 30 00 4F 09 69 00 8B 41 |."3".3050.O.i..A|
00000140: 24 B2 22 34 22 A7 A0 33 3A 99 22 93 22 3A 80 00 |$."4"..3:.".":..|
00000150: 57 09 6E 00 89 37 30 00 69 09 A0 00 8B 58 A7 8D |W.n..70.i....X..|
00000160: 31 30 32 30 3A 89 31 37 30 00 72 09 A5 00 8D 39 |1020:.170.r....9|
00000170: 36 30 00 9D 09 AA 00 99 22 11 11 11 22 A6 35 29 |60......"...".5)|
00000180: 22 31 29 20 45 4E 54 45 52 20 4E 45 57 20 54 49 |"1) ENTER NEW TI|
00000190: 43 4B 45 54 20 4E 55 4D 42 45 52 53 22 00 C6 09 |CKET NUMBERS"...|
000001A0: AF 00 99 A6 35 29 22 11 32 29 20 41 44 44 20 4E |....5)".2) ADD N|
000001B0: 55 4D 42 45 52 53 20 54 4F 20 54 49 43 4B 45 54 |UMBERS TO TICKET|
000001C0: 20 4C 49 53 54 22 00 EF 09 B4 00 99 A6 35 29 22 | LIST".......5)"|
000001D0: 11 33 29 20 45 4E 54 45 52 20 57 49 4E 4E 49 4E |.3) ENTER WINNIN|
000001E0: 47 20 22 41 24 22 20 4E 55 4D 42 45 52 53 22 00 |G "A$" NUMBERS".|
000001F0: 05 0A BE 00 99 A6 35 29 22 11 11 53 45 4C 45 43 |......5)"..SELEC|
00000200: 54 20 23 3A 22 00 19 0A C8 00 A1 53 24 3A 8B 53 |T #:"......S$:.S|
00000210: 24 B2 22 31 22 A7 32 33 30 00 2F 0A CD 00 8B 53 |$."1".230./....S|
00000220: 24 B2 22 32 22 A7 8D 35 38 30 3A 89 32 34 30 00 |$."2"..580:.240.|
00000230: 45 0A D2 00 8B 53 24 B2 22 33 22 A7 8D 35 38 30 |E....S$."3"..580|
00000240: 3A 89 33 36 30 00 54 0A DC 00 53 24 B2 22 22 3A |:.360.T...S$."":|
00000250: 89 32 30 30 00 60 0A E6 00 54 B2 31 3A 4C B2 30 |.200.`...T.1:L.0|
00000260: 00 72 0A F0 00 8B 58 A7 8D 31 30 32 30 3A 89 32 |.r....X..1020:.2|
00000270: 35 30 00 7B 0A F5 00 8D 39 36 30 00 AA 0A FA 00 |50.{....960.....|
00000280: 99 22 11 11 22 A6 33 29 22 54 49 43 4B 45 54 20 |."..".3)"TICKET |
00000290: 50 55 52 43 48 41 53 45 44 20 42 59 3A 22 3B 3A |PURCHASED BY:";:|
000002A0: 84 33 2C 4E 24 28 54 29 3A 99 00 CE 0A 04 01 99 |.3,N$(T):.......|
000002B0: 22 11 22 A6 33 29 22 45 4E 54 45 52 20 54 49 43 |".".3)"ENTER TIC|
000002C0: 4B 45 54 20 4E 55 4D 42 45 52 53 3A 11 22 00 E1 |KET NUMBERS:."..|
000002D0: 0A 0E 01 81 43 B2 28 4C AA 31 29 A4 28 4C AA 36 |....C.(L.1).(L.6|
000002E0: 29 00 FB 0A 18 01 99 A6 32 32 29 22 23 20 22 3B |).......22)"# ";|
000002F0: 3A 84 33 2C 50 4E 28 43 29 3A 99 00 1C 0B 22 01 |:.3,PN(C):....".|
00000300: 8B 50 4E 28 43 29 B1 48 4C A7 50 4E 28 43 29 B2 |.PN(C).HL.PN(C).|
00000310: 30 3A 99 22 91 91 22 3A 89 32 38 30 00 22 0B 2C |0:."..":.280.".,|
00000320: 01 82 00 2D 0B 2D 01 8B 58 A7 33 31 30 00 5F 0B |...-.-..X.310._.|
00000330: 31 01 99 22 11 22 A6 33 29 22 45 4E 54 45 52 20 |1..".".3)"ENTER |
00000340: 44 41 59 20 4E 55 4D 42 45 52 20 4F 46 20 54 49 |DAY NUMBER OF TI|
00000350: 43 4B 45 54 20 50 55 52 43 48 41 53 45 3A 22 00 |CKET PURCHASE:".|
00000360: 8C 0B 32 01 99 22 11 22 A6 36 29 22 31 29 20 53 |..2..".".6)"1) S|
00000370: 55 4E 20 20 32 29 20 4D 4F 4E 20 20 33 29 20 54 |UN 2) MON 3) T|
00000380: 55 45 53 20 20 34 29 20 57 45 44 22 00 AF 0B 33 |UES 4) WED"...3|
00000390: 01 99 A6 31 30 29 22 35 29 20 54 48 55 52 20 20 |...10)"5) THUR |
000003A0: 36 29 20 46 52 49 20 20 37 29 20 53 41 54 22 00 |6) FRI 7) SAT".|
000003B0: C2 0B 34 01 A1 53 24 3A 8B 53 24 B2 22 22 A7 33 |..4..S$:.S$."".3|
000003C0: 30 38 00 E7 0B 35 01 44 4E 28 54 29 B2 C5 28 53 |08...5.DN(T)..(S|
000003D0: 24 29 3A 8B 44 4E 28 54 29 B3 30 B0 44 4E 28 54 |$):.DN(T).0.DN(T|
000003E0: 29 B1 37 A7 33 30 38 00 15 0C 36 01 99 22 11 11 |).7.308...6.."..|
000003F0: 22 A6 33 29 22 5B 27 51 27 20 2D 20 51 55 49 54 |".3)"['Q' - QUIT|
00000400: 20 20 20 20 20 27 43 27 20 2D 20 43 4F 4E 54 49 | 'C' - CONTI|
00000410: 4E 55 45 5D 22 00 23 0C 40 01 53 24 B2 22 22 3A |NUE]".#.@.S$."":|
00000420: A1 53 24 00 40 0C 4A 01 8B 53 24 B2 22 43 22 A7 |.S$.@.J..S$."C".|
00000430: 54 B2 54 AA 31 3A 4C B2 4C AA 36 3A 89 32 34 30 |T.T.1:L.L.6:.240|
00000440: 00 50 0C 54 01 8B 53 24 B2 22 51 22 A7 34 39 30 |.P.T..S$."Q".490|
00000450: 00 59 0C 5E 01 89 33 32 30 00 6B 0C 68 01 8B 58 |.Y.^..320.k.h..X|
00000460: A7 8D 31 30 32 30 3A 89 33 37 30 00 74 0C 6D 01 |..1020:.370.t.m.|
00000470: 8D 39 36 30 00 98 0C 72 01 99 A6 35 29 22 11 11 |.960...r...5)"..|
00000480: 45 4E 54 45 52 20 57 49 4E 4E 49 4E 47 20 4E 55 |ENTER WINNING NU|
00000490: 4D 42 45 52 53 3A 11 22 00 A3 0C 7C 01 81 43 B2 |MBERS:."...|..C.|
000004A0: 31 A4 36 00 BE 0C 86 01 99 A6 32 34 29 43 22 9D |1.6.......24)C".|
000004B0: 3A 22 3B 3A 84 33 2C 57 4E 28 43 29 3A 99 00 DF |:";:.3,WN(C):...|
000004C0: 0C 90 01 8B 57 4E 28 43 29 B1 48 4C A7 57 4E 28 |....WN(C).HL.WN(|
000004D0: 43 29 B2 30 3A 99 22 91 91 22 3A 89 33 39 30 00 |C).0:."..":.390.|
000004E0: E5 0C 9A 01 82 00 0D 0D A4 01 99 A6 35 29 22 11 |............5)".|
000004F0: 45 4E 54 45 52 20 42 4F 4E 55 53 20 4E 55 4D 42 |ENTER BONUS NUMB|
00000500: 45 52 3A 22 3B 3A 84 33 2C 42 4E 3A 99 00 28 0D |ER:";:.3,BN:..(.|
00000510: AE 01 8B 42 4E B1 48 4C A7 42 4E B2 30 3A 99 22 |...BN.HL.BN.0:."|
00000520: 91 91 22 3A 89 34 32 30 00 33 0D B3 01 8B 58 A7 |..":.420.3....X.|
00000530: 36 35 30 00 58 0D B8 01 99 A6 35 29 22 11 45 4E |650.X.....5)".EN|
00000540: 54 45 52 20 45 41 52 4C 59 42 49 52 44 20 4E 55 |TER EARLYBIRD NU|
00000550: 4D 42 45 52 53 3A 11 22 00 63 0D C2 01 81 43 B2 |MBERS:.".c....C.|
00000560: 31 A4 34 00 7E 0D CC 01 99 A6 32 36 29 43 22 9D |1.4.~.....26)C".|
00000570: 3A 22 3B 3A 84 33 2C 45 42 28 43 29 3A 99 00 9F |:";:.3,EB(C):...|
00000580: 0D D6 01 8B 45 42 28 43 29 B1 48 4C A7 45 42 28 |....EB(C).HL.EB(|
00000590: 43 29 B2 30 3A 99 22 91 91 22 3A 89 34 36 30 00 |C).0:."..":.460.|
000005A0: AA 0D E0 01 82 3A 89 36 35 30 00 C0 0D EA 01 9F |.....:.650......|
000005B0: 31 35 2C 38 2C 31 35 2C 22 53 30 3A 22 AA 41 24 |15,8,15,"S0:".A$|
000005C0: 00 C8 0D F4 01 A0 31 35 00 E2 0D FE 01 9F 35 2C |......15......5,|
000005D0: 38 2C 35 2C 22 30 3A 22 AA 41 24 AA 22 2C 53 2C |8,5,"0:".A$.",S,|
000005E0: 57 22 00 F7 0D 08 02 54 B2 31 3A 4C B2 30 3A 5A |W".....T.1:L.0:Z|
000005F0: 24 B2 C7 28 31 33 29 00 0A 0E 12 02 8B 4E 24 28 |$..(13)......N$(|
00000600: 54 29 B2 22 22 A7 A0 35 3A 8A 00 1B 0E 1C 02 98 |T).""..5:.......|
00000610: 35 2C 4E 24 28 54 29 3B 5A 24 3B 00 26 0E 1D 02 |5,N$(T);Z$;.&...|
00000620: 8B 58 A7 35 35 30 00 37 0E 1E 02 98 35 2C 44 4E |.X.550.7....5,DN|
00000630: 28 54 29 3B 5A 24 3B 00 4A 0E 26 02 81 43 B2 28 |(T);Z$;.J.&..C.(|
00000640: 4C AA 31 29 A4 28 4C AA 36 29 00 5B 0E 30 02 98 |L.1).(L.6).[.0..|
00000650: 35 2C 50 4E 28 43 29 3B 5A 24 3B 00 73 0E 3A 02 |5,PN(C);Z$;.s.:.|
00000660: 82 43 3A 4C B2 4C AA 36 3A 54 B2 54 AA 31 3A 89 |.C:L.L.6:T.T.1:.|
00000670: 35 33 30 00 8D 0E 44 02 9F 35 2C 38 2C 35 2C 22 |530...D..5,8,5,"|
00000680: 30 3A 22 AA 41 24 AA 22 2C 53 2C 52 22 00 99 0E |0:".A$.",S,R"...|
00000690: 4E 02 54 B2 31 3A 4C B2 30 00 A6 0E 58 02 84 35 |N.T.1:L.0...X..5|
000006A0: 2C 4E 24 28 54 29 00 B1 0E 59 02 8B 58 A7 36 31 |,N$(T)...Y..X.61|
000006B0: 30 00 BE 0E 5A 02 84 35 2C 44 4E 28 54 29 00 DD |0...Z..5,DN(T)..|
000006C0: 0E 62 02 81 43 B2 28 4C AA 31 29 A4 28 4C AA 36 |.b..C.(L.1).(L.6|
000006D0: 29 3A 84 35 2C 50 4E 28 43 29 3A 82 43 00 ED 0E |):.5,PN(C):.C...|
000006E0: 6C 02 54 B2 54 AA 31 3A 4C B2 4C AA 36 00 FA 0E |l.T.T.1:L.L.6...|
000006F0: 76 02 8B 53 54 A7 A0 35 3A 8E 00 03 0F 80 02 89 |v..ST..5:.......|
00000700: 36 30 30 00 21 0F 8A 02 4C B2 30 3A 4D 43 48 B2 |600.!...L.0:MCH.|
00000710: 30 3A 54 B2 31 3A 57 42 4E B2 30 3A 57 45 42 B2 |0:T.1:WBN.0:WEB.|
00000720: 30 00 33 0F 8F 02 8B 58 A7 8D 31 30 32 30 3A 89 |0.3....X..1020:.|
00000730: 36 37 30 00 3C 0F 94 02 8D 39 36 30 00 58 0F 9E |670.<....960.X..|
00000740: 02 99 22 11 11 22 4E 24 28 54 29 22 27 53 20 54 |..".."N$(T)"'S T|
00000750: 49 43 4B 45 54 3A 11 22 00 63 0F A8 02 81 41 B2 |ICKET:.".c....A.|
00000760: 31 A4 36 00 76 0F B2 02 81 43 B2 28 4C AA 31 29 |1.6.v....C.(L.1)|
00000770: A4 28 4C AA 36 29 00 91 0F BC 02 8B 57 4E 28 41 |.(L.6)......WN(A|
00000780: 29 B2 50 4E 28 43 29 A7 4D 43 48 B2 4D 43 48 AA |).PN(C).MCH.MCH.|
00000790: 31 00 9B 0F C6 02 82 43 3A 82 41 00 AD 0F CB 02 |1......C:.A.....|
000007A0: 99 22 54 49 43 4B 45 54 20 23 3A 22 3B 00 CB 0F |."TICKET #:";...|
000007B0: D0 02 81 43 B2 28 4C AA 31 29 A4 28 4C AA 36 29 |...C.(L.1).(L.6)|
000007C0: 3A 99 50 4E 28 43 29 3B 3A 82 43 00 D1 0F D5 02 |:.PN(C);:.C.....|
000007D0: 99 00 EA 0F DA 02 8B 28 4D 43 48 B3 35 29 B0 28 |.......(MCH.5).(|
000007E0: 4D 43 48 B1 35 29 A7 37 36 35 00 FD 0F E4 02 81 |MCH.5).765......|
000007F0: 43 B2 28 4C AA 31 29 A4 28 4C AA 36 29 00 11 10 |C.(L.1).(L.6)...|
00000800: EE 02 8B 42 4E B2 50 4E 28 43 29 A7 57 42 4E B2 |...BN.PN(C).WBN.|
00000810: 31 00 17 10 F8 02 82 00 22 10 FD 02 8B 58 A7 38 |1......."....X.8|
00000820: 34 30 00 3B 10 02 03 99 22 11 45 41 52 4C 59 42 |40.;....".EARLYB|
00000830: 49 52 44 20 44 52 41 57 3A 22 3B 00 5D 10 03 03 |IRD DRAW:";.]...|
00000840: 8B 44 4E 28 54 29 B1 34 A7 99 22 4E 4F 54 20 45 |.DN(T).4.."NOT E|
00000850: 4C 49 47 49 42 4C 45 22 3A 89 38 34 30 00 68 10 |LIGIBLE":.840.h.|
00000860: 0C 03 81 41 B2 31 A4 34 00 7B 10 16 03 81 43 B2 |...A.1.4.{....C.|
00000870: 28 4C AA 31 29 A4 28 4C AA 36 29 00 96 10 20 03 |(L.1).(L.6)... .|
00000880: 8B 45 42 28 41 29 B2 50 4E 28 43 29 A7 57 45 42 |.EB(A).PN(C).WEB|
00000890: B2 57 45 42 AA 31 00 A0 10 2A 03 82 43 3A 82 41 |.WEB.1...*..C:.A|
000008A0: 00 C4 10 34 03 8B 57 45 42 B2 34 A7 99 22 45 41 |...4..WEB.4.."EA|
000008B0: 52 4C 59 42 49 52 44 20 57 49 4E 4E 45 52 22 3A |RLYBIRD WINNER":|
000008C0: 89 38 34 30 00 DE 10 3E 03 99 22 4E 4F 20 45 41 |.840...>.."NO EA|
000008D0: 52 4C 59 42 49 52 44 20 50 52 49 5A 45 22 00 08 |RLYBIRD PRIZE"..|
000008E0: 11 48 03 99 22 11 22 4E 24 28 54 29 22 20 48 41 |.H.."."N$(T)" HA|
000008F0: 53 20 4D 41 54 43 48 45 44 22 4D 43 48 22 4E 55 |S MATCHED"MCH"NU|
00000900: 4D 42 45 52 53 2E 11 22 00 30 11 52 03 8B 4D 43 |MBERS..".0.R..MC|
00000910: 48 B2 33 A7 99 22 54 48 49 53 20 54 49 43 4B 45 |H.3.."THIS TICKE|
00000920: 54 20 57 4F 4E 20 35 54 48 20 50 52 49 5A 45 22 |T WON 5TH PRIZE"|
00000930: 00 58 11 5C 03 8B 4D 43 48 B2 34 A7 99 22 54 48 |.X.\..MCH.4.."TH|
00000940: 49 53 20 54 49 43 4B 45 54 20 57 4F 4E 20 34 54 |IS TICKET WON 4T|
00000950: 48 20 50 52 49 5A 45 22 00 8A 11 66 03 8B 28 4D |H PRIZE"...f..(M|
00000960: 43 48 B2 35 29 AF 28 57 42 4E B2 30 29 A7 99 22 |CH.5).(WBN.0).."|
00000970: 54 48 49 53 20 54 49 43 4B 45 54 20 57 4F 4E 20 |THIS TICKET WON |
00000980: 33 52 44 20 50 52 49 5A 45 22 00 BC 11 70 03 8B |3RD PRIZE"...p..|
00000990: 28 4D 43 48 B2 35 29 AF 28 57 42 4E B2 31 29 A7 |(MCH.5).(WBN.1).|
000009A0: 99 22 54 48 49 53 20 54 49 43 4B 45 54 20 57 4F |."THIS TICKET WO|
000009B0: 4E 20 32 4E 44 20 50 52 49 5A 45 22 00 E8 11 7A |N 2ND PRIZE"...z|
000009C0: 03 8B 4D 43 48 B2 36 A7 99 22 54 48 49 53 20 54 |..MCH.6.."THIS T|
000009D0: 49 43 4B 45 54 20 57 4F 4E 20 54 48 45 20 12 4A |ICKET WON THE .J|
000009E0: 41 43 4B 50 4F 54 92 22 00 0A 12 84 03 4D 43 48 |ACKPOT.".....MCH|
000009F0: B2 30 3A 54 B2 54 AA 31 3A 4C B2 4C AA 36 3A 57 |.0:T.T.1:L.L.6:W|
00000A00: 42 4E B2 30 3A 57 45 42 B2 30 00 35 12 8E 03 99 |BN.0:WEB.0.5....|
00000A10: 22 11 11 22 A6 35 29 22 5B 50 52 45 53 53 20 3C |"..".5)"[PRESS <|
00000A20: 52 45 54 55 52 4E 3E 20 54 4F 20 43 4F 4E 54 49 |RETURN> TO CONTI|
00000A30: 4E 55 45 5D 22 00 51 12 98 03 53 24 B2 22 22 3A |NUE]".Q...S$."":|
00000A40: A1 53 24 3A 8B 53 24 B2 C7 28 31 33 29 A7 39 34 |.S$:.S$..(13).94|
00000A50: 30 00 5A 12 A2 03 89 39 32 30 00 6A 12 AC 03 8B |0.Z....920.j....|
00000A60: 4E 24 28 54 29 B2 22 22 A7 8A 00 73 12 B6 03 89 |N$(T).""...s....|
00000A70: 36 36 30 00 A2 12 C0 03 99 22 93 1F 20 A1 20 20 |660......".. . |
00000A80: 20 CF B8 D0 20 B8 D0 B7 B8 20 B8 D0 B7 B8 20 CF | ... .... .... .|
00000A90: B8 D0 20 CF B8 D0 20 CF B8 D0 20 D0 B7 20 CF B8 |.. ... ... .. ..|
00000AA0: D0 22 00 D0 12 D4 03 99 22 20 B4 20 20 20 B4 A0 |."......" . ..|
00000AB0: AA 20 20 AA 20 20 20 20 AA 20 20 20 CC B9 BA 20 |. . . ... |
00000AC0: CC B9 BA 20 CC B9 BA 20 AA 20 20 B4 20 AA 20 22 |... ... . . . "|
00000AD0: 00 FE 12 DE 03 99 22 20 B4 20 20 20 B4 20 AA 20 |......" . . . |
00000AE0: 20 AA 20 20 20 20 AA 20 20 20 B4 20 AA 20 B4 CD | . . . . ..|
00000AF0: 20 20 B4 CD 20 20 AA 20 20 B4 20 AA 20 22 00 2D | .. . . . ".-|
00000B00: 13 E8 03 99 22 20 CC AF A2 20 CC B9 BA 20 20 AA |...." ... ... .|
00000B10: B4 20 20 20 AA B4 20 20 A1 20 B6 20 A1 20 CD 20 |. .. . . . . |
00000B20: A1 20 CD 20 BA AF 20 CC B9 BA 20 97 22 00 33 13 |. . .. ... .".3.|
00000B30: F2 03 8E 00 66 13 FC 03 99 22 93 22 A6 33 29 22 |....f....".".3)"|
00000B40: 1F B4 20 20 20 CF B8 D0 20 B7 D0 B7 B7 20 B7 D0 |.. ... .... ..|
00000B50: B7 B7 20 CF B8 D0 20 20 20 20 CF B7 B7 20 B4 20 |.. ... ... . |
00000B60: B6 20 CF B7 D0 22 00 95 13 06 04 99 A6 33 29 22 |. ...".......3)"|
00000B70: B4 20 20 20 B4 A0 AA 20 20 AA 20 20 20 20 AA 20 |. ... . . |
00000B80: 20 20 B4 20 AA 20 20 20 20 B4 20 20 20 B4 20 B6 | . . . . .|
00000B90: 20 CC AF BA 22 00 C4 13 10 04 99 A6 33 29 22 B4 | ...".......3)".|
00000BA0: 20 20 20 B4 20 AA 20 20 AA 20 20 20 20 AA 20 20 | . . . . |
00000BB0: 20 B4 20 AA 20 20 20 20 CF B7 D0 20 CC AF BA 20 | . . ... ... |
00000BC0: 20 20 AA 22 00 F4 13 1A 04 99 A6 33 29 22 CC AF | .".......3)"..|
00000BD0: A2 20 CC B9 BA 20 20 AA B4 20 20 20 AA B4 20 20 |. ... .. .. |
00000BE0: CC B9 BA 20 20 20 20 CC AF BA 20 20 20 B6 20 20 |... ... . |
00000BF0: B9 BA 97 22 00 FA 13 24 04 8E 00 35 14 AC 08 8D |..."...$...5....|
00000C00: 34 30 30 30 3A 4D B2 30 3A 43 B2 31 3A 99 22 11 |4000:M.0:C.1:.".|
00000C10: 11 11 45 4E 54 45 52 20 47 52 41 4E 44 20 50 52 |..ENTER GRAND PR|
00000C20: 49 5A 45 20 4E 55 4D 42 45 52 3A 22 3B 3A 84 33 |IZE NUMBER:";:.3|
00000C30: 2C 41 24 3A 99 00 6B 14 B6 08 81 54 B2 31 A4 33 |,A$:..k....T.1.3|
00000C40: 3A 99 22 31 30 30 2C 30 30 30 20 57 49 4E 4E 49 |:."100,000 WINNI|
00000C50: 4E 47 20 4E 55 4D 42 45 52 20 2D 3A 22 3B 3A 84 |NG NUMBER -:";:.|
00000C60: 33 2C 43 24 28 54 29 3A 99 3A 82 00 A1 14 C0 08 |3,C$(T):.:......|
00000C70: 81 54 B2 31 A4 32 3A 99 22 31 30 2C 30 30 30 20 |.T.1.2:."10,000 |
00000C80: 57 49 4E 4E 49 4E 47 20 4E 55 4D 42 45 52 53 20 |WINNING NUMBERS |
00000C90: 2D 3A 22 3B 3A 84 33 2C 44 24 28 54 29 3A 99 3A |-:";:.3,D$(T):.:|
00000CA0: 82 00 CB 14 CA 08 99 22 31 2C 30 30 30 20 57 49 |......."1,000 WI|
00000CB0: 4E 4E 49 4E 47 20 4E 55 4D 42 45 52 20 2D 2D 2D |NNING NUMBER ---|
00000CC0: 3A 22 3B 3A 84 33 2C 45 24 3A 99 00 F5 14 D4 08 |:";:.3,E$:......|
00000CD0: 99 22 24 31 30 30 20 57 49 4E 4E 49 4E 47 20 4E |."$100 WINNING N|
00000CE0: 55 4D 42 45 52 20 2D 2D 2D 2D 3A 22 3B 3A 84 33 |UMBER ----:";:.3|
00000CF0: 2C 46 24 3A 99 00 1F 15 D9 08 99 22 53 43 52 41 |,F$:......."SCRA|
00000D00: 4D 42 4C 45 20 4E 55 4D 42 45 52 20 2D 2D 2D 2D |MBLE NUMBER ----|
00000D10: 2D 2D 2D 2D 3A 22 3B 3A 84 33 2C 4B 24 3A 99 00 |----:";:.3,K$:..|
00000D20: 49 15 DE 08 99 22 24 31 30 20 57 49 4E 4E 49 4E |I...."$10 WINNIN|
00000D30: 47 20 4E 55 4D 42 45 52 20 2D 2D 2D 2D 2D 3A 22 |G NUMBER -----:"|
00000D40: 3B 3A 84 33 2C 47 24 3A 99 00 73 15 E8 08 99 22 |;:.3,G$:..s...."|
00000D50: 57 49 4E 27 46 41 4C 4C 20 4E 55 4D 42 45 52 20 |WIN'FALL NUMBER |
00000D60: 2D 2D 2D 2D 2D 2D 2D 2D 3A 22 3B 3A 84 33 2C 48 |--------:";:.3,H|
00000D70: 24 3A 99 00 9D 15 F2 08 99 22 4D 59 53 54 45 52 |$:......."MYSTER|
00000D80: 59 20 4E 55 4D 42 45 52 20 2D 2D 2D 2D 2D 2D 2D |Y NUMBER -------|
00000D90: 2D 2D 3A 22 3B 3A 84 33 2C 4A 24 3A 99 00 CD 15 |--:";:.3,J$:....|
00000DA0: F3 08 99 22 11 41 52 45 20 41 4F 4C 20 4E 55 4D |...".ARE AOL NUM|
00000DB0: 42 45 52 53 20 45 4E 54 45 52 45 44 20 43 4F 52 |BERS ENTERED COR|
00000DC0: 52 45 43 54 4C 59 20 28 59 2F 4E 29 22 00 E7 15 |RECTLY (Y/N)"...|
00000DD0: F4 08 53 24 B2 22 22 3A A1 53 24 3A 8B 53 24 B2 |..S$."":.S$:.S$.|
00000DE0: 22 22 A7 32 32 39 32 00 F8 15 F5 08 8B 53 24 B2 |"".2292......S$.|
00000DF0: 22 59 22 A7 32 33 31 30 00 06 16 F6 08 8B 53 24 |"Y".2310......S$|
00000E00: B2 22 4E 22 A7 8A 00 10 16 F7 08 89 32 32 39 32 |."N"........2292|
00000E10: 00 35 16 06 09 8D 34 30 30 30 3A 4D B2 30 3A 99 |.5....4000:M.0:.|
00000E20: 22 11 11 11 22 4E 24 28 43 29 22 27 53 20 54 49 |"..."N$(C)"'S TI|
00000E30: 43 4B 45 54 22 00 53 16 10 09 4C 24 B2 CA 28 41 |CKET".S...L$..(A|
00000E40: 24 2C 32 29 3A 50 24 B2 CA 28 50 4E 24 28 43 29 |$,2):P$..(PN$(C)|
00000E50: 2C 32 29 00 80 16 1A 09 8B 41 24 B2 50 4E 24 28 |,2)......A$.PN$(|
00000E60: 43 29 A7 99 22 59 4F 55 20 57 4F 4E 20 24 32 30 |C).."YOU WON $20|
00000E70: 30 2C 30 30 30 22 3A 4D B2 31 3A 89 32 34 32 30 |0,000":M.1:.2420|
00000E80: 00 A8 16 24 09 8B 4C 24 B2 50 24 A7 99 22 59 4F |...$..L$.P$.."YO|
00000E90: 55 20 57 4F 4E 20 24 32 35 2C 30 30 30 22 3A 4D |U WON $25,000":M|
00000EA0: B2 31 3A 89 32 34 32 30 00 B6 16 2E 09 81 54 B2 |.1:.2420......T.|
00000EB0: 35 A4 33 A9 AB 31 00 D0 16 38 09 8B C8 28 4C 24 |5.3..1...8...(L$|
00000EC0: 2C 54 29 B2 C8 28 50 24 2C 54 29 A7 32 37 38 30 |,T)..(P$,T).2780|
00000ED0: 00 EA 16 56 09 8B C9 28 4C 24 2C 54 29 B2 C9 28 |...V...(L$,T)..(|
00000EE0: 50 24 2C 54 29 A7 32 37 38 30 00 F0 16 60 09 82 |P$,T).2780...`..|
00000EF0: 00 FB 16 74 09 81 54 B2 31 A4 33 00 25 17 7E 09 |...t..T.1.3.%.~.|
00000F00: 8B 43 24 28 54 29 B2 50 4E 24 28 43 29 A7 99 22 |.C$(T).PN$(C).."|
00000F10: 59 4F 55 20 57 4F 4E 20 24 31 30 30 2C 30 30 30 |YOU WON $100,000|
00000F20: 22 3A 4D B2 31 00 4B 17 83 09 8B 46 24 B2 CA 28 |":M.1.K....F$..(|
00000F30: 50 24 2C 54 2C 34 29 A7 99 22 59 4F 55 20 57 4F |P$,T,4).."YOU WO|
00000F40: 4E 20 24 31 30 30 22 3A 4D B2 31 00 51 17 88 09 |N $100":M.1.Q...|
00000F50: 82 00 5C 17 9C 09 81 54 B2 31 A4 32 00 81 17 A6 |..\....T.1.2....|
00000F60: 09 8B 44 24 28 54 29 B2 50 24 A7 99 22 59 4F 55 |..D$(T).P$.."YOU|
00000F70: 20 57 4F 4E 20 24 31 30 2C 30 30 30 22 3A 4D B2 | WON $10,000":M.|
00000F80: 31 00 A9 17 CE 09 8B 45 24 B2 CA 28 50 24 2C 54 |1......E$..(P$,T|
00000F90: 2C 35 29 A7 99 22 59 4F 55 20 57 4F 4E 20 24 31 |,5).."YOU WON $1|
00000FA0: 2C 30 30 30 22 3A 4D B2 31 00 AF 17 D8 09 82 00 |,000":M.1.......|
00000FB0: BA 17 14 0A 81 54 B2 31 A4 34 00 DF 17 1E 0A 8B |.....T.1.4......|
00000FC0: 47 24 B2 CA 28 50 24 2C 54 2C 33 29 A7 99 22 59 |G$..(P$,T,3).."Y|
00000FD0: 4F 55 20 57 4F 4E 20 24 31 30 22 3A 4D B2 31 00 |OU WON $10":M.1.|
00000FE0: E5 17 28 0A 82 00 F0 17 3C 0A 81 54 B2 31 A4 35 |..(.....<..T.1.5|
00000FF0: 00 23 18 46 0A 8B 48 24 B2 CA 28 50 24 2C 54 2C |.#.F..H$..(P$,T,|
00001000: 32 2B A7 99 22 59 4F 55 20 57 4F 4E 20 41 20 42 |2+.."YOU WON A B|
00001010: 4F 4F 4B 20 4F 46 20 54 49 43 4B 45 54 53 22 3A |OOK OF TICKETS":|
00001020: 4D B2 31 00 29 18 50 0A 82 00 5A 18 64 0A 8B 4A |M.1.).P...Z.d..J|
00001030: 24 B2 50 24 A7 99 22 59 4F 55 20 41 52 45 20 41 |$.P$.."YOU ARE A|
00001040: 20 4D 59 53 54 45 52 59 20 50 52 49 5A 45 20 57 | MYSTERY PRIZE W|
00001050: 49 4E 4E 45 52 22 3A 4D B2 31 00 69 18 78 0A 59 |INNER":M.1.i.x.Y|
00001060: B2 36 3A 4B 31 24 B2 4B 24 00 7B 18 82 0A 81 5A |.6:K1$.K$.{....Z|
00001070: B2 31 A4 59 3A 81 54 B2 31 A4 59 00 9A 18 8C 0A |.1.Y:.T.1.Y.....|
00001080: 8B CA 28 4B 31 24 2C 5A 2C 31 29 B2 CA 28 50 24 |..(K1$,Z,1)..(P$|
00001090: 2C 54 2C 31 29 A7 32 37 34 30 00 A4 18 96 0A 82 |,T,1).2740......|
000010A0: 54 3A 82 5A 00 D5 18 A0 0A 8B 50 24 B2 22 22 A7 |T:.Z......P$."".|
000010B0: 99 22 59 4F 55 20 57 4F 4E 20 54 48 45 20 24 35 |."YOU WON THE $5|
000010C0: 30 20 53 43 52 41 4D 42 4C 45 20 50 52 49 5A 45 |0 SCRAMBLE PRIZE|
000010D0: 22 3A 4D B2 31 00 00 19 A1 0A 8B 4D B2 30 A7 99 |":M.1......M.0..|
000010E0: 22 53 4F 52 52 59 2C 55 48 49 53 20 54 49 43 4B |"SORRY,UHIS TICK|
000010F0: 45 54 20 57 49 4E 53 20 4E 4F 54 48 49 4E 47 22 |ET WINS NOTHING"|
00001100: 00 2B 19 A5 0A 99 22 11 11 22 A6 35 29 22 5B 50 |.+...."..".5)"[P|
00001110: 52 45 53 53 20 3C 52 45 54 55 52 4E 3E 20 54 4F |RESS <RETURN> TO|
00001120: 20 43 4F 4E 54 49 4E 55 45 5D 22 00 48 19 AA 0A | CONTINUE]".H...|
00001130: 53 24 B2 22 22 3A A1 53 24 3A 8B 53 24 B2 C7 28 |S$."":.S$:.S$..(|
00001140: 31 33 29 A7 32 37 33 33 00 52 19 AC 0A 89 32 37 |13).2733.R....27|
00001150: 33 30 00 5C 19 AD 0A 43 B2 43 AA 31 00 6C 19 AF |30.\...C.C.1.l..|
00001160: 0A 8B 4E 24 28 43 29 B2 22 22 A7 8A 00 76 19 B0 |..N$(C).""...v..|
00001170: 0A 89 32 33 31 30 00 93 19 B4 0A 50 24 B2 CA 28 |..2310.....P$..(|
00001180: 50 24 2C 31 2C 54 AB 31 29 AA CA 28 50 24 2C 54 |P$,1,T.1)..(P$,T|
00001190: AA 31 29 00 B3 19 BE 0A 4B 31 24 B2 CA 28 4B 31 |.1).....K1$..(K1|
000011A0: 24 2C 31 2C 5A AB 31 29 AA CA 28 4B 31 24 2C 5A |$,1,Z.1)..(K1$,Z|
000011B0: AA 31 29 00 C7 19 C8 0A 59 B2 59 AB 31 3A 8B 59 |.1).....Y.Y.1:.Y|
000011C0: B2 30 A7 32 37 32 30 00 D1 19 D2 0A 89 32 36 39 |.0.2720......269|
000011D0: 30 00 EB 19 DC 0A 8B 54 B2 35 A7 99 22 59 4F 55 |0......T.5.."YOU|
000011E0: 20 57 4F 4E 20 24 35 30 30 30 22 00 04 1A E6 0A | WON $5000".....|
000011F0: 8B 54 B2 34 A7 99 22 59 4F 55 20 57 4F 4E 20 24 |.T.4.."YOU WON $|
00001200: 31 30 30 22 00 1C 1A F0 0A 8B 54 B2 33 A7 99 22 |100"......T.3.."|
00001210: 59 4F 55 20 57 4F 4E 20 24 31 30 22 00 24 1A F5 |YOU WON $10".$..|
00001220: 0A 4D B2 31 00 2E 1A FA 0A 89 32 34 32 30 00 4D |.M.1......2420.M|
00001230: 1A 54 0B 9F 31 35 2C 38 2C 31 35 2C 22 53 30 3A |.T..15,8,15,"S0:|
00001240: 57 49 4E 54 41 52 49 4F 22 3A A0 31 35 00 69 1A |WINTARIO":.15.i.|
00001250: 5E 0B 9F 35 2C 38 2C 35 2C 22 30 3A 57 49 4E 54 |^..5,8,5,"0:WINT|
00001260: 41 52 49 4F 2C 53 2C 57 22 00 7A 1A 68 0B 5A 24 |ARIO,S,W".z.h.Z$|
00001270: B2 C7 28 31 33 29 3A 43 B2 31 00 8D 1A 72 0B 8B |..(13):C.1...r..|
00001280: 4E 24 28 43 29 B2 22 22 A7 A0 35 3A 8A 00 A8 1A |N$(C).""..5:....|
00001290: 7C 0B 98 35 2C 4E 24 28 43 29 3B 5A 24 3B 50 4E ||..5,N$(C);Z$;PN|
000012A0: 24 28 43 29 3B 5A 24 3B 00 B8 1A 86 0B 43 B2 43 |$(C);Z$;.....C.C|
000012B0: AA 31 3A 89 32 39 33 30 00 D4 1A 90 0B 9F 35 2C |.1:.2930......5,|
000012C0: 38 2C 35 2C 22 30 3A 57 49 4E 54 41 52 49 4F 2C |8,5,"0:WINTARIO,|
000012D0: 53 2C 52 22 00 DC 1A 9A 0B 43 B2 31 00 F3 1A A4 |S,R".....C.1....|
000012E0: 0B 84 35 2C 4E 24 28 43 29 3A 84 35 2C 50 4E 24 |..5,N$(C):.5,PN$|
000012F0: 28 43 29 00 06 1B AE 0B 43 B2 43 AA 31 3A 8B 53 |(C).....C.C.1:.S|
00001300: 54 A7 A0 35 3A 8E 00 10 1B B8 0B 89 32 39 38 30 |T..5:.......2980|
00001310: 00 40 1B EA 0B 8D 34 30 30 30 3A 99 22 11 11 11 |.@....4000:."...|
00001320: 22 A6 34 29 22 31 29 20 45 4E 54 45 52 20 4E 45 |".4)"1) ENTER NE|
00001330: 57 20 54 49 43 4B 45 54 20 4E 55 4D 42 45 52 22 |W TICKET NUMBER"|
00001340: 00 61 1B F4 0B 99 A6 34 29 22 11 32 29 20 41 44 |.a.....4)".2) AD|
00001350: 44 20 54 4F 20 54 49 43 4B 45 54 20 4C 49 53 54 |D TO TICKET LIST|
00001360: 22 00 8B 1B FE 0B 99 A6 34 29 22 11 33 29 20 45 |".......4)".3) E|
00001370: 4E 54 45 52 20 57 49 4E 54 41 52 49 4F 20 44 52 |NTER WINTARIO DR|
00001380: 41 57 20 4E 55 4D 42 45 52 53 22 00 A6 1B 08 0C |AW NUMBERS".....|
00001390: 53 24 B2 22 22 3A A1 53 24 3A 8B 53 24 B2 22 31 |S$."":.S$:.S$."1|
000013A0: 22 A7 33 32 30 30 00 BE 1B 12 0C 8B 53 24 B2 22 |".3200......S$."|
000013B0: 32 22 A7 8D 32 39 36 30 3A 89 33 32 30 35 00 D6 |2"..2960:.3205..|
000013C0: 1B 1C 0C 8B 53 24 B2 22 33 22 A7 8D 32 39 36 30 |....S$."3"..2960|
000013D0: 3A 89 32 32 32 30 00 E0 1B 26 0E 89 33 30 38 30 |:.2220...&..3080|
000013E0: 00 E8 1B 80 0C 43 B2 31 00 F2 1B 85 0C 8D 34 30 |.....C.1......40|
000013F0: 30 30 00 22 1C 8A 0C 99 22 11 11 11 22 A6 33 29 |00."...."...".3)|
00001400: 22 54 49 43 4B 45 54 20 50 55 52 43 48 41 53 45 |"TICKET PURCHASE|
00001410: 44 20 42 59 3A 22 3B 3A 84 33 2C 4E 24 28 43 29 |D BY:";:.3,N$(C)|
00001420: 3A 99 00 53 1C 94 0C 99 22 11 11 11 22 A6 33 29 |:..S...."...".3)|
00001430: 22 45 4E 54 45 52 20 54 49 43 4B 45 54 20 4E 55 |"ENTER TICKET NU|
00001440: 4D 42 45 52 3A 22 3B 3A 84 33 2C 50 4E 24 28 43 |MBER:";:.3,PN$(C|
00001450: 29 3A 99 00 68 1C 9E 0C 99 22 13 22 3A 81 51 B2 |):..h....".":.Q.|
00001460: 31 A4 31 38 3A 99 3A 82 00 98 1C A8 0C 99 22 11 |1.18:.:.......".|
00001470: 11 11 11 22 A6 33 29 22 5B 27 51 27 20 2D 20 51 |...".3)"['Q' - Q|
00001480: 55 49 54 20 20 20 20 20 27 43 27 20 2D 20 43 4F |UIT 'C' - CO|
00001490: 4E 54 49 4E 55 45 5D 22 00 B2 1C B2 0C 53 24 B2 |NTINUE]".....S$.|
000014A0: 22 22 3A A1 53 24 3A 8B 53 24 B2 22 22 A7 33 32 |"":.S$:.S$."".32|
000014B0: 35 30 00 CA 1C C6 0C 8B 53 24 B2 22 43 22 A7 43 |50......S$."C".C|
000014C0: B2 43 AA 31 3A 89 33 32 30 35 00 DB 1C D0 0C 8B |.C.1:.3205......|
000014D0: 53 24 B2 22 51 22 A7 32 39 30 30 00 E5 1C DA 0C |S$."Q".2900.....|
000014E0: 89 33 32 35 30 00 16 1D A0 0F 99 22 93 22 A6 33 |.3250......".".3|
000014F0: 29 22 1F A1 20 20 B6 B4 B6 20 B6 CD 20 20 A1 20 |)".. ... .. . |
00001500: CF D0 CF D0 20 AA CF B7 D0 20 20 CF B8 D0 20 B6 |.... .... ... .|
00001510: 20 20 CF B8 D0 22 00 43 1D AA 0F 99 A6 33 29 22 | ...".C.....3)"|
00001520: B5 A7 B5 B6 20 B6 20 B6 20 CD 20 B5 20 20 AA B4 |.... . . . . ..|
00001530: 20 20 AA B4 20 AA 20 20 CC B9 BA 20 B6 20 20 B4 | .. . ... . .|
00001540: 20 AA 22 00 70 1D B4 0F 99 A6 33 29 22 B5 A7 A5 | .".p.....3)"...|
00001550: B6 20 B6 20 B6 20 20 CD B5 20 20 AA B4 20 20 AA |. . . .. .. .|
00001560: CF B7 D0 20 20 B4 CD 20 20 B6 20 20 B4 20 AA 22 |... .. . . ."|
00001570: 00 9E 1D BE 0F 99 A6 33 29 22 CD CE CD CE 20 B6 |.......3)".... .|
00001580: B4 B6 B4 20 20 A1 20 20 AA B5 20 20 AA B5 20 AA |... . .. .. .|
00001590: B4 20 B5 20 CD 20 B6 B4 20 CC B9 BA 97 22 00 A4 |. . . .. ...."..|
000015A0: 1D C8 0F 8E 00 D5 1D 88 13 99 22 93 20 1F B5 20 |..........". .. |
000015B0: 20 20 20 CF B8 B8 D0 20 B8 B7 D0 CF B7 B8 20 B8 | .... ...... .|
000015C0: B7 D0 CF B7 B8 20 CF B7 B7 B8 20 CF B8 B8 D0 20 |..... .... .... |
000015D0: CD 20 20 CE 22 00 03 1E 92 13 99 22 20 B5 20 20 |. ."......" . |
000015E0: 20 20 B4 20 20 AA 20 20 20 AA B4 20 20 20 20 20 | . . .. |
000015F0: AA B4 20 20 20 CC B9 20 20 20 CC B9 B9 BA 20 20 |.. .. .... |
00001600: CD CE 22 00 31 1E 9C 13 99 22 20 B5 20 20 20 20 |..".1...." . |
00001610: B4 20 20 AA 20 20 20 AA B4 20 20 20 20 20 AA B4 |. . .. ..|
00001620: 20 20 20 B4 20 20 20 20 B4 20 CD 20 20 20 AA B4 | . . . ..|
00001630: 22 00 60 1E A6 13 99 22 20 CC B9 B9 B9 20 CC B9 |".`...." .... ..|
00001640: B9 BA 20 20 20 AA B5 20 20 20 20 20 AA B5 20 20 |.. .. .. |
00001650: 20 CC AF AF B9 20 B5 20 20 CD 20 20 AA B4 97 22 | .... . . ..."|
00001660: 00 66 1E B0 13 8E 00 00 00 |.f....... |
.......53280,0:.53281,0: 3:..D....PN(150
),N$(25),PN$(25),DN(25):.3,0.N....5000.G
...."......1) LOTTARIO"...(..".....2) LO
TTO 649"...2..".....3) WINTARIO"...7..".
....4) END".C.<..".......SELECT #:".U.F.
.A$:.A$."".70...P..A$."1".HL.39:X.0:A$."
LOTTARIO":.160.(.Z..A$."2".HL.49:X.1:A$.
"LOTTO 649":.160.9.D..A$."3".3050.O.I..A
$."4". 3:.".":..W.N..70.I. ..X..1020:.17
0.R....960......"...".5)"1) ENTER NEW TI
CKET NUMBERS".F.....5)".2) ADD NUMBERS T
O TICKET LIST".......5)".3) ENTER WINNIN
G "A$" NUMBERS".......5)"..SELECT #:"...
H..S$:.S$."1".230./.M..S$."2"..580:.240.
E.R..S$."3"..580:.360.T...S$."":.200.`..
.T.1:L.0.R....X..1020:.250.{....960.....
."..".3)"TICKET PURCHASED BY:";:.3,N$(T)
:..N....".".3)"ENTER TICKET NUMBERS:."..
....C.(L.1).(L.6).......22)"# ";:.3,PN(C
):...."..PN(C).HL.PN(C).0:."..":.280.".,
...-.-..X.310._.1..".".3)"ENTER DAY NUMB
ER OF TICKET PURCHASE:"...2..".".6)"1) S
UN 2) MON 3) TUES 4) WED"...3...10)"5
) THUR 6) FRI 7) SAT".B.4..S$:.S$."".3
08...5.DN(T).E(S$):.DN(T).0.DN(T).7.308.
..6.."..".3)"['Q' - QUIT 'C' - CONTI
NUE]".#.@.S$."":.S$.@.J..S$."C".T.T.1:L.
L.6:.240.P.T..S$."Q".490.Y.^..320.K.H..X
..1020:.370.T.M..960...R...5)"..ENTER WI
NNING NUMBERS:."...|..C.1.6.......24)C".
:";:.3,WN(C):.......WN(C).HL.WN(C).0:.".
.":.390.............5)".ENTER BONUS NUMB
ER:";:.3,BN:..(....BN.HL.BN.0:."..":.420
.3....X.650.X.....5)".ENTER EARLYBIRD NU
MBERS:.".C.B..C.1.4.~.L...26)C".:";:.3,E
B(C):....V..EB(C).HL.EB(C).0:."..":.460.
.....:.650......15,8,15,"S0:".A$.H... 15
......5,8,5,"0:".A$.",S,W".....T.1:L.0:Z
$.G(13)......N$(T)."". 5:.......5,N$(T);
Z$;.&....X.550.7....5,DN(T);Z$;.J.&..C.(
L.1).(L.6).[.0..5,PN(C);Z$;.S.:..C:L.L.6
:T.T.1:.530...D..5,8,5,"0:".A$.",S,R"...
N.T.1:L.0...X..5,N$(T)...Y..X.610...Z..5
,DN(T)...B..C.(L.1).(L.6):.5,PN(C):.C...
L.T.T.1:L.L.6...V..ST. 5:.......600.!...
L.0:MCH.0:T.1:WBN.0:WEB.0.3....X..1020:.
670.<....960.X....".."N$(T)"'S TICKET:."
.C....A.1.6.V....C.(L.1).(L.6)......WN(A
).PN(C).MCH.MCH.1...F..C:.A...K.."TICKET
#:";.K.P..C.(L.1).(L.6):.PN(C);:.C.Q.U.
....Z..(MCH.5).(MCH.5).765......C.(L.1).
(L.6)......BN.PN(C).WBN.1......."....X.8
40.;....".EARLYBIRD DRAW:";.]....DN(T).4
.."NOT ELIGIBLE":.840.H....A.1.4.{....C.
(L.1).(L.6)... ..EB(A).PN(C).WEB.WEB.1.
.*..C:.A.D.4..WEB.4.."EARLYBIRD WINNER":
.840...>.."NO EARLYBIRD PRIZE"...H.."."N
$(T)" HAS MATCHED"MCH"NUMBERS..".0.R..MC
H.3.."THIS TICKET WON 5TH PRIZE".X.\..MC
H.4.."THIS TICKET WON 4TH PRIZE"...F..(M
CH.5).(WBN.0).."THIS TICKET WON 3RD PRIZ
E"...P..(MCH.5).(WBN.1).."THIS TICKET WO
N 2ND PRIZE"...Z..MCH.6.."THIS TICKET WO
N THE .JACKPOT.".....MCH.0:T.T.1:L.L.6:W
BN.0:WEB.0.5...."..".5)"[PRESS <RETURN>
TO CONTINUE]".Q...S$."":.S$:.S$.G(13).94
0.Z....920.J....N$(T).""...S....660.....
.".. . O.P .P.. .P.. O.P O.P O.P P. O.
P".P.T.." . . . . . L.. L.. L..
. . . "......" . . . . . . . .M
.M . . . ".-...." L.. L.. .. ..
. . . M . M .. L.. .".3.....F....".".3)"
.. O.P .P.. .P.. O.P O.. . . O.P"..
.....3)". . . . . . . . . .
L..".D.....3)". . . . . . .
O.P L.. .".......3)"L.. L.. .. ..
L.. L.. . ..."...$...5....4000:M.0
:C.1:."...ENTER GRAND PRIZE NUMBER:";:.3
,A$:..K....T.1.3:."100,000 WINNING NUMBE
R -:";:.3,C$(T):.:.......T.1.2:."10,000
WINNING NUMBERS -:";:.3,D$(T):.:..K.J.."
1,000 WINNING NUMBER ---:";:.3,E$:....T.
."$100 WINNING NUMBER ----:";:.3,F$:....
Y.."SCRAMBLE NUMBER --------:";:.3,K$:..
I...."$10 WINNING NUMBER -----:";:.3,G$:
..S...."WIN'FALL NUMBER --------:";:.3,H
$:......."MYSTERY NUMBER ---------:";:.3
,J$:..M....".ARE AOL NUMBERS ENTERED COR
RECTLY (Y/N)".....S$."":.S$:.S$."".2292.
.....S$."Y".2310......S$."N"........2292
.5....4000:M.0:."..."N$(C)"'S TICKET".S.
..L$.J(A$,2):P$.J(PN$(C),2)......A$.PN$(
C).."YOU WON $200,000":M.1:.2420...$..L$
.P$.."YOU WON $25,000":M.1:.2420......T.
5.3..1.P.8..H(L$,T).H(P$,T).2780...V..I(
L$,T).I(P$,T).2780...`.....T..T.1.3.%.~.
.C$(T).PN$(C).."YOU WON $100,000":M.1.K.
...F$.J(P$,T,4).."YOU WON $100":M.1.Q...
..\....T.1.2......D$(T).P$.."YOU WON $10
,000":M.1...N..E$.J(P$,T,5).."YOU WON $1
,000":M.1...X........T.1.4......G$.J(P$,
T,3).."YOU WON $10":M.1...(.....<..T.1.5
.#.F..H$.J(P$,T,2+.."YOU WON A BOOK OF T
ICKETS":M.1.).P...Z.D..J$.P$.."YOU ARE A
MYSTERY PRIZE WINNER":M.1.I.X.Y.6:K1$.K
$.{....Z.1.Y:.T.1.Y......J(K1$,Z,1).J(P$
,T,1).2740......T:.Z.U. ..P$."".."YOU WO
N THE $50 SCRAMBLE PRIZE":M.1......M.0..
"SORRY,UHIS TICKET WINS NOTHING".+....".
.".5)"[PRESS <RETURN> TO CONTINUE]".H...
S$."":.S$:.S$.G(13).2733.R....2730.\...C
.C.1.L....N$(C).""...V....2310.....P$.J(
P$,1,T.1).J(P$,T.1).....K1$.J(K1$,1,Z.1)
.J(K1$,Z.1).G.H.Y.Y.1:.Y.0.2720.Q.R..269
0......T.5.."YOU WON $5000"......T.4.."Y
OU WON $100"......T.3.."YOU WON $10".$..
.M.1......2420.M.T..15,8,15,"S0:WINTARIO
": 15.I.^..5,8,5,"0:WINTARIO,S,W".Z.H.Z$
.G(13):C.1...R..N$(C)."". 5:....|..5,N$(
C);Z$;PN$(C);Z$;.....C.C.1:.2930.T....5,
8,5,"0:WINTARIO,S,R".....C.1......5,N$(C
):.5,PN$(C).....C.C.1:.ST. 5:.......2980
.@....4000:."...".4)"1) ENTER NEW TICKET
NUMBER".A.....4)".2) ADD TO TICKET LIST
".......4)".3) ENTER WINTARIO DRAW NUMBE
RS".....S$."":.S$:.S$."1".3200......S$."
2"..2960:.3205.V....S$."3"..2960:.2220..
.&..3080.....C.1......4000."...."...".3)
"TICKET PURCHASED BY:";:.3,N$(C):..S....
"...".3)"ENTER TICKET NUMBER:";:.3,PN$(C
):..H....".":.Q.1.18:.:......."....".3)"
['Q' - QUIT 'C' - CONTINUE]".....S$.
"":.S$:.S$."".3250.J.F..S$."C".C.C.1:.32
05...P..S$."Q".2900...Z..3250... ..".".3
)".. ... .M . OPOP .O.P O.P . O.P".C
.....3)".... . . M . .. .. . L.. . .
.".P.....3)".... . . M. .. .O.P .M
. . .".......3)"MNMN .... . .. .. .
. . M .. L..."...H...U....". .. O..P
..PO.. ..PO.. O... O..P M N"......" .
. . .. .. L. L... MN".1...
." . . . .. .. . . M ..
".`...." L... L... .. .. L... .
M ...".F.......
> CLICK IMAGE PREVIEW FOR FULL MODAL