/ Transactor / Transactor_09_1986_Transactor_Publishing.d64 / lottery

< prev

next >

MacOS 8.1

Win98

DOS

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 01 04 19 08 64 00 8f 20 | 53 41 56 45 22 30 3a 4c |....d.. |SAVE"0:L|
|00000010| 4f 54 54 45 52 59 22 2c | 38 00 41 08 69 00 8f 20 |OTTERY",|8.A.i.. |
|00000020| 2a 2a 20 41 4e 20 45 56 | 45 52 53 20 43 4f 2d 50 |** AN EV|ERS CO-P|
|00000030| 52 4f 44 55 43 54 49 4f | 4e 20 31 39 38 35 20 2a |RODUCTIO|N 1985 *|
|00000040| 2a 00 68 08 6e 00 86 20 | 57 49 4e 25 28 34 39 2c |*.h.n.. |WIN%(49,|
|00000050| 31 30 29 2c 20 4f 55 54 | 24 28 31 30 29 3a 20 43 |10), OUT|$(10): C|
|00000060| 24 b2 c7 28 31 34 37 29 | 00 80 08 73 00 99 20 43 |$..(147)|...s.. C|
|00000070| 24 22 53 45 4c 45 43 54 | 20 4f 50 54 49 4f 4e 22 |$"SELECT| OPTION"|
|00000080| 00 99 08 78 00 99 20 22 | 31 29 20 4c 4f 54 54 41 |...x.. "|1) LOTTA|
|00000090| 52 49 4f 20 36 2f 33 39 | 22 00 b2 08 7d 00 99 20 |RIO 6/39|"...}.. |
|000000a0| 22 32 29 20 4c 4f 54 54 | 4f 20 20 20 20 36 2f 34 |"2) LOTT|O    6/4|
|000000b0| 39 22 00 d4 08 82 00 85 | 20 58 24 3a 20 8b 20 58 |9"......| X$: . X|
|000000c0| 24 b3 22 31 22 20 b0 20 | 58 24 b1 22 32 22 20 a7 |$."1" . |X$."2" .|
|000000d0| 20 31 33 30 00 f2 08 87 | 00 4c 4f 54 b2 33 39 3a | 130....|.LOT.39:|
|000000e0| 20 8b 20 58 24 b2 22 32 | 22 20 a7 20 4c 4f 54 b2 | . X$."2|" . LOT.|
|000000f0| 34 39 00 32 09 8c 00 85 | 20 22 4f 55 54 50 55 54 |49.2....| "OUTPUT|
|00000100| 20 28 33 29 20 53 43 52 | 45 45 4e 20 20 28 34 29 | (3) SCR|EEN  (4)|
|00000110| 20 50 52 49 4e 54 45 52 | 20 22 3b 44 56 3a 20 8b | PRINTER| ";DV: .|
|00000120| 20 44 56 b3 33 20 b0 20 | 44 56 b1 34 20 a7 20 31 | DV.3 . |DV.4 . 1|
|00000130| 34 30 00 3f 09 91 00 9f | 20 31 2c 28 44 56 29 00 |40.?....| 1,(DV).|
|00000140| 7b 09 96 00 85 20 22 52 | 45 51 55 49 52 45 44 20 |{.... "R|EQUIRED |
|00000150| 23 20 53 45 54 53 20 28 | 31 2d 31 30 29 3d 22 3b |# SETS (|1-10)=";|
|00000160| 4d 41 58 3a 20 8b 20 4d | 41 58 b3 31 20 b0 20 4d |MAX: . M|AX.1 . M|
|00000170| 41 58 b1 31 30 20 a7 20 | 31 35 30 00 ae 09 9b 00 |AX.10 . |150.....|
|00000180| 98 31 2c 22 59 4f 55 52 | 20 36 2f 22 ca 28 c4 28 |.1,"YOUR| 6/".(.(|
|00000190| 4c 4f 54 29 2c 32 29 22 | 20 4e 55 4d 42 45 52 53 |LOT),2)"| NUMBERS|
|000001a0| 20 41 52 45 3a 22 3a 20 | 98 31 3a 20 98 31 00 e0 | ARE:": |.1: .1..|
|000001b0| 09 a0 00 8f 20 2a 2a 20 | 41 53 53 49 47 4e 20 54 |.... ** |ASSIGN T|
|000001c0| 48 45 20 52 41 4e 44 4f | 4d 20 56 41 4c 55 45 53 |HE RANDO|M VALUES|
|000001d0| 20 54 4f 20 54 48 45 20 | 41 52 52 41 59 20 2a 2a | TO THE |ARRAY **|
|000001e0| 00 ff 09 a5 00 81 20 54 | 52 59 b2 31 20 a4 20 4d |...... T|RY.1 . M|
|000001f0| 41 58 3a 20 81 20 50 49 | 4b b2 31 20 a4 20 36 00 |AX: . PI|K.1 . 6.|
|00000200| 3e 0a aa 00 56 25 b2 bb | 28 30 29 ac 4c 4f 54 aa |>...V%..|(0).LOT.|
|00000210| 31 3a 20 8b 20 57 49 4e | 25 28 56 25 2c 54 52 59 |1: . WIN|%(V%,TRY|
|00000220| 29 20 a7 20 31 37 30 3a | 20 8f 20 4c 4f 4f 50 20 |) . 170:| . LOOP |
|00000230| 54 49 4c 4c 20 55 4e 2d | 55 53 45 44 20 23 00 61 |TILL UN-|USED #.a|
|00000240| 0a af 00 57 49 4e 25 28 | 56 25 2c 54 52 59 29 b2 |...WIN%(|V%,TRY).|
|00000250| 31 3a 20 8f 20 46 4c 41 | 47 20 41 53 20 55 53 45 |1: . FLA|G AS USE|
|00000260| 44 00 70 0a b4 00 82 20 | 50 49 4b 2c 20 54 52 59 |D.p.... |PIK, TRY|
|00000270| 00 a0 0a b9 00 8f 20 2a | 2a 20 47 4f 54 20 54 48 |...... *|* GOT TH|
|00000280| 45 20 4e 55 4d 42 45 52 | 53 20 2d 20 42 55 49 4c |E NUMBER|S - BUIL|
|00000290| 44 20 54 48 45 20 53 54 | 52 49 4e 47 53 20 2a 2a |D THE ST|RINGS **|
|000002a0| 00 c1 0a be 00 81 20 50 | 49 4b b2 31 20 a4 20 4d |...... P|IK.1 . M|
|000002b0| 41 58 3a 20 81 20 41 53 | 4e b2 31 20 a4 20 4c 4f |AX: . AS|N.1 . LO|
|000002c0| 54 00 fd 0a c3 00 8b 20 | 57 49 4e 25 28 41 53 4e |T...... |WIN%(ASN|
|000002d0| 2c 50 49 4b 29 20 a7 20 | 4f 55 54 24 28 50 49 4b |,PIK) . |OUT$(PIK|
|000002e0| 29 b2 4f 55 54 24 28 50 | 49 4b 29 aa c9 28 22 20 |).OUT$(P|IK)..(" |
|000002f0| 20 20 22 aa c4 28 41 53 | 4e 29 2c 34 29 00 0c 0b |  "..(AS|N),4)...|
|00000300| c8 00 82 20 41 53 4e 2c | 20 50 49 4b 00 32 0b cd |... ASN,| PIK.2..|
|00000310| 00 8f 20 2a 2a 20 41 4c | 4c 20 52 45 41 44 59 20 |.. ** AL|L READY |
|00000320| 2d 20 54 49 4d 45 20 54 | 4f 20 50 52 49 4e 54 20 |- TIME T|O PRINT |
|00000330| 2a 2a 00 56 0b d2 00 81 | 20 53 50 54 b2 31 20 a4 |**.V....| SPT.1 .|
|00000340| 20 32 34 20 a9 20 34 3a | 20 81 20 50 52 54 b2 31 | 24 . 4:| . PRT.1|
|00000350| 20 a4 20 4d 41 58 00 71 | 0b d7 00 98 31 2c ca 28 | . MAX.q|....1,.(|
|00000360| 4f 55 54 24 28 50 52 54 | 29 2c 53 50 54 2c 34 29 |OUT$(PRT|),SPT,4)|
|00000370| 3b 00 86 0b dc 00 82 20 | 50 52 54 3a 20 98 31 3a |;...... |PRT: .1:|
|00000380| 20 82 20 53 50 54 00 95 | 0b e1 00 98 31 3a 20 a0 | . SPT..|....1: .|
|00000390| 20 31 3a 20 80 00 00 00 |                         | 1: ....|        |
+--------+-------------------------+-------------------------+--------+--------+