8bitfiles.net/archives

home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Software / OFFICE-LOTTERY / c64.bas
Unknown | 2019-04-13 | 2.4 KB
open in:
MacOS 8.1 |
Win98 |
DOS
view JSON data |
view as text

This file was not able to be converted.
This format is not currently supported by dexvert.
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	GW-BASIC `(document/gwBasic)`	ext	Supported
`66%`	dexvert	GFA-BASIC Atari `(other/gfaBASICAtari)`	ext	Supported
`1%`	dexvert	Amiga BASIC Protected File `(other/amigaBASICProtectedFile)`	ext	Unsupported
`1%`	dexvert	BAS VBDOS Pro 1.0 Source `(other/basVBDOSPro10Source)`	ext	Unsupported
`1%`	dexvert	Visual Basic Tokenized Source `(other/visualBasicTokenizedSource)`	ext	Unsupported
`1%`	dexvert	ZBASIC `(other/zbasic)`	ext	Unsupported
`100%`	file	data	default
`100%`	detectItEasy	Format: plain text[LF]	default (weak)
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 31 20 50 52 49 4e 54 20 | 22 53 59 53 54 45 4d 20 |1 PRINT |"SYSTEM |
|00000010| 35 36 20 4c 4f 54 54 45 | 52 59 20 46 4f 52 20 34 |56 LOTTE|RY FOR 4|
|00000020| 32 20 50 49 43 4b 53 22 | 3a 50 52 49 4e 54 3a 50 |2 PICKS"|:PRINT:P|
|00000030| 52 49 4e 54 3a 4f 50 45 | 4e 20 33 2c 34 0a 32 20 |RINT:OPE|N 3,4.2 |
|00000040| 52 45 4d 20 54 48 49 53 | 20 50 52 4f 47 52 41 4d |REM THIS| PROGRAM|
|00000050| 20 57 52 49 54 54 45 4e | 20 42 59 20 46 52 41 4e | WRITTEN| BY FRAN|
|00000060| 4b 20 4d 4f 54 54 4f 4c | 41 20 46 4f 52 20 41 4e |K MOTTOL|A FOR AN|
|00000070| 20 4f 46 46 49 43 45 20 | 4c 4f 54 54 45 52 59 20 | OFFICE |LOTTERY |
|00000080| 50 4f 4f 4c 0a 33 20 52 | 45 4d 20 49 54 20 57 41 |POOL.3 R|EM IT WA|
|00000090| 53 20 42 41 53 45 44 20 | 4f 4e 20 53 59 53 54 45 |S BASED |ON SYSTE|
|000000a0| 4d 20 35 36 20 42 59 20 | 47 41 49 4c 20 48 4f 57 |M 56 BY |GAIL HOW|
|000000b0| 41 52 44 20 57 48 49 43 | 48 20 57 49 4c 4c 20 54 |ARD WHIC|H WILL T|
|000000c0| 41 4b 45 0a 34 20 52 45 | 4d 20 54 57 45 4c 56 45 |AKE.4 RE|M TWELVE|
|000000d0| 20 53 45 4c 45 43 54 45 | 44 20 4e 55 4d 42 45 52 | SELECTE|D NUMBER|
|000000e0| 53 20 41 4e 44 20 57 48 | 45 45 4c 20 54 48 45 4d |S AND WH|EEL THEM|
|000000f0| 20 54 4f 20 50 52 4f 44 | 55 43 45 20 34 32 20 47 | TO PROD|UCE 42 G|
|00000100| 41 4d 45 20 42 4f 58 45 | 53 0a 31 30 20 49 4e 50 |AME BOXE|S.10 INP|
|00000110| 55 54 20 22 4e 55 4d 42 | 45 52 20 23 20 31 22 3b |UT "NUMB|ER # 1";|
|00000120| 41 0a 32 30 20 49 4e 50 | 55 54 20 22 4e 55 4d 42 |A.20 INP|UT "NUMB|
|00000130| 45 52 20 23 20 32 22 3b | 42 0a 33 30 20 49 4e 50 |ER # 2";|B.30 INP|
|00000140| 55 54 20 22 4e 55 4d 42 | 45 52 20 23 20 33 22 3b |UT "NUMB|ER # 3";|
|00000150| 43 0a 34 30 20 49 4e 50 | 55 54 20 22 4e 55 4d 42 |C.40 INP|UT "NUMB|
|00000160| 45 52 20 23 20 34 22 3b | 44 0a 35 30 20 49 4e 50 |ER # 4";|D.50 INP|
|00000170| 55 54 20 22 4e 55 4d 42 | 45 52 20 23 20 35 22 3b |UT "NUMB|ER # 5";|
|00000180| 45 0a 36 30 20 49 4e 50 | 55 54 20 22 4e 55 4d 42 |E.60 INP|UT "NUMB|
|00000190| 45 52 20 23 20 36 22 3b | 46 0a 37 30 20 49 4e 50 |ER # 6";|F.70 INP|
|000001a0| 55 54 20 22 4e 55 4d 42 | 45 52 20 23 20 37 22 3b |UT "NUMB|ER # 7";|
|000001b0| 47 0a 38 30 20 49 4e 50 | 55 54 20 22 4e 55 4d 42 |G.80 INP|UT "NUMB|
|000001c0| 45 52 20 23 20 38 22 3b | 48 0a 39 30 20 49 4e 50 |ER # 8";|H.90 INP|
|000001d0| 55 54 20 22 4e 55 4d 42 | 45 52 20 23 20 39 22 3b |UT "NUMB|ER # 9";|
|000001e0| 49 0a 31 30 30 20 49 4e | 50 55 54 20 22 4e 55 4d |I.100 IN|PUT "NUM|
|000001f0| 42 45 52 20 23 20 31 30 | 22 3b 4a 0a 31 31 30 20 |BER # 10|";J.110 |
|00000200| 49 4e 50 55 54 20 22 4e | 55 4d 42 45 52 20 23 20 |INPUT "N|UMBER # |
|00000210| 31 31 22 3b 4b 0a 31 32 | 30 20 49 4e 50 55 54 20 |11";K.12|0 INPUT |
|00000220| 22 4e 55 4d 42 45 52 20 | 23 20 31 32 22 3b 4c 0a |"NUMBER |# 12";L.|
|00000230| 31 33 30 20 43 4d 44 33 | 0a 31 33 31 20 50 52 49 |130 CMD3|.131 PRI|
|00000240| 4e 54 20 22 49 4e 50 55 | 54 20 4e 55 4d 42 45 52 |NT "INPU|T NUMBER|
|00000250| 53 20 57 45 52 45 22 3b | 41 3b 42 3b 43 3b 44 3b |S WERE";|A;B;C;D;|
|00000260| 45 3b 46 3b 47 3b 48 3b | 49 3b 4a 3b 4b 3b 4c 0a |E;F;G;H;|I;J;K;L.|
|00000270| 31 33 32 20 50 52 49 4e | 54 0a 31 33 33 20 50 52 |132 PRIN|T.133 PR|
|00000280| 49 4e 54 0a 31 33 34 20 | 50 52 49 4e 54 20 22 54 |INT.134 |PRINT "T|
|00000290| 48 45 20 46 4f 4c 4c 4f | 57 49 4e 47 20 41 52 45 |HE FOLLO|WING ARE|
|000002a0| 20 54 48 45 20 47 41 4d | 45 20 42 4f 58 45 53 2c | THE GAM|E BOXES,|
|000002b0| 20 41 4c 4c 20 34 32 20 | 4f 46 20 54 48 45 4d 22 | ALL 42 |OF THEM"|
|000002c0| 0a 31 33 35 20 50 52 49 | 4e 54 0a 31 33 36 20 50 |.135 PRI|NT.136 P|
|000002d0| 52 49 4e 54 0a 31 34 30 | 20 50 52 49 4e 54 20 22 |RINT.140| PRINT "|
|000002e0| 20 31 53 54 20 42 4f 58 | 20 22 3b 41 3b 42 3b 43 | 1ST BOX| ";A;B;C|
|000002f0| 3b 44 3b 45 3b 46 3a 50 | 52 49 4e 54 0a 31 35 30 |;D;E;F:P|RINT.150|
|00000300| 20 50 52 49 4e 54 20 22 | 20 32 4e 44 20 42 4f 58 | PRINT "| 2ND BOX|
|00000310| 20 22 3b 41 3b 42 3b 43 | 3b 47 3b 48 3b 49 3a 50 | ";A;B;C|;G;H;I:P|
|00000320| 52 49 4e 54 0a 31 36 30 | 20 50 52 49 4e 54 20 22 |RINT.160| PRINT "|
|00000330| 20 33 52 44 20 42 4f 58 | 20 22 3b 41 3b 42 3b 43 | 3RD BOX| ";A;B;C|
|00000340| 3b 4a 3b 4b 3b 4c 3a 50 | 52 49 4e 54 0a 31 37 30 |;J;K;L:P|RINT.170|
|00000350| 20 50 52 49 4e 54 20 22 | 20 34 54 48 20 42 4f 58 | PRINT "| 4TH BOX|
|00000360| 20 22 3b 41 3b 42 3b 44 | 3b 47 3b 48 3b 4a 3a 50 | ";A;B;D|;G;H;J:P|
|00000370| 52 49 4e 54 0a 31 38 30 | 20 50 52 49 4e 54 20 22 |RINT.180| PRINT "|
|00000380| 20 35 54 48 20 42 4f 58 | 20 22 3b 41 3b 42 3b 44 | 5TH BOX| ";A;B;D|
|00000390| 3b 49 3b 4b 3b 4c 3a 50 | 52 49 4e 54 0a 31 39 30 |;I;K;L:P|RINT.190|
|000003a0| 20 50 52 49 4e 54 20 22 | 20 36 54 48 20 42 4f 58 | PRINT "| 6TH BOX|
|000003b0| 20 22 3b 41 3b 42 3b 45 | 3b 47 3b 48 3b 4b 3a 50 | ";A;B;E|;G;H;K:P|
|000003c0| 52 49 4e 54 0a 32 30 30 | 20 50 52 49 4e 54 20 22 |RINT.200| PRINT "|
|000003d0| 20 37 54 48 20 42 4f 58 | 20 22 3b 41 3b 42 3b 45 | 7TH BOX| ";A;B;E|
|000003e0| 3b 49 3b 4a 3b 4c 3a 50 | 52 49 4e 54 0a 32 31 30 |;I;J;L:P|RINT.210|
|000003f0| 20 50 52 49 4e 54 20 22 | 20 38 54 48 20 42 4f 58 | PRINT "| 8TH BOX|
|00000400| 20 22 3b 41 3b 42 3b 46 | 3b 47 3b 48 3b 4c 3a 50 | ";A;B;F|;G;H;L:P|
|00000410| 52 49 4e 54 0a 32 32 30 | 20 50 52 49 4e 54 20 22 |RINT.220| PRINT "|
|00000420| 20 39 54 48 20 42 4f 58 | 20 22 3b 41 3b 42 3b 46 | 9TH BOX| ";A;B;F|
|00000430| 3b 49 3b 4a 3b 4b 3a 50 | 52 49 4e 54 0a 32 33 30 |;I;J;K:P|RINT.230|
|00000440| 20 50 52 49 4e 54 20 22 | 31 30 54 48 20 42 4f 58 | PRINT "|10TH BOX|
|00000450| 20 22 3b 41 3b 43 3b 44 | 3b 47 3b 49 3b 4a 3a 50 | ";A;C;D|;G;I;J:P|
|00000460| 52 49 4e 54 0a 32 34 30 | 20 50 52 49 4e 54 20 22 |RINT.240| PRINT "|
|00000470| 31 31 54 48 20 42 4f 58 | 20 22 3b 41 3b 45 3b 46 |11TH BOX| ";A;E;F|
|00000480| 3b 48 3b 49 3b 4a 3a 50 | 52 49 4e 54 0a 32 34 35 |;H;I;J:P|RINT.245|
|00000490| 20 50 52 49 4e 54 20 22 | 31 32 54 48 20 42 4f 58 | PRINT "|12TH BOX|
|000004a0| 20 22 3b 42 3b 43 3b 44 | 3b 47 3b 4b 3b 4c 3a 50 | ";B;C;D|;G;K;L:P|
|000004b0| 52 49 4e 54 0a 32 35 30 | 20 50 52 49 4e 54 20 22 |RINT.250| PRINT "|
|000004c0| 31 33 54 48 20 42 4f 58 | 20 22 3b 42 3b 43 3b 44 |13TH BOX| ";B;C;D|
|000004d0| 3b 48 3b 49 3b 4a 3a 50 | 52 49 4e 54 0a 32 36 30 |;H;I;J:P|RINT.260|
|000004e0| 20 50 52 49 4e 54 20 22 | 31 34 54 48 20 42 4f 58 | PRINT "|14TH BOX|
|000004f0| 20 22 3b 42 3b 43 3b 45 | 3b 47 3b 4a 3b 4c 3a 50 | ";B;C;E|;G;J;L:P|
|00000500| 52 49 4e 54 0a 32 37 30 | 20 50 52 49 4e 54 20 22 |RINT.270| PRINT "|
|00000510| 31 35 54 48 20 42 4f 58 | 20 22 3b 42 3b 43 3b 45 |15TH BOX| ";B;C;E|
|00000520| 3b 48 3b 49 3b 4b 3a 50 | 52 49 4e 54 0a 32 38 30 |;H;I;K:P|RINT.280|
|00000530| 20 50 52 49 4e 54 20 22 | 31 36 54 48 20 42 09 00 | PRINT "|16TH B..|
|00000540| 20 22 3b 42 3b 43 3b 46 | 3b 47 3b 4a 3b 4b 3a 50 | ";B;C;F|;G;J;K:P|
|00000550| 52 49 4e 54 0a 32 39 30 | 20 50 52 49 4e 54 20 22 |RINT.290| PRINT "|
|00000560| 31 37 54 48 20 42 4f 58 | 20 22 3b 42 3b 43 3b 46 |17TH BOX| ";B;C;F|
|00000570| 3b 48 3b 49 3b 4c 3a 50 | 52 49 4e 54 0a 33 30 30 |;H;I;L:P|RINT.300|
|00000580| 20 50 52 49 4e 54 20 22 | 31 38 54 48 20 42 4f 58 | PRINT "|18TH BOX|
|00000590| 20 22 3b 42 3b 44 3b 45 | 3b 47 3b 49 3b 4c 3a 50 | ";B;D;E|;G;I;L:P|
|000005a0| 52 49 4e 54 0a 33 31 30 | 20 50 52 49 4e 54 20 22 |RINT.310| PRINT "|
|000005b0| 31 39 54 48 20 42 4f 58 | 20 22 3b 42 3b 44 3b 45 |19TH BOX| ";B;D;E|
|000005c0| 3b 48 3b 4a 3b 4b 3a 50 | 52 49 4e 54 0a 33 32 30 |;H;J;K:P|RINT.320|
|000005d0| 20 50 52 49 4e 54 20 22 | 32 30 54 48 20 42 4f 58 | PRINT "|20TH BOX|
|000005e0| 20 22 3b 42 3b 44 3b 46 | 3b 47 3b 49 3b 4b 3a 50 | ";B;D;F|;G;I;K:P|
|000005f0| 52 49 4e 54 0a 33 33 30 | 20 50 52 49 4e 54 20 22 |RINT.330| PRINT "|
|00000600| 32 31 53 54 20 42 4f 58 | 20 22 3b 41 3b 43 3b 44 |21ST BOX| ";A;C;D|
|00000610| 3b 48 3b 4b 3b 4c 3a 50 | 52 49 4e 54 0a 33 34 30 |;H;K;L:P|RINT.340|
|00000620| 20 50 52 49 4e 54 20 22 | 32 32 4e 44 20 42 4f 58 | PRINT "|22ND BOX|
|00000630| 20 22 3b 41 3b 43 3b 45 | 3b 47 3b 49 3b 4b 3a 50 | ";A;C;E|;G;I;K:P|
|00000640| 52 49 4e 54 0a 33 36 30 | 20 50 52 49 4e 54 20 22 |RINT.360| PRINT "|
|00000650| 32 33 52 44 20 42 4f 58 | 20 22 3b 41 3b 43 3b 45 |23RD BOX| ";A;C;E|
|00000660| 3b 48 3b 4a 3b 4c 3a 50 | 52 49 4e 54 0a 33 37 30 |;H;J;L:P|RINT.370|
|00000670| 20 50 52 49 4e 54 20 22 | 32 34 54 48 20 42 4f 58 | PRINT "|24TH BOX|
|00000680| 20 22 3b 41 3b 43 3b 46 | 3b 47 3b 49 3b 4c 3a 50 | ";A;C;F|;G;I;L:P|
|00000690| 52 49 4e 54 0a 33 38 30 | 20 50 52 49 4e 54 20 22 |RINT.380| PRINT "|
|000006a0| 32 35 54 48 20 42 4f 58 | 20 22 3b 41 3b 43 3b 46 |25TH BOX| ";A;C;F|
|000006b0| 3b 48 3b 4a 3b 4b 3a 50 | 52 49 4e 54 0a 33 39 30 |;H;J;K:P|RINT.390|
|000006c0| 20 50 52 49 4e 54 20 22 | 32 36 54 48 20 42 4f 58 | PRINT "|26TH BOX|
|000006d0| 20 22 3b 41 3b 44 3b 45 | 3b 47 3b 4a 3b 4b 3a 50 | ";A;D;E|;G;J;K:P|
|000006e0| 52 49 4e 54 0a 34 30 30 | 20 50 52 49 4e 54 20 22 |RINT.400| PRINT "|
|000006f0| 32 37 54 48 20 42 4f 58 | 20 22 3b 41 3b 44 3b 45 |27TH BOX| ";A;D;E|
|00000700| 3b 48 3b 49 3b 4c 3a 50 | 52 49 4e 54 0a 34 31 30 |;H;I;L:P|RINT.410|
|00000710| 20 50 52 49 4e 54 20 22 | 32 38 54 48 20 42 4f 58 | PRINT "|28TH BOX|
|00000720| 20 22 3b 41 3b 44 3b 46 | 3b 47 3b 4a 3b 4c 3a 50 | ";A;D;F|;G;J;L:P|
|00000730| 52 49 4e 54 0a 34 32 30 | 20 50 52 49 4e 54 20 22 |RINT.420| PRINT "|
|00000740| 32 39 54 48 20 42 4f 58 | 20 22 3b 41 3b 44 3b 46 |29TH BOX| ";A;D;F|
|00000750| 3b 48 3b 49 3b 4b 3a 50 | 52 49 4e 54 0a 34 33 30 |;H;I;K:P|RINT.430|
|00000760| 20 50 52 49 4e 54 20 22 | 33 30 54 48 20 42 4f 58 | PRINT "|30TH BOX|
|00000770| 20 22 3b 41 3b 45 3b 46 | 3b 47 3b 4b 3b 4c 3a 50 | ";A;E;F|;G;K;L:P|
|00000780| 52 49 4e 54 0a 34 34 30 | 20 50 52 49 4e 54 20 22 |RINT.440| PRINT "|
|00000790| 33 31 53 54 20 42 4f 58 | 20 22 3b 42 3b 44 3b 46 |31ST BOX| ";B;D;F|
|000007a0| 3b 48 3b 4a 3b 4c 3a 50 | 52 49 4e 54 0a 34 35 30 |;H;J;L:P|RINT.450|
|000007b0| 20 50 52 49 4e 54 20 22 | 33 32 4e 44 20 42 09 00 | PRINT "|32ND B..|
|000007c0| 20 22 3b 42 3b 45 3b 46 | 3b 47 3b 49 3b 4a 3a 50 | ";B;E;F|;G;I;J:P|
|000007d0| 52 49 4e 54 0a 34 36 30 | 20 50 52 49 4e 54 20 22 |RINT.460| PRINT "|
|000007e0| 33 33 52 44 20 42 4f 58 | 20 22 3b 42 3b 45 3b 46 |33RD BOX| ";B;E;F|
|000007f0| 3b 48 3b 4b 3b 4c 3a 50 | 52 49 4e 54 0a 34 37 30 |;H;K;L:P|RINT.470|
|00000800| 20 50 52 49 4e 54 20 22 | 33 34 54 48 20 42 4f 58 | PRINT "|34TH BOX|
|00000810| 20 22 3b 43 3b 44 3b 45 | 3b 47 3b 48 3b 4c 3a 50 | ";C;D;E|;G;H;L:P|
|00000820| 52 49 4e 54 0a 34 38 30 | 20 50 52 49 4e 54 20 22 |RINT.480| PRINT "|
|00000830| 33 35 54 48 20 42 4f 58 | 20 22 3b 43 3b 44 3b 45 |35TH BOX| ";C;D;E|
|00000840| 3b 49 3b 4a 3b 4b 3a 50 | 52 49 4e 54 0a 34 39 30 |;I;J;K:P|RINT.490|
|00000850| 20 50 52 49 4e 54 20 22 | 33 36 54 48 20 42 4f 58 | PRINT "|36TH BOX|
|00000860| 20 22 3b 43 3b 44 3b 46 | 3b 47 3b 48 3b 4b 3a 50 | ";C;D;F|;G;H;K:P|
|00000870| 52 49 4e 54 0a 35 30 30 | 20 50 52 49 4e 54 20 22 |RINT.500| PRINT "|
|00000880| 33 37 54 48 20 42 4f 58 | 20 22 3b 43 3b 44 3b 46 |37TH BOX| ";C;D;F|
|00000890| 3b 49 3b 4a 3b 4c 3a 50 | 52 49 4e 54 0a 35 31 30 |;I;J;L:P|RINT.510|
|000008a0| 20 50 52 49 4e 54 20 22 | 33 38 54 48 20 42 4f 58 | PRINT "|38TH BOX|
|000008b0| 20 22 3b 43 3b 45 3b 46 | 3b 47 3b 48 3b 4a 3a 50 | ";C;E;F|;G;H;J:P|
|000008c0| 52 49 4e 54 0a 35 32 30 | 20 50 52 49 4e 54 20 22 |RINT.520| PRINT "|
|000008d0| 33 39 54 48 20 42 4f 58 | 20 22 3b 43 3b 45 3b 46 |39TH BOX| ";C;E;F|
|000008e0| 3b 49 3b 4b 3b 4c 3a 50 | 52 49 4e 54 0a 35 33 30 |;I;K;L:P|RINT.530|
|000008f0| 20 50 52 49 4e 54 20 22 | 34 30 54 48 20 42 4f 58 | PRINT "|40TH BOX|
|00000900| 20 22 3b 44 3b 45 3b 46 | 3b 47 3b 48 3b 49 3a 50 | ";D;E;F|;G;H;I:P|
|00000910| 52 49 4e 54 0a 35 34 30 | 20 50 52 49 4e 54 20 22 |RINT.540| PRINT "|
|00000920| 34 31 53 54 20 42 4f 58 | 20 22 3b 44 3b 45 3b 46 |41ST BOX| ";D;E;F|
|00000930| 3b 4a 3b 4b 3b 4c 3a 50 | 52 49 4e 54 0a 35 35 30 |;J;K;L:P|RINT.550|
|00000940| 20 50 52 49 4e 54 20 22 | 34 32 4e 44 20 42 4f 58 | PRINT "|42ND BOX|
|00000950| 20 22 3b 47 3b 48 3b 49 | 3b 4a 3b 4b 3b 4c 3a 50 | ";G;H;I|;J;K;L:P|
|00000960| 52 49 4e 54 0a 39 39 36 | 20 50 52 49 4e 54 20 22 |RINT.996| PRINT "|
|00000970| 20 47 20 4f 20 4f 20 44 | 20 20 4c 20 55 20 43 20 | G O O D|  L U C |
|00000980| 4b 20 20 47 20 41 20 4e | 20 47 22 0a 39 39 37 20 |K  G A N| G".997 |
|00000990| 50 52 49 4e 54 23 33 0a | 39 39 38 20 43 4c 4f 53 |PRINT#3.|998 CLOS|
|000009a0| 45 20 33 0a 39 39 39 20 | 45 4e 44 0a             |E 3.999 |END.    |
+--------+-------------------------+-------------------------+--------+--------+