home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Software / XX-911 / c64.bas
Unknown  |  2019-04-13  |  1.9 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.

ConfidenceProgramDetectionMatch TypeSupport
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| 30 20 3a 46 4f 52 44 3d | 31 54 4f 31 30 30 2a 47 |0 :FORD=|1TO100*G|
|00000010| 3a 4e 45 58 54 3a 49 46 | 47 3e 30 54 48 45 4e 52 |:NEXT:IF|G>0THENR|
|00000020| 45 54 55 52 4e 3a 20 20 | 20 3a 3a 3a 3a 3a 3a 3a |ETURN: | :::::::|
|00000030| 3a 3a 3a 3a 3a 56 41 52 | 49 41 42 4c 45 20 44 45 |:::::VAR|IABLE DE|
|00000040| 4c 41 59 3a 3a 3a 3a 3a | 3a 3a 3a 3a 3a 3a 3a 0a |LAY:::::|:::::::.|
|00000050| 35 20 3a 3a 3a 3a 3a 3a | 3a 3a 3a 3a 3a 3a 3a 3a |5 ::::::|::::::::|
|00000060| 3a 3a 3a 3a 3a 3a 3a 3a | 3a 3a 3a 3a 3a 3a 3a 3a |::::::::|::::::::|
|00000070| 3a 3a 3a 3a 3a 3a 20 20 | 20 20 0a 31 30 20 52 45 |:::::: | .10 RE|
|00000080| 4d 20 20 20 20 49 44 45 | 41 20 46 52 4f 4d 20 41 |M IDE|A FROM A|
|00000090| 20 50 4c 41 51 55 45 20 | 53 45 45 4e 20 49 4e 20 | PLAQUE |SEEN IN |
|000000a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 41 20 43 | | A C|
|000000b0| 41 54 41 4c 4f 47 2e 20 | 41 44 41 50 54 45 44 20 |ATALOG. |ADAPTED |
|000000c0| 54 4f 20 54 48 45 0a 31 | 35 20 52 45 4d 20 20 20 |TO THE.1|5 REM |
|000000d0| 20 20 20 20 43 2d 36 34 | 20 42 59 20 4a 49 4d 20 | C-64| BY JIM |
|000000e0| 47 52 45 45 4e 2e 20 20 | 20 20 20 20 20 20 2e 0a |GREEN. | ..|
|000000f0| 31 38 20 52 45 4d 20 20 | 20 20 57 48 4f 20 53 41 |18 REM | WHO SA|
|00000100| 59 53 20 4c 4f 2d 52 45 | 5a 2e 2e 2e 20 20 20 20 |YS LO-RE|Z... |
|00000110| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000120| 20 20 20 20 20 20 20 20 | 20 43 41 4e 27 54 20 42 | | CAN'T B|
|00000130| 45 20 42 45 41 55 54 49 | 46 55 4c 21 20 20 20 2e |E BEAUTI|FUL! .|
|00000140| 0a 32 30 20 52 45 4d 20 | 20 20 20 54 48 49 53 20 |.20 REM | THIS |
|00000150| 49 53 20 4a 55 53 54 20 | 41 20 46 41 4e 54 41 53 |IS JUST |A FANTAS|
|00000160| 59 2e 2e 2e 20 20 20 20 | 20 20 20 20 20 20 20 20 |Y... | |
|00000170| 20 20 20 20 4a 49 4d 20 | 44 4f 53 4e 27 54 20 4f | JIM |DOSN'T O|
|00000180| 57 4e 20 41 20 47 55 4e | 2e 20 20 20 20 20 20 20 |WN A GUN|. |
|00000190| 2e 0a 32 35 20 5a 3d 37 | 30 30 3a 46 4f 52 54 3d |..25 Z=7|00:FORT=|
|000001a0| 5a 54 4f 37 32 36 3a 52 | 45 41 44 41 3a 50 4f 4b |ZTO726:R|EADA:POK|
|000001b0| 45 54 2c 41 3a 4e 45 58 | 54 0a 33 30 20 44 41 54 |ET,A:NEX|T.30 DAT|
|000001c0| 41 20 33 32 2c 32 35 33 | 2c 31 37 34 2c 33 32 2c |A 32,253|,174,32,|
|000001d0| 31 35 38 2c 31 38 33 2c | 31 33 38 2c 37 32 2c 33 |158,183,|138,72,3|
|000001e0| 32 2c 32 35 33 2c 31 37 | 34 2c 33 32 2c 31 35 38 |2,253,17|4,32,158|
|000001f0| 2c 31 38 33 2c 31 30 34 | 2c 31 36 38 2c 32 34 2c |,183,104|,168,24,|
|00000200| 33 32 0a 33 35 20 44 41 | 54 41 20 32 34 30 2c 32 |32.35 DA|TA 240,2|
|00000210| 35 35 2c 33 32 2c 32 35 | 33 2c 31 37 34 2c 37 36 |55,32,25|3,174,76|
|00000220| 2c 31 36 34 2c 31 37 30 | 2c 30 0a 34 30 20 53 3d |,164,170|,0.40 S=|
|00000230| 35 34 32 37 32 3a 46 4f | 52 54 3d 30 54 4f 32 33 |54272:FO|RT=0TO23|
|00000240| 3a 50 4f 4b 45 53 2b 54 | 2c 30 3a 4e 45 58 54 3a |:POKES+T|,0:NEXT:|
|00000250| 50 4f 4b 45 53 2b 32 34 | 2c 31 35 0a 34 35 20 50 |POKES+24|,15.45 P|
|00000260| 4f 4b 45 35 33 32 38 30 | 2c 30 3a 50 4f 4b 45 35 |OKE53280|,0:POKE5|
|00000270| 33 32 38 31 2c 30 3a 50 | 52 49 4e 54 22 93 22 3a |3281,0:P|RINT".":|
|00000280| 47 3d 33 30 3a 47 4f 53 | 55 42 3a 47 4f 53 55 42 |G=30:GOS|UB:GOSUB|
|00000290| 31 39 35 27 20 47 55 4e | 53 48 4f 54 53 0a 35 30 |195' GUN|SHOTS.50|
|000002a0| 20 4f 3d 31 3a 50 4f 4b | 45 35 33 32 36 35 2c 31 | O=1:POK|E53265,1|
|000002b0| 31 3a 50 52 49 4e 54 22 | 93 8e 11 11 11 11 11 11 |1:PRINT"|........|
|000002c0| 11 11 22 3b 3a 50 4f 4b | 45 35 33 32 38 30 2c 31 |..";:POK|E53280,1|
|000002d0| 35 3a 50 4f 4b 45 35 33 | 32 38 31 2c 31 35 0a 35 |5:POKE53|281,15.5|
|000002e0| 35 20 50 52 49 4e 54 22 | 20 20 20 20 20 20 97 12 |5 PRINT"| ..|
|000002f0| a9 df 92 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |... | |
|00000300| 92 a2 a2 a2 a2 a2 a2 a2 | a2 a2 20 20 12 a9 92 a9 |........|.. ....|
|00000310| 00 0a 36 30 20 50 52 49 | 4e 54 22 20 20 20 20 20 |..60 PRI|NT" |
|00000320| 12 a1 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.. | |
|00000330| 20 a5 a7 b7 b7 b7 b7 b7 | d0 20 cd 20 20 92 00 0a | .......|. . ...|
|00000340| 36 35 20 50 52 49 4e 54 | 22 20 20 20 20 20 12 a1 |65 PRINT|" ..|
|00000350| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 a5 | | .|
|00000360| a7 b7 b7 b7 b7 b7 d0 20 | 20 20 92 a9 22 0a 37 30 |....... | ..".70|
|00000370| 20 50 52 49 4e 54 54 41 | 42 28 32 31 29 22 12 20 | PRINTTA|B(21)". |
|00000380| a7 b7 b7 b7 b7 b7 d0 20 | 20 20 20 20 df 22 0a 37 |....... | .".7|
|00000390| 35 20 50 52 49 4e 54 54 | 41 42 28 32 31 29 22 12 |5 PRINTT|AB(21)".|
|000003a0| 20 20 b7 b7 b7 b7 b7 b7 | 20 20 20 20 20 20 df 22 | ......| ."|
|000003b0| 0a 38 30 20 50 52 49 4e | 54 54 41 42 28 32 31 29 |.80 PRIN|TTAB(21)|
|000003c0| 22 12 a2 20 a2 a2 a2 20 | a2 20 20 ce b7 b7 b7 cd |".. ... |. .....|
|000003d0| 20 df 22 0a 38 35 20 50 | 52 49 4e 54 54 41 42 28 | .".85 P|RINTTAB(|
|000003e0| 32 32 29 22 12 20 92 20 | 20 12 a9 92 a9 20 12 20 |22)". . | .... . |
|000003f0| 20 cd 20 d7 20 20 cd 20 | df 00 0a 39 30 20 50 52 | . . . |...90 PR|
|00000400| 49 4e 54 54 41 42 28 32 | 32 29 22 df 12 b7 b7 b7 |INTTAB(2|2)".....|
|00000410| b7 b7 20 20 20 cd 20 20 | 20 20 cd 20 22 0a 39 35 |.. . | . ".95|
|00000420| 20 50 52 49 4e 54 54 41 | 42 28 33 30 29 22 12 bb | PRINTTA|B(30)"..|
|00000430| a7 20 20 20 20 a7 20 92 | 00 0a 31 30 30 20 50 52 |. . .|..100 PR|
|00000440| 49 4e 54 54 41 42 28 33 | 30 29 22 12 a1 a7 20 20 |INTTAB(3|0)"... |
|00000450| 20 20 a7 20 92 00 0a 31 | 30 35 20 50 52 49 4e 54 | . ...1|05 PRINT|
|00000460| 54 41 42 28 33 30 29 22 | 12 a1 a7 20 20 d7 20 a7 |TAB(30)"|... . .|
|00000470| 20 92 00 0a 31 31 30 20 | 50 52 49 4e 54 54 41 42 | ...110 |PRINTTAB|
|00000480| 28 33 30 29 22 12 a1 20 | cd af af af ce 20 92 00 |(30)".. |..... ..|
|00000490| 0a 31 31 35 20 50 52 49 | 4e 54 54 41 42 28 33 30 |.115 PRI|NTTAB(30|
|000004a0| 29 22 bc 12 20 20 20 20 | 20 20 ac 92 22 3a 50 4f |)".. | ..":PO|
|000004b0| 4b 45 35 33 32 36 35 2c | 32 37 0a 31 32 30 20 52 |KE53265,|27.120 R|
|000004c0| 45 4d 20 20 20 2a 20 20 | 2a 20 20 53 4d 4f 4b 45 |EM * |* SMOKE|
|000004d0| 2e 2e 2e 0a 31 32 35 20 | 45 24 3d 22 20 d5 20 cb |....125 |E$=" . .|
|000004e0| c9 cb c9 cb 20 c9 20 cb | 20 c9 20 cb 2e 22 0a 31 |.... . .| . ..".1|
|000004f0| 33 30 20 53 59 53 5a 2c | 34 2c 39 2c 22 05 ca 91 |30 SYSZ,|4,9,"...|
|00000500| 9d cb 91 9d 22 45 24 2b | 22 2e 2e 22 3a 47 3d 2e |...."E$+|"..":G=.|
|00000510| 36 3a 47 4f 53 55 42 0a | 31 33 35 20 46 4f 52 4a |6:GOSUB.|135 FORJ|
|00000520| 3d 31 54 4f 38 3a 53 59 | 53 5a 09 0a 31 34 30 20 |=1TO8:SY|SZ..140 |
|00000530| 49 46 4a 3d 33 54 48 45 | 4e 47 4f 53 55 42 32 33 |IFJ=3THE|NGOSUB23|
|00000540| 35 0a 31 34 35 20 49 46 | 4a 3d 34 54 48 45 4e 47 |5.145 IF|J=4THENG|
|00000550| 4f 53 55 42 32 36 30 0a | 31 35 30 20 53 59 53 5a |OSUB260.|150 SYSZ|
|00000560| 2c 34 2c 39 2c 22 98 ca | 91 22 3a 47 3d 31 3a 47 |,4,9,"..|.":G=1:G|
|00000570| 4f 53 55 42 3a 50 52 49 | 4e 54 22 05 20 20 20 20 |OSUB:PRI|NT". |
|00000580| ca 91 9d 98 cb 22 3b 3a | 47 3d 31 2e 32 3a 47 4f |.....";:|G=1.2:GO|
|00000590| 53 55 42 0a 31 35 35 20 | 50 52 49 4e 54 22 05 9d |SUB.155 |PRINT"..|
|000005a0| cb 22 3a 47 3d 2e 36 3a | 47 4f 53 55 42 3a 46 24 |.":G=.6:|GOSUB:F$|
|000005b0| 3d 45 24 2b 22 20 20 22 | 0a 31 36 30 20 55 3d 35 |=E$+" "|.160 U=5|
|000005c0| 3a 46 4f 52 54 3d 31 54 | 4f 20 39 3a 4e 3d 4e 2b |:FORT=1T|O 9:N=N+|
|000005d0| 32 3a 53 59 53 5a 2c 55 | 2c 37 2c 22 98 22 4d 49 |2:SYSZ,U|,7,"."MI|
|000005e0| 44 24 28 46 24 2c 4e 2c | 33 29 3a 47 3d 2e 37 3a |D$(F$,N,|3):G=.7:|
|000005f0| 47 4f 53 55 42 0a 31 36 | 35 20 53 59 53 5a 2c 55 |GOSUB.16|5 SYSZ,U|
|00000600| 2c 37 2c 22 05 22 4d 49 | 44 24 28 46 24 2c 4e 2c |,7,"."MI|D$(F$,N,|
|00000610| 32 29 3a 47 4f 53 55 42 | 3a 55 3d 55 2b 32 3a 4e |2):GOSUB|:U=U+2:N|
|00000620| 45 58 54 3a 55 3d 36 3a | 4e 3d 30 3a 4e 45 58 54 |EXT:U=6:|N=0:NEXT|
|00000630| 0a 31 37 30 20 47 3d 31 | 30 3a 47 4f 53 55 42 3a |.170 G=1|0:GOSUB:|
|00000640| 47 4f 53 55 42 31 39 35 | 3a 47 3d 32 30 3a 47 4f |GOSUB195|:G=20:GO|
|00000650| 53 55 42 0a 31 37 35 20 | 53 59 53 5a 2c 30 2c 31 |SUB.175 |SYSZ,0,1|
|00000660| 32 2c 22 9e 44 4f 4e 27 | 54 20 4d 45 53 53 20 57 |2,".DON'|T MESS W|
|00000670| 49 54 48 20 55 53 21 21 | 22 3a 47 3d 34 30 3a 47 |ITH US!!|":G=40:G|
|00000680| 4f 53 55 42 3a 50 52 49 | 4e 54 22 93 22 3a 47 3d |OSUB:PRI|NT".":G=|
|00000690| 31 30 3a 47 4f 53 55 42 | 0a 31 38 30 20 53 59 53 |10:GOSUB|.180 SYS|
|000006a0| 5a 2c 30 2c 31 32 2c 22 | 9e 49 54 27 53 20 42 45 |Z,0,12,"|.IT'S BE|
|000006b0| 53 54 2e 2e 2e 22 3a 47 | 3d 31 30 3a 47 4f 53 55 |ST...":G|=10:GOSU|
|000006c0| 42 3a 4c 3d 31 3a 47 4f | 53 55 42 32 30 35 0a 31 |B:L=1:GO|SUB205.1|
|000006d0| 38 35 20 50 52 49 4e 54 | 22 11 4e 4f 54 20 54 4f |85 PRINT|".NOT TO|
|000006e0| 20 4d 45 53 53 20 57 49 | 54 48 20 55 53 21 21 22 | MESS WI|TH US!!"|
|000006f0| 3a 47 3d 36 30 3a 47 4f | 53 55 42 3a 47 4f 54 4f |:G=60:GO|SUB:GOTO|
|00000700| 39 30 30 0a 31 39 30 20 | 52 45 4d 20 20 20 20 2a |900.190 |REM *|
|00000710| 20 20 2a 20 20 53 48 4f | 54 53 2e 2e 2e 0a 31 39 | * SHO|TS....19|
|00000720| 35 20 50 4f 4b 45 35 33 | 32 38 30 2c 31 35 3a 50 |5 POKE53|280,15:P|
|00000730| 4f 4b 45 35 33 32 38 31 | 2c 31 35 3a 50 4f 4b 45 |OKE53281|,15:POKE|
|00000740| 35 33 32 36 35 2c 31 31 | 0a 32 30 30 20 46 4f 52 |53265,11|.200 FOR|
|00000750| 54 3d 31 54 4f 33 3a 47 | 3d 2e 36 3a 47 4f 53 55 |T=1TO3:G|=.6:GOSU|
|00000760| 42 33 30 35 0a 32 30 35 | 20 49 46 4c 3d 31 54 48 |B305.205| IFL=1TH|
|00000770| 45 4e 46 4f 52 54 3d 31 | 54 4f 31 0a 32 31 30 20 |ENFORT=1|TO1.210 |
|00000780| 50 4f 4b 45 53 2b 35 2c | 39 3a 50 4f 4b 45 53 2b |POKES+5,|9:POKES+|
|00000790| 31 2c 32 30 3a 50 4f 4b | 45 53 2b 34 2c 31 32 38 |1,20:POK|ES+4,128|
|000007a0| 3a 47 3d 2e 31 3a 47 4f | 53 55 42 09 0a |:G=.1:GO|SUB.. |
+--------+-------------------------+-------------------------+--------+--------+