00000000: 01 40 07 40 00 00 D1 00 28 40 64 00 8F 2D 2D 2D |.@.@....(@d..---|
00000010: 2D 2D 2D 2D 4C 4F 41 44 20 49 4E 54 45 52 52 55 |----LOAD INTERRU|
00000020: 50 54 20 54 41 42 4C 45 00 3C 40 6E 00 D9 22 47 |PT TABLE.<@n.."G|
00000030: 54 41 42 4C 45 20 20 2E 54 42 4C 22 00 54 40 78 |TABLE .TBL".T@x|
00000040: 00 8F 2D 2D 2D 2D 2D 2D 2D 43 4C 45 41 52 20 53 |..-------CLEAR S|
00000050: 4F 55 4E 44 00 5A 40 82 00 E5 00 7B 40 8C 00 8F |OUND.Z@....{@...|
00000060: 2D 2D 2D 2D 2D 2D 2D 43 48 41 4E 47 45 20 53 50 |-------CHANGE SP|
00000070: 52 49 54 45 20 53 50 45 45 44 53 00 8C 40 96 00 |RITE SPEEDS..@..|
00000080: EB 20 30 2C 30 3A 20 EB 20 31 2C 30 00 B1 40 A0 |. 0,0: . 1,0..@.|
00000090: 00 8F 2D 2D 2D 2D 2D 2D 2D 53 45 54 20 55 50 20 |..-------SET UP |
000000A0: 42 41 43 4B 47 52 4F 55 4E 44 20 53 43 52 45 45 |BACKGROUND SCREE|
000000B0: 4E 00 B7 40 AA 00 DC 00 C1 40 B4 00 E3 36 3A 20 |N..@.....@...6: |
000000C0: E0 00 C8 40 BE 00 E3 32 00 DB 40 C8 00 E1 20 30 |...@...2..@... 0|
000000D0: 2C 30 20 20 A4 20 33 31 39 2C 30 00 EF 40 D2 00 |,0 . 319,0..@..|
000000E0: E1 20 33 31 39 2C 36 30 20 A4 20 30 2C 36 30 00 |. 319,60 . 0,60.|
000000F0: FC 40 DC 00 E2 20 31 30 30 2C 35 30 00 03 41 E6 |.@... 100,50..A.|
00000100: 00 E3 37 00 15 41 F0 00 E1 20 30 2C 30 20 A4 20 |..7..A... 0,0 . |
00000110: 33 31 39 2C 30 00 2B 41 FA 00 E1 20 33 31 39 2C |319,0.+A... 319,|
00000120: 30 20 A4 20 33 31 39 2C 31 39 39 00 41 41 04 01 |0 . 319,199.AA..|
00000130: E1 20 33 31 39 2C 31 39 39 20 A4 20 30 2C 31 39 |. 319,199 . 0,19|
00000140: 39 00 53 41 0E 01 E1 20 30 2C 31 39 39 20 A4 20 |9.SA... 0,199 . |
00000150: 30 2C 30 00 78 41 18 01 8F 2D 2D 2D 2D 2D 2D 2D |0,0.xA...-------|
00000160: 53 50 52 49 54 45 53 20 49 4E 20 53 50 52 49 54 |SPRITES IN SPRIT|
00000170: 45 20 42 4C 4F 43 4B 53 00 8E 41 22 01 D7 22 47 |E BLOCKS..A".."G|
00000180: 55 4E 20 20 20 20 20 2E 53 50 52 22 2C 30 00 A4 |UN .SPR",0..|
00000190: 41 2C 01 D7 22 42 55 4C 4C 45 54 53 20 2E 53 50 |A,.."BULLETS .SP|
000001A0: 52 22 2C 31 00 BA 41 36 01 D7 22 42 45 41 52 20 |R",1..A6.."BEAR |
000001B0: 20 20 20 2E 53 50 52 22 2C 32 00 D0 41 40 01 D7 | .SPR",2..A@..|
000001C0: 22 52 41 42 42 49 54 20 20 2E 53 50 52 22 2C 33 |"RABBIT .SPR",3|
000001D0: 00 E6 41 4A 01 D7 22 44 55 43 4B 20 20 20 20 2E |..AJ.."DUCK .|
000001E0: 53 50 52 22 2C 34 00 05 42 54 01 8F 2D 2D 2D 2D |SPR",4..BT..----|
000001F0: 2D 2D 2D 50 41 54 48 20 49 4E 20 50 41 54 48 20 |---PATH IN PATH |
00000200: 42 4C 4F 43 4B 00 1B 42 5E 01 D8 22 48 4F 52 2D |BLOCK..B^.."HOR-|
00000210: 4C 49 4E 45 2E 50 54 48 22 2C 30 00 32 42 68 01 |LINE.PTH",0.2Bh.|
00000220: 8F 2D 2D 2D 2D 2D 2D 2D 4C 4F 41 44 20 53 4F 55 |.-------LOAD SOU|
00000230: 4E 44 00 52 42 72 01 E5 22 44 49 4E 4B 20 20 20 |ND.RBr.."DINK |
00000240: 20 2E 53 4E 44 22 20 3A 20 20 8F 20 53 4E 44 20 | .SND" : . SND |
00000250: 23 31 00 75 42 7C 01 8F 2D 2D 2D 2D 2D 2D 2D 41 |#1.uB|..-------A|
00000260: 53 53 49 47 4E 20 53 50 52 49 54 45 20 44 45 53 |SSIGN SPRITE DES|
00000270: 43 52 49 50 53 00 87 42 86 01 DA 20 31 2C 30 3A |CRIPS..B... 1,0:|
00000280: 8F 20 31 3D 47 55 4E 00 9A 42 90 01 DA 20 32 2C |. 1=GUN..B... 2,|
00000290: 32 3A 8F 20 32 3D 42 45 41 52 00 AF 42 9A 01 DA |2:. 2=BEAR..B...|
000002A0: 20 33 2C 33 3A 8F 20 33 3D 52 41 42 42 49 54 00 | 3,3:. 3=RABBIT.|
000002B0: C2 42 A4 01 DA 20 34 2C 34 3A 8F 20 34 3D 44 55 |.B... 4,4:. 4=DU|
000002C0: 43 4B 00 D8 42 AE 01 DA 20 36 2C 31 3A 8F 20 36 |CK..B... 6,1:. 6|
000002D0: 3D 42 55 4C 4C 45 54 53 00 FC 42 B8 01 8F 2D 2D |=BULLETS..B...--|
000002E0: 2D 2D 2D 2D 2D 41 54 54 41 43 48 20 53 50 52 49 |-----ATTACH SPRI|
000002F0: 54 45 53 20 54 4F 20 50 41 54 48 53 00 0E 43 C2 |TES TO PATHS..C.|
00000300: 01 DB 20 31 2C 30 2C 20 32 34 2C 31 39 32 00 1F |.. 1,0, 24,192..|
00000310: 43 CC 01 DB 20 32 2C 30 2C 20 32 35 2C 36 34 00 |C... 2,0, 25,64.|
00000320: 30 43 D6 01 DB 20 33 2C 30 2C 31 34 35 2C 36 34 |0C... 3,0,145,64|
00000330: 00 41 43 E0 01 DB 20 34 2C 30 2C 32 36 35 2C 36 |.AC... 4,0,265,6|
00000340: 34 00 62 43 EA 01 8F 2D 2D 2D 2D 2D 2D 2D 57 41 |4.bC...-------WA|
00000350: 54 43 48 20 46 4F 52 20 43 4F 4C 4C 49 53 49 4F |TCH FOR COLLISIO|
00000360: 4E 53 00 75 43 F4 01 EA 32 2C 36 3A 20 20 8F 20 |NS.uC...2,6: . |
00000370: 43 4F 4C 23 31 00 88 43 FE 01 EA 33 2C 36 3A 20 |COL#1..C...3,6: |
00000380: 20 8F 20 43 4F 4C 23 32 00 9B 43 08 02 EA 34 2C | . COL#2..C...4,|
00000390: 36 3A 20 20 8F 20 43 4F 4C 23 33 00 BC 43 12 02 |6: . COL#3..C..|
000003A0: 8F 2D 2D 2D 2D 2D 2D 2D 54 55 52 4E 20 4F 4E 2F |.-------TURN ON/|
000003B0: 4D 4F 56 45 20 53 50 52 49 54 45 53 00 C9 43 1C |MOVE SPRITES..C.|
000003C0: 02 E9 31 2C 31 2C 31 2C 31 00 DB 43 26 02 E9 32 |..1,1,1,1..C&..2|
000003D0: 2C 31 2C 31 2C 31 3A EC 32 2C 31 00 ED 43 30 02 |,1,1,1:.2,1..C0.|
000003E0: E9 33 2C 31 2C 30 2C 31 3A EC 33 2C 31 00 FF 43 |.3,1,0,1:.3,1..C|
000003F0: 3A 02 E9 34 2C 31 2C 31 2C 31 3A EC 34 2C 31 00 |:..4,1,1,1:.4,1.|
00000400: 0C 44 44 02 E9 36 2C 58 2C 31 2C 31 00 2F 44 4E |.DD..6,X,1,1./DN|
00000410: 02 8F 2D 2D 2D 2D 2D 2D 2D 4D 45 53 53 41 47 45 |..-------MESSAGE|
00000420: 2F 57 41 54 43 48 20 4B 45 59 42 4F 41 52 44 00 |/WATCH KEYBOARD.|
00000430: 56 44 58 02 E6 32 32 2C 38 2C 36 2C 37 2C 22 50 |VDX..22,8,6,7,"P|
00000440: 52 45 53 53 20 41 4E 59 20 4B 45 59 20 54 4F 20 |RESS ANY KEY TO |
00000450: 53 54 41 52 54 22 00 6F 44 62 02 A1 20 41 24 3A |START".oDb.. A$:|
00000460: 20 8B 20 41 24 B2 22 22 A7 20 36 31 30 20 20 00 | . A$."". 610 .|
00000470: 96 44 6C 02 E6 32 32 2C 38 2C 36 2C 36 2C 22 20 |.Dl..22,8,6,6," |
00000480: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000490: 20 20 20 20 20 22 00 BC 44 76 02 8F 2D 2D 2D 2D | "..Dv..----|
000004A0: 2D 2D 2D 53 54 41 52 54 20 55 50 20 49 4E 54 45 |---START UP INTE|
000004B0: 52 52 55 50 54 20 53 59 53 54 45 4D 00 D0 44 80 |RRUPT SYSTEM..D.|
000004C0: 02 D5 3A 20 54 49 24 B2 22 30 30 30 30 30 30 22 |..: TI$."000000"|
000004D0: 00 F3 44 8A 02 8F 2D 2D 2D 2D 2D 2D 2D 4C 4F 4F |..D...-------LOO|
000004E0: 50 20 57 41 54 43 48 49 4E 47 20 4B 45 59 42 4F |P WATCHING KEYBO|
000004F0: 41 52 44 00 09 45 94 02 8B 20 54 49 B1 33 36 38 |ARD..E... TI.368|
00000500: 32 20 A7 20 37 30 30 20 20 00 24 45 9E 02 91 43 |2 . 700 .$E...C|
00000510: 4F 25 8D 38 32 30 20 20 2C 38 35 30 20 20 2C 38 |O%.820 ,850 ,8|
00000520: 38 30 20 20 00 2F 45 A8 02 89 36 36 30 20 20 00 |80 ./E...660 .|
00000530: 53 45 B2 02 8F 2D 2D 2D 2D 2D 2D 2D 45 58 49 54 |SE...-------EXIT|
00000540: 20 47 41 4D 45 2C 20 50 52 49 4E 54 20 53 43 4F | GAME, PRINT SCO|
00000550: 52 45 53 00 5C 45 BC 02 D6 3A 20 DD 00 68 45 C6 |RES.\E...: ..hE.|
00000560: 02 81 20 49 B2 30 A4 37 00 73 45 D0 02 E9 49 2C |.. I.0.7.sE...I,|
00000570: 30 3A 82 00 82 45 DA 02 99 22 93 22 3A 20 99 3A |0:...E...".": .:|
00000580: 20 99 00 9A 45 E4 02 99 20 22 59 4F 55 52 20 53 | ...E... "YOUR S|
00000590: 43 4F 52 45 20 3D 20 22 3B 50 00 BC 45 EE 02 99 |CORE = ";P..E...|
000005A0: 3A 20 99 20 22 50 52 45 53 53 20 3C 41 3E 20 54 |: . "PRESS <A> T|
000005B0: 4F 20 54 52 59 20 41 47 41 49 4E 22 00 D8 45 F8 |O TRY AGAIN"..E.|
000005C0: 02 99 3A 20 99 20 22 20 4F 52 20 3C 51 3E 20 54 |..: . " OR <Q> T|
000005D0: 4F 20 51 55 49 54 2E 22 00 F2 45 02 03 A1 20 41 |O QUIT."..E... A|
000005E0: 24 3A 20 8B 20 41 24 B2 22 22 20 A7 20 37 37 30 |$: . A$."" . 770|
000005F0: 20 20 00 16 46 0C 03 8B 20 41 24 B2 22 51 22 20 | ..F... A$."Q" |
00000600: A7 20 3A D6 3A 81 20 49 B2 30 A4 37 3A E9 49 2C |. :.:. I.0.7:.I,|
00000610: 30 3A 20 82 3A 80 00 33 46 16 03 8B 20 41 24 B2 |0: .:..3F... A$.|
00000620: 22 41 22 20 A7 3A DC 3A 20 50 B2 30 3A 89 35 33 |"A" .:.: P.0:.53|
00000630: 30 20 20 00 3E 46 20 03 89 37 37 30 20 20 00 61 |0 .>F ..770 .a|
00000640: 46 2A 03 8F 2D 2D 2D 2D 2D 2D 2D 43 4F 4C 4C 49 |F*..-------COLLI|
00000650: 53 49 4F 4E 20 52 45 53 55 4C 54 53 20 53 55 42 |SION RESULTS SUB|
00000660: 53 00 82 46 34 03 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D |S..F4..---------|
00000670: 2D 2D 2D 2D 43 4F 4C 4C 20 57 49 54 48 20 42 45 |----COLL WITH BE|
00000680: 41 52 00 AD 46 3E 03 50 B2 50 AA 38 30 3A E9 32 |AR..F>.P.P.80:.2|
00000690: 2C 30 3A E9 36 2C 30 3A ED 31 3A 81 20 49 B2 32 |,0:.6,0:.1:. I.2|
000006A0: 20 A4 20 34 3A 20 EC 49 2C 33 3A 20 82 00 C0 46 | . 4: .I,3: ...F|
000006B0: 48 03 E9 32 2C 31 3A 43 4F 25 B2 30 20 3A 20 8E |H..2,1:CO%.0 : .|
000006C0: 00 E5 46 52 03 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |..FR..----------|
000006D0: 2D 2D 2D 2D 2D 43 4F 4C 4C 20 57 49 54 48 20 52 |-----COLL WITH R|
000006E0: 41 42 42 49 54 00 0F 47 5C 03 50 B2 50 AA 34 30 |ABBIT..G\.P.P.40|
000006F0: 3A E9 33 2C 30 3A E9 36 2C 30 3A ED 31 3A 81 20 |:.3,0:.6,0:.1:. |
00000700: 49 B2 32 20 A4 20 34 3A EC 49 2C 33 3A 20 82 00 |I.2 . 4:.I,3: ..|
00000710: 21 47 66 03 E9 33 2C 31 3A 43 4F 25 B2 30 3A 20 |!Gf..3,1:CO%.0: |
00000720: 8E 00 44 47 70 03 8F 2D 2D 2D 2D 2D 2D 2D 2D 2D |..DGp..---------|
00000730: 2D 2D 2D 2D 2D 2D 43 4F 4C 4C 20 57 49 54 48 20 |------COLL WITH |
00000740: 44 55 43 4B 00 6E 47 7A 03 50 B2 50 AA 31 30 3A |DUCK.nGz.P.P.10:|
00000750: E9 34 2C 30 3A E9 36 2C 30 3A ED 31 3A 81 20 49 |.4,0:.6,0:.1:. I|
00000760: B2 32 20 A4 20 34 3A EC 49 2C 33 3A 20 82 00 80 |.2 . 4:.I,3: ...|
00000770: 47 84 03 E9 34 2C 31 3A 43 4F 25 B2 30 3A 20 8E |G...4,1:CO%.0: .|
00000780: 00 00 00 |... |
.@.@..Q.(@D..-------LOAD INTERRUPT TABLE
.<@N.Y"GTABLE .TBL".T@X..-------CLEAR S
OUND.Z@....{@...-------CHANGE SPRITE SPE
EDS..@... 0,0: . 1,0..@ ..-------SET UP
BACKGROUND SCREEN..@....A@...6: ..H@...2
..@H.. 0,0 . 319,0..@R.. 319,60 . 0,60.
.@... 100,50..A...7..A... 0,0 . 319,0.+A
... 319,0 . 319,199.AA... 319,199 . 0,19
9.SA... 0,199 . 0,0.XA...-------SPRITES
IN SPRITE BLOCKS..A".W"GUN .SPR",0..
A,.W"BULLETS .SPR",1..A6.W"BEAR .SPR"
,2.PA@.W"RABBIT .SPR",3..AJ.W"DUCK .
SPR",4..BT..-------PATH IN PATH BLOCK..B
^.X"HOR-LINE.PTH",0.2BH..-------LOAD SOU
ND.RBR.."DINK .SND" : . SND #1.UB|..
-------ASSIGN SPRITE DESCRIPS..B..Z 1,0:
. 1=GUN..B..Z 2,2:. 2=BEAR..B..Z 3,3:. 3
=RABBIT.BB..Z 4,4:. 4=DUCK.XB..Z 6,1:. 6
=BULLETS..B...-------ATTACH SPRITES TO P
ATHS..CB.. 1,0, 24,192..CL.. 2,0, 25,64.
0CV.. 3,0,145,64.AC... 4,0,265,64.BC...-
------WATCH FOR COLLISIONS.UC...2,6: .
COL#1..C...3,6: . COL#2..C...4,6: . CO
L#3..C...-------TURN ON/MOVE SPRITES.IC.
..1,1,1,1..C&..2,1,1,1:.2,1..C0..3,1,0,1
:.3,1..C:..4,1,1,1:.4,1..DD..6,X,1,1./DN
..-------MESSAGE/WATCH KEYBOARD.VDX..22,
8,6,7,"PRESS ANY KEY TO START".ODB.. A$:
. A$."". 610 ..DL..22,8,6,6,"
"..DV..-------START UP INTE
RRUPT SYSTEM.PD..U: TI$."000000"..D...--
-----LOOP WATCHING KEYBOARD..E... TI.368
2 . 700 .$E...CO%.820 ,850 ,880 ./E.
..660 .SE...-------EXIT GAME, PRINT SCO
RES.\E..V: ..HEF.. I.0.7.SEP..I,0:...EZ.
.".": .: ...E... "YOUR SCORE = ";P..E...
: . "PRESS <A> TO TRY AGAIN".XE...: . "
OR <Q> TO QUIT."..E... A$: . A$."" . 770
..F... A$."Q" . :V:. I.0.7:.I,0: .:..3
F... A$."A" .:.: P.0:.530 .>F ..770 .A
F*..-------COLLISION RESULTS SUBS..F4..-
------------COLL WITH BEAR..F>.P.P.80:.2
,0:.6,0:.1:. I.2 . 4: .I,3: ...FH..2,1:C
O%.0 : ...FR..---------------COLL WITH R
ABBIT..G\.P.P.40:.3,0:.6,0:.1:. I.2 . 4:
.I,3: ..!GF..3,1:CO%.0: ..DGP..---------
------COLL WITH DUCK.NGZ.P.P.10:.4,0:.6,
0:.1:. I.2 . 4:.I,3: ...G...4,1:CO%.0: .
...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL