> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4F 08 0A 00 8F 20 54 48 45 20 46 4F 4C 4C |..O.... THE FOLL|
00000010: 4F 57 49 4E 47 20 50 45 54 20 50 52 4F 47 52 41 |OWING PET PROGRA|
00000020: 4D 20 57 41 53 20 20 20 20 20 20 20 43 4F 4E 56 |M WAS CONV|
00000030: 45 52 54 45 44 20 42 59 20 52 49 43 4B 20 42 45 |ERTED BY RICK BE|
00000040: 41 4D 20 46 4F 52 20 54 48 45 20 43 2D 36 34 00 |AM FOR THE C-64.|
00000050: 63 08 64 00 8F 20 57 52 41 50 20 54 52 41 50 20 |c.d.. WRAP TRAP |
00000060: 32 2E 36 00 7E 08 6E 00 86 20 58 28 34 29 2C 59 |2.6.~.n.. X(4),Y|
00000070: 28 34 29 2C 43 28 34 29 2C 44 28 31 31 29 00 AC |(4),C(4),D(11)..|
00000080: 08 78 00 81 49 B2 31 A4 34 3A 87 20 58 28 49 29 |.x..I.1.4:. X(I)|
00000090: 2C 59 28 49 29 2C 43 28 49 29 3A 82 3A 81 49 B2 |,Y(I),C(I):.:.I.|
000000A0: 30 A4 31 31 3A 87 44 28 49 29 3A 82 00 EE 08 8C |0.11:.D(I):.....|
000000B0: 00 81 49 B2 31 A4 36 AC 34 30 3A 50 24 B2 50 24 |..I.1.6.40:P$.P$|
000000C0: AA 22 2E 22 3A 82 3A 55 4C B2 31 30 32 3A 43 4C |.".":.:UL.102:CL|
000000D0: B2 31 36 30 3A 46 B2 34 30 3A 50 B2 34 36 3A 5A |.160:F.40:P.46:Z|
000000E0: B2 30 3A 4D 58 B2 33 39 3A 4D 59 B2 32 34 00 19 |.0:MX.39:MY.24..|
000000F0: 09 A0 00 55 53 B2 5A 3A 43 53 B2 5A 3A 57 B2 2E |...US.Z:CS.Z:W..|
00000100: 39 36 3A 56 B2 31 3A 4C B2 32 3A 52 B2 33 3A 55 |96:V.1:L.2:R.3:U|
00000110: B2 34 3A 53 B2 31 30 32 34 00 50 09 AA 00 97 35 |.4:S.1024.P....5|
00000120: 33 32 38 31 2C 30 3A 97 35 33 32 38 30 2C 37 3A |3281,0:.53280,7:|
00000130: 85 22 93 9E 44 4F 20 59 4F 55 20 57 41 4E 54 20 |."..DO YOU WANT |
00000140: 49 4E 53 54 52 55 43 54 49 4F 4E 53 22 3B 41 24 |INSTRUCTIONS";A$|
00000150: 00 66 09 B4 00 8B C8 28 41 24 2C 56 29 B3 B1 22 |.f.....(A$,V).."|
00000160: 59 22 A7 32 30 30 00 6F 09 BE 00 8D 39 37 30 00 |Y".200.o....970.|
00000170: 9B 09 C8 00 85 22 11 57 41 4E 54 20 41 20 46 41 |.....".WANT A FA|
00000180: 53 54 2C 4D 45 44 49 55 4D 2C 20 4F 52 20 53 4C |ST,MEDIUM, OR SL|
00000190: 4F 57 20 47 41 4D 45 22 3B 47 24 00 AA 09 D2 00 |OW GAME";G$.....|
000001A0: 47 24 B2 C8 28 47 24 2C 56 29 00 B4 09 DC 00 54 |G$..(G$,V).....T|
000001B0: 4C B2 34 30 00 C5 09 E6 00 8B 47 24 B2 22 46 22 |L.40......G$."F"|
000001C0: A7 54 4C B2 5A 00 D7 09 F0 00 8B 47 24 B2 22 4D |.TL.Z......G$."M|
000001D0: 22 A7 54 4C B2 32 30 00 E1 09 FA 00 8D 20 39 32 |".TL.20...... 92|
000001E0: 30 00 EE 09 04 01 54 B2 BB 28 AB 54 49 29 00 00 |0.....T..(.TI)..|
000001F0: 0A 0E 01 55 44 B2 33 3A 43 44 B2 32 3A 43 B2 30 |...UD.3:CD.2:C.0|
00000200: 00 1B 0A 18 01 55 58 B2 31 30 3A 55 59 B2 37 3A |.....UX.10:UY.7:|
00000210: 43 58 B2 32 39 3A 43 59 B2 31 37 00 39 0A 22 01 |CX.29:CY.17.9.".|
00000220: 55 41 B2 53 AA 55 58 AA 46 AC 55 59 3A 43 41 B2 |UA.S.UX.F.UY:CA.|
00000230: 53 AA 43 58 AA 46 AC 43 59 00 41 0A 2C 01 A1 41 |S.CX.F.CY.A.,..A|
00000240: 24 00 54 0A 2D 01 8B 41 24 B2 22 49 22 A7 41 24 |$.T.-..A$."I".A$|
00000250: B2 22 38 22 00 67 0A 2E 01 8B 41 24 B2 22 4A 22 |."8".g....A$."J"|
00000260: A7 41 24 B2 22 34 22 00 7A 0A 2F 01 8B 41 24 B2 |.A$."4".z./..A$.|
00000270: 22 4D 22 A7 41 24 B2 22 32 22 00 8D 0A 30 01 8B |"M".A$."2"...0..|
00000280: 41 24 B2 22 4B 22 A7 41 24 B2 22 36 22 00 A4 0A |A$."K".A$."6"...|
00000290: 36 01 8B 41 24 B3 22 32 22 B0 41 24 B1 22 38 22 |6..A$."2".A$."8"|
000002A0: A7 33 35 30 00 B7 0A 40 01 44 B2 28 C6 28 41 24 |.350...@.D.(.(A$|
000002B0: 29 AB 34 38 29 AD 4C 00 CA 0A 4A 01 8B 20 B5 28 |).48).L...J.. .(|
000002C0: 44 29 B3 B1 44 20 A7 33 35 30 00 D3 0A 54 01 55 |D)..D .350...T.U|
000002D0: 44 B2 44 00 DC 0A 5E 01 8D 38 30 30 00 EF 0A 68 |D.D...^..800...h|
000002E0: 01 8B C2 28 41 29 B3 B1 50 A7 43 B2 43 AA 56 00 |...(A)..P.C.C.V.|
000002F0: FB 0A 72 01 97 20 55 41 2C 55 4C 00 09 0B 7C 01 |..r.. UA,UL...|.|
00000300: 97 20 41 2C 43 28 55 44 29 00 1C 0B 86 01 55 41 |. A,C(UD).....UA|
00000310: B2 41 3A 55 58 B2 58 3A 55 59 B2 59 00 26 0B 90 |.A:UX.X:UY.Y.&..|
00000320: 01 54 5A B2 54 49 00 38 0B 9A 01 8D 38 33 30 3A |.TZ.TI.8....830:|
00000330: 42 B2 41 3A 8D 38 31 30 00 5A 0B A4 01 8B 28 28 |B.A:.810.Z....((|
00000340: C2 28 42 29 AF C2 28 41 29 29 B2 50 29 AF 28 BB |.(B)..(A)).P).(.|
00000350: 28 56 29 B3 57 29 A7 35 36 30 00 73 0B AE 01 54 |(V).W).560.s...T|
00000360: B2 B5 28 4C AC BB 28 56 29 29 AA 52 AC 28 43 44 |..(L..(V)).R.(CD|
00000370: AB 56 29 00 87 0B B8 01 48 B2 44 28 54 29 3A 47 |.V).....H.D(T):G|
00000380: B2 44 28 54 AA 56 29 00 99 0B C2 01 8D 38 34 30 |.D(T.V)......840|
00000390: 3A 42 B2 41 3A 8D 38 32 30 00 B0 0B CC 01 8B 28 |:B.A:.820......(|
000003A0: C2 28 42 29 AF C2 28 41 29 29 B2 50 A7 35 35 30 |.(B)..(A)).P.550|
000003B0: 00 C3 0B D6 01 8B 48 B3 B1 47 A7 48 B2 47 3A 89 |......H..G.H.G:.|
000003C0: 34 35 30 00 CC 0B E0 01 8D 38 31 30 00 DC 0B EA |450......810....|
000003D0: 01 8B C2 28 41 29 B2 50 A7 35 36 30 00 F5 0B F4 |...(A).P.560....|
000003E0: 01 54 B2 B5 28 4C AC BB 28 56 29 29 AA 52 AC 28 |.T..(L..(V)).R.(|
000003F0: 43 44 AB 56 29 00 09 0C FE 01 48 B2 44 28 54 29 |CD.V).....H.D(T)|
00000400: 3A 47 B2 44 28 54 AA 56 29 00 12 0C 08 02 8D 38 |:G.D(T.V)......8|
00000410: 32 30 00 22 0C 12 02 8B C2 28 41 29 B2 50 A7 35 |20.".....(A).P.5|
00000420: 35 30 00 35 0C 1C 02 8B 48 B3 B1 47 A7 48 B2 47 |50.5....H..G.H.G|
00000430: 3A 89 35 32 30 00 3E 0C 26 02 43 44 B2 48 00 51 |:.520.>.&.CD.H.Q|
00000440: 0C 30 02 8B C2 28 41 29 B3 B1 50 A7 43 B2 43 AA |.0...(A)..P.C.C.|
00000450: 4C 00 5D 0C 3A 02 97 20 43 41 2C 43 4C 00 6B 0C |L.].:.. CA,CL.k.|
00000460: 44 02 97 20 41 2C 43 28 43 44 29 00 7E 0C 4E 02 |D.. A,C(CD).~.N.|
00000470: 43 41 B2 41 3A 43 58 B2 58 3A 43 59 B2 59 00 8B |CA.A:CX.X:CY.Y..|
00000480: 0C 58 02 8B 43 B1 5A A7 36 33 30 00 9D 0C 62 02 |.X..C.Z.630...b.|
00000490: 8B 54 49 AB 54 5A B3 54 4C A7 36 31 30 00 A6 0C |.TI.TZ.TL.610...|
000004A0: 6C 02 89 33 30 30 00 B2 0C 76 02 99 22 13 12 20 |l..300...v..".. |
000004B0: 22 3B 00 BF 0C 80 02 8B 43 B1 56 A7 36 38 30 00 |";......C.V.680.|
000004C0: CB 0C 8A 02 43 53 B2 43 53 AA 31 00 D9 0C 94 02 |....CS.CS.1.....|
000004D0: 99 22 59 20 4F 20 55 22 3B 00 E2 0C 9E 02 89 37 |."Y O U";......7|
000004E0: 35 30 00 EF 0C A8 02 8B 43 B1 4C A7 37 32 30 00 |50......C.L.720.|
000004F0: FB 0C B2 02 55 53 B2 55 53 AA 31 00 07 0D BC 02 |....US.US.1.....|
00000500: 99 22 36 20 34 22 3B 00 10 0D C6 02 89 37 35 30 |."6 4";......750|
00000510: 00 24 0D D0 02 55 53 B2 55 53 AA 56 3A 43 53 B2 |.$...US.US.V:CS.|
00000520: 43 53 AA 56 00 30 0D DA 02 97 20 41 2C 32 31 34 |CS.V.0.... A,214|
00000530: 00 40 0D E4 02 99 22 42 20 4F 20 54 20 48 22 3B |.@...."B O T H";|
00000540: 00 5B 0D EE 02 99 22 20 20 20 43 20 52 20 41 20 |.[...." C R A |
00000550: 53 20 48 20 45 20 44 20 21 20 22 00 8F 0D F8 02 |S H E D ! ".....|
00000560: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |." |
00000570: 20 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D | ...............|
00000580: 59 4F 55 3D 22 55 53 3B 22 36 34 3D 22 43 53 00 |YOU="US;"64="CS.|
00000590: A1 0D 02 03 81 49 B2 31 A4 31 30 3A A1 41 24 3A |.....I.1.10:.A$:|
000005A0: 82 00 B4 0D 0C 03 A1 41 24 3A 8B 41 24 B2 22 22 |.......A$:.A$.""|
000005B0: A7 37 38 30 00 BD 0D 16 03 89 32 32 30 00 D5 0D |.780......220...|
000005C0: 20 03 58 B2 55 58 3A 59 B2 55 59 3A 44 B2 55 44 | .X.UX:Y.UY:D.UD|
000005D0: 3A 89 38 35 30 00 ED 0D 2A 03 58 B2 43 58 3A 59 |:.850...*.X.CX:Y|
000005E0: B2 43 59 3A 44 B2 43 44 3A 89 38 35 30 00 04 0E |.CY:D.CD:.850...|
000005F0: 34 03 58 B2 43 58 3A 59 B2 43 59 3A 44 B2 48 3A |4.X.CX:Y.CY:D.H:|
00000600: 89 38 35 30 00 28 0E 3E 03 58 B2 43 58 AA 58 28 |.850.(.>.X.CX.X(|
00000610: 43 44 29 3A 59 B2 43 59 AA 59 28 43 44 29 3A 44 |CD):Y.CY.Y(CD):D|
00000620: B2 43 44 3A 89 38 35 30 00 49 0E 48 03 58 B2 43 |.CD:.850.I.H.X.C|
00000630: 58 AA 58 28 48 29 3A 59 B2 43 59 AA 59 28 48 29 |X.X(H):Y.CY.Y(H)|
00000640: 3A 44 B2 48 3A 89 38 35 30 00 5F 0E 52 03 58 B2 |:D.H:.850._.R.X.|
00000650: 58 AA 58 28 44 29 3A 59 B2 59 AA 59 28 44 29 00 |X.X(D):Y.Y.Y(D).|
00000660: 6D 0E 5C 03 8B 58 B3 5A A7 58 B2 4D 58 00 7B 0E |m.\..X.Z.X.MX.{.|
00000670: 66 03 8B 58 B1 4D 58 A7 58 B2 5A 00 89 0E 70 03 |f..X.MX.X.Z...p.|
00000680: 8B 59 B3 5A A7 59 B2 4D 59 00 97 0E 7A 03 8B 59 |.Y.Z.Y.MY...z..Y|
00000690: B1 4D 59 A7 59 B2 5A 00 A5 0E 84 03 41 B2 53 AA |.MY.Y.Z.....A.S.|
000006A0: 58 AA 46 AC 59 00 AB 0E 8E 03 8E 00 BF 0E 98 03 |X.F.Y...........|
000006B0: 8F 20 44 52 41 57 20 42 4F 55 4E 44 41 52 59 00 |. DRAW BOUNDARY.|
000006C0: E3 0E A2 03 99 22 93 22 3B 50 24 3B 50 24 3B 50 |.....".";P$;P$;P|
000006D0: 24 3B 50 24 3B C8 28 50 24 2C 4D 58 29 22 9D 94 |$;P$;.(P$,MX)"..|
000006E0: 2E 22 3B 00 E9 0E AC 03 8E 00 0D 0F B6 03 83 20 |.";............ |
000006F0: 30 2C 31 2C 32 32 2C 2D 31 2C 30 2C 36 30 2C 31 |0,1,22,-1,0,60,1|
00000700: 2C 30 2C 36 32 2C 30 2C 2D 31 2C 33 30 00 2B 0F |,0,62,0,-1,30.+.|
00000710: C0 03 83 20 33 2C 32 2C 33 2C 34 2C 31 2C 34 2C |... 3,2,3,4,1,4,|
00000720: 34 2C 31 2C 34 2C 32 2C 33 2C 32 00 5A 0F CA 03 |4,1,4,2,3,2.Z...|
00000730: 99 22 93 20 20 20 20 12 20 57 20 52 20 41 20 50 |.". . W R A P|
00000740: 20 20 20 41 20 52 20 4F 20 55 20 4E 20 44 20 20 | A R O U N D |
00000750: 20 54 20 52 20 41 20 50 20 22 00 89 0F D4 03 99 | T R A P "......|
00000760: 22 11 20 20 20 20 20 54 48 45 20 4F 42 4A 45 43 |". THE OBJEC|
00000770: 54 20 4F 46 20 54 48 45 20 47 41 4D 45 20 49 53 |T OF THE GAME IS|
00000780: 20 54 4F 20 54 52 41 50 22 00 BA 0F DE 03 99 22 | TO TRAP"......"|
00000790: 54 48 45 20 43 4F 4D 50 55 54 45 52 2E 20 20 59 |THE COMPUTER. Y|
000007A0: 4F 55 52 20 57 41 4C 4C 20 4D 41 4B 45 52 20 53 |OUR WALL MAKER S|
000007B0: 54 41 52 54 53 20 49 4E 22 3B 00 E5 0F E8 03 99 |TARTS IN";......|
000007C0: 22 54 48 45 20 55 50 50 45 52 20 4C 45 46 54 20 |"THE UPPER LEFT |
000007D0: 50 41 52 54 20 4F 46 20 54 48 45 20 53 43 52 45 |PART OF THE SCRE|
000007E0: 45 4E 2E 22 3B 00 2B 10 F2 03 99 22 20 59 4F 55 |EN.";.+...." YOU|
000007F0: 20 20 43 4F 4E 54 52 4F 4C 20 4D 4F 54 49 4F 4E | CONTROL MOTION|
00000800: 20 57 49 54 48 20 54 48 45 20 4E 55 4D 45 52 49 | WITH THE NUMERI|
00000810: 43 20 4B 45 59 53 20 12 32 92 2C 12 34 92 2C 12 |C KEYS .2.,.4.,.|
00000820: 36 92 20 26 20 12 38 92 2E 22 3B 00 4F 10 FC 03 |6. & .8..";.O...|
00000830: 99 22 20 20 54 48 45 20 44 49 52 45 43 54 49 4F |." THE DIRECTIO|
00000840: 4E 20 53 48 4F 57 4E 20 42 45 4C 4F 57 2E 22 00 |N SHOWN BELOW.".|
00000850: 58 10 06 04 4B B2 31 39 00 94 10 10 04 99 A3 4B |X...K.19.......K|
00000860: 29 22 5E 11 9D DD 11 9D 12 49 92 11 11 9D 9D 9D |)"^......I......|
00000870: 9D 9D 9D 3C C3 C3 12 4A 92 20 20 20 12 4B 92 C3 |...<...J. .K..|
00000880: C3 3E 11 11 9D 9D 9D 9D 9D 9D 12 4D 92 11 9D DD |.>.........M....|
00000890: 11 9D 56 22 00 BA 10 1A 04 99 22 11 54 4F 20 53 |..V"......".TO S|
000008A0: 54 41 52 54 20 47 41 4D 45 20 54 59 50 45 20 41 |TART GAME TYPE A|
000008B0: 4E 59 20 4B 45 59 20 4F 52 22 00 DA 10 24 04 99 |NY KEY OR"...$..|
000008C0: 22 54 59 50 45 20 12 46 92 20 46 4F 52 20 20 46 |"TYPE .F. FOR F|
000008D0: 41 53 54 20 20 47 41 4D 45 22 00 FA 10 2E 04 99 |AST GAME"......|
000008E0: 22 20 20 20 20 20 12 4D 92 20 46 4F 52 20 4D 45 |" .M. FOR ME|
000008F0: 44 49 55 4D 20 47 41 4D 45 22 00 1A 11 38 04 99 |DIUM GAME"...8..|
00000900: 22 20 20 20 20 20 12 53 92 20 46 4F 52 20 20 53 |" .S. FOR S|
00000910: 4C 4F 57 20 20 47 41 4D 45 22 00 20 11 42 04 8E |LOW GAME". .B..|
00000920: 00 00 00 |... |
..O.... THE FOLLOWING PET PROGRAM WAS
CONVERTED BY RICK BEAM FOR THE C-64.
C.D.. WRAP TRAP 2.6.~.N.. X(4),Y(4),C(4)
,D(11)...X..I.1.4:. X(I),Y(I),C(I):.:.I.
0.11:.D(I):.......I.1.6.40:P$.P$.".":.:U
L.102:CL.160:F.40:P.46:Z.0:MX.39:MY.24..
. .US.Z:CS.Z:W..96:V.1:L.2:R.3:U.4:S.102
4.P....53281,0:.53280,7:."..DO YOU WANT
INSTRUCTIONS";A$.F....H(A$,V).."Y".200.O
....970...H..".WANT A FAST,MEDIUM, OR SL
OW GAME";G$...R.G$.H(G$,V).....TL.40.E..
..G$."F".TL.Z.W....G$."M".TL.20...... 92
0.....T..(.TI).....UD.3:CD.2:C.0.....UX.
10:UY.7:CX.29:CY.17.9.".UA.S.UX.F.UY:CA.
S.CX.F.CY.A.,..A$.T.-..A$."I".A$."8".G..
..A$."J".A$."4".Z./..A$."M".A$."2"...0..
A$."K".A$."6"...6..A$."2".A$."8".350...@
.D.(F(A$).48).L.J.J.. .(D)..D .350.S.T.U
D.D...^..800...H..B(A)..P.C.C.V...R.. UA
,UL...|.. A,C(UD).....UA.A:UX.X:UY.Y.&..
.TZ.TI.8....830:B.A:.810.Z....((B(B).B(A
)).P).(.(V).W).560.S...T..(L..(V)).R.(CD
.V).....H.D(T):G.D(T.V)...B..840:B.A:.82
0...L..(B(B).B(A)).P.550.C.V..H..G.H.G:.
450.L....810......B(A).P.560.....T..(L..
(V)).R.(CD.V).....H.D(T):G.D(T.V)......8
20."....B(A).P.550.5....H..G.H.G:.520.>.
&.CD.H.Q.0..B(A)..P.C.C.L.].:.. CA,CL.K.
D.. A,C(CD).~.N.CA.A:CX.X:CY.Y...X..C.Z.
630...B..TI.TZ.TL.610...L..300...V.."..
";......C.V.680.K...CS.CS.1.Y...."Y O U"
;......750......C.L.720.....US.US.1.....
."6 4";...F..750.$.P.US.US.V:CS.CS.V.0.Z
.. A,214.@...."B O T H";.[...." C R A
S H E D ! "......" .......
........YOU="US;"64="CS......I.1.10:.A$:
.......A$:.A$."".780......220.U. .X.UX:Y
.UY:D.UD:.850...*.X.CX:Y.CY:D.CD:.850...
4.X.CX:Y.CY:D.H:.850.(.>.X.CX.X(CD):Y.CY
.Y(CD):D.CD:.850.I.H.X.CX.X(H):Y.CY.Y(H)
:D.H:.850._.R.X.X.X(D):Y.Y.Y(D).M.\..X.Z
.X.MX.{.F..X.MX.X.Z...P..Y.Z.Y.MY...Z..Y
.MY.Y.Z.....A.S.X.F.Y............ DRAW B
OUNDARY......".";P$;P$;P$;P$;H(P$,MX)"..
.";............ 0,1,22,-1,0,60,1,0,62,0,
-1,30.+.... 3,2,3,4,1,4,4,1,4,2,3,2.Z.J.
.". . W R A P A R O U N D T R A P
"...T..". THE OBJECT OF THE GAME IS
TO TRAP"......"THE COMPUTER. YOUR WALL
MAKER STARTS IN";......"THE UPPER LEFT
PART OF THE SCREEN.";.+...." YOU CONTRO
L MOTION WITH THE NUMERIC KEYS .2.,.4.,.
6. & .8..";.O...." THE DIRECTION SHOWN
BELOW.".X...K.19.......K)"^......I......
...<CC.J. .K.CC>.........M......V"....
..".TO START GAME TYPE ANY KEY OR".Z.$..
"TYPE .F. FOR FAST GAME"......" .M
. FOR MEDIUM GAME"...8.." .S. FOR S
LOW GAME". .B.....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL