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

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% gt2 Kopftext: '0 REM ' default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 30 20 52 45 4d 20 12 2a | 20 20 20 20 20 20 20 51 |0 REM .*| Q|
|00000010| 53 21 20 20 20 44 49 53 | 4b 20 23 20 47 2d 39 30 |S! DIS|K # G-90|
|00000020| 20 20 20 20 20 20 20 2a | 0a 31 20 3a 0a 31 30 20 | *|.1 :.10 |
|00000030| 50 4f 4b 45 35 32 38 30 | 2c 37 3a 50 4f 4b 45 35 |POKE5280|,7:POKE5|
|00000040| 33 32 38 31 2c 37 3a 50 | 52 49 4e 54 22 93 22 0a |3281,7:P|RINT".".|
|00000050| 32 30 20 46 4f 52 54 3d | 31 54 4f 31 38 3a 50 52 |20 FORT=|1TO18:PR|
|00000060| 49 4e 54 22 05 2a 20 1e | 42 55 47 20 96 42 4f 50 |INT".* .|BUG .BOP|
|00000070| 50 45 52 20 22 3b 3a 4e | 45 58 54 3a 50 52 49 4e |PER ";:N|EXT:PRIN|
|00000080| 54 22 05 2a 20 1e 42 55 | 47 22 0a 33 30 20 50 52 |T".* .BU|G".30 PR|
|00000090| 49 4e 54 22 13 b0 c0 c0 | c0 c0 c0 c0 c0 c0 c0 c0 |INT"....|........|
|000000a0| c0 c0 c0 c0 c0 c0 c0 c0 | c0 c0 c0 c0 c0 c0 c0 c0 |........|........|
|000000b0| c0 c0 c0 c0 c0 c0 c0 c0 | c0 c0 c0 c0 ae 22 3b 0a |........|.....";.|
|000000c0| 33 35 20 46 4f 52 54 3d | 31 54 4f 36 3a 50 52 49 |35 FORT=|1TO6:PRI|
|000000d0| 4e 54 22 dd 22 53 50 43 | 28 33 38 29 22 dd 22 3b |NT"."SPC|(38)".";|
|000000e0| 3a 4e 45 58 54 0a 34 30 | 20 50 52 49 4e 54 22 ad |:NEXT.40| PRINT".|
|000000f0| c0 c0 c0 c0 c0 c0 c0 c0 | c0 c0 c0 c0 c0 c0 c0 c0 |........|........|
|00000100| c0 c0 c0 c0 c0 c0 c0 c0 | c0 c0 c0 c0 c0 c0 c0 c0 |........|........|
|00000110| c0 c0 c0 c0 c0 c0 bd 22 | 3b 0a 35 30 20 50 52 49 |......."|;.50 PRI|
|00000120| 4e 54 22 11 11 11 1c 20 | 20 20 20 20 20 55 53 45 |NT".... | USE|
|00000130| 20 3c 53 50 41 43 45 20 | 42 41 52 3e 20 54 4f 20 | <SPACE |BAR> TO |
|00000140| 44 52 4f 50 20 42 4f 4f | 54 00 0a 35 32 20 50 52 |DROP BOO|T..52 PR|
|00000150| 49 4e 54 22 11 20 20 20 | 20 20 4f 4e 20 54 48 45 |INT". | ON THE|
|00000160| 20 42 55 47 20 41 4e 44 | 20 53 51 55 41 53 48 20 | BUG AND| SQUASH |
|00000170| 48 49 4d 20 46 4c 41 54 | 00 0a 37 30 20 50 52 49 |HIM FLAT|..70 PRI|
|00000180| 4e 54 22 11 11 11 20 20 | 20 20 20 20 20 50 52 45 |NT"... | PRE|
|00000190| 53 53 20 3c 53 50 41 43 | 45 3e 20 54 4f 20 53 51 |SS <SPAC|E> TO SQ|
|000001a0| 55 41 53 48 21 21 00 0a | 37 35 20 47 45 54 47 24 |UASH!!..|75 GETG$|
|000001b0| 3a 49 46 47 24 3c 3e 22 | 20 22 54 48 45 4e 37 35 |:IFG$<>"| "THEN75|
|000001c0| 0a 31 30 30 30 20 52 45 | 4d 20 2a 2a 2a 20 42 55 |.1000 RE|M *** BU|
|000001d0| 47 20 42 4f 50 50 45 52 | 20 2a 2a 2a 0a 31 30 31 |G BOPPER| ***.101|
|000001e0| 30 20 50 52 49 4e 54 43 | 48 52 24 28 31 34 37 29 |0 PRINTC|HR$(147)|
|000001f0| 0a 31 30 32 30 20 50 4f | 4b 45 35 33 32 38 30 2c |.1020 PO|KE53280,|
|00000200| 30 3a 50 4f 4b 45 35 33 | 32 38 31 2c 30 0a 31 30 |0:POKE53|281,0.10|
|00000210| 33 30 20 47 4f 53 55 42 | 31 37 32 30 0a 31 30 34 |30 GOSUB|1720.104|
|00000220| 30 20 50 52 49 4e 54 43 | 48 52 24 28 31 35 32 29 |0 PRINTC|HR$(152)|
|00000230| 0a 31 30 35 30 20 54 49 | 24 3d 22 30 30 30 30 30 |.1050 TI|$="00000|
|00000240| 30 22 0a 31 30 36 30 20 | 46 4f 52 49 3d 30 54 4f |0".1060 |FORI=0TO|
|00000250| 36 32 3a 52 45 41 44 4a | 3a 50 4f 4b 45 49 2b 38 |62:READJ|:POKEI+8|
|00000260| 33 32 2c 4a 3a 4e 45 58 | 54 0a 31 30 37 30 20 46 |32,J:NEX|T.1070 F|
|00000270| 4f 52 49 3d 30 54 4f 36 | 32 3a 52 45 41 44 4a 3a |ORI=0TO6|2:READJ:|
|00000280| 50 4f 4b 45 49 2b 38 39 | 36 2c 4a 3a 4e 45 58 54 |POKEI+89|6,J:NEXT|
|00000290| 0a 31 30 38 30 20 46 4f | 52 49 3d 30 54 4f 36 32 |.1080 FO|RI=0TO62|
|000002a0| 3a 52 45 41 44 4a 3a 50 | 4f 4b 45 49 2b 39 36 30 |:READJ:P|OKEI+960|
|000002b0| 2c 4a 3a 4e 45 58 54 0a | 31 30 39 30 20 50 4f 4b |,J:NEXT.|1090 POK|
|000002c0| 45 32 30 34 30 2c 31 33 | 3a 50 4f 4b 45 32 30 34 |E2040,13|:POKE204|
|000002d0| 31 2c 31 34 0a 31 31 30 | 30 20 56 43 3d 35 33 32 |1,14.110|0 VC=532|
|000002e0| 34 38 0a 31 31 31 30 20 | 50 4f 4b 45 56 43 2b 32 |48.1110 |POKEVC+2|
|000002f0| 33 2c 36 3a 50 4f 4b 45 | 56 43 2b 32 39 2c 36 0a |3,6:POKE|VC+29,6.|
|00000300| 31 31 32 30 20 50 4f 4b | 45 56 43 2b 33 39 2c 39 |1120 POK|EVC+39,9|
|00000310| 0a 31 31 33 30 20 50 4f | 4b 45 56 43 2b 34 30 2c |.1130 PO|KEVC+40,|
|00000320| 35 0a 31 31 34 30 20 50 | 4f 4b 45 56 43 2b 34 31 |5.1140 P|OKEVC+41|
|00000330| 2c 35 0a 31 31 35 30 20 | 50 4f 4b 45 56 43 2b 33 |,5.1150 |POKEVC+3|
|00000340| 37 2c 32 3a 50 4f 4b 45 | 56 43 2b 33 38 2c 37 0a |7,2:POKE|VC+38,7.|
|00000350| 31 31 36 30 20 42 44 3d | 38 3a 44 59 3d 38 3a 42 |1160 BD=|8:DY=8:B|
|00000360| 59 3d 36 30 3a 50 4f 4b | 45 56 43 2b 31 2c 42 59 |Y=60:POK|EVC+1,BY|
|00000370| 0a 31 31 37 30 20 47 44 | 3d 34 3a 50 4f 4b 45 56 |.1170 GD|=4:POKEV|
|00000380| 43 2b 33 2c 32 30 30 0a | 31 31 38 30 20 42 58 3d |C+3,200.|1180 BX=|
|00000390| 49 4e 54 28 52 4e 44 28 | 31 29 2a 31 34 30 2b 35 |INT(RND(|1)*140+5|
|000003a0| 36 29 0a 31 31 39 30 20 | 47 58 3d 49 4e 54 28 52 |6).1190 |GX=INT(R|
|000003b0| 4e 44 28 31 29 2a 31 31 | 35 2b 36 36 29 0a 31 32 |ND(1)*11|5+66).12|
|000003c0| 30 30 20 52 45 4d 2a 2a | 2a 42 55 47 20 42 4f 56 |00 REM**|*BUG BOV|
|000003d0| 56 45 52 2a 2a 2a 0a 31 | 32 31 30 20 53 3d 35 34 |VER***.1|210 S=54|
|000003e0| 32 37 32 3a 44 3d 2d 31 | 3a 53 4f 3d 33 38 0a 31 |272:D=-1|:SO=38.1|
|000003f0| 32 32 30 20 50 4f 4b 45 | 53 2b 32 34 2c 31 35 0a |220 POKE|S+24,15.|
|00000400| 31 32 33 30 20 50 4f 4b | 45 53 2b 35 2c 33 31 3a |1230 POK|ES+5,31:|
|00000410| 50 4f 4b 45 53 2b 36 2c | 32 34 30 0a 31 32 34 30 |POKES+6,|240.1240|
|00000420| 20 50 4f 4b 45 37 38 31 | 2c 32 32 3a 50 4f 4b 45 | POKE781|,22:POKE|
|00000430| 37 38 32 2c 30 3a 53 59 | 53 36 35 35 32 30 0a 31 |782,0:SY|S65520.1|
|00000440| 32 35 30 20 46 4f 52 49 | 3d 31 54 4f 34 30 3a 50 |250 FORI|=1TO40:P|
|00000450| 52 49 4e 54 22 b9 22 3b | 3a 4e 45 58 54 0a 31 32 |RINT".";|:NEXT.12|
|00000460| 36 30 20 50 52 49 4e 54 | 43 48 52 24 28 31 39 29 |60 PRINT|CHR$(19)|
|00000470| 22 53 43 4f 52 45 3a 22 | 53 50 43 28 32 31 29 22 |"SCORE:"|SPC(21)"|
|00000480| 48 49 47 48 3a 22 0a 31 | 32 37 30 20 50 52 49 4e |HIGH:".1|270 PRIN|
|00000490| 54 43 48 52 24 28 31 39 | 29 3a 46 4f 52 49 3d 31 |TCHR$(19|):FORI=1|
|000004a0| 54 4f 31 32 30 0a 31 32 | 38 30 20 50 52 49 4e 54 |TO120.12|80 PRINT|
|000004b0| 43 48 52 24 28 31 38 29 | 22 20 22 3b 3a 4e 45 58 |CHR$(18)|" ";:NEX|
|000004c0| 54 0a 31 32 39 30 20 50 | 4f 4b 45 56 43 2b 32 31 |T.1290 P|OKEVC+21|
|000004d0| 2c 33 0a 31 33 30 30 20 | 52 45 4d 20 2a 2a 2a 20 |,3.1300 |REM *** |
|000004e0| 4d 41 49 4e 20 4c 4f 4f | 50 20 2a 2a 2a 0a 31 33 |MAIN LOO|P ***.13|
|000004f0| 31 30 20 42 58 3d 42 58 | 2b 42 44 3a 49 46 42 58 |10 BX=BX|+BD:IFBX|
|00000500| 3c 35 35 4f 52 42 58 3e | 32 34 36 54 48 45 4e 42 |<55ORBX>|246THENB|
|00000510| 44 3d 2d 42 44 0a 31 33 | 32 30 20 50 4f 4b 45 53 |D=-BD.13|20 POKES|
|00000520| 2b 34 2c 30 3a 50 4f 4b | 45 56 43 2b 33 30 2c 30 |+4,0:POK|EVC+30,0|
|00000530| 0a 31 33 33 30 20 50 4f | 4b 45 56 43 2c 42 58 3a |.1330 PO|KEVC,BX:|
|00000540| 50 4f 4b 45 56 43 2b 31 | 2c 42 59 0a 31 33 34 30 |POKEVC+1|,BY.1340|
|00000550| 20 47 58 3d 47 58 2b 47 | 44 3a 49 46 47 58 3c 34 | GX=GX+G|D:IFGX<4|
|00000560| 35 4f 52 47 58 3e 32 34 | 30 54 48 45 4e 47 44 3d |5ORGX>24|0THENGD=|
|00000570| 2d 47 44 0a 31 33 35 30 | 20 50 4f 4b 45 56 43 2b |-GD.1350| POKEVC+|
|00000580| 32 2c 47 58 0a 31 33 36 | 30 20 49 46 53 43 3e 48 |2,GX.136|0 IFSC>H|
|00000590| 49 54 48 45 4e 48 49 3d | 53 43 0a |ITHENHI=|SC. |
+--------+-------------------------+-------------------------+--------+--------+