home *** CD-ROM | disk | FTP | other *** search
/ 8bitfiles.net/archives / archives.tar / archives / genie-commodore-file-library / C64Games / BARRICADE / c64.bas
Unknown  |  2019-04-13  |  1.3 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: '99 POKE650,100 default (weak)
100% detectItEasy Format: plain text[LF] default (weak)



hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 39 39 20 50 4f 4b 45 36 | 35 30 2c 31 30 30 20 20 |99 POKE6|50,100 |
|00000010| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000020| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000030| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000040| 20 20 20 20 20 20 20 20 | 20 20 20 20 0a 31 30 30 | | .100|
|00000050| 20 52 45 4d 20 28 43 29 | 20 50 45 54 20 42 45 4e | REM (C)| PET BEN|
|00000060| 45 4c 55 58 0a 31 31 30 | 20 52 45 4d 20 20 20 20 |ELUX.110| REM |
|00000070| 20 45 58 43 48 41 4e 47 | 45 0a 31 32 30 20 52 45 | EXCHANG|E.120 RE|
|00000080| 4d 20 20 20 20 20 4e 45 | 54 48 45 52 4c 41 4e 44 |M NE|THERLAND|
|00000090| 53 0a 31 32 31 20 52 45 | 4d 2a 2a 54 52 41 4e 53 |S.121 RE|M**TRANS|
|000000a0| 4c 41 54 45 44 20 46 52 | 4f 4d 20 54 48 45 20 44 |LATED FR|OM THE D|
|000000b0| 55 54 43 48 2c 20 20 20 | 20 20 52 45 56 49 53 45 |UTCH, | REVISE|
|000000c0| 44 2c 20 55 50 47 52 41 | 44 45 44 20 26 20 41 44 |D, UPGRA|DED & AD|
|000000d0| 41 50 54 45 44 20 54 4f | 20 54 48 45 0a 31 32 32 |APTED TO| THE.122|
|000000e0| 20 52 45 4d 2a 2a 43 4f | 4d 4d 4f 44 4f 52 45 20 | REM**CO|MMODORE |
|000000f0| 36 34 20 42 59 20 52 4f | 47 45 52 20 44 2e 20 42 |64 BY RO|GER D. B|
|00000100| 55 52 47 45 2c 23 32 36 | 36 37 2c 20 54 4f 52 4f |URGE,#26|67, TORO|
|00000110| 4e 54 4f 20 50 45 54 20 | 55 53 45 52 53 20 47 52 |NTO PET |USERS GR|
|00000120| 4f 55 50 0a 31 32 33 20 | 52 45 4d 2a 2a 43 41 4e |OUP.123 |REM**CAN|
|00000130| 41 44 41 0a 31 33 30 20 | 56 52 3d 31 30 32 34 20 |ADA.130 |VR=1024 |
|00000140| 3a 52 45 4d 20 56 49 44 | 45 4f 20 52 41 4d 0a 31 |:REM VID|EO RAM.1|
|00000150| 34 30 20 4b 52 3d 35 35 | 32 39 36 3a 43 43 3d 4b |40 KR=55|296:CC=K|
|00000160| 52 2d 56 52 0a 31 35 30 | 20 41 33 3d 35 30 36 0a |R-VR.150| A3=506.|
|00000170| 31 36 30 20 50 4f 4b 45 | 35 33 32 38 30 2c 32 3a |160 POKE|53280,2:|
|00000180| 50 4f 4b 45 35 33 32 38 | 31 2c 31 30 0a 31 37 30 |POKE5328|1,10.170|
|00000190| 20 50 52 49 4e 54 22 12 | 93 05 2a 2a 2a 2a 2a 20 | PRINT".|..***** |
|000001a0| 42 41 52 52 49 43 41 44 | 45 20 2a 2a 2a 2a 2a 00 |BARRICAD|E *****.|
|000001b0| 0a 31 38 30 20 50 52 49 | 4e 54 22 90 11 11 20 20 |.180 PRI|NT"... |
|000001c0| 20 59 4f 55 20 48 41 56 | 45 20 35 20 42 41 4c 4c | YOU HAV|E 5 BALL|
|000001d0| 53 22 0a 31 39 30 20 50 | 52 49 4e 54 22 11 1d 1d |S".190 P|RINT"...|
|000001e0| 59 4f 55 20 4d 55 53 54 | 20 53 54 4f 50 20 54 48 |YOU MUST| STOP TH|
|000001f0| 45 4d 22 0a 32 30 30 20 | 50 52 49 4e 54 22 11 20 |EM".200 |PRINT". |
|00000200| 20 20 20 46 52 4f 4d 20 | 4d 4f 56 49 4e 47 20 42 | FROM |MOVING B|
|00000210| 59 22 0a 32 31 30 20 50 | 52 49 4e 54 22 11 20 20 |Y".210 P|RINT". |
|00000220| 20 20 42 4c 4f 43 4b 49 | 4e 47 20 54 48 45 4d 2e | BLOCKI|NG THEM.|
|00000230| 22 0a 32 32 30 20 50 52 | 49 4e 54 22 11 55 53 45 |".220 PR|INT".USE|
|00000240| 20 41 4e 59 20 4b 45 59 | 20 54 4f 20 43 52 45 41 | ANY KEY| TO CREA|
|00000250| 54 45 22 3a 50 52 49 4e | 54 22 11 20 20 20 20 20 |TE":PRIN|T". |
|00000260| 20 20 20 41 20 42 4c 4f | 43 4b 22 0a 32 33 30 20 | A BLO|CK".230 |
|00000270| 50 52 49 4e 54 22 11 52 | 49 47 48 54 20 42 45 48 |PRINT".R|IGHT BEH|
|00000280| 49 4e 44 20 54 48 45 20 | 42 41 4c 4c 22 0a 32 34 |IND THE |BALL".24|
|00000290| 30 20 50 52 49 4e 54 22 | 11 20 20 41 4e 44 20 54 |0 PRINT"|. AND T|
|000002a0| 52 59 20 54 4f 20 54 52 | 41 50 20 49 54 22 0a 32 |RY TO TR|AP IT".2|
|000002b0| 36 30 20 50 52 49 4e 54 | 22 11 12 05 50 52 45 53 |60 PRINT|"...PRES|
|000002c0| 53 20 41 4e 59 20 4b 45 | 59 20 54 4f 20 53 54 41 |S ANY KE|Y TO STA|
|000002d0| 52 54 22 0a 32 37 30 20 | 47 45 54 41 24 3a 49 46 |RT".270 |GETA$:IF|
|000002e0| 41 24 3d 22 22 54 48 45 | 4e 32 37 30 0a 32 38 30 |A$=""THE|N270.280|
|000002f0| 20 41 32 3d 30 3a 45 3d | 31 30 32 3a 46 3d 38 31 | A2=0:E=|102:F=81|
|00000300| 3a 47 3d 33 32 3a 49 3d | 31 3a 48 3d 34 30 3a 4a |:G=32:I=|1:H=40:J|
|00000310| 3d 32 30 0a 32 39 30 20 | 50 4f 4b 45 35 33 32 38 |=20.290 |POKE5328|
|00000320| 31 2c 31 35 3a 50 4f 4b | 45 35 33 32 38 30 2c 2e |1,15:POK|E53280,.|
|00000330| 0a 33 30 30 20 50 52 49 | 4e 54 22 93 1f a6 a6 a6 |.300 PRI|NT".....|
|00000340| a6 a6 a6 a6 a6 a6 a6 a6 | a6 a6 a6 a6 a6 a6 a6 a6 |........|........|
|00000350| a6 a6 a6 a6 a6 a6 a6 a6 | a6 a6 a6 a6 a6 a6 a6 a6 |........|........|
|00000360| a6 a6 a6 a6 a6 22 3b 0a | 33 31 30 20 46 4f 52 49 |.....";.|310 FORI|
|00000370| 49 3d 31 54 4f 32 33 3a | 50 52 49 4e 54 22 a6 20 |I=1TO23:|PRINT". |
|00000380| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|00000390| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 | | |
|000003a0| 20 20 20 20 20 a6 22 3b | 3a 4e 45 58 54 0a 33 32 | .";|:NEXT.32|
|000003b0| 30 20 50 52 49 4e 54 22 | a6 a6 a6 a6 a6 a6 a6 a6 |0 PRINT"|........|
|000003c0| a6 a6 a6 a6 a6 a6 a6 a6 | a6 a6 a6 a6 a6 a6 a6 a6 |........|........|
|000003d0| a6 a6 a6 a6 a6 a6 a6 a6 | a6 a6 a6 a6 a6 a6 a6 9d |........|........|
|000003e0| 9d 9d 9d 94 a6 13 22 0a | 33 33 30 20 46 4f 52 53 |......".|330 FORS|
|000003f0| 53 3d 31 54 4f 31 30 3a | 47 45 54 41 24 3a 4e 45 |S=1TO10:|GETA$:NE|
|00000400| 58 54 3a 4e 3d 56 52 2b | 39 37 3a 43 3d 30 0a 33 |XT:N=VR+|97:C=0.3|
|00000410| 34 30 20 50 3d 49 3a 47 | 4f 53 55 42 34 33 30 3a |40 P=I:G|OSUB430:|
|00000420| 50 3d 48 3a 47 4f 53 55 | 42 34 33 30 0a 33 35 30 |P=H:GOSU|B430.350|
|00000430| 20 50 3d 2d 49 3a 47 4f | 53 55 42 34 33 30 3a 50 | P=-I:GO|SUB430:P|
|00000440| 3d 2d 48 3a 47 4f 53 55 | 42 34 33 30 0a 33 36 30 |=-H:GOSU|B430.360|
|00000450| 20 49 46 58 3d 4e 47 4f | 54 4f 33 38 30 0a 33 37 | IFX=NGO|TO380.37|
|00000460| 30 20 58 3d 4e 3a 47 4f | 54 4f 33 34 30 0a 33 38 |0 X=N:GO|TO340.38|
|00000470| 30 20 50 3d 2d 49 3a 47 | 4f 53 55 42 34 33 30 3a |0 P=-I:G|OSUB430:|
|00000480| 50 3d 48 3a 47 4f 53 55 | 42 34 33 30 0a 33 39 30 |P=H:GOSU|B430.390|
|00000490| 20 50 3d 49 3a 47 4f 53 | 55 42 34 33 30 3a 50 3d | P=I:GOS|UB430:P=|
|000004a0| 2d 48 3a 47 4f 53 55 42 | 34 33 30 0a 34 30 30 20 |-H:GOSUB|430.400 |
|000004b0| 49 46 59 3e 4a 47 4f 54 | 4f 34 39 30 0a 34 31 30 |IFY>JGOT|O490.410|
|000004c0| 20 49 46 58 3d 4e 47 4f | 54 4f 33 34 30 0a 34 32 | IFX=NGO|TO340.42|
|000004d0| 30 20 58 3d 4e 3a 47 4f | 54 4f 33 38 30 0a 34 33 |0 X=N:GO|TO380.43|
|000004e0| 30 20 4e 3d 4e 2b 50 3a | 41 3d 50 45 45 4b 28 4e |0 N=N+P:|A=PEEK(N|
|000004f0| 29 0a 34 34 30 20 46 4f | 52 55 3d 31 54 4f 32 35 |).440 FO|RU=1TO25|
|00000500| 3a 4e 45 58 54 0a 34 35 | 30 20 49 46 41 3d 45 54 |:NEXT.45|0 IFA=ET|
|00000510| 48 45 4e 4e 3d 4e 2d 50 | 3a 59 3d 59 2b 49 3a 52 |HENN=N-P|:Y=Y+I:R|
|00000520| 45 54 55 52 4e 09 0a | |ETURN.. | |
+--------+-------------------------+-------------------------+--------+--------+