GEOPUZZLE.SRC
FILE INFORMATION
FILENAME(S): GEOPUZZLE.SRC
FILE TYPE(S): PRG
FILE SIZE: 7.6K
FIRST SEEN: 2025-11-30 21:12:56
APPEARS ON: 1 disk(s)
FILE HASH
90492610884f0391259b28bbc5f1eb91a8574faa145354416d0633d858f7ed1a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GAZETTE NOVEMBER | GEOPUZZLE.SRC | PRG | DuncanTwain | 12 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1A 08 0A 00 9F 32 2C 38 2C 31 2C 22 30 3A |.......2,8,1,"0:|
00000010: 47 45 4F 50 55 5A 5A 4C 45 22 00 24 08 14 00 9E |GEOPUZZLE".$....|
00000020: 20 37 30 30 00 32 08 1E 00 2E 4F 50 54 20 4F 32 | 700.2....OPT O2|
00000030: 2C 50 00 38 08 28 00 3B 00 3E 08 32 00 3B 00 4D |,P.8.(.;.>.2.;.M|
00000040: 08 3C 00 3B 47 45 4F 50 55 5A 5A 4C 45 00 53 08 |.<.;GEOPUZZLE.S.|
00000050: 46 00 3B 00 7A 08 50 00 3B 42 59 20 52 48 45 54 |F.;.z.P.;BY RHET|
00000060: 54 20 AF 45 52 53 91 20 26 20 44 41 56 49 44 20 |T .ERS. & DAVID |
00000070: 48 45 4E 53 4C 45 59 20 4A 52 00 80 08 5A 00 3B |HENSLEY JR...Z.;|
00000080: 00 AF 08 64 00 3B 43 4F 50 59 52 49 47 48 54 20 |...d.;COPYRIGHT |
00000090: 31 39 38 37 20 43 4F 4D 50 55 54 45 21 20 50 55 |1987 COMPUTE! PU|
000000A0: 42 4C 49 43 41 54 49 91 53 2C 20 49 4E 43 2E 00 |BLICATI.S, INC..|
000000B0: C8 08 6E 00 3B 41 4C 4C 20 52 49 47 48 54 53 20 |..n.;ALL RIGHTS |
000000C0: 52 45 53 45 52 56 45 44 00 CE 08 78 00 3B 00 DC |RESERVED...x.;..|
000000D0: 08 82 00 3B 50 41 4C 20 81 4D 41 54 00 E2 08 8C |...;PAL .MAT....|
000000E0: 00 3B 00 E8 08 96 00 3B 00 F4 08 A0 00 AC B2 20 |.;.....;....... |
000000F0: 24 33 30 34 00 FA 08 AA 00 3B 00 1E 09 B4 00 3B |$304.....;.....;|
00000100: 20 57 45 20 53 54 41 52 54 20 41 54 20 24 33 30 | WE START AT $30|
00000110: 34 20 A4 20 49 4E 53 55 52 45 20 54 48 45 00 44 |4 . INSURE THE.D|
00000120: 09 BE 00 3B 20 41 43 54 55 41 4C 20 47 45 4F 53 |...; ACTUAL GEOS|
00000130: 20 43 4F 44 45 20 53 54 41 52 54 53 20 41 54 20 | CODE STARTS AT |
00000140: 24 34 30 30 00 4A 09 C8 00 3B 00 68 09 D2 00 2E |$400.J...;.h....|
00000150: 42 59 54 45 20 28 36 33 AA 24 38 30 29 20 3B 20 |BYTE (63.$80) ; |
00000160: 41 44 44 20 38 30 20 81 00 84 09 DC 00 3B 20 55 |ADD 80 ......; U|
00000170: 4E 43 4F 4D 50 52 45 53 53 45 44 20 53 50 52 49 |NCOMPRESSED SPRI|
00000180: 54 45 20 83 00 94 09 E6 00 2E 42 59 54 45 20 30 |TE .......BYTE 0|
00000190: 2C 30 2C 30 00 AA 09 F0 00 2E 42 59 54 45 20 32 |,0,0......BYTE 2|
000001A0: 35 35 2C 32 35 35 2C 32 35 34 00 BC 09 FA 00 2E |55,255,254......|
000001B0: 42 59 54 45 20 31 32 38 2C 30 2C 32 00 D2 09 04 |BYTE 128,0,2....|
000001C0: 01 2E 42 59 54 45 20 31 35 39 2C 31 32 35 2C 32 |..BYTE 159,125,2|
000001D0: 34 32 00 E7 09 0E 01 2E 42 59 54 45 20 31 35 39 |42......BYTE 159|
000001E0: 2C 36 39 2C 32 34 32 00 FC 09 18 01 2E 42 59 54 |,69,242......BYT|
000001F0: 45 20 31 35 39 2C 36 39 2C 32 34 32 00 12 0A 22 |E 159,69,242..."|
00000200: 01 2E 42 59 54 45 20 31 35 39 2C 31 32 35 2C 32 |..BYTE 159,125,2|
00000210: 34 32 00 24 0A 2C 01 2E 42 59 54 45 20 31 32 38 |42.$.,..BYTE 128|
00000220: 2C 30 2C 32 00 3A 0A 36 01 2E 42 59 54 45 20 31 |,0,2.:.6..BYTE 1|
00000230: 35 39 2C 31 32 35 2C 32 34 32 00 4E 0A 40 01 2E |59,125,242.N.@..|
00000240: 42 59 54 45 20 31 34 35 2C 38 35 2C 31 38 00 62 |BYTE 145,85,18.b|
00000250: 0A 4A 01 2E 42 59 54 45 20 31 34 35 2C 38 35 2C |.J..BYTE 145,85,|
00000260: 31 38 00 78 0A 54 01 2E 42 59 54 45 20 31 35 39 |18.x.T..BYTE 159|
00000270: 2C 31 32 35 2C 32 34 32 00 8A 0A 5E 01 2E 42 59 |,125,242...^..BY|
00000280: 54 45 20 31 32 38 2C 30 2C 32 00 A0 0A 68 01 2E |TE 128,0,2...h..|
00000290: 42 59 54 45 20 31 35 39 2C 31 32 35 2C 32 34 32 |BYTE 159,125,242|
000002A0: 00 B5 0A 72 01 2E 42 59 54 45 20 31 35 39 2C 36 |...r..BYTE 159,6|
000002B0: 39 2C 32 34 32 00 CA 0A 7C 01 2E 42 59 54 45 20 |9,242...|..BYTE |
000002C0: 31 35 39 2C 36 39 2C 32 34 32 00 E0 0A 86 01 2E |159,69,242......|
000002D0: 42 59 54 45 20 31 35 39 2C 31 32 35 2C 32 34 32 |BYTE 159,125,242|
000002E0: 00 F2 0A 90 01 2E 42 59 54 45 20 31 32 38 2C 30 |......BYTE 128,0|
000002F0: 2C 32 00 08 0B 9A 01 2E 42 59 54 45 20 32 35 35 |,2......BYTE 255|
00000300: 2C 32 35 35 2C 32 35 34 00 18 0B A4 01 2E 42 59 |,255,254......BY|
00000310: 54 45 20 30 2C 30 2C 30 00 28 0B AE 01 2E 42 59 |TE 0,0,0.(....BY|
00000320: 54 45 20 30 2C 30 2C 30 00 38 0B B8 01 2E 42 59 |TE 0,0,0.8....BY|
00000330: 54 45 20 24 38 30 AA 33 00 44 0B C2 01 2E 42 59 |TE $80.3.D....BY|
00000340: 54 45 20 36 00 50 0B CC 01 2E 42 59 54 45 20 30 |TE 6.P....BYTE 0|
00000350: 00 5E 0B D6 01 2E 57 B0 44 20 24 34 30 30 00 6D |.^....W.D $400.m|
00000360: 0B E0 01 2E 57 B0 44 20 80 43 4F 44 45 00 7B 0B |....W.D .CODE.{.|
00000370: EA 01 2E 57 B0 44 20 24 34 30 30 00 95 0B F4 01 |...W.D $400.....|
00000380: 2E C6 20 22 47 45 4F 50 55 5A 5A 4C 45 20 20 20 |.. "GEOPUZZLE |
00000390: 56 31 2E 30 22 00 A7 0B FE 01 2E 42 59 54 45 20 |V1.0"......BYTE |
000003A0: 30 2C 30 2C 30 2C 30 00 C3 0B 08 02 2E C6 20 22 |0,0,0,0....... "|
000003B0: 41 4E 44 45 52 53 4F 4E 20 26 20 48 45 4E 53 4C |ANDERSON & HENSL|
000003C0: 45 59 22 00 F5 0B 12 02 2E 42 59 54 45 20 30 2C |EY"......BYTE 0,|
000003D0: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |0,0,0,0,0,0,0,0,|
000003E0: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |0,0,0,0,0,0,0,0,|
000003F0: 30 2C 30 2C 30 00 FB 0B 1C 02 3B 00 0E 0C 26 02 |0,0,0.....;...&.|
00000400: 3B 20 47 45 4F 53 20 45 51 55 41 54 45 53 00 14 |; GEOS EQUATES..|
00000410: 0C 30 02 3B 00 2B 0C 3A 02 53 45 54 50 41 54 54 |.0.;.+.:.SETPATT|
00000420: 45 52 4E 20 B2 20 24 43 31 33 39 00 3D 0C 44 02 |ERN . $C139.=.D.|
00000430: A2 44 49 53 4B 20 B2 20 24 43 31 45 31 00 52 0C |.DISK . $C1E1.R.|
00000440: 4E 02 49 52 45 43 C0 47 4C 45 20 B2 20 24 43 31 |N.IREC.GLE . $C1|
00000450: 39 46 00 69 0C 58 02 49 50 55 54 53 54 52 49 4E |9F.i.X.IPUTSTRIN|
00000460: 47 20 B2 20 24 43 31 41 45 00 74 0C 62 02 52 30 |G . $C1AE.t.b.R0|
00000470: 20 B2 20 32 00 88 0C 6C 02 4D 4F 55 53 45 55 50 | . 2...l.MOUSEUP|
00000480: 20 B2 20 24 43 31 38 41 00 9E 0C 76 02 45 4E 54 | . $C18A...v.ENT|
00000490: 45 52 44 45 53 4B 20 B2 20 24 43 32 32 43 00 B1 |ERDESK . $C22C..|
000004A0: 0C 80 02 44 4F 49 43 91 53 20 B2 20 24 43 31 35 |...DOIC.S . $C15|
000004B0: 41 00 B7 0C 8A 02 3B 00 C7 0C 94 02 5A 54 45 4D |A.....;.....ZTEM|
000004C0: 50 20 B2 20 24 37 30 00 CD 0C 9E 02 3B 00 D9 0C |P . $70.....;...|
000004D0: A8 02 AC B2 20 24 34 30 30 00 F5 0C B2 02 4A 53 |.... $400.....JS|
000004E0: 52 20 A2 44 49 53 4B 20 3B 90 20 44 52 49 56 45 |R .DISK ;. DRIVE|
000004F0: 20 4D 4F A4 52 00 15 0D BC 02 4A 53 52 20 4D 4F | MO.R.....JSR MO|
00000500: 55 53 45 55 50 20 3B 41 43 54 49 56 41 54 45 20 |USEUP ;ACTIVATE |
00000510: 4D 4F 55 53 45 00 32 0D C6 02 4C 44 41 20 23 32 |MOUSE.2...LDA #2|
00000520: 30 20 20 20 20 20 3B 44 52 41 57 20 53 43 52 45 |0 ;DRAW SCRE|
00000530: 45 4E 00 45 0D D0 02 4A 53 52 20 53 45 54 50 41 |EN.E...JSR SETPA|
00000540: 54 54 45 52 4E 00 56 0D DA 02 4A 53 52 20 49 52 |TTERN.V...JSR IR|
00000550: 45 43 C0 47 4C 45 00 66 0D E4 02 2E 42 59 54 45 |EC.GLE.f....BYTE|
00000560: 20 30 2C 31 39 39 00 75 0D EE 02 2E 57 B0 44 20 | 0,199.u....W.D |
00000570: 30 2C 33 31 39 00 80 0D F8 02 4C 44 41 20 23 31 |0,319.....LDA #1|
00000580: 00 93 0D 02 03 4A 53 52 20 53 45 54 50 41 54 54 |.....JSR SETPATT|
00000590: 45 52 4E 00 A4 0D 0C 03 4A 53 52 20 49 52 45 43 |ERN.....JSR IREC|
000005A0: C0 47 4C 45 00 B5 0D 16 03 2E 42 59 54 45 20 33 |.GLE......BYTE 3|
000005B0: 32 2C 31 36 37 00 C5 0D 20 03 2E 57 B0 44 20 33 |2,167... ..W.D 3|
000005C0: 32 2C 32 33 31 00 D8 0D 2A 03 4A 53 52 20 44 4F |2,231...*.JSR DO|
000005D0: 42 41 43 4B 43 4F 4C B0 00 EB 0D 34 03 4A 53 52 |BACKCOL....4.JSR|
000005E0: 20 44 52 41 57 42 4C 4F 43 4B 53 00 FE 0D 3E 03 | DRAWBLOCKS...>.|
000005F0: 4A 53 52 20 49 50 55 54 53 54 52 49 4E 47 00 0B |JSR IPUTSTRING..|
00000600: 0E 48 03 2E 57 B0 44 20 31 30 34 00 18 0E 52 03 |.H..W.D 104...R.|
00000610: 2E 42 59 54 45 20 31 38 00 2B 0E 5C 03 2E C6 20 |.BYTE 18.+.\... |
00000620: 22 47 45 4F 50 55 5A 5A 4C 45 22 00 37 0E 66 03 |"GEOPUZZLE".7.f.|
00000630: 2E 42 59 54 45 20 30 00 4A 0E 70 03 4A 53 52 20 |.BYTE 0.J.p.JSR |
00000640: 49 50 55 54 53 54 52 49 4E 47 00 56 0E 7A 03 2E |IPUTSTRING.V.z..|
00000650: 57 B0 44 20 31 30 00 64 0E 84 03 2E 42 59 54 45 |W.D 10.d....BYTE|
00000660: 20 31 38 38 00 93 0E 8E 03 2E C6 20 22 43 4F 50 | 188....... "COP|
00000670: 59 52 49 47 48 54 20 31 39 38 37 20 43 4F 4D 50 |YRIGHT 1987 COMP|
00000680: 55 54 45 21 20 50 55 42 4C 49 43 41 54 49 4F 4E |UTE! PUBLICATION|
00000690: 53 2C 22 00 B8 0E 98 03 2E C6 20 22 20 49 4E 43 |S,"....... " INC|
000006A0: 2E 20 2D 20 41 4C 4C 20 52 49 47 48 54 53 20 52 |. - ALL RIGHTS R|
000006B0: 45 53 45 52 56 45 44 22 00 C4 0E A2 03 2E 42 59 |ESERVED"......BY|
000006C0: 54 45 20 30 00 D7 0E AC 03 4C 44 41 20 23 B3 47 |TE 0.....LDA #.G|
000006D0: 41 4D 45 49 43 91 53 00 E2 0E B6 03 53 54 41 20 |AMEIC.S.....STA |
000006E0: 52 30 00 F5 0E C0 03 4C 44 41 20 23 B1 47 41 4D |R0.....LDA #.GAM|
000006F0: 45 49 43 91 53 00 02 0F CA 03 53 54 41 20 52 30 |EIC.S.....STA R0|
00000700: AA 31 00 11 0F D4 03 4A 53 52 20 44 4F 49 43 91 |.1.....JSR DOIC.|
00000710: 53 00 19 0F DE 03 52 54 53 00 1F 0F E8 03 3B 00 |S.....RTS.....;.|
00000720: 47 0F F2 03 44 4F 49 54 20 4A 53 52 20 44 4F 42 |G...DOIT JSR DOB|
00000730: 41 43 4B 43 4F 4C B0 20 3A 20 4A 4D 50 20 45 4E |ACKCOL. : JMP EN|
00000740: 54 45 52 44 45 53 4B 00 4D 0F FC 03 3B 00 60 0F |TERDESK.M...;.`.|
00000750: 06 04 3B 54 48 45 20 49 43 91 20 54 41 42 4C 45 |..;THE IC. TABLE|
00000760: 00 66 0F 10 04 3B 00 7C 0F 1A 04 47 41 4D 45 49 |.f...;.|...GAMEI|
00000770: 43 91 53 20 2E 42 59 54 45 20 31 34 00 89 0F 24 |C.S .BYTE 14...$|
00000780: 04 2E 57 B0 44 20 31 36 30 00 97 0F 2E 04 2E 42 |..W.D 160......B|
00000790: 59 54 45 20 31 30 30 00 9D 0F 38 04 3B 00 B7 0F |YTE 100...8.;...|
000007A0: 42 04 42 55 54 A4 4E 31 20 2E 57 B0 44 20 44 4F |B.BUT.N1 .W.D DO|
000007B0: 57 4E 41 52 52 4F 57 00 C7 0F 4C 04 2E 42 59 54 |WNARROW...L..BYT|
000007C0: 45 20 31 30 2C 34 32 00 D5 0F 56 04 2E 42 59 54 |E 10,42...V..BYT|
000007D0: 45 20 31 2C 38 00 E4 0F 60 04 2E 57 B0 44 20 44 |E 1,8...`..W.D D|
000007E0: B0 4F 54 30 00 EA 0F 6A 04 3B 00 04 10 74 04 42 |.OT0...j.;...t.B|
000007F0: 55 54 A4 4E 32 20 2E 57 B0 44 20 44 4F 57 4E 41 |UT.N2 .W.D DOWNA|
00000800: 52 52 4F 57 00 14 10 7E 04 2E 42 59 54 45 20 31 |RROW...~..BYTE 1|
00000810: 35 2C 34 32 00 22 10 88 04 2E 42 59 54 45 20 31 |5,42."....BYTE 1|
00000820: 2C 38 00 31 10 92 04 2E 57 B0 44 20 44 B0 4F 54 |,8.1....W.D D.OT|
00000830: 31 00 37 10 9C 04 3B 00 51 10 A6 04 42 55 54 A4 |1.7...;.Q...BUT.|
00000840: 4E 33 20 2E 57 B0 44 20 44 4F 57 4E 41 52 52 4F |N3 .W.D DOWNARRO|
00000850: 57 00 61 10 B0 04 2E 42 59 54 45 20 32 30 2C 34 |W.a....BYTE 20,4|
00000860: 32 00 6F 10 BA 04 2E 42 59 54 45 20 31 2C 38 00 |2.o....BYTE 1,8.|
00000870: 7E 10 C4 04 2E 57 B0 44 20 44 B0 4F 54 32 00 84 |~....W.D D.OT2..|
00000880: 10 CE 04 3B 00 9C 10 D8 04 42 55 54 A4 4E 34 20 |...;.....BUT.N4 |
00000890: 2E 57 B0 44 20 55 50 41 52 52 4F 57 00 AD 10 E2 |.W.D UPARROW....|
000008A0: 04 2E 42 59 54 45 20 31 30 2C 31 35 31 00 BB 10 |..BYTE 10,151...|
000008B0: EC 04 2E 42 59 54 45 20 31 2C 38 00 CA 10 F6 04 |...BYTE 1,8.....|
000008C0: 2E 57 B0 44 20 44 B0 4F 54 33 00 D0 10 00 05 3B |.W.D D.OT3.....;|
000008D0: 00 E8 10 0A 05 42 55 54 A4 4E 35 20 2E 57 B0 44 |.....BUT.N5 .W.D|
000008E0: 20 55 50 41 52 52 4F 57 00 F9 10 14 05 2E 42 59 | UPARROW......BY|
000008F0: 54 45 20 31 35 2C 31 35 31 00 07 11 1E 05 2E 42 |TE 15,151......B|
00000900: 59 54 45 20 31 2C 38 00 16 11 28 05 2E 57 B0 44 |YTE 1,8...(..W.D|
00000910: 20 44 B0 4F 54 34 00 1C 11 32 05 3B 00 34 11 3C | D.OT4...2.;.4.<|
00000920: 05 42 55 54 A4 4E 36 20 2E 57 B0 44 20 55 50 41 |.BUT.N6 .W.D UPA|
00000930: 52 52 4F 57 00 45 11 46 05 2E 42 59 54 45 20 32 |RROW.E.F..BYTE 2|
00000940: 30 2C 31 35 31 00 53 11 50 05 2E 42 59 54 45 20 |0,151.S.P..BYTE |
00000950: 31 2C 38 00 62 11 5A 05 2E 57 B0 44 20 44 B0 4F |1,8.b.Z..W.D D.O|
00000960: 54 35 00 68 11 64 05 3B 00 83 11 6E 05 42 55 54 |T5.h.d.;...n.BUT|
00000970: A4 4E 37 20 2E 57 B0 44 20 52 49 47 48 54 41 52 |.N7 .W.D RIGHTAR|
00000980: 52 4F 57 00 92 11 78 05 2E 42 59 54 45 20 36 2C |ROW...x..BYTE 6,|
00000990: 36 35 00 A0 11 82 05 2E 42 59 54 45 20 31 2C 38 |65......BYTE 1,8|
000009A0: 00 AF 11 8C 05 2E 57 B0 44 20 44 B0 4F 54 36 00 |......W.D D.OT6.|
000009B0: B5 11 96 05 3B 00 D0 11 A0 05 42 55 54 A4 4E 38 |....;.....BUT.N8|
000009C0: 20 2E 57 B0 44 20 52 49 47 48 54 41 52 52 4F 57 | .W.D RIGHTARROW|
000009D0: 00 DF 11 AA 05 2E 42 59 54 45 20 36 2C 39 37 00 |......BYTE 6,97.|
000009E0: ED 11 B4 05 2E 42 59 54 45 20 31 2C 38 00 FC 11 |.....BYTE 1,8...|
000009F0: BE 05 2E 57 B0 44 20 44 B0 4F 54 37 00 02 12 C8 |...W.D D.OT7....|
00000A00: 05 3B 00 1D 12 D2 05 42 55 54 A4 4E 39 20 2E 57 |.;.....BUT.N9 .W|
00000A10: B0 44 20 52 49 47 48 54 41 52 52 4F 57 00 2D 12 |.D RIGHTARROW.-.|
00000A20: DC 05 2E 42 59 54 45 20 36 2C 31 32 39 00 3B 12 |...BYTE 6,129.;.|
00000A30: E6 05 2E 42 59 54 45 20 31 2C 38 00 4A 12 F0 05 |...BYTE 1,8.J...|
00000A40: 2E 57 B0 44 20 44 B0 4F 54 38 00 50 12 FA 05 3B |.W.D D.OT8.P...;|
00000A50: 00 6B 12 04 06 42 55 54 A4 4E 31 30 20 2E 57 B0 |.k...BUT.N10 .W.|
00000A60: 44 20 4C 45 46 54 41 52 52 4F 57 00 7B 12 0E 06 |D LEFTARROW.{...|
00000A70: 2E 42 59 54 45 20 32 35 2C 36 35 00 89 12 18 06 |.BYTE 25,65.....|
00000A80: 2E 42 59 54 45 20 31 2C 38 00 98 12 22 06 2E 57 |.BYTE 1,8..."..W|
00000A90: B0 44 20 44 B0 4F 54 39 00 9E 12 2C 06 3B 00 B9 |.D D.OT9...,.;..|
00000AA0: 12 36 06 42 55 54 A4 4E 31 31 20 2E 57 B0 44 20 |.6.BUT.N11 .W.D |
00000AB0: 4C 45 46 54 41 52 52 4F 57 00 C9 12 40 06 2E 42 |LEFTARROW...@..B|
00000AC0: 59 54 45 20 32 35 2C 39 37 00 D7 12 4A 06 2E 42 |YTE 25,97...J..B|
00000AD0: 59 54 45 20 31 2C 38 00 E7 12 54 06 2E 57 B0 44 |YTE 1,8...T..W.D|
00000AE0: 20 44 B0 4F 54 31 30 00 ED 12 5E 06 3B 00 08 13 | D.OT10...^.;...|
00000AF0: 68 06 42 55 54 A4 4E 31 32 20 2E 57 B0 44 20 4C |h.BUT.N12 .W.D L|
00000B00: 45 46 54 41 52 52 4F 57 00 19 13 72 06 2E 42 59 |EFTARROW...r..BY|
00000B10: 54 45 20 32 35 2C 31 32 39 00 27 13 7C 06 2E 42 |TE 25,129.'.|..B|
00000B20: 59 54 45 20 31 2C 38 00 37 13 86 06 2E 57 B0 44 |YTE 1,8.7....W.D|
00000B30: 20 44 B0 4F 54 31 31 00 3D 13 90 06 3B 00 55 13 | D.OT11.=...;.U.|
00000B40: 9A 06 42 55 54 A4 4E 31 33 20 2E 57 B0 44 20 57 |..BUT.N13 .W.D W|
00000B50: 52 45 4E 43 48 00 65 13 A4 06 2E 42 59 54 45 20 |RENCH.e....BYTE |
00000B60: 33 33 2C 37 30 00 74 13 AE 06 2E 42 59 54 45 20 |33,70.t....BYTE |
00000B70: 33 2C 32 31 00 86 13 B8 06 2E 57 B0 44 20 44 4F |3,21......W.D DO|
00000B80: 57 52 45 4E 43 48 00 8C 13 C2 06 3B 00 A2 13 CC |WRENCH.....;....|
00000B90: 06 42 55 54 A4 4E 31 34 20 2E 57 B0 44 20 47 45 |.BUT.N14 .W.D GE|
00000BA0: 4F 53 00 B3 13 D6 06 2E 42 59 54 45 20 33 33 2C |OS......BYTE 33,|
00000BB0: 31 31 30 00 C2 13 E0 06 2E 42 59 54 45 20 33 2C |110......BYTE 3,|
00000BC0: 32 31 00 D0 13 EA 06 2E 57 B0 44 20 44 4F 49 54 |21......W.D DOIT|
00000BD0: 00 D6 13 F4 06 3B 00 E6 13 FE 06 3B 49 43 91 20 |.....;.....;IC. |
00000BE0: 49 4D 41 47 45 53 00 EC 13 08 07 3B 00 06 14 12 |IMAGES.....;....|
00000BF0: 07 44 4F 57 4E 41 52 52 4F 57 20 2E 42 59 54 45 |.DOWNARROW .BYTE|
00000C00: 20 31 32 38 AA 38 00 2A 14 1C 07 2E 42 59 54 45 | 128.8.*....BYTE|
00000C10: 20 32 34 2C 32 34 2C 32 34 2C 32 34 2C 32 35 35 | 24,24,24,24,255|
00000C20: 2C 31 32 36 2C 36 30 2C 32 34 00 30 14 26 07 3B |,126,60,24.0.&.;|
00000C30: 00 48 14 30 07 55 50 41 52 52 4F 57 20 2E 42 59 |.H.0.UPARROW .BY|
00000C40: 54 45 20 31 32 38 AA 38 00 6C 14 3A 07 2E 42 59 |TE 128.8.l.:..BY|
00000C50: 54 45 20 32 34 2C 36 30 2C 31 32 36 2C 32 35 35 |TE 24,60,126,255|
00000C60: 2C 32 34 2C 32 34 2C 32 34 2C 32 34 00 72 14 44 |,24,24,24,24.r.D|
00000C70: 07 3B 00 8C 14 4E 07 4C 45 46 54 41 52 52 4F 57 |.;...N.LEFTARROW|
00000C80: 20 2E 42 59 54 45 20 31 32 38 AA 38 00 B2 14 58 | .BYTE 128.8...X|
00000C90: 07 2E 42 59 54 45 20 31 36 2C 34 38 2C 31 31 32 |..BYTE 16,48,112|
00000CA0: 2C 32 35 35 2C 32 35 35 2C 31 31 32 2C 34 38 2C |,255,255,112,48,|
00000CB0: 31 36 00 B8 14 62 07 3B 00 D3 14 6C 07 52 49 47 |16...b.;...l.RIG|
00000CC0: 48 54 41 52 52 4F 57 20 2E 42 59 54 45 20 31 32 |HTARROW .BYTE 12|
00000CD0: 38 AA 38 00 F5 14 76 07 2E 42 59 54 45 20 38 2C |8.8...v..BYTE 8,|
00000CE0: 31 32 2C 31 34 2C 32 35 35 2C 32 35 35 2C 31 34 |12,14,255,255,14|
00000CF0: 2C 31 32 2C 38 00 FB 14 80 07 3B 00 20 15 8A 07 |,12,8.....;. ...|
00000D00: 44 52 41 57 42 4C 4F 43 4B 53 20 4C 44 58 20 50 |DRAWBLOCKS LDX P|
00000D10: 50 4F B5 20 3A 20 4C 44 41 20 50 41 54 30 2C 58 |PO. : LDA PAT0,X|
00000D20: 00 33 15 94 07 4A 53 52 20 53 45 54 50 41 54 54 |.3...JSR SETPATT|
00000D30: 45 52 4E 00 44 15 9E 07 4A 53 52 20 49 52 45 43 |ERN.D...JSR IREC|
00000D40: C0 47 4C 45 00 54 15 A8 07 2E 42 59 54 45 20 35 |.GLE.T....BYTE 5|
00000D50: 36 2C 37 39 00 64 15 B2 07 2E 57 B0 44 20 37 32 |6,79.d....W.D 72|
00000D60: 2C 31 30 33 00 80 15 BC 07 4C 44 58 20 50 50 4F |,103.....LDX PPO|
00000D70: B5 AA 31 20 3A 20 4C 44 41 20 50 41 54 30 2C 58 |..1 : LDA PAT0,X|
00000D80: 00 93 15 C6 07 4A 53 52 20 53 45 54 50 41 54 54 |.....JSR SETPATT|
00000D90: 45 52 4E 00 A4 15 D0 07 4A 53 52 20 49 52 45 43 |ERN.....JSR IREC|
00000DA0: C0 47 4C 45 00 B4 15 DA 07 2E 42 59 54 45 20 35 |.GLE......BYTE 5|
00000DB0: 36 2C 37 39 00 C5 15 E4 07 2E 57 B0 44 20 31 31 |6,79......W.D 11|
00000DC0: 32 2C 31 34 33 00 E1 15 EE 07 4C 44 58 20 50 50 |2,143.....LDX PP|
00000DD0: 4F B5 AA 32 20 3A 20 4C 44 41 20 50 41 54 30 2C |O..2 : LDA PAT0,|
00000DE0: 58 00 F4 15 F8 07 4A 53 52 20 53 45 54 50 41 54 |X.....JSR SETPAT|
00000DF0: 54 45 52 4E 00 05 16 02 08 4A 53 52 20 49 52 45 |TERN.....JSR IRE|
00000E00: 43 C0 47 4C 45 00 15 16 0C 08 2E 42 59 54 45 20 |C.GLE......BYTE |
00000E10: 35 36 2C 37 39 00 26 16 16 08 2E 57 B0 44 20 31 |56,79.&....W.D 1|
00000E20: 35 32 2C 31 38 33 00 42 16 20 08 4C 44 58 20 50 |52,183.B. .LDX P|
00000E30: 50 4F B5 AA 33 20 3A 20 4C 44 41 20 50 41 54 30 |PO..3 : LDA PAT0|
00000E40: 2C 58 00 55 16 2A 08 4A 53 52 20 53 45 54 50 41 |,X.U.*.JSR SETPA|
00000E50: 54 54 45 52 4E 00 66 16 34 08 4A 53 52 20 49 52 |TTERN.f.4.JSR IR|
00000E60: 45 43 C0 47 4C 45 00 77 16 3E 08 2E 42 59 54 45 |EC.GLE.w.>..BYTE|
00000E70: 20 38 38 2C 31 31 31 00 87 16 48 08 2E 57 B0 44 | 88,111...H..W.D|
00000E80: 20 37 32 2C 31 30 33 00 B4 16 52 08 4C 44 58 20 | 72,103...R.LDX |
00000E90: 50 50 4F B5 AA 34 20 3A 20 4C 44 41 20 50 41 54 |PPO..4 : LDA PAT|
00000EA0: 30 2C 58 20 3A 20 4A 53 52 20 53 45 54 50 41 54 |0,X : JSR SETPAT|
00000EB0: 54 45 52 4E 00 C5 16 5C 08 4A 53 52 20 49 52 45 |TERN...\.JSR IRE|
00000EC0: 43 C0 47 4C 45 00 D6 16 66 08 2E 42 59 54 45 20 |C.GLE...f..BYTE |
00000ED0: 38 38 2C 31 31 31 00 E7 16 70 08 2E 57 B0 44 20 |88,111...p..W.D |
00000EE0: 31 31 32 2C 31 34 33 00 14 17 7A 08 4C 44 58 20 |112,143...z.LDX |
00000EF0: 50 50 4F B5 AA 35 20 3A 20 4C 44 41 20 50 41 54 |PPO..5 : LDA PAT|
00000F00: 30 2C 58 20 3A 20 4A 53 52 20 53 45 54 50 41 54 |0,X : JSR SETPAT|
00000F10: 54 45 52 4E 00 25 17 84 08 4A 53 52 20 49 52 45 |TERN.%...JSR IRE|
00000F20: 43 C0 47 4C 45 00 36 17 8E 08 2E 42 59 54 45 20 |C.GLE.6....BYTE |
00000F30: 38 38 2C 31 31 31 00 47 17 98 08 2E 57 B0 44 20 |88,111.G....W.D |
00000F40: 31 35 32 2C 31 38 33 00 74 17 A2 08 4C 44 58 20 |152,183.t...LDX |
00000F50: 50 50 4F B5 AA 36 20 3A 20 4C 44 41 20 50 41 54 |PPO..6 : LDA PAT|
00000F60: 30 2C 58 20 3A 20 4A 53 52 20 53 45 54 50 41 54 |0,X : JSR SETPAT|
00000F70: 54 45 52 4E 00 85 17 AC 08 4A 53 52 20 49 52 45 |TERN.....JSR IRE|
00000F80: 43 C0 47 4C 45 00 97 17 B6 08 2E 42 59 54 45 20 |C.GLE......BYTE |
00000F90: 31 32 30 2C 31 34 33 00 A7 17 C0 08 2E 57 B0 44 |120,143......W.D|
00000FA0: 20 37 32 2C 31 30 33 00 D4 17 CA 08 4C 44 58 20 | 72,103.....LDX |
00000FB0: 50 50 4F B5 AA 37 20 3A 20 4C 44 41 20 50 41 54 |PPO..7 : LDA PAT|
00000FC0: 30 2C 58 20 3A 20 4A 53 52 20 53 45 54 50 41 54 |0,X : JSR SETPAT|
00000FD0: 54 45 52 4E 00 E5 17 D4 08 4A 53 52 20 49 52 45 |TERN.....JSR IRE|
00000FE0: 43 C0 47 4C 45 00 F7 17 DE 08 2E 42 59 54 45 20 |C.GLE......BYTE |
00000FF0: 31 32 30 2C 31 34 33 00 08 18 E8 08 2E 57 B0 44 |120,143......W.D|
00001000: 20 31 31 32 2C 31 34 33 00 35 18 F2 08 4C 44 58 | 112,143.5...LDX|
00001010: 20 50 50 4F B5 AA 38 20 3A 20 4C 44 41 20 50 41 | PPO..8 : LDA PA|
00001020: 54 30 2C 58 20 3A 20 4A 53 52 20 53 45 54 50 41 |T0,X : JSR SETPA|
00001030: 54 54 45 52 4E 00 46 18 FC 08 4A 53 52 20 49 52 |TTERN.F...JSR IR|
00001040: 45 43 C0 47 4C 45 00 58 18 06 09 2E 42 59 54 45 |EC.GLE.X....BYTE|
00001050: 20 31 32 30 2C 31 34 33 00 69 18 10 09 2E 57 B0 | 120,143.i....W.|
00001060: 44 20 31 35 32 2C 31 38 33 00 79 18 1A 09 4A 53 |D 152,183.y...JS|
00001070: 52 20 44 4F 43 4F 4C B0 53 00 81 18 24 09 52 54 |R DOCOL.S...$.RT|
00001080: 53 00 87 18 2E 09 3B 00 A8 18 38 09 50 50 4F B5 |S.....;...8.PPO.|
00001090: 20 2E 42 59 54 45 20 30 2C 31 2C 32 2C 33 2C 34 | .BYTE 0,1,2,3,4|
000010A0: 2C 35 2C 36 2C 37 2C 38 00 BA 18 42 09 50 41 54 |,5,6,7,8...B.PAT|
000010B0: 30 20 2E 42 59 54 45 20 32 39 00 CC 18 4C 09 50 |0 .BYTE 29...L.P|
000010C0: 41 54 31 20 2E 42 59 54 45 20 33 30 00 DE 18 56 |AT1 .BYTE 30...V|
000010D0: 09 50 41 54 32 20 2E 42 59 54 45 20 32 39 00 F0 |.PAT2 .BYTE 29..|
000010E0: 18 60 09 50 41 54 33 20 2E 42 59 54 45 20 33 30 |.`.PAT3 .BYTE 30|
000010F0: 00 02 19 6A 09 50 41 54 34 20 2E 42 59 54 45 20 |...j.PAT4 .BYTE |
00001100: 32 34 00 14 19 74 09 50 41 54 35 20 2E 42 59 54 |24...t.PAT5 .BYT|
00001110: 45 20 33 30 00 26 19 7E 09 50 41 54 36 20 2E 42 |E 30.&.~.PAT6 .B|
00001120: 59 54 45 20 32 39 00 38 19 88 09 50 41 54 37 20 |YTE 29.8...PAT7 |
00001130: 2E 42 59 54 45 20 33 30 00 4A 19 92 09 50 41 54 |.BYTE 30.J...PAT|
00001140: 38 20 2E 42 59 54 45 20 32 39 00 50 19 9C 09 3B |8 .BYTE 29.P...;|
00001150: 00 6F 19 A6 09 3B 96 49 4E 49 54 49 91 53 20 81 |.o...;.INITI.S .|
00001160: 20 54 48 45 20 4C 41 52 47 45 20 49 43 91 53 00 | THE LARGE IC.S.|
00001170: 75 19 B0 09 3B 00 A5 19 BA 09 57 52 45 4E 43 48 |u...;.....WRENCH|
00001180: 20 2E 42 59 54 45 20 31 32 38 AA 36 33 2C 30 2C | .BYTE 128.63,0,|
00001190: 30 2C 30 2C 32 35 35 2C 32 35 35 2C 32 35 34 2C |0,0,255,255,254,|
000011A0: 31 32 38 2C 30 00 CC 19 C4 09 2E 42 59 54 45 20 |128,0......BYTE |
000011B0: 32 2C 31 35 39 2C 31 32 35 2C 32 34 32 2C 31 35 |2,159,125,242,15|
000011C0: 39 2C 36 39 2C 32 34 32 2C 31 35 39 00 F1 19 CE |9,69,242,159....|
000011D0: 09 2E 42 59 54 45 20 36 39 2C 32 34 32 2C 31 35 |..BYTE 69,242,15|
000011E0: 39 2C 31 32 35 2C 32 34 32 2C 31 32 38 2C 30 2C |9,125,242,128,0,|
000011F0: 32 00 18 1A D8 09 2E 42 59 54 45 20 31 35 39 2C |2......BYTE 159,|
00001200: 31 32 35 2C 32 34 32 2C 31 34 35 2C 38 35 2C 31 |125,242,145,85,1|
00001210: 38 2C 31 34 35 2C 38 35 00 3D 1A E2 09 2E 42 59 |8,145,85.=....BY|
00001220: 54 45 20 31 38 2C 31 35 39 2C 31 32 35 2C 32 34 |TE 18,159,125,24|
00001230: 32 2C 31 32 38 2C 30 2C 32 2C 31 35 39 00 65 1A |2,128,0,2,159.e.|
00001240: EC 09 2E 42 59 54 45 20 31 32 35 2C 32 34 32 2C |...BYTE 125,242,|
00001250: 31 35 39 2C 36 39 2C 32 34 32 2C 31 35 39 2C 36 |159,69,242,159,6|
00001260: 39 2C 32 34 32 00 8B 1A F6 09 2E 42 59 54 45 20 |9,242......BYTE |
00001270: 31 35 39 2C 31 32 35 2C 32 34 32 2C 31 32 38 2C |159,125,242,128,|
00001280: 30 2C 32 2C 32 35 35 2C 32 35 35 00 A7 1A 00 0A |0,2,255,255.....|
00001290: 2E 42 59 54 45 20 32 35 34 2C 30 2C 30 2C 30 2C |.BYTE 254,0,0,0,|
000012A0: 30 2C 30 2C 30 2C 30 00 D7 1A 0A 0A 47 45 4F 53 |0,0,0,0.....GEOS|
000012B0: 20 2E 42 59 54 45 20 31 32 38 AA 36 33 2C 30 2C | .BYTE 128.63,0,|
000012C0: 30 2C 30 2C 32 35 35 2C 32 35 35 2C 32 35 34 2C |0,0,255,255,254,|
000012D0: 31 33 31 2C 31 39 39 00 00 1B 14 0A 2E 42 59 54 |131,199......BYT|
000012E0: 45 20 31 33 30 2C 31 33 35 2C 37 39 2C 31 39 34 |E 130,135,79,194|
000012F0: 2C 31 34 32 2C 31 32 35 2C 32 32 36 2C 31 35 36 |,142,125,226,156|
00001300: 00 24 1B 1E 0A 2E 42 59 54 45 20 33 2C 32 34 32 |.$....BYTE 3,242|
00001310: 2C 31 35 36 2C 33 2C 32 34 32 2C 31 38 38 2C 37 |,156,3,242,188,7|
00001320: 2C 32 35 30 00 4C 1B 28 0A 2E 42 59 54 45 20 31 |,250.L.(..BYTE 1|
00001330: 39 30 2C 37 2C 32 35 30 2C 31 39 30 2C 31 31 35 |90,7,250,190,115|
00001340: 2C 32 35 30 2C 31 39 31 2C 31 32 33 00 74 1B 32 |,250,191,123.t.2|
00001350: 0A 2E 42 59 54 45 20 32 35 30 2C 31 39 30 2C 36 |..BYTE 250,190,6|
00001360: 33 2C 32 35 30 2C 31 38 38 2C 31 35 2C 32 35 30 |3,250,188,15,250|
00001370: 2C 31 35 36 00 99 1B 3C 0A 2E 42 59 54 45 20 37 |,156...<..BYTE 7|
00001380: 2C 32 34 32 2C 31 35 38 2C 37 2C 32 34 32 2C 31 |,242,158,7,242,1|
00001390: 34 33 2C 31 35 2C 32 32 36 00 C3 1B 46 0A 2E 42 |43,15,226...F..B|
000013A0: 59 54 45 20 31 33 35 2C 31 35 39 2C 31 39 34 2C |YTE 135,159,194,|
000013B0: 31 33 31 2C 32 32 33 2C 31 33 30 2C 32 35 35 2C |131,223,130,255,|
000013C0: 32 35 35 00 DF 1B 50 0A 2E 42 59 54 45 20 32 35 |255...P..BYTE 25|
000013D0: 34 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 34 00 |4,0,0,0,0,0,0,4.|
000013E0: E5 1B 5A 0A 3B 00 12 1C 64 0A 44 B0 4F 54 30 20 |..Z.;...d.D.OT0 |
000013F0: 4C 44 41 20 50 50 4F B5 20 3A 20 4C 44 58 20 50 |LDA PPO. : LDX P|
00001400: 50 4F B5 AA 33 20 3A 20 4C 44 59 20 50 50 4F B5 |PO..3 : LDY PPO.|
00001410: AA 36 00 39 1C 6E 0A 53 54 41 20 50 50 4F B5 AA |.6.9.n.STA PPO..|
00001420: 33 20 3A 20 53 54 58 20 50 50 4F B5 AA 36 20 3A |3 : STX PPO..6 :|
00001430: 20 53 54 59 20 50 50 4F B5 00 4C 1C 78 0A 4A 4D | STY PPO..L.x.JM|
00001440: 50 20 44 52 41 57 42 4C 4F 43 4B 53 00 7B 1C 82 |P DRAWBLOCKS.{..|
00001450: 0A 44 B0 4F 54 31 20 4C 44 41 20 50 50 4F B5 AA |.D.OT1 LDA PPO..|
00001460: 31 20 3A 20 4C 44 58 20 50 50 4F B5 AA 34 20 3A |1 : LDX PPO..4 :|
00001470: 20 4C 44 59 20 50 50 4F B5 AA 37 00 A4 1C 8C 0A | LDY PPO..7.....|
00001480: 53 54 41 20 50 50 4F B5 AA 34 20 3A 20 53 54 58 |STA PPO..4 : STX|
00001490: 20 50 50 4F B5 AA 37 20 3A 20 53 54 59 20 50 50 | PPO..7 : STY PP|
000014A0: 4F B5 AA 31 00 B7 1C 96 0A 4A 4D 50 20 44 52 41 |O..1.....JMP DRA|
000014B0: 57 42 4C 4F 43 4B 53 00 E6 1C A0 0A 44 B0 4F 54 |WBLOCKS.....D.OT|
000014C0: 32 20 4C 44 41 20 50 50 4F B5 AA 32 20 3A 20 4C |2 LDA PPO..2 : L|
000014D0: 44 58 20 50 50 4F B5 AA 35 20 3A 20 4C 44 59 20 |DX PPO..5 : LDY |
000014E0: 50 50 4F B5 AA 38 00 0F 1D AA 0A 53 54 41 20 50 |PPO..8.....STA P|
000014F0: 50 4F B5 AA 35 20 3A 20 53 54 58 20 50 50 4F B5 |PO..5 : STX PPO.|
00001500: AA 38 20 3A 20 53 54 59 20 50 50 4F B5 AA 32 00 |.8 : STY PPO..2.|
00001510: 22 1D B4 0A 4A 4D 50 20 44 52 41 57 42 4C 4F 43 |"...JMP DRAWBLOC|
00001520: 4B 53 00 51 1D BE 0A 44 B0 4F 54 33 20 4C 44 41 |KS.Q...D.OT3 LDA|
00001530: 20 50 50 4F B5 AA 30 20 3A 20 4C 44 58 20 50 50 | PPO..0 : LDX PP|
00001540: 4F B5 AA 33 20 3A 20 4C 44 59 20 50 50 4F B5 AA |O..3 : LDY PPO..|
00001550: 36 00 7A 1D C8 0A 53 54 41 20 50 50 4F B5 AA 36 |6.z...STA PPO..6|
00001560: 20 3A 20 53 54 58 20 50 50 4F B5 AA 30 20 3A 20 | : STX PPO..0 : |
00001570: 53 54 59 20 50 50 4F B5 AA 33 00 8D 1D D2 0A 4A |STY PPO..3.....J|
00001580: 4D 50 20 44 52 41 57 42 4C 4F 43 4B 53 00 BC 1D |MP DRAWBLOCKS...|
00001590: DC 0A 44 B0 4F 54 34 20 4C 44 41 20 50 50 4F B5 |..D.OT4 LDA PPO.|
000015A0: AA 31 20 3A 20 4C 44 58 20 50 50 4F B5 AA 34 20 |.1 : LDX PPO..4 |
000015B0: 3A 20 4C 44 59 20 50 50 4F B5 AA 37 00 E5 1D E6 |: LDY PPO..7....|
000015C0: 0A 53 54 41 20 50 50 4F B5 AA 37 20 3A 20 53 54 |.STA PPO..7 : ST|
000015D0: 58 20 50 50 4F B5 AA 31 20 3A 20 53 54 59 20 50 |X PPO..1 : STY P|
000015E0: 50 4F B5 AA 34 00 F8 1D F0 0A 4A 4D 50 20 44 52 |PO..4.....JMP DR|
000015F0: 41 57 42 4C 4F 43 4B 53 00 28 1E FA 0A 44 B0 4F |AWBLOCKS.(...D.O|
00001600: 54 35 20 4C 44 41 20 50 50 4F B5 AA 32 20 3A 20 |T5 LDA PPO..2 : |
00001610: 4C 44 58 20 50 50 4F B5 AA 35 20 3A 20 4C 44 59 |LDX PPO..5 : LDY|
00001620: 20 50 50 4F B5 20 AA 38 00 51 1E 04 0B 53 54 41 | PPO. .8.Q...STA|
00001630: 20 50 50 4F B5 AA 38 20 3A 20 53 54 58 20 50 50 | PPO..8 : STX PP|
00001640: 4F B5 AA 32 20 3A 20 53 54 59 20 50 50 4F B5 AA |O..2 : STY PPO..|
00001650: 35 00 64 1E 0E 0B 4A 4D 50 20 44 52 41 57 42 4C |5.d...JMP DRAWBL|
00001660: 4F 43 4B 53 00 93 1E 18 0B 44 B0 4F 54 36 20 4C |OCKS.....D.OT6 L|
00001670: 44 41 20 50 50 4F B5 AA 30 20 3A 20 4C 44 58 20 |DA PPO..0 : LDX |
00001680: 50 50 4F B5 AA 31 20 3A 20 4C 44 59 20 50 50 4F |PPO..1 : LDY PPO|
00001690: B5 AA 32 00 BC 1E 22 0B 53 54 41 20 50 50 4F B5 |..2...".STA PPO.|
000016A0: AA 31 20 3A 20 53 54 58 20 50 50 4F B5 AA 32 20 |.1 : STX PPO..2 |
000016B0: 3A 20 53 54 59 20 50 50 4F B5 AA 30 00 CF 1E 2C |: STY PPO..0...,|
000016C0: 0B 4A 4D 50 20 44 52 41 57 42 4C 4F 43 4B 53 00 |.JMP DRAWBLOCKS.|
000016D0: FE 1E 36 0B 44 B0 4F 54 37 20 4C 44 41 20 50 50 |..6.D.OT7 LDA PP|
000016E0: 4F B5 AA 33 20 3A 20 4C 44 58 20 50 50 4F B5 AA |O..3 : LDX PPO..|
000016F0: 34 20 3A 20 4C 44 59 20 50 50 4F B5 AA 35 00 27 |4 : LDY PPO..5.'|
00001700: 1F 40 0B 53 54 41 20 50 50 4F B5 AA 34 20 3A 20 |.@.STA PPO..4 : |
00001710: 53 54 58 20 50 50 4F B5 AA 35 20 3A 20 53 54 59 |STX PPO..5 : STY|
00001720: 20 50 50 4F B5 AA 33 00 3A 1F 4A 0B 4A 4D 50 20 | PPO..3.:.J.JMP |
00001730: 44 52 41 57 42 4C 4F 43 4B 53 00 69 1F 54 0B 44 |DRAWBLOCKS.i.T.D|
00001740: B0 4F 54 38 20 4C 44 41 20 50 50 4F B5 AA 36 20 |.OT8 LDA PPO..6 |
00001750: 3A 20 4C 44 58 20 50 50 4F B5 AA 37 20 3A 20 4C |: LDX PPO..7 : L|
00001760: 44 59 20 50 50 4F B5 AA 38 00 92 1F 5E 0B 53 54 |DY PPO..8...^.ST|
00001770: 41 20 50 50 4F B5 AA 37 20 3A 20 53 54 58 20 50 |A PPO..7 : STX P|
00001780: 50 4F B5 AA 38 20 3A 20 53 54 59 20 50 50 4F B5 |PO..8 : STY PPO.|
00001790: AA 36 00 A5 1F 68 0B 4A 4D 50 20 44 52 41 57 42 |.6...h.JMP DRAWB|
000017A0: 4C 4F 43 4B 53 00 D4 1F 72 0B 44 B0 4F 54 39 20 |LOCKS...r.D.OT9 |
000017B0: 4C 44 41 20 50 50 4F B5 AA 30 20 3A 20 4C 44 58 |LDA PPO..0 : LDX|
000017C0: 20 50 50 4F B5 AA 31 20 3A 20 4C 44 59 20 50 50 | PPO..1 : LDY PP|
000017D0: 4F B5 AA 32 00 FD 1F 7C 0B 53 54 41 20 50 50 4F |O..2...|.STA PPO|
000017E0: B5 AA 32 20 3A 20 53 54 58 20 50 50 4F B5 AA 30 |..2 : STX PPO..0|
000017F0: 20 3A 20 53 54 59 20 50 50 4F B5 AA 31 00 10 20 | : STY PPO..1.. |
00001800: 86 0B 4A 4D 50 20 44 52 41 57 42 4C 4F 43 4B 53 |..JMP DRAWBLOCKS|
00001810: 00 40 20 90 0B 44 B0 4F 54 31 30 20 4C 44 41 20 |.@ ..D.OT10 LDA |
00001820: 50 50 4F B5 AA 33 20 3A 20 4C 44 58 20 50 50 4F |PPO..3 : LDX PPO|
00001830: B5 AA 34 20 3A 20 4C 44 59 20 50 50 4F B5 AA 35 |..4 : LDY PPO..5|
00001840: 00 69 20 9A 0B 53 54 41 20 50 50 4F B5 AA 35 20 |.i ..STA PPO..5 |
00001850: 3A 20 53 54 58 20 50 50 4F B5 AA 33 20 3A 20 53 |: STX PPO..3 : S|
00001860: 54 59 20 50 50 4F B5 AA 34 00 7C 20 A4 0B 4A 4D |TY PPO..4.| ..JM|
00001870: 50 20 44 52 41 57 42 4C 4F 43 4B 53 00 AC 20 AE |P DRAWBLOCKS.. .|
00001880: 0B 44 B0 4F 54 31 31 20 4C 44 41 20 50 50 4F B5 |.D.OT11 LDA PPO.|
00001890: AA 36 20 3A 20 4C 44 58 20 50 50 4F B5 AA 37 20 |.6 : LDX PPO..7 |
000018A0: 3A 20 4C 44 59 20 50 50 4F B5 AA 38 00 D5 20 B8 |: LDY PPO..8.. .|
000018B0: 0B 53 54 41 20 50 50 4F B5 AA 38 20 3A 20 53 54 |.STA PPO..8 : ST|
000018C0: 58 20 50 50 4F B5 AA 36 20 3A 20 53 54 59 20 50 |X PPO..6 : STY P|
000018D0: 50 4F B5 AA 37 00 E8 20 C2 0B 4A 4D 50 20 44 52 |PO..7.. ..JMP DR|
000018E0: 41 57 42 4C 4F 43 4B 53 00 FC 20 CC 0B 44 4F 57 |AWBLOCKS.. ..DOW|
000018F0: 52 45 4E 43 48 20 4C 44 58 20 23 38 00 29 21 D6 |RENCH LDX #8.)!.|
00001900: 0B 4C 4F 4F 50 57 20 54 58 41 20 3A 20 53 54 41 |.LOOPW TXA : STA|
00001910: 20 50 50 4F B5 2C 58 20 3A 20 44 45 58 20 3A 20 | PPO.,X : DEX : |
00001920: 42 50 4C 20 4C 4F 4F 50 57 00 3C 21 E0 0B 4A 4D |BPL LOOPW.<!..JM|
00001930: 50 20 44 52 41 57 42 4C 4F 43 4B 53 00 42 21 EA |P DRAWBLOCKS.B!.|
00001940: 0B 3B 00 5A 21 F4 0B 44 4F 42 41 43 4B 43 4F 4C |.;.Z!..DOBACKCOL|
00001950: B0 20 4C 44 58 20 23 32 35 30 00 66 21 FE 0B 4C |. LDX #250.f!..L|
00001960: 44 41 20 23 31 34 00 7F 21 08 0C 43 4F 4C 4F 4F |DA #14..!..COLOO|
00001970: 50 20 53 54 41 20 24 38 43 30 30 AB 31 2C 58 00 |P STA $8C00.1,X.|
00001980: 93 21 12 0C 53 54 41 20 24 38 43 30 30 AA 32 34 |.!..STA $8C00.24|
00001990: 39 2C 58 00 A7 21 1C 0C 53 54 41 20 24 38 43 30 |9,X..!..STA $8C0|
000019A0: 30 AA 34 39 39 2C 58 00 BB 21 26 0C 53 54 41 20 |0.499,X..!&.STA |
000019B0: 24 38 43 30 30 AA 37 34 39 2C 58 00 C3 21 30 0C |$8C00.749,X..!0.|
000019C0: 44 45 58 00 D2 21 3A 0C 42 4E 45 20 43 4F 4C 4F |DEX..!:.BNE COLO|
000019D0: 4F 50 00 DA 21 44 0C 52 54 53 00 ED 21 4E 0C 44 |OP..!D.RTS..!N.D|
000019E0: 4F 43 4F 4C B0 53 20 4C 44 59 20 23 38 00 04 22 |OCOL.S LDY #8.."|
000019F0: 58 0C 42 49 47 4C 4F 4F 50 20 4C 44 41 20 50 50 |X.BIGLOOP LDA PP|
00001A00: 4F B5 2C 59 00 0C 22 62 0C 54 41 58 00 1E 22 6C |O.,Y.."b.TAX.."l|
00001A10: 0C 4C 44 41 20 4C 54 48 45 41 44 44 2C 59 00 2C |.LDA LTHEADD,Y.,|
00001A20: 22 76 0C 53 54 41 20 5A 54 45 4D 50 00 3E 22 80 |"v.STA ZTEMP.>".|
00001A30: 0C 4C 44 41 20 48 54 48 45 41 44 44 2C 59 00 4E |.LDA HTHEADD,Y.N|
00001A40: 22 8A 0C 53 54 41 20 5A 54 45 4D 50 AA 31 00 56 |"..STA ZTEMP.1.V|
00001A50: 22 94 0C 54 59 41 00 5E 22 9E 0C 50 48 41 00 69 |"..TYA.^"..PHA.i|
00001A60: 22 A8 0C 4C 44 59 20 23 30 00 78 22 B2 0C 4C 44 |"..LDY #0.x"..LD|
00001A70: 41 20 43 4F 4C 30 2C 58 00 8A 22 BC 0C 53 54 41 |A COL0,X.."..STA|
00001A80: 20 28 5A 54 45 4D 50 29 2C 59 00 A8 22 C6 0C 49 | (ZTEMP),Y.."..I|
00001A90: 4E 59 20 3A 20 53 54 41 20 28 5A 54 45 4D 50 29 |NY : STA (ZTEMP)|
00001AA0: 2C 59 20 3A 20 49 4E 59 00 B7 22 D0 0C 4C 44 41 |,Y : INY.."..LDA|
00001AB0: 20 43 4F 4C 31 2C 58 00 DF 22 DA 0C 53 54 41 20 | COL1,X.."..STA |
00001AC0: 28 5A 54 45 4D 50 29 2C 59 20 3A 20 49 4E 59 20 |(ZTEMP),Y : INY |
00001AD0: 3A 20 53 54 41 20 28 5A 54 45 4D 50 29 2C 59 00 |: STA (ZTEMP),Y.|
00001AE0: EB 22 E4 0C 4C 44 59 20 23 38 30 00 FA 22 EE 0C |."..LDY #80.."..|
00001AF0: 4C 44 41 20 43 4F 4C 32 2C 58 00 0C 23 F8 0C 53 |LDA COL2,X..#..S|
00001B00: 54 41 20 28 5A 54 45 4D 50 29 2C 59 00 2A 23 02 |TA (ZTEMP),Y.*#.|
00001B10: 0D 49 4E 59 20 3A 20 53 54 41 20 28 5A 54 45 4D |.INY : STA (ZTEM|
00001B20: 50 29 2C 59 20 3A 20 49 4E 59 00 39 23 0C 0D 4C |P),Y : INY.9#..L|
00001B30: 44 41 20 43 4F 4C 33 2C 58 00 61 23 16 0D 53 54 |DA COL3,X.a#..ST|
00001B40: 41 20 28 5A 54 45 4D 50 29 2C 59 20 3A 20 49 4E |A (ZTEMP),Y : IN|
00001B50: 59 20 3A 20 53 54 41 20 28 5A 54 45 4D 50 29 2C |Y : STA (ZTEMP),|
00001B60: 59 00 69 23 20 0D 50 4C 41 00 71 23 2A 0D 54 41 |Y.i# .PLA.q#*.TA|
00001B70: 59 00 79 23 34 0D 44 45 59 00 89 23 3E 0D 42 50 |Y.y#4.DEY..#>.BP|
00001B80: 4C 20 42 49 47 4C 4F 4F 50 00 91 23 48 0D 52 54 |L BIGLOOP..#H.RT|
00001B90: 53 00 97 23 52 0D 3B 00 B9 23 5C 0D 4C 54 48 45 |S..#R.;..#\.LTHE|
00001BA0: 41 44 44 20 2E 42 59 54 45 20 B3 28 37 AC 34 30 |ADD .BYTE .(7.40|
00001BB0: AA 24 38 43 30 30 AA 39 29 00 D4 23 66 0D 2E 42 |.$8C00.9)..#f..B|
00001BC0: 59 54 45 20 B3 28 37 AC 34 30 AA 24 38 43 30 30 |YTE .(7.40.$8C00|
00001BD0: AA 31 34 29 00 EF 23 70 0D 2E 42 59 54 45 20 B3 |.14)..#p..BYTE .|
00001BE0: 28 37 AC 34 30 AA 24 38 43 30 30 AA 31 39 29 00 |(7.40.$8C00.19).|
00001BF0: 0A 24 7A 0D 2E 42 59 54 45 20 B3 28 31 31 AC 34 |.$z..BYTE .(11.4|
00001C00: 30 AA 24 38 43 30 30 AA 39 29 00 26 24 84 0D 2E |0.$8C00.9).&$...|
00001C10: 42 59 54 45 20 B3 28 31 31 AC 34 30 AA 24 38 43 |BYTE .(11.40.$8C|
00001C20: 30 30 AA 31 34 29 00 42 24 8E 0D 2E 42 59 54 45 |00.14).B$...BYTE|
00001C30: 20 B3 28 31 31 AC 34 30 AA 24 38 43 30 30 AA 31 | .(11.40.$8C00.1|
00001C40: 39 29 00 5D 24 98 0D 2E 42 59 54 45 20 B3 28 31 |9).]$...BYTE .(1|
00001C50: 35 AC 34 30 AA 24 38 43 30 30 AA 39 29 00 79 24 |5.40.$8C00.9).y$|
00001C60: A2 0D 2E 42 59 54 45 20 B3 28 31 35 AC 34 30 AA |...BYTE .(15.40.|
00001C70: 24 38 43 30 30 AA 31 34 29 00 95 24 AC 0D 2E 42 |$8C00.14)..$...B|
00001C80: 59 54 45 20 B3 28 31 35 AC 34 30 AA 24 38 43 30 |YTE .(15.40.$8C0|
00001C90: 30 AA 31 39 29 00 B7 24 B6 0D 48 54 48 45 41 44 |0.19)..$..HTHEAD|
00001CA0: 44 20 2E 42 59 54 45 20 B1 28 37 AC 34 30 AA 24 |D .BYTE .(7.40.$|
00001CB0: 38 43 30 30 AA 39 29 00 D2 24 C0 0D 2E 42 59 54 |8C00.9)..$...BYT|
00001CC0: 45 20 B1 28 37 AC 34 30 AA 24 38 43 30 30 AA 31 |E .(7.40.$8C00.1|
00001CD0: 34 29 00 ED 24 CA 0D 2E 42 59 54 45 20 B1 28 37 |4)..$...BYTE .(7|
00001CE0: AC 34 30 AA 24 38 43 30 30 AA 31 39 29 00 08 25 |.40.$8C00.19)..%|
00001CF0: D4 0D 2E 42 59 54 45 20 B1 28 31 31 AC 34 30 AA |...BYTE .(11.40.|
00001D00: 24 38 43 30 30 AA 39 29 00 24 25 DE 0D 2E 42 59 |$8C00.9).$%...BY|
00001D10: 54 45 20 B1 28 31 31 AC 34 30 AA 24 38 43 30 30 |TE .(11.40.$8C00|
00001D20: AA 31 34 29 00 40 25 E8 0D 2E 42 59 54 45 20 B1 |.14).@%...BYTE .|
00001D30: 28 31 31 AC 34 30 AA 24 38 43 30 30 AA 31 39 29 |(11.40.$8C00.19)|
00001D40: 00 5B 25 F2 0D 2E 42 59 54 45 20 B1 28 31 35 AC |.[%...BYTE .(15.|
00001D50: 34 30 AA 24 38 43 30 30 AA 39 29 00 77 25 FC 0D |40.$8C00.9).w%..|
00001D60: 2E 42 59 54 45 20 B1 28 31 35 AC 34 30 AA 24 38 |.BYTE .(15.40.$8|
00001D70: 43 30 30 AA 31 34 29 00 93 25 06 0E 2E 42 59 54 |C00.14)..%...BYT|
00001D80: 45 20 B1 28 31 35 AC 34 30 AA 24 38 43 30 30 AA |E .(15.40.$8C00.|
00001D90: 31 39 29 00 B9 25 10 0E 43 4F 4C 30 20 2E 42 59 |19)..%..COL0 .BY|
00001DA0: 54 45 20 31 34 2C 31 34 2C 31 34 2C 31 34 2C 37 |TE 14,14,14,14,7|
00001DB0: 2C 35 2C 31 34 2C 32 2C 34 00 DF 25 1A 0E 43 4F |,5,14,2,4..%..CO|
00001DC0: 4C 31 20 2E 42 59 54 45 20 31 34 2C 31 34 2C 31 |L1 .BYTE 14,14,1|
00001DD0: 34 2C 37 2C 35 2C 31 34 2C 32 2C 34 2C 31 34 00 |4,7,5,14,2,4,14.|
00001DE0: 05 26 24 0E 43 4F 4C 32 20 2E 42 59 54 45 20 31 |.&$.COL2 .BYTE 1|
00001DF0: 34 2C 37 2C 35 2C 31 34 2C 32 2C 34 2C 31 34 2C |4,7,5,14,2,4,14,|
00001E00: 31 34 2C 31 34 00 2B 26 2E 0E 43 4F 4C 33 20 2E |14,14.+&..COL3 .|
00001E10: 42 59 54 45 20 37 2C 35 2C 31 34 2C 32 2C 34 2C |BYTE 7,5,14,2,4,|
00001E20: 31 34 2C 31 34 2C 31 34 2C 31 34 00 3D 26 38 0E |14,14,14,14.=&8.|
00001E30: 80 43 4F 44 45 20 2E 42 59 54 45 20 30 00 00 00 |.CODE .BYTE 0...|
.......2,8,1,"0:GEOPUZZLE".$.... 700.2..
..OPT O2,P.8.(.;.>.2.;.M.<.;GEOPUZZLE.S.
F.;.Z.P.;BY RHETT .ERS. & DAVID HENSLEY
JR...Z.;...D.;COPYRIGHT 1987 COMPUTE! PU
BLICATI.S, INC..H.N.;ALL RIGHTS RESERVED
.N.X.;.....;PAL .MAT.....;.....;... ...
$304.....;.....; WE START AT $304 . INSU
RE THE.D...; ACTUAL GEOS CODE STARTS AT
$400.J.H.;.H.R..BYTE (63.$80) ; ADD 80 .
.....; UNCOMPRESSED SPRITE .......BYTE 0
,0,0......BYTE 255,255,254......BYTE 128
,0,2.R....BYTE 159,125,242......BYTE 159
,69,242......BYTE 159,69,242..."..BYTE 1
59,125,242.$.,..BYTE 128,0,2.:.6..BYTE 1
59,125,242.N.@..BYTE 145,85,18.B.J..BYTE
145,85,18.X.T..BYTE 159,125,242...^..BY
TE 128,0,2. .H..BYTE 159,125,242...R..BY
TE 159,69,242.J.|..BYTE 159,69,242......
BYTE 159,125,242......BYTE 128,0,2......
BYTE 255,255,254......BYTE 0,0,0.(....BY
TE 0,0,0.8....BYTE $80.3.D.B..BYTE 6.P.L
..BYTE 0.^.V..W.D $400.M....W.D .CODE.{.
...W.D $400......F "GEOPUZZLE V1.0"...
...BYTE 0,0,0,0.C....F "ANDERSON & HENSL
EY"......BYTE 0,0,0,0,0,0,0,0,0,0,0,0,0,
0,0,0,0,0,0,0.....;...&.; GEOS EQUATES..
.0.;.+.:.SETPATTERN . $C139.=.D..DISK .
$C1E1.R.N.IREC.GLE . $C19F.I.X.IPUTSTRIN
G . $C1AE.T.B.R0 . 2...L.MOUSEUP . $C18A
...V.ENTERDESK . $C22C.....DOIC.S . $C15
A.....;.G...ZTEMP . $70.M...;.Y..... $40
0.....JSR .DISK ;. DRIVE MO.R.....JSR MO
USEUP ;ACTIVATE MOUSE.2.F.LDA #20 ;D
RAW SCREEN.E.P.JSR SETPATTERN.V.Z.JSR IR
EC.GLE.F....BYTE 0,199.U....W.D 0,319...
..LDA #1.....JSR SETPATTERN.....JSR IREC
.GLE......BYTE 32,167.E. ..W.D 32,231.X.
*.JSR DOBACKCOL....4.JSR DRAWBLOCKS...>.
JSR IPUTSTRING...H..W.D 104...R..BYTE 18
.+.\..F "GEOPUZZLE".7.F..BYTE 0.J.P.JSR
IPUTSTRING.V.Z..W.D 10.D....BYTE 188....
..F "COPYRIGHT 1987 COMPUTE! PUBLICATION
S,"......F " INC. - ALL RIGHTS RESERVED"
.D....BYTE 0.W...LDA #.GAMEIC.S.....STA
R0.....LDA #.GAMEIC.S...J.STA R0.1...T.J
SR DOIC.S.....RTS.....;.G...DOIT JSR DOB
ACKCOL. : JMP ENTERDESK.M...;.`...;THE I
C. TABLE.F...;.|...GAMEIC.S .BYTE 14...$
..W.D 160......BYTE 100...8.;...B.BUT.N1
.W.D DOWNARROW.G.L..BYTE 10,42.U.V..BYT
E 1,8...`..W.D D.OT0...J.;...T.BUT.N2 .W
.D DOWNARROW...~..BYTE 15,42."....BYTE 1
,8.1....W.D D.OT1.7...;.Q...BUT.N3 .W.D
DOWNARROW.A....BYTE 20,42.O....BYTE 1,8.
~.D..W.D D.OT2...N.;...X.BUT.N4 .W.D UPA
RROW......BYTE 10,151......BYTE 1,8.J...
.W.D D.OT3.P...;.....BUT.N5 .W.D UPARROW
......BYTE 15,151......BYTE 1,8...(..W.D
D.OT4...2.;.4.<.BUT.N6 .W.D UPARROW.E.F
..BYTE 20,151.S.P..BYTE 1,8.B.Z..W.D D.O
T5.H.D.;...N.BUT.N7 .W.D RIGHTARROW...X.
.BYTE 6,65. ....BYTE 1,8......W.D D.OT6.
....;.P. .BUT.N8 .W.D RIGHTARROW......BY
TE 6,97......BYTE 1,8......W.D D.OT7...H
.;...R.BUT.N9 .W.D RIGHTARROW.-....BYTE
6,129.;....BYTE 1,8.J....W.D D.OT8.P...;
.K...BUT.N10 .W.D LEFTARROW.{....BYTE 25
,65......BYTE 1,8..."..W.D D.OT9...,.;..
.6.BUT.N11 .W.D LEFTARROW.I.@..BYTE 25,9
7.W.J..BYTE 1,8...T..W.D D.OT10...^.;...
H.BUT.N12 .W.D LEFTARROW...R..BYTE 25,12
9.'.|..BYTE 1,8.7....W.D D.OT11.=...;.U.
..BUT.N13 .W.D WRENCH.E....BYTE 33,70.T.
...BYTE 3,21......W.D DOWRENCH...B.;...L
.BUT.N14 .W.D GEOS...V..BYTE 33,110.B...
.BYTE 3,21.P....W.D DOIT.V...;.....;IC.
IMAGES.....;.....DOWNARROW .BYTE 128.8.*
....BYTE 24,24,24,24,255,126,60,24.0.&.;
.H.0.UPARROW .BYTE 128.8.L.:..BYTE 24,60
,126,255,24,24,24,24.R.D.;...N.LEFTARROW
.BYTE 128.8...X..BYTE 16,48,112,255,255
,112,48,16...B.;.S.L.RIGHTARROW .BYTE 12
8.8...V..BYTE 8,12,14,255,255,14,12,8...
..;. ...DRAWBLOCKS LDX PPO. : LDA PAT0,X
.3...JSR SETPATTERN.D...JSR IREC.GLE.T..
..BYTE 56,79.D....W.D 72,103.....LDX PPO
..1 : LDA PAT0,X...F.JSR SETPATTERN...P.
JSR IREC.GLE...Z..BYTE 56,79.E....W.D 11
2,143.....LDX PPO..2 : LDA PAT0,X.....JS
R SETPATTERN.....JSR IREC.GLE......BYTE
56,79.&....W.D 152,183.B. .LDX PPO..3 :
LDA PAT0,X.U.*.JSR SETPATTERN.F.4.JSR IR
EC.GLE.W.>..BYTE 88,111...H..W.D 72,103.
..R.LDX PPO..4 : LDA PAT0,X : JSR SETPAT
TERN.E.\.JSR IREC.GLE.V.F..BYTE 88,111..
.P..W.D 112,143...Z.LDX PPO..5 : LDA PAT
0,X : JSR SETPATTERN.%...JSR IREC.GLE.6.
...BYTE 88,111.G....W.D 152,183.T...LDX
PPO..6 : LDA PAT0,X : JSR SETPATTERN....
.JSR IREC.GLE......BYTE 120,143......W.D
72,103.T.J.LDX PPO..7 : LDA PAT0,X : JS
R SETPATTERN...T.JSR IREC.GLE......BYTE
120,143......W.D 112,143.5...LDX PPO..8
: LDA PAT0,X : JSR SETPATTERN.F...JSR IR
EC.GLE.X....BYTE 120,143.I....W.D 152,18
3.Y...JSR DOCOL.S...$.RTS.....;...8.PPO.
.BYTE 0,1,2,3,4,5,6,7,8...B.PAT0 .BYTE
29.L.L.PAT1 .BYTE 30...V.PAT2 .BYTE 29..
.`.PAT3 .BYTE 30...J.PAT4 .BYTE 24...T.P
AT5 .BYTE 30.&.~.PAT6 .BYTE 29.8...PAT7
.BYTE 30.J...PAT8 .BYTE 29.P...;.O...;.I
NITI.S . THE LARGE IC.S.U...;.....WRENCH
.BYTE 128.63,0,0,0,255,255,254,128,0.L.
D..BYTE 2,159,125,242,159,69,242,159...N
..BYTE 69,242,159,125,242,128,0,2...X..B
YTE 159,125,242,145,85,18,145,85.=....BY
TE 18,159,125,242,128,0,2,159.E....BYTE
125,242,159,69,242,159,69,242......BYTE
159,125,242,128,0,2,255,255......BYTE 25
4,0,0,0,0,0,0,0.W...GEOS .BYTE 128.63,0,
0,0,255,255,254,131,199......BYTE 130,13
5,79,194,142,125,226,156.$....BYTE 3,242
,156,3,242,188,7,250.L.(..BYTE 190,7,250
,190,115,250,191,123.T.2..BYTE 250,190,6
3,250,188,15,250,156...<..BYTE 7,242,158
,7,242,143,15,226.C.F..BYTE 135,159,194,
131,223,130,255,255...P..BYTE 254,0,0,0,
0,0,0,4...Z.;...D.D.OT0 LDA PPO. : LDX P
PO..3 : LDY PPO..6.9.N.STA PPO..3 : STX
PPO..6 : STY PPO..L.X.JMP DRAWBLOCKS.{..
.D.OT1 LDA PPO..1 : LDX PPO..4 : LDY PPO
..7.....STA PPO..4 : STX PPO..7 : STY PP
O..1.....JMP DRAWBLOCKS... .D.OT2 LDA PP
O..2 : LDX PPO..5 : LDY PPO..8.....STA P
PO..5 : STX PPO..8 : STY PPO..2."...JMP
DRAWBLOCKS.Q...D.OT3 LDA PPO..0 : LDX PP
O..3 : LDY PPO..6.Z.H.STA PPO..6 : STX P
PO..0 : STY PPO..3...R.JMP DRAWBLOCKS...
..D.OT4 LDA PPO..1 : LDX PPO..4 : LDY PP
O..7.....STA PPO..7 : STX PPO..1 : STY P
PO..4.....JMP DRAWBLOCKS.(...D.OT5 LDA P
PO..2 : LDX PPO..5 : LDY PPO. .8.Q...STA
PPO..8 : STX PPO..2 : STY PPO..5.D...JM
P DRAWBLOCKS.....D.OT6 LDA PPO..0 : LDX
PPO..1 : LDY PPO..2...".STA PPO..1 : STX
PPO..2 : STY PPO..0.O.,.JMP DRAWBLOCKS.
..6.D.OT7 LDA PPO..3 : LDX PPO..4 : LDY
PPO..5.'.@.STA PPO..4 : STX PPO..5 : STY
PPO..3.:.J.JMP DRAWBLOCKS.I.T.D.OT8 LDA
PPO..6 : LDX PPO..7 : LDY PPO..8...^.ST
A PPO..7 : STX PPO..8 : STY PPO..6...H.J
MP DRAWBLOCKS.T.R.D.OT9 LDA PPO..0 : LDX
PPO..1 : LDY PPO..2...|.STA PPO..2 : ST
X PPO..0 : STY PPO..1.. ..JMP DRAWBLOCKS
.@ ..D.OT10 LDA PPO..3 : LDX PPO..4 : LD
Y PPO..5.I ..STA PPO..5 : STX PPO..3 : S
TY PPO..4.| ..JMP DRAWBLOCKS.. ..D.OT11
LDA PPO..6 : LDX PPO..7 : LDY PPO..8.U .
.STA PPO..8 : STX PPO..6 : STY PPO..7..
B.JMP DRAWBLOCKS.. L.DOWRENCH LDX #8.)!V
.LOOPW TXA : STA PPO.,X : DEX : BPL LOOP
W.<!..JMP DRAWBLOCKS.B!..;.Z!..DOBACKCOL
. LDX #250.F!..LDA #14.!..COLOOP STA $8
C00.1,X..!..STA $8C00.249,X..!..STA $8C0
0.499,X..!&.STA $8C00.749,X.C!0.DEX.R!:.
BNE COLOOP.Z!D.RTS..!N.DOCOL.S LDY #8.."
X.BIGLOOP LDA PPO.,Y.."B.TAX.."L.LDA LTH
EADD,Y.,"V.STA ZTEMP.>"..LDA HTHEADD,Y.N
"..STA ZTEMP.1.V"..TYA.^"..PHA.I"..LDY #
0.X"..LDA COL0,X.."..STA (ZTEMP),Y.."F.I
NY : STA (ZTEMP),Y : INY.."P.LDA COL1,X.
."Z.STA (ZTEMP),Y : INY : STA (ZTEMP),Y.
."..LDY #80.."..LDA COL2,X..#..STA (ZTEM
P),Y.*#..INY : STA (ZTEMP),Y : INY.9#..L
DA COL3,X.A#..STA (ZTEMP),Y : INY : STA
(ZTEMP),Y.I# .PLA.Q#*.TAY.Y#4.DEY..#>.BP
L BIGLOOP..#H.RTS..#R.;..#\.LTHEADD .BYT
E .(7.40.$8C00.9).T#F..BYTE .(7.40.$8C00
.14)..#P..BYTE .(7.40.$8C00.19)..$Z..BYT
E .(11.40.$8C00.9).&$...BYTE .(11.40.$8C
00.14).B$...BYTE .(11.40.$8C00.19).]$...
BYTE .(15.40.$8C00.9).Y$...BYTE .(15.40.
$8C00.14)..$...BYTE .(15.40.$8C00.19)..$
..HTHEADD .BYTE .(7.40.$8C00.9).R$...BYT
E .(7.40.$8C00.14)..$J..BYTE .(7.40.$8C0
0.19)..%T..BYTE .(11.40.$8C00.9).$%...BY
TE .(11.40.$8C00.14).@%...BYTE .(11.40.$
8C00.19).[%...BYTE .(15.40.$8C00.9).W%..
.BYTE .(15.40.$8C00.14)..%...BYTE .(15.4
0.$8C00.19)..%..COL0 .BYTE 14,14,14,14,7
,5,14,2,4..%..COL1 .BYTE 14,14,14,7,5,14
,2,4,14..&$.COL2 .BYTE 14,7,5,14,2,4,14,
14,14.+&..COL3 .BYTE 7,5,14,2,4,14,14,14
,14.=&8..CODE .BYTE 0...
> CLICK IMAGE PREVIEW FOR FULL MODAL