SPRITE-DESIGNER
FILE INFORMATION
FILENAME(S): SPRITE-DESIGNER
FILE TYPE(S): PRG
FILE SIZE: 12.2K
FIRST SEEN: 2025-10-20 14:32:06
APPEARS ON: 1 disk(s)
FILE HASH
9c18f5ad2d96630eee969c8b5fa67d694e1351667471fcfe0ddae9f643cf7879
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SPIELE | SPRITE-DESIGNER | PRG | Treasure Chest - Klaus Der Suhler | 9 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 4F 08 00 00 99 22 93 97 11 11 11 11 11 11 |..O...."........|
00000010: 11 11 20 20 20 20 20 20 20 20 20 20 20 20 53 50 |.. SP|
00000020: 52 49 54 45 20 44 45 53 49 47 4E 45 52 22 3A 99 |RITE DESIGNER":.|
00000030: 22 11 20 20 20 20 20 20 20 20 20 20 42 59 3A 20 |". BY: |
00000040: 44 52 2E 20 4C 45 45 20 54 2E 20 48 49 4C 4C 00 |DR. LEE T. HILL.|
00000050: 77 08 01 00 99 22 11 20 20 20 20 20 20 20 28 43 |w....". (C|
00000060: 29 20 31 39 38 32 20 41 43 41 44 45 4D 59 20 53 |) 1982 ACADEMY S|
00000070: 4F 46 54 57 41 52 45 00 AC 08 02 00 97 35 32 2C |OFTWARE......52,|
00000080: 31 32 38 3A 97 35 36 2C 31 32 38 3A 9C 3A 97 35 |128:.56,128:.:.5|
00000090: 33 32 38 30 2C 36 3A 97 35 33 32 38 31 2C 31 35 |3280,6:.53281,15|
000000A0: 3A 81 58 B2 31 A4 31 35 30 30 3A 82 00 CF 08 03 |:.X.1.1500:.....|
000000B0: 00 56 B2 35 33 32 34 38 3A 81 20 4A B2 30 A4 37 |.V.53248:. J.0.7|
000000C0: 3A 97 20 56 AA 33 39 AA 4A 2C 30 3A 82 20 4A 00 |:. V.39.J,0:. J.|
000000D0: FA 08 04 00 97 20 37 30 34 2C 30 3A 97 37 30 35 |..... 704,0:.705|
000000E0: 2C 30 3A 97 20 37 30 36 2C 30 3A 97 20 37 30 37 |,0:. 706,0:. 707|
000000F0: 2C 30 3A 58 41 24 B2 22 30 22 00 12 09 05 00 86 |,0:XA$."0"......|
00000100: 20 50 28 32 31 2C 32 34 29 2C 54 28 32 34 2C 32 | P(21,24),T(24,2|
00000110: 34 29 00 39 09 06 00 86 20 42 43 28 32 31 2C 33 |4).9.... BC(21,3|
00000120: 29 3A 8F 20 42 49 4E 41 52 59 20 43 4F 44 45 20 |):. BINARY CODE |
00000130: 43 4F 4E 56 45 52 54 45 44 00 60 09 07 00 86 20 |CONVERTED.`.... |
00000140: 48 43 28 32 34 29 2C 56 43 28 32 31 29 3A 8F 20 |HC(24),VC(21):. |
00000150: 43 4F 4F 52 44 49 4E 41 54 45 20 41 52 52 41 59 |COORDINATE ARRAY|
00000160: 00 79 09 08 00 87 4C 4E 3A 8C 3A 8B 4C 4E B1 31 |.y....LN:.:.LN.1|
00000170: 30 30 30 30 89 32 30 33 30 00 B0 09 09 00 58 B2 |0000.2030.....X.|
00000180: 32 3A 59 B2 33 3A 20 41 44 44 B2 31 30 32 33 AA |2:Y.3: ADD.1023.|
00000190: 58 AA 34 30 AC 28 59 AB 31 29 3A 8F 20 49 4E 49 |X.40.(Y.1):. INI|
000001A0: 54 49 41 4C 20 43 4F 4F 52 44 49 4E 41 54 45 53 |TIAL COORDINATES|
000001B0: 00 CD 09 0C 00 96 20 A5 41 28 58 29 B2 28 58 AB |...... .A(X).(X.|
000001C0: 31 30 30 30 30 29 AD 31 30 20 AA 20 31 00 E1 09 |10000).10 . 1...|
000001D0: 14 00 99 22 93 90 22 3A 97 20 35 33 32 38 30 2C |..."..":. 53280,|
000001E0: 36 00 02 0A 15 00 99 22 CF 31 32 33 34 35 36 37 |6......".1234567|
000001F0: 38 39 30 31 32 33 34 35 36 37 38 39 30 31 32 33 |8901234567890123|
00000200: 34 D0 00 0F 0A 16 00 81 20 4A B2 31 A4 32 31 00 |4....... J.1.21.|
00000210: 22 0A 18 00 47 B2 4A AB 31 30 AC B5 28 4A AD 31 |"...G.J.10..(J.1|
00000220: 30 29 00 3B 0A 19 00 52 24 B2 C4 28 47 29 3A 52 |0).;...R$..(G):R|
00000230: 24 B2 CA 28 52 24 2C 32 2C 31 29 00 5E 0A 1A 00 |$..(R$,2,1).^...|
00000240: 99 52 24 22 20 20 20 20 20 20 20 20 20 20 20 20 |.R$" |
00000250: 20 20 20 20 20 20 20 20 20 20 20 20 AA 22 00 66 | .".f|
00000260: 0A 1C 00 82 20 4A 00 87 0A 21 00 99 22 CC AF AF |.... J...!.."...|
00000270: AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF AF |................|
00000280: AF AF AF AF AF AF BA 00 91 0A 23 00 8D 20 36 36 |..........#.. 66|
00000290: 30 00 C4 0A 24 00 8B 20 C5 28 58 41 24 29 B1 30 |0...$.. .(XA$).0|
000002A0: 20 A7 20 53 4E B2 28 C2 28 37 30 36 29 AA 32 35 | . SN.(.(706).25|
000002B0: 36 AC C2 28 37 30 37 29 AB 31 30 30 30 30 29 AD |6..(707).10000).|
000002C0: 31 30 AA 31 00 DD 0A 25 00 99 A6 32 36 29 22 20 |10.1...%...26)" |
000002D0: 53 50 52 49 54 45 20 23 22 3B 53 4E 3B 00 EA 0A |SPRITE #";SN;...|
000002E0: 32 00 99 22 13 11 11 11 11 11 00 02 0B 33 00 99 |2..".........3..|
000002F0: A6 32 36 29 22 CF B7 B7 B7 B7 B7 B7 D0 CF B7 B7 |.26)"...........|
00000300: B7 D0 00 25 0B 34 00 81 4A B2 31 A4 34 3A 99 A6 |...%.4..J.1.4:..|
00000310: 32 36 29 22 B4 20 20 20 20 20 20 AA B4 20 20 20 |26)". .. |
00000320: AA 22 3A 82 4A 00 3D 0B 38 00 99 A6 32 36 29 22 |.":.J.=.8...26)"|
00000330: CC AF AF AF AF AF AF BA CC AF AF AF BA 00 50 0B |..............P.|
00000340: 3B 00 99 22 13 11 11 11 11 11 11 11 11 11 11 11 |;.."............|
00000350: 00 68 0B 3C 00 99 A6 32 36 29 22 CF B7 B7 B7 D0 |.h.<...26)".....|
00000360: CF B7 B7 B7 B7 B7 B7 D0 00 8D 0B 3D 00 81 20 4A |...........=.. J|
00000370: B2 31 A4 32 3A 99 A6 32 36 29 22 B4 20 20 20 AA |.1.2:..26)". .|
00000380: B4 20 20 20 20 20 20 AA 22 3A 82 20 4A 00 A5 0B |. .":. J...|
00000390: 3F 00 99 A6 32 36 29 22 CC AF AF AF BA CC AF AF |?...26)"........|
000003A0: AF AF AF AF BA 00 AE 0B 40 00 99 22 1C 22 00 C9 |........@.."."..|
000003B0: 0B 46 00 8B 20 C8 28 41 4E 24 2C 31 29 B2 22 59 |.F.. .(AN$,1)."Y|
000003C0: 22 20 A7 20 8D 20 34 32 30 00 D1 0B 4F 00 99 22 |" . . 420...O.."|
000003D0: 13 00 E7 0B 50 00 99 A6 32 36 29 22 4D 4F 56 45 |....P...26)"MOVE|
000003E0: 20 54 48 45 20 20 49 00 FD 0B 51 00 99 A6 32 36 | THE I...Q...26|
000003F0: 29 22 43 55 52 53 4F 52 20 20 20 20 DA 00 15 0C |)"CURSOR ....|
00000400: 52 00 99 A6 32 36 29 22 57 49 54 48 20 20 20 20 |R...26)"WITH |
00000410: 4A DA DB DA 4B 00 2B 0C 53 00 99 A6 32 36 29 22 |J...K.+.S...26)"|
00000420: 54 48 45 53 45 20 20 20 20 20 DA 00 41 0C 54 00 |THESE ..A.T.|
00000430: 99 A6 32 36 29 22 4B 45 59 53 3D 3D 3E 20 20 20 |..26)"KEYS==> |
00000440: 4D 00 5A 0C 57 00 99 22 13 11 11 11 11 11 11 11 |M.Z.W.."........|
00000450: 11 11 11 11 11 11 11 11 11 11 00 72 0C 58 00 99 |...........r.X..|
00000460: A6 32 36 29 22 20 27 41 27 3D 54 55 52 4E 20 4F |.26)" 'A'=TURN O|
00000470: 4E 22 00 8A 0C 5A 00 99 A6 32 36 29 22 20 27 5A |N"...Z...26)" 'Z|
00000480: 27 3D 54 55 52 4E 20 4F 46 46 00 9E 0C 5C 00 99 |'=TURN OFF...\..|
00000490: A6 32 36 29 22 20 27 53 27 3D 53 54 4F 50 00 C9 |.26)" 'S'=STOP..|
000004A0: 0C 5D 00 99 22 13 11 11 11 11 11 11 11 11 11 11 |.].."...........|
000004B0: 11 11 11 11 11 11 22 A6 32 36 29 22 B7 B7 CD 53 |......".26)"...S|
000004C0: 50 52 49 54 45 53 CE B7 B7 00 E2 0C 5E 00 99 A6 |PRITES......^...|
000004D0: 32 36 29 22 20 20 20 B7 B7 B7 B7 B7 B7 B7 20 20 |26)" ....... |
000004E0: 20 22 00 20 0D 5F 00 99 22 13 11 11 11 11 11 11 | ". ._..".......|
000004F0: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00000500: 11 11 1D 1D 1D 1D 1D 53 4B 45 54 43 48 20 50 41 |.......SKETCH PA|
00000510: 44 91 91 91 91 91 91 91 91 91 91 91 91 91 91 22 |D.............."|
00000520: 00 2B 0D 63 00 89 20 31 30 30 30 00 31 0D 64 00 |.+.c.. 1000.1.d.|
00000530: 8F 00 5A 0D 67 00 4F 58 B2 58 3A 4F 59 B2 59 3A |..Z.g.OX.X:OY.Y:|
00000540: 8F 20 53 41 56 45 20 4F 4C 44 20 43 55 52 53 4F |. SAVE OLD CURSO|
00000550: 52 20 50 4F 53 49 54 49 4F 4E 00 64 0D 68 00 8D |R POSITION.d.h..|
00000560: 20 32 30 30 00 7D 0D 69 00 A1 20 58 24 3A 8B 20 | 200.}.i.. X$:. |
00000570: 58 24 B2 22 22 20 A7 20 89 20 31 30 35 00 9E 0D |X$."" . . 105...|
00000580: 6E 00 8B 20 58 24 B2 22 49 22 20 A7 20 59 B2 59 |n.. X$."I" . Y.Y|
00000590: AB 31 3A 8B 20 59 B3 33 20 A7 20 59 B2 33 00 C0 |.1:. Y.3 . Y.3..|
000005A0: 0D 73 00 8B 20 58 24 B2 22 4D 22 20 A7 20 59 B2 |.s.. X$."M" . Y.|
000005B0: 59 AA 31 3A 8B 20 59 B1 32 33 A7 20 59 B2 32 33 |Y.1:. Y.23. Y.23|
000005C0: 00 E1 0D 78 00 8B 20 58 24 B2 22 4A 22 20 A7 20 |...x.. X$."J" . |
000005D0: 58 B2 58 AB 31 3A 8B 20 58 B3 32 20 A7 20 58 B2 |X.X.1:. X.2 . X.|
000005E0: 32 00 03 0E 7D 00 8B 20 58 24 B2 22 4B 22 20 A7 |2...}.. X$."K" .|
000005F0: 20 58 B2 58 AA 31 3A 8B 20 58 B1 32 35 A7 20 58 | X.X.1:. X.25. X|
00000600: B2 32 35 00 20 0E 82 00 8B 20 58 24 B2 22 41 22 |.25. .... X$."A"|
00000610: 20 A7 20 20 50 28 59 AB 32 2C 58 AB 31 29 B2 31 | . P(Y.2,X.1).1|
00000620: 00 3D 0E 87 00 8B 20 58 24 B2 22 5A 22 20 A7 20 |.=.... X$."Z" . |
00000630: 20 50 28 59 AB 32 2C 58 AB 31 29 B2 30 00 46 0E | P(Y.2,X.1).0.F.|
00000640: 8C 00 8D 33 30 30 00 4C 0E 95 00 8E 00 52 0E 96 |...300.L.....R..|
00000650: 00 8F 00 6D 0E 98 00 4F 41 44 44 B2 31 30 32 33 |...m...OADD.1023|
00000660: AA 4F 58 AA 34 30 AC 28 4F 59 AB 31 29 00 85 0E |.OX.40.(OY.1)...|
00000670: 99 00 41 44 44 B2 31 30 32 33 AA 58 AA 34 30 AC |..ADD.1023.X.40.|
00000680: 28 59 AB 31 29 00 A6 0E 9B 00 8B 20 50 28 4F 59 |(Y.1)...... P(OY|
00000690: AB 32 2C 4F 58 AB 31 29 B2 30 20 A7 20 97 20 4F |.2,OX.1).0 . . O|
000006A0: 41 44 44 2C 33 32 00 CB 0E 9C 00 8B 20 50 28 4F |ADD,32...... P(O|
000006B0: 59 AB 32 2C 4F 58 AB 31 29 B2 31 20 A7 20 97 20 |Y.2,OX.1).1 . . |
000006C0: 4F 41 44 44 2C 33 32 AA 31 32 38 00 ED 0E A0 00 |OADD,32.128.....|
000006D0: 8B 20 50 28 59 AB 32 2C 58 AB 31 29 B2 31 20 A7 |. P(Y.2,X.1).1 .|
000006E0: 20 97 20 41 44 44 2C 33 32 AA 31 32 38 00 F3 0E | . ADD,32.128...|
000006F0: C7 00 8E 00 F9 0E C8 00 8F 00 17 0F C9 00 8B 20 |............... |
00000700: 50 28 59 AB 32 2C 58 AB 31 29 B2 30 20 A7 20 97 |P(Y.2,X.1).0 . .|
00000710: 20 41 44 44 2C 34 32 00 39 0F CA 00 8B 20 50 28 | ADD,42.9.... P(|
00000720: 59 AB 32 2C 58 AB 31 29 B2 31 20 A7 20 97 20 41 |Y.2,X.1).1 . . A|
00000730: 44 44 2C 34 32 AA 31 32 38 00 3F 0F CB 00 8E 00 |DD,42.128.?.....|
00000740: 45 0F D2 00 8F 00 5F 0F DB 00 99 22 13 22 A6 32 |E....._....".".2|
00000750: 36 29 22 57 48 41 54 20 49 53 20 54 48 45 22 00 |6)"WHAT IS THE".|
00000760: 78 0F DC 00 99 A6 32 36 29 22 52 4F 54 41 54 45 |x.....26)"ROTATE|
00000770: 20 41 4E 47 4C 45 3F 22 00 A7 0F DD 00 85 22 1D | ANGLE?"......".|
00000780: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00000790: 1D 1D 1D 1D 1D 1D 1D 1D 1D 44 45 47 52 45 45 53 |.........DEGREES|
000007A0: 22 3B 41 4E 47 4C 45 00 B1 0F DE 00 8D 20 39 35 |";ANGLE...... 95|
000007B0: 30 00 C1 0F E6 00 48 B2 31 32 2E 35 3A 56 B2 31 |0.....H.12.5:V.1|
000007C0: 31 00 E7 0F EB 00 81 20 4A B2 31 A4 32 34 3A 81 |1...... J.1.24:.|
000007D0: 20 4C B2 31 A4 32 31 3A 54 28 4C 2C 4A 29 B2 30 | L.1.21:T(L,J).0|
000007E0: 3A 82 20 4C 3A 82 4A 00 F5 0F EF 00 50 49 B2 34 |:. L:.J.....PI.4|
000007F0: AC C1 28 31 29 00 0C 10 F0 00 41 4E 47 4C 45 B2 |..(1).....ANGLE.|
00000800: 41 4E 47 4C 45 AC 50 49 AD 31 38 30 00 1D 10 F1 |ANGLE.PI.180....|
00000810: 00 81 20 4A 20 B2 20 31 20 A4 20 32 34 00 2E 10 |.. J . 1 . 24...|
00000820: F2 00 81 20 4C 20 B2 20 31 20 A4 20 32 31 00 43 |... L . 1 . 21.C|
00000830: 10 F4 00 8B 20 50 28 4C 2C 4A 29 B2 30 20 A7 20 |.... P(L,J).0 . |
00000840: 32 35 30 00 6B 10 F6 00 4E 58 B2 B5 28 BE 28 41 |250.k...NX..(.(A|
00000850: 4E 47 4C 45 29 AC 28 48 AB 4A 29 AA BF 28 41 4E |NGLE).(H.J)..(AN|
00000860: 47 4C 45 29 AC 28 56 AB 4C 29 29 00 94 10 F7 00 |GLE).(V.L)).....|
00000870: 4E 59 B2 B5 28 AB BF 28 41 4E 47 4C 45 29 AC 28 |NY..(..(ANGLE).(|
00000880: 48 AB 4A 29 AA BE 28 41 4E 47 4C 45 29 AC 28 56 |H.J)..(ANGLE).(V|
00000890: AB 4C 29 29 00 BE 10 F8 00 8B 20 48 AB 4E 58 B3 |.L))...... H.NX.|
000008A0: 31 B0 48 AB 4E 58 B1 32 34 B0 56 AB 4E 59 B3 30 |1.H.NX.24.V.NY.0|
000008B0: B0 56 AB 4E 59 B1 32 31 20 A7 20 32 35 30 00 D1 |.V.NY.21 . 250..|
000008C0: 10 F9 00 54 28 56 AB 4E 59 2C 48 AB 4E 58 29 B2 |...T(V.NY,H.NX).|
000008D0: 31 00 D9 10 FA 00 82 20 4C 00 E1 10 FB 00 82 20 |1...... L...... |
000008E0: 4A 00 F1 10 FD 00 81 20 4A 20 B2 31 20 A4 20 32 |J...... J .1 . 2|
000008F0: 34 00 00 11 FE 00 81 20 4C B2 31 20 A4 20 32 31 |4...... L.1 . 21|
00000900: 00 12 11 00 01 50 28 4C 2C 4A 29 B2 54 28 4C 2C |.....P(L,J).T(L,|
00000910: 4A 29 00 1A 11 02 01 82 20 4C 00 22 11 03 01 82 |J)...... L."....|
00000920: 20 4A 00 2C 11 06 01 8D 20 39 38 30 00 32 11 08 | J.,.... 980.2..|
00000930: 01 8E 00 38 11 0E 01 8F 00 58 11 0F 01 41 44 44 |...8.....X...ADD|
00000940: 52 45 53 53 B2 C2 28 32 30 34 39 29 AA 32 35 36 |RESS..(2049).256|
00000950: AC C2 28 32 30 35 30 29 00 88 11 10 01 8B 20 C2 |..(2050)...... .|
00000960: 28 41 44 44 52 45 53 53 AA 32 29 AA C2 28 41 44 |(ADDRESS.2)..(AD|
00000970: 44 52 45 53 53 AA 33 29 AC 32 35 36 B2 31 30 30 |DRESS.3).256.100|
00000980: 30 30 20 A7 20 32 37 35 00 B0 11 11 01 41 44 44 |00 . 275.....ADD|
00000990: 52 45 53 53 B2 C2 28 41 44 44 52 45 53 53 29 AA |RESS..(ADDRESS).|
000009A0: 32 35 36 AC C2 28 41 44 44 52 45 53 53 AA 31 29 |256..(ADDRESS.1)|
000009B0: 00 BA 11 12 01 89 20 32 37 32 00 DF 11 13 01 58 |...... 272.....X|
000009C0: B2 B5 28 41 44 44 52 45 53 53 AD 32 35 36 29 3A |..(ADDRESS.256):|
000009D0: 59 B2 41 44 44 52 45 53 53 AB 58 AC 32 35 36 00 |Y.ADDRESS.X.256.|
000009E0: EF 11 14 01 97 34 34 2C 58 3A 97 34 33 2C 59 00 |.....44,X:.43,Y.|
000009F0: 10 12 16 01 4C 44 B2 28 C2 28 34 35 29 AA 32 35 |....LD.(.(45).25|
00000A00: 36 AC C2 28 34 36 29 29 AB 41 44 44 52 45 53 53 |6..(46)).ADDRESS|
00000A10: 00 28 12 18 01 50 36 B2 B5 28 28 32 30 34 39 AA |.(...P6..((2049.|
00000A20: 4C 44 29 AD 32 35 36 29 00 3E 12 19 01 50 35 B2 |LD).256).>...P5.|
00000A30: 32 30 34 39 AA 4C 44 AB 50 36 AC 32 35 36 00 53 |2049.LD.P6.256.S|
00000A40: 12 1B 01 97 20 38 34 35 2C 50 35 3A 97 38 34 36 |.... 845,P5:.846|
00000A50: 2C 50 36 00 98 12 1D 01 99 22 93 11 11 11 50 4F |,P6......"....PO|
00000A60: 4B 45 32 30 34 39 2C 59 3A 50 4F 4B 45 32 30 35 |KE2049,Y:POKE205|
00000A70: 30 2C 58 3A 50 4F 4B 45 32 30 35 31 2C 30 3A 50 |0,X:POKE2051,0:P|
00000A80: 4F 4B 45 32 30 35 32 2C 30 3A 50 4F 4B 45 32 30 |OKE2052,0:POKE20|
00000A90: 35 33 2C 31 34 33 22 3B 00 AB 12 1E 01 99 22 3A |53,143";......":|
00000AA0: 50 4F 4B 45 32 30 35 34 2C 30 22 00 C6 12 20 01 |POKE2054,0"... .|
00000AB0: 99 22 11 11 50 4F 4B 45 34 33 2C 31 3A 50 4F 4B |."..POKE43,1:POK|
00000AC0: 45 34 34 2C 38 22 00 D1 12 22 01 99 22 11 11 30 |E44,8"...".."..0|
00000AD0: 22 00 FE 12 24 01 99 22 50 4F 4B 45 34 35 2C 50 |"...$.."POKE45,P|
00000AE0: 45 45 4B 28 38 34 35 29 3A 50 4F 4B 45 34 36 2C |EEK(845):POKE46,|
00000AF0: 50 45 45 4B 28 38 34 36 29 3A 43 4C 52 22 00 17 |PEEK(846):CLR"..|
00000B00: 13 26 01 99 22 11 11 3F 43 48 52 24 28 31 34 37 |.&.."..?CHR$(147|
00000B10: 29 3A 4C 49 53 54 22 00 35 13 28 01 97 31 39 38 |):LIST".5.(..198|
00000B20: 2C 35 3A 81 4A B2 30 A4 34 3A 97 36 33 31 AA 4A |,5:.J.0.4:.631.J|
00000B30: 2C 31 33 3A 82 00 40 13 2A 01 99 22 13 22 3A 80 |,13:..@.*..".":.|
00000B40: 00 46 13 2B 01 8E 00 4C 13 2C 01 8F 00 60 13 31 |.F.+...L.,...`.1|
00000B50: 01 42 58 B2 20 B5 28 28 4F 58 AA 36 29 AD 38 29 |.BX. .((OX.6).8)|
00000B60: 00 6D 13 36 01 42 59 B2 20 4F 59 AB 32 00 7E 13 |.m.6.BY. OY.2.~.|
00000B70: 40 01 4E B2 38 AC 28 42 58 AB 31 29 AA 31 00 9F |@.N.8.(BX.1).1..|
00000B80: 13 45 01 81 20 4A B2 30 A4 37 3A 43 28 4A 29 B2 |.E.. J.0.7:C(J).|
00000B90: 50 28 4F 59 AB 32 2C 4E AA 4A 29 3A 82 20 4A 00 |P(OY.2,N.J):. J.|
00000BA0: E8 13 4A 01 42 43 28 42 59 2C 42 58 29 B2 31 32 |..J.BC(BY,BX).12|
00000BB0: 38 AC 43 28 30 29 AA 36 34 AC 43 28 31 29 AA 33 |8.C(0).64.C(1).3|
00000BC0: 32 AC 43 28 32 29 AA 31 36 AC 43 28 33 29 AA 38 |2.C(2).16.C(3).8|
00000BD0: AC 43 28 34 29 AA 34 AC 43 28 35 29 AA 32 AC 43 |.C(4).4.C(5).2.C|
00000BE0: 28 36 29 AA 43 28 37 29 00 0C 14 4F 01 97 20 38 |(6).C(7)...O.. 8|
00000BF0: 33 32 AA 33 AC 28 42 59 AB 31 29 AA 28 42 58 AB |32.3.(BY.1).(BX.|
00000C00: 31 29 2C 42 43 28 42 59 2C 42 58 29 00 35 14 59 |1),BC(BY,BX).5.Y|
00000C10: 01 97 56 AA 34 2C 32 33 39 3A 97 56 AA 35 2C 31 |..V.4,239:.V.5,1|
00000C20: 30 31 3A 97 20 56 AA 38 2C 34 37 3A 97 20 56 AA |01:. V.8,47:. V.|
00000C30: 39 2C 31 30 31 00 60 14 5B 01 97 56 AA 36 2C 32 |9,101.`.[..V.6,2|
00000C40: 33 39 3A 97 56 AA 37 2C 31 35 31 3A 97 20 56 AA |39:.V.7,151:. V.|
00000C50: 31 30 2C 32 33 3A 97 20 56 AA 31 31 2C 31 35 31 |10,23:. V.11,151|
00000C60: 00 66 14 5D 01 8E 00 6C 14 5E 01 8F 00 98 14 68 |.f.]...l.^.....h|
00000C70: 01 81 20 4A B2 31 A4 32 31 3A 81 20 4B B2 31 A4 |.. J.1.21:. K.1.|
00000C80: 33 3A 54 28 4A 2C 4B 29 B2 42 43 28 4A 2C 4B 29 |3:T(J,K).BC(J,K)|
00000C90: 3A 82 20 4B 3A 82 20 4A 00 AD 14 6B 01 8C 3A 87 |:. K:. J...k..:.|
00000CA0: 20 4C 4E 3A 53 4E B2 A5 41 28 4C 4E 29 00 C8 14 | LN:SN..A(LN)...|
00000CB0: 6C 01 99 22 13 22 A6 32 36 29 22 57 48 49 43 48 |l..".".26)"WHICH|
00000CC0: 20 53 50 52 49 54 45 22 00 E1 14 6D 01 99 A6 32 | SPRITE"...m...2|
00000CD0: 36 29 22 53 48 4F 55 4C 44 20 42 45 20 20 20 20 |6)"SHOULD BE |
00000CE0: 22 00 FA 14 6E 01 99 A6 32 36 29 22 4D 45 52 47 |"...n...26)"MERG|
00000CF0: 45 44 2F 49 4E 54 45 52 2D 22 00 39 15 6F 01 85 |ED/INTER-".9.o..|
00000D00: 22 11 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |"...............|
00000D10: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 53 45 43 54 |............SECT|
00000D20: 45 44 20 23 22 3B 4E 24 3A 8B 20 4E 24 B2 22 31 |ED #";N$:. N$."1|
00000D30: 22 20 A7 20 89 20 33 37 35 00 50 15 70 01 8D 20 |" . . 375.P.p.. |
00000D40: 36 37 30 3A 8B 20 4F 42 B2 31 20 A7 20 33 36 34 |670:. OB.1 . 364|
00000D50: 00 69 15 71 01 81 20 4A B2 31 20 A4 20 36 33 AC |.i.q.. J.1 . 63.|
00000D60: 28 C5 28 4E 24 29 AB 31 29 00 75 15 72 01 87 20 |(.(N$).1).u.r.. |
00000D70: 54 3A 82 20 4A 00 7F 15 77 01 8D 20 39 35 30 00 |T:. J...w.. 950.|
00000D80: 98 15 78 01 81 20 4A 20 B2 20 31 20 A4 20 32 31 |..x.. J . 1 . 21|
00000D90: 3A 81 20 4B B2 31 A4 33 00 AC 15 79 01 87 20 42 |:. K.1.3...y.. B|
00000DA0: 43 28 4A 2C 4B 29 3A 82 4B 3A 82 4A 00 C1 15 7B |C(J,K):.K:.J...{|
00000DB0: 01 81 20 4A B2 31 A4 32 31 3A 81 20 4B B2 31 A4 |.. J.1.21:. K.1.|
00000DC0: 33 00 E5 15 7C 01 8B 20 41 24 B2 22 36 22 A7 42 |3...|.. A$."6".B|
00000DD0: 43 28 4A 2C 4B 29 B2 42 43 28 4A 2C 4B 29 B0 54 |C(J,K).BC(J,K).T|
00000DE0: 28 4A 2C 4B 29 00 09 16 7D 01 8B 20 41 24 B2 22 |(J,K)...}.. A$."|
00000DF0: 37 22 A7 42 43 28 4A 2C 4B 29 B2 42 43 28 4A 2C |7".BC(J,K).BC(J,|
00000E00: 4B 29 AF 54 28 4A 2C 4B 29 00 15 16 7F 01 82 20 |K).T(J,K)...... |
00000E10: 4B 3A 82 20 4A 00 38 16 80 01 81 4A B2 31 A4 32 |K:. J.8....J.1.2|
00000E20: 31 3A 81 4B B2 31 A4 32 34 3A 50 28 4A 2C 4B 29 |1:.K.1.24:P(J,K)|
00000E30: B2 30 3A 82 4B 3A 82 4A 00 42 16 81 01 8D 20 38 |.0:.K:.J.B.... 8|
00000E40: 32 30 00 48 16 8F 01 8E 00 4E 16 90 01 8F 00 5A |20.H.....N.....Z|
00000E50: 16 91 01 56 B2 35 33 32 34 38 00 68 16 92 01 97 |...V.53248.h....|
00000E60: 20 56 AA 32 31 2C 36 30 00 94 16 93 01 97 20 32 | V.21,60...... 2|
00000E70: 30 34 32 2C 31 33 3A 97 20 32 30 34 33 2C 31 33 |042,13:. 2043,13|
00000E80: 3A 97 20 32 30 34 34 2C 31 33 3A 97 20 32 30 34 |:. 2044,13:. 204|
00000E90: 35 2C 31 33 00 B6 16 95 01 97 20 56 AA 32 33 2C |5,13...... V.23,|
00000EA0: 32 30 3A 97 20 56 AA 32 39 2C 33 36 3A 97 20 56 |20:. V.29,36:. V|
00000EB0: AA 31 36 2C 34 38 00 DF 16 96 01 97 56 AA 34 2C |.16,48......V.4,|
00000EC0: 32 33 39 3A 97 56 AA 35 2C 31 30 31 3A 97 20 56 |239:.V.5,101:. V|
00000ED0: AA 38 2C 34 37 3A 97 20 56 AA 39 2C 31 30 31 00 |.8,47:. V.9,101.|
00000EE0: 0A 17 97 01 97 56 AA 36 2C 32 33 39 3A 97 56 AA |.....V.6,239:.V.|
00000EF0: 37 2C 31 35 31 3A 97 20 56 AA 31 30 2C 32 33 3A |7,151:. V.10,23:|
00000F00: 97 20 56 AA 31 31 2C 31 35 31 00 3C 17 98 01 81 |. V.11,151.<....|
00000F10: 20 4A B2 30 A4 36 32 3A 97 38 33 32 AA 4A 2C 42 | J.0.62:.832.J,B|
00000F20: 43 28 B5 28 4A AD 33 29 AA 31 2C 4A AA 31 AB B5 |C(.(J.3).1,J.1..|
00000F30: 28 4A AD 33 29 AC 33 29 3A 82 20 4A 00 42 17 99 |(J.3).3):. J.B..|
00000F40: 01 8E 00 5E 17 A4 01 8D 20 38 30 30 3A 8F 20 4D |...^.... 800:. M|
00000F50: 45 4E 55 20 53 55 42 52 4F 55 54 49 4E 45 00 79 |ENU SUBROUTINE.y|
00000F60: 17 A5 01 99 22 13 22 A6 32 36 29 22 4D 45 4E 55 |....".".26)"MENU|
00000F70: 3A 3A 4E 4F 4E 45 3D 30 22 00 92 17 A6 01 99 A6 |::NONE=0".......|
00000F80: 32 36 29 22 52 45 46 4C 45 43 54 49 4F 4E 3D 20 |26)"REFLECTION= |
00000F90: 31 22 00 AB 17 A7 01 99 A6 32 36 29 22 52 4F 54 |1".......26)"ROT|
00000FA0: 41 54 49 4F 4E 3D 20 20 20 32 22 00 C4 17 A8 01 |ATION= 2".....|
00000FB0: 99 A6 32 36 29 22 53 48 45 41 52 3D 20 20 20 20 |..26)"SHEAR= |
00000FC0: 20 20 33 22 00 DD 17 A9 01 99 A6 32 36 29 22 54 | 3".......26)"T|
00000FD0: 52 41 4E 53 4C 41 54 49 4F 4E 3D 34 22 00 04 18 |RANSLATION=4"...|
00000FE0: AA 01 99 22 11 11 11 11 11 11 11 11 11 11 11 11 |..."............|
00000FF0: 22 A6 32 36 29 22 52 45 56 45 52 53 45 20 49 4D |".26)"REVERSE IM|
00001000: 47 3D 35 22 00 1D 18 AB 01 99 A6 32 36 29 22 4D |G=5".......26)"M|
00001010: 45 52 47 45 20 53 50 52 54 45 3D 36 22 00 36 18 |ERGE SPRTE=6".6.|
00001020: AC 01 99 A6 32 36 29 22 49 4E 54 45 52 53 45 43 |....26)"INTERSEC|
00001030: 54 20 20 3D 37 22 00 5C 18 AD 01 85 22 1D 1D 1D |T =7".\...."...|
00001040: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001050: 1D 1D 1D 1D 1D 1D 1D 23 22 3B 41 24 00 7A 18 B0 |.......#";A$.z..|
00001060: 01 5A B2 C5 28 41 24 29 3A 8B 20 5A B3 30 20 B0 |.Z..(A$):. Z.0 .|
00001070: 20 5A B1 37 20 A7 20 34 32 31 00 9B 18 B1 01 8D | Z.7 . 421......|
00001080: 20 36 35 30 3A 8B 20 41 24 B2 22 36 22 B0 41 24 | 650:. A$."6".A$|
00001090: B2 22 37 22 A7 20 8D 20 33 35 30 00 B0 18 B2 01 |."7". . 350.....|
000010A0: 8B 20 41 24 B2 22 31 22 20 A7 20 8D 20 39 30 30 |. A$."1" . . 900|
000010B0: 00 C5 18 B3 01 8B 20 41 24 B2 22 32 22 20 A7 20 |...... A$."2" . |
000010C0: 8D 20 32 31 30 00 DA 18 B4 01 8B 20 41 24 B2 22 |. 210...... A$."|
000010D0: 33 22 20 A7 20 8D 20 37 31 30 00 EF 18 B5 01 8B |3" . . 710......|
000010E0: 20 41 24 B2 22 34 22 20 A7 20 8D 20 34 35 30 00 | A$."4" . . 450.|
000010F0: 04 19 B6 01 8B 20 41 24 B2 22 35 22 20 A7 20 8D |..... A$."5" . .|
00001100: 20 37 38 30 00 15 19 B7 01 8B 20 41 24 B2 22 30 | 780...... A$."0|
00001110: 22 20 A7 20 8E 00 30 19 B8 01 99 22 13 22 A6 32 |" . ..0....".".2|
00001120: 36 29 22 44 4F 20 59 4F 55 20 57 41 4E 54 20 22 |6)"DO YOU WANT "|
00001130: 00 49 19 B9 01 99 A6 32 36 29 22 54 4F 20 52 4F |.I.....26)"TO RO|
00001140: 54 41 54 45 2C 52 45 2D 22 00 62 19 BA 01 99 A6 |TATE,RE-".b.....|
00001150: 32 36 29 22 46 4C 45 43 54 2C 45 54 43 2E 2E 2E |26)"FLECT,ETC...|
00001160: 20 22 00 92 19 BB 01 85 22 1D 1D 1D 1D 1D 1D 1D | "......".......|
00001170: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001180: 1D 1D 1D 41 47 41 49 4E 3F 20 59 2F 4E 22 3B 41 |...AGAIN? Y/N";A|
00001190: 4E 24 00 9C 19 BC 01 8D 20 36 35 30 00 B5 19 BD |N$...... 650....|
000011A0: 01 8B 20 C8 28 41 4E 24 2C 31 29 B2 22 59 22 20 |.. .(AN$,1)."Y" |
000011B0: A7 20 34 32 31 00 BB 19 C1 01 8E 00 F9 19 C2 01 |. 421...........|
000011C0: 50 53 B2 31 3A 54 53 B2 31 3A 50 54 B2 31 3A 54 |PS.1:TS.1:PT.1:T|
000011D0: 54 B2 31 3A 46 4C B2 30 3A 8F 20 53 55 42 52 4F |T.1:FL.0:. SUBRO|
000011E0: 55 54 49 4E 45 20 54 4F 20 54 52 41 4E 53 4C 41 |UTINE TO TRANSLA|
000011F0: 54 45 20 53 50 52 49 54 45 00 13 1A C3 01 99 22 |TE SPRITE......"|
00001200: 13 22 A6 32 36 29 22 57 48 41 54 20 49 53 20 54 |.".26)"WHAT IS T|
00001210: 48 45 22 00 2C 1A C4 01 99 A6 32 36 29 22 48 4F |HE".,.....26)"HO|
00001220: 52 49 5A 2D 54 52 41 4E 53 2E 3F 22 00 45 1A C5 |RIZ-TRANS.?".E..|
00001230: 01 99 A6 32 36 29 22 43 48 4F 4F 53 45 20 23 20 |...26)"CHOOSE # |
00001240: 30 2D 32 34 22 00 5E 1A C6 01 99 A6 32 36 29 22 |0-24".^.....26)"|
00001250: 4C 45 46 54 2F 52 49 47 48 54 3F 20 20 22 00 91 |LEFT/RIGHT? "..|
00001260: 1A C7 01 85 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |...."...........|
00001270: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 45 |...............E|
00001280: 2E 47 2E 20 31 30 4C 22 3B 54 24 3A 89 20 34 39 |.G. 10L";T$:. 49|
00001290: 30 00 AB 1A C8 01 99 22 13 22 A6 32 36 29 22 57 |0......".".26)"W|
000012A0: 48 41 54 20 49 53 20 54 48 45 22 00 C4 1A C9 01 |HAT IS THE".....|
000012B0: 99 A6 32 36 29 22 56 45 52 54 43 4C 2D 54 52 41 |..26)"VERTCL-TRA|
000012C0: 4E 53 3F 22 00 DD 1A CA 01 99 A6 32 36 29 22 43 |NS?".......26)"C|
000012D0: 48 4F 4F 53 45 20 23 20 30 2D 32 31 22 00 F6 1A |HOOSE # 0-21"...|
000012E0: CB 01 99 A6 32 36 29 22 41 4C 53 4F 20 55 50 2F |....26)"ALSO UP/|
000012F0: 44 4F 57 4E 3F 22 00 1E 1B CC 01 99 A6 32 36 29 |DOWN?".......26)|
00001300: 22 45 2E 47 2E 20 31 30 55 20 20 20 20 9D 9D 9D |"E.G. 10U ...|
00001310: 9D 22 3B 3A 85 20 54 24 3A 89 20 34 39 30 00 38 |.";:. T$:. 490.8|
00001320: 1B CD 01 99 22 13 22 A6 32 36 29 22 44 4F 20 59 |....".".26)"DO Y|
00001330: 4F 55 20 57 41 4E 54 22 00 51 1B CE 01 99 A6 32 |OU WANT".Q.....2|
00001340: 36 29 22 57 52 41 50 2D 41 52 4F 55 4E 44 3F 20 |6)"WRAP-AROUND? |
00001350: 22 00 7D 1B D2 01 85 22 1D 1D 1D 1D 1D 1D 1D 1D |".}...."........|
00001360: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001370: 1D 1D 59 45 53 2F 4E 4F 22 3B 41 4E 24 00 9C 1B |..YES/NO";AN$...|
00001380: D3 01 57 52 B2 30 3A 8B 20 C8 28 41 4E 24 2C 31 |..WR.0:. .(AN$,1|
00001390: 29 B2 22 59 22 20 A7 20 57 52 B2 31 00 C5 1B D4 |)."Y" . WR.1....|
000013A0: 01 81 20 4A B2 31 A4 32 34 3A 81 20 4C B2 31 20 |.. J.1.24:. L.1 |
000013B0: A4 20 32 34 3A 54 28 4A 2C 4C 29 B2 30 3A 82 20 |. 24:T(J,L).0:. |
000013C0: 4C 3A 82 20 4A 00 CF 1B D7 01 8D 20 39 35 30 00 |L:. J...... 950.|
000013D0: 0F 1C DD 01 8B 20 54 53 B2 31 20 A7 20 96 20 A5 |..... TS.1 . . .|
000013E0: 41 28 58 29 B2 28 31 AB 58 AB 50 53 29 AC 28 58 |A(X).(1.X.PS).(X|
000013F0: AA 50 53 AB 31 B3 32 35 29 AA 28 32 35 AB 58 AB |.PS.1.25).(25.X.|
00001400: 50 53 29 AC 28 58 AA 50 53 AB 31 B1 32 34 29 00 |PS).(X.PS.1.24).|
00001410: 4F 1C DE 01 8B 20 50 53 B2 31 20 A7 20 96 20 A5 |O.... PS.1 . . .|
00001420: 41 28 58 29 B2 28 AB 31 AB 58 AA 54 53 29 AC 28 |A(X).(.1.X.TS).(|
00001430: 58 AB 54 53 AA 31 B1 30 29 AA 28 AB 32 35 AB 58 |X.TS.1.0).(.25.X|
00001440: AA 54 53 29 AC 28 58 AB 54 53 AA 31 B3 31 29 00 |.TS).(X.TS.1.1).|
00001450: 8F 1C DF 01 8B 20 50 54 B2 31 20 A7 20 96 20 A5 |..... PT.1 . . .|
00001460: 42 28 58 29 B2 28 AB 31 AB 58 AA 54 54 29 AC 28 |B(X).(.1.X.TT).(|
00001470: 58 AB 54 54 AA 31 B1 30 29 AA 28 AB 32 32 AB 58 |X.TT.1.0).(.22.X|
00001480: AA 54 54 29 AC 28 58 AB 54 54 AA 31 B3 31 29 00 |.TT).(X.TT.1.1).|
00001490: CF 1C E0 01 8B 20 54 54 B2 31 20 A7 20 96 20 A5 |..... TT.1 . . .|
000014A0: 42 28 58 29 B2 28 31 AB 58 AB 50 54 29 AC 28 58 |B(X).(1.X.PT).(X|
000014B0: AA 50 54 AB 31 B3 32 32 29 AA 28 32 32 AB 58 AB |.PT.1.22).(22.X.|
000014C0: 50 54 29 AC 28 58 AA 50 54 AB 31 B1 32 31 29 00 |PT).(X.PT.1.21).|
000014D0: FB 1C E1 01 81 20 4A 20 B2 31 20 A4 20 32 31 3A |..... J .1 . 21:|
000014E0: 81 20 4C B2 31 20 A4 20 32 34 3A 8B 20 50 28 4A |. L.1 . 24:. P(J|
000014F0: 2C 4C 29 B2 30 20 A7 20 34 38 35 00 0F 1D E2 01 |,L).0 . 485.....|
00001500: 58 B2 A5 41 28 4C 29 3A 59 B2 A5 42 28 4A 29 00 |X..A(L):Y..B(J).|
00001510: 3A 1D E3 01 8B 20 57 52 B2 30 20 A7 20 8D 20 35 |:.... WR.0 . . 5|
00001520: 38 30 3A 8B 20 46 31 B2 31 20 A7 20 54 28 59 2C |80:. F1.1 . T(Y,|
00001530: 58 29 B2 30 3A 89 20 34 38 35 00 4C 1D E4 01 54 |X).0:. 485.L...T|
00001540: 28 59 2C 58 29 B2 50 28 4A 2C 4C 29 00 58 1D E5 |(Y,X).P(J,L).X..|
00001550: 01 82 20 4C 3A 82 20 4A 00 73 1D E6 01 81 20 4A |.. L:. J.s.... J|
00001560: 20 B2 31 20 A4 20 32 34 3A 81 20 4C B2 31 20 A4 | .1 . 24:. L.1 .|
00001570: 20 32 31 00 8D 1D E7 01 50 28 4C 2C 4A 29 B2 54 | 21.....P(L,J).T|
00001580: 28 4C 2C 4A 29 3A 82 20 4C 3A 82 20 4A 00 97 1D |(L,J):. L:. J...|
00001590: E8 01 8D 20 39 38 30 00 9D 1D E9 01 8E 00 D2 1D |... 980.........|
000015A0: EA 01 4C B2 C3 28 54 24 29 3A 8B 4C B1 30 A7 58 |..L..(T$):.L.0.X|
000015B0: B2 C5 28 CA 28 54 24 2C 31 2C 4C AB 31 29 29 3A |..(.(T$,1,L.1)):|
000015C0: 43 24 B2 CA 28 54 24 2C 4C 2C 31 29 3A 54 24 B2 |C$..(T$,L,1):T$.|
000015D0: 22 22 00 07 1E EB 01 8D 36 35 30 3A 8B 43 24 B3 |""......650:.C$.|
000015E0: B1 22 4C 22 AF 43 24 B3 B1 22 52 22 AF 43 24 B3 |."L".C$.."R".C$.|
000015F0: B1 22 55 22 AF 43 24 B3 B1 22 44 22 AF 46 4C B2 |."U".C$.."D".FL.|
00001600: 30 20 A7 20 34 35 31 00 37 1E EC 01 8B 43 24 B3 |0 . 451.7....C$.|
00001610: B1 22 4C 22 AF 43 24 B3 B1 22 52 22 AF 43 24 B3 |."L".C$.."R".C$.|
00001620: B1 22 55 22 AF 43 24 B3 B1 22 44 22 AF 46 4C B2 |."U".C$.."D".FL.|
00001630: 31 20 A7 20 34 35 36 00 52 1E ED 01 8B 20 43 24 |1 . 456.R.... C$|
00001640: B2 22 4C 22 20 A7 20 50 53 B2 31 3A 54 53 B2 58 |."L" . PS.1:TS.X|
00001650: AA 31 00 6D 1E EE 01 8B 20 43 24 B2 22 44 22 20 |.1.m.... C$."D" |
00001660: A7 20 50 54 B2 31 AA 58 3A 54 54 B2 31 00 88 1E |. PT.1.X:TT.1...|
00001670: EF 01 8B 20 43 24 B2 22 55 22 20 A7 20 50 54 B2 |... C$."U" . PT.|
00001680: 31 3A 54 54 B2 58 AA 31 00 A3 1E F0 01 8B 20 43 |1:TT.X.1...... C|
00001690: 24 B2 22 52 22 20 A7 20 50 53 B2 31 AA 58 3A 54 |$."R" . PS.1.X:T|
000016A0: 53 B2 31 00 BB 1E F1 01 8B 20 46 4C B2 30 20 A7 |S.1...... FL.0 .|
000016B0: 20 46 4C B2 31 3A 89 20 34 35 36 00 CC 1E F2 01 | FL.1:. 456.....|
000016C0: 8B 20 46 4C B2 31 20 A7 20 34 36 31 00 D2 1E F4 |. FL.1 . 461....|
000016D0: 01 8F 00 DD 1E F8 01 99 22 93 11 11 22 00 E8 1E |........"..."...|
000016E0: F9 01 44 24 B2 22 2C 22 00 F4 1E FD 01 83 20 31 |..D$.","...... 1|
000016F0: 30 30 34 30 00 FA 1E FE 01 8C 00 03 1F FF 01 87 |0040............|
00001700: 20 4C 4E 00 1D 1F 00 02 53 4C 4E B2 32 35 36 AC | LN.....SLN.256.|
00001710: C2 28 37 30 35 29 AA C2 28 37 30 34 29 00 38 1F |.(705)..(704).8.|
00001720: 01 02 53 4E 4C 4E B2 32 35 36 AC C2 28 37 30 37 |..SNLN.256..(707|
00001730: 29 AA C2 28 37 30 36 29 00 65 1F 02 02 8B 20 53 |)..(706).e.... S|
00001740: 4C 4E B1 30 20 A7 20 99 20 22 35 30 39 20 44 41 |LN.0 . . "509 DA|
00001750: 54 41 22 3B 53 4C 4E 3A 4C 4E B2 53 4E 4C 4E 3A |TA";SLN:LN.SNLN:|
00001760: 89 20 35 31 37 00 7C 1F 03 02 99 20 22 35 30 39 |. 517.|.... "509|
00001770: 20 44 41 54 41 22 3B 4C 4E AA 31 30 00 98 1F 05 | DATA";LN.10....|
00001780: 02 81 20 56 B2 37 30 34 20 A4 20 37 30 37 3A 97 |.. V.704 . 707:.|
00001790: 20 56 2C 30 3A 82 20 56 00 AB 1F 08 02 81 20 4A | V,0:. V...... J|
000017A0: B2 31 20 A4 20 32 31 20 A9 20 33 00 D9 1F 12 02 |.1 . 21 . 3.....|
000017B0: 53 24 B2 C4 28 42 43 28 4A 2C 31 29 29 AA 44 24 |S$..(BC(J,1)).D$|
000017C0: AA C4 28 42 43 28 4A 2C 32 29 29 AA 44 24 AA C4 |..(BC(J,2)).D$..|
000017D0: 28 42 43 28 4A 2C 33 29 29 00 E3 1F 13 02 8D 20 |(BC(J,3))...... |
000017E0: 36 30 30 00 EE 1F 14 02 53 31 24 B2 52 24 00 25 |600.....S1$.R$.%|
000017F0: 20 15 02 53 24 B2 44 24 AA C4 28 42 43 28 4A AA | ..S$.D$..(BC(J.|
00001800: 31 2C 31 29 29 AA 44 24 AA C4 28 42 43 28 4A AA |1,1)).D$..(BC(J.|
00001810: 31 2C 32 29 29 AA 44 24 AA C4 28 42 43 28 4A AA |1,2)).D$..(BC(J.|
00001820: 31 2C 33 29 29 00 2F 20 16 02 8D 20 36 30 30 00 |1,3))./ ... 600.|
00001830: 3A 20 17 02 53 32 24 B2 52 24 00 71 20 18 02 53 |: ..S2$.R$.q ..S|
00001840: 24 B2 44 24 AA C4 28 42 43 28 4A AA 32 2C 31 29 |$.D$..(BC(J.2,1)|
00001850: 29 AA 44 24 AA C4 28 42 43 28 4A AA 32 2C 32 29 |).D$..(BC(J.2,2)|
00001860: 29 AA 44 24 AA C4 28 42 43 28 4A AA 32 2C 33 29 |).D$..(BC(J.2,3)|
00001870: 29 00 7B 20 19 02 8D 20 36 30 30 00 86 20 1A 02 |).{ ... 600.. ..|
00001880: 53 33 24 B2 52 24 00 A3 20 1B 02 99 20 4C 4E 3B |S3$.R$.. ... LN;|
00001890: 22 44 41 54 41 20 22 AA 53 31 24 AA 53 32 24 AA |"DATA ".S1$.S2$.|
000018A0: 53 33 24 00 AF 20 1C 02 4C 4E B2 4C 4E AA 31 00 |S3$.. ..LN.LN.1.|
000018B0: B7 20 26 02 82 20 4A 00 C2 20 2B 02 99 22 52 55 |. &.. J.. +.."RU|
000018C0: 4E 22 00 E7 20 30 02 97 20 31 39 38 2C 39 3A 81 |N".. 0.. 198,9:.|
000018D0: 20 41 B2 36 33 31 20 A4 20 36 33 39 3A 97 20 41 | A.631 . 639:. A|
000018E0: 2C 31 33 3A 82 20 41 00 F0 20 3A 02 99 22 13 22 |,13:. A.. :.."."|
000018F0: 00 F6 20 3B 02 80 00 FC 20 3C 02 8E 00 02 21 44 |.. ;.... <....!D|
00001900: 02 8F 00 0B 21 46 02 46 31 B2 30 00 24 21 48 02 |....!F.F1.0.$!H.|
00001910: 8B 20 54 53 B1 31 20 AF 20 4C B3 54 53 20 A7 20 |. TS.1 . L.TS . |
00001920: 46 31 B2 31 00 40 21 4A 02 8B 20 50 54 B1 31 20 |F1.1.@!J.. PT.1 |
00001930: AF 20 4A B1 32 32 AB 50 54 20 A7 20 46 31 B2 31 |. J.22.PT . F1.1|
00001940: 00 59 21 4C 02 8B 20 54 54 B1 31 20 AF 20 4A B3 |.Y!L.. TT.1 . J.|
00001950: 54 54 20 A7 20 46 31 B2 31 00 75 21 4E 02 8B 20 |TT . F1.1.u!N.. |
00001960: 50 53 B1 31 20 AF 20 4C B1 32 35 AB 50 53 20 A7 |PS.1 . L.25.PS .|
00001970: 20 46 31 B2 31 00 7B 21 57 02 8E 00 81 21 58 02 | F1.1.{!W....!X.|
00001980: 8F 00 8B 21 5D 02 52 24 B2 22 22 00 9E 21 62 02 |...!].R$.""..!b.|
00001990: 81 20 50 20 B2 31 20 A4 20 C3 28 53 24 29 00 BA |. P .1 . .(S$)..|
000019A0: 21 6C 02 8B 20 CA 28 53 24 2C 50 2C 31 29 B2 22 |!l.. .(S$,P,1)."|
000019B0: 20 22 20 A7 20 89 20 36 34 30 00 CE 21 76 02 52 | " . . 640..!v.R|
000019C0: 24 B2 52 24 AA CA 28 53 24 2C 50 2C 31 29 00 D6 |$.R$..(S$,P,1)..|
000019D0: 21 80 02 82 20 50 00 DC 21 89 02 8E 00 F8 21 8A |!... P..!.....!.|
000019E0: 02 99 22 13 22 A6 32 36 29 22 20 20 20 20 20 20 |..".".26)" |
000019F0: 20 20 20 20 20 20 20 22 00 1B 22 8B 02 81 49 B2 | ".."...I.|
00001A00: 31 A4 35 3A 99 A6 32 36 29 22 20 20 20 20 20 20 |1.5:..26)" |
00001A10: 20 20 20 20 20 20 20 22 3A 82 49 00 40 22 8C 02 | ":.I.@"..|
00001A20: 99 22 11 11 11 11 11 11 11 11 11 11 22 A6 32 36 |."..........".26|
00001A30: 29 22 20 20 20 20 20 20 20 20 20 20 20 20 20 22 |)" "|
00001A40: 00 64 22 8D 02 81 49 B2 31 A4 37 3A 99 A6 32 36 |.d"...I.1.7:..26|
00001A50: 29 22 20 20 20 20 20 20 20 20 20 20 20 20 20 22 |)" "|
00001A60: 20 3A 82 49 00 6A 22 8F 02 8E 00 75 22 94 02 8C | :.I.j"....u"...|
00001A70: 3A 87 20 4C 4E 00 85 22 96 02 53 4E 20 B2 20 A5 |:. LN.."..SN . .|
00001A80: 41 28 4C 4E 29 00 8B 22 99 02 8C 00 91 22 9D 02 |A(LN).."....."..|
00001A90: 8E 00 B8 22 9E 02 53 4E 24 B2 C4 28 53 4E 29 3A |..."..SN$..(SN):|
00001AA0: 53 4E 24 B2 C9 28 53 4E 24 2C C3 28 53 4E 24 29 |SN$..(SN$,.(SN$)|
00001AB0: AB 31 29 3A 4F 42 B2 30 00 CA 22 9F 02 8B C5 28 |.1):OB.0.."....(|
00001AC0: 58 41 24 29 B1 30 20 A7 20 8E 00 E9 22 A0 02 8B |XA$).0 . ..."...|
00001AD0: 20 4E 24 B1 22 30 22 20 AF 20 C5 28 4E 24 29 B3 | N$."0" . .(N$).|
00001AE0: C5 28 53 4E 24 29 A7 20 8E 00 F3 22 A2 02 8D 20 |.(SN$). ..."... |
00001AF0: 36 35 30 00 0F 23 A4 02 99 22 13 90 22 A6 32 36 |650..#..."..".26|
00001B00: 29 22 59 4F 55 20 4D 55 53 54 20 55 53 45 22 00 |)"YOU MUST USE".|
00001B10: 28 23 A6 02 99 A6 32 36 29 22 41 20 23 20 54 48 |(#....26)"A # TH|
00001B20: 41 54 20 49 53 3A 20 22 00 41 23 A8 02 99 A6 32 |AT IS: ".A#....2|
00001B30: 36 29 22 47 52 45 41 54 52 20 54 48 41 4E 20 30 |6)"GREATR THAN 0|
00001B40: 22 00 5A 23 AA 02 99 A6 32 36 29 22 41 4E 44 20 |".Z#....26)"AND |
00001B50: 4C 45 53 53 20 54 48 41 4E 22 00 70 23 AC 02 99 |LESS THAN".p#...|
00001B60: A6 32 36 29 22 20 20 22 3B 53 4E 24 3B 22 1C 22 |.26)" ";SN$;"."|
00001B70: 00 84 23 AE 02 81 20 4A 20 B2 31 A4 32 30 30 30 |..#... J .1.2000|
00001B80: 3A 82 20 4A 00 8D 23 B2 02 4F 42 B2 31 00 93 23 |:. J..#..OB.1..#|
00001B90: BB 02 8E 00 B4 23 C6 02 8F 20 53 55 42 52 4F 55 |.....#... SUBROU|
00001BA0: 54 49 4E 45 20 54 4F 20 53 48 45 41 52 20 53 50 |TINE TO SHEAR SP|
00001BB0: 52 49 54 45 00 CE 23 CF 02 99 22 13 22 A6 32 36 |RITE..#...".".26|
00001BC0: 29 22 57 48 41 54 20 49 53 20 54 48 45 22 00 E5 |)"WHAT IS THE"..|
00001BD0: 23 D0 02 99 A6 32 36 29 22 53 48 45 41 52 20 41 |#....26)"SHEAR A|
00001BE0: 4E 47 4C 45 22 00 F9 23 D1 02 99 A6 32 36 29 22 |NGLE"..#....26)"|
00001BF0: 44 45 47 52 45 45 53 3F 22 00 0E 24 D2 02 99 A6 |DEGREES?"..$....|
00001C00: 32 36 29 22 2B 34 35 20 54 4F 20 2D 34 35 00 49 |26)"+45 TO -45.I|
00001C10: 24 D3 02 85 22 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |$..."...........|
00001C20: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 4F |...............O|
00001C30: 4E 4C 59 21 20 20 20 20 20 20 20 9D 9D 9D 9D 9D |NLY! .....|
00001C40: 9D 9D 22 3B 41 4E 47 4C 45 00 6A 24 D4 02 8B 20 |..";ANGLE.j$... |
00001C50: 41 4E 47 4C 45 B3 AB 34 35 20 B0 20 41 4E 47 4C |ANGLE..45 . ANGL|
00001C60: 45 B1 34 35 20 A7 20 37 31 30 00 74 24 D5 02 8D |E.45 . 710.t$...|
00001C70: 20 36 35 30 00 8E 24 D6 02 99 22 13 22 A6 32 36 | 650..$...".".26|
00001C80: 29 22 57 48 41 54 20 49 53 20 54 48 45 22 00 A5 |)"WHAT IS THE"..|
00001C90: 24 D8 02 99 A6 32 36 29 22 53 48 45 41 52 20 50 |$....26)"SHEAR P|
00001CA0: 4F 49 4E 54 22 00 D4 24 DA 02 85 22 1D 1D 1D 1D |OINT"..$..."....|
00001CB0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001CC0: 1D 1D 1D 1D 1D 1D 31 2D 32 34 20 4F 52 20 4D 22 |......1-24 OR M"|
00001CD0: 3B 41 4E 24 00 DE 24 DB 02 8D 20 39 35 30 00 01 |;AN$..$... 950..|
00001CE0: 25 DF 02 8B 20 C8 28 41 4E 24 2C 31 29 B2 22 4D |%... .(AN$,1)."M|
00001CF0: 22 20 A7 20 4D 4D B2 31 32 2E 35 3A 89 20 37 34 |" . MM.12.5:. 74|
00001D00: 30 00 0F 25 E1 02 4D 4D B2 C5 28 41 4E 24 29 00 |0..%..MM..(AN$).|
00001D10: 1D 25 E4 02 50 49 B2 34 AC C1 28 31 29 00 2E 25 |.%..PI.4..(1)..%|
00001D20: E5 02 81 20 4A 20 B2 20 31 20 A4 20 32 34 00 53 |... J . 1 . 24.S|
00001D30: 25 E7 02 44 46 46 B2 B5 28 28 4A AB 4D 4D 29 AC |%..DFF..((J.MM).|
00001D40: C0 28 41 4E 47 4C 45 AC 50 49 AD 31 38 30 29 AA |.(ANGLE.PI.180).|
00001D50: 2E 35 29 00 74 25 E9 02 50 53 B2 AB 28 44 46 46 |.5).t%..PS..(DFF|
00001D60: B3 30 29 AB 28 44 46 46 B1 B2 30 29 AC 28 44 46 |.0).(DFF..0).(DF|
00001D70: 46 AA 31 29 00 99 25 EB 02 50 45 B2 AB 28 44 46 |F.1)..%..PE..(DF|
00001D80: 46 B3 30 29 AC 28 32 31 AA 44 46 46 29 AB 28 44 |F.0).(21.DFF).(D|
00001D90: 46 46 B1 B2 30 29 AC 32 31 00 A6 25 ED 02 4C 44 |FF..0).21..%..LD|
00001DA0: B2 50 45 AB 50 53 00 C8 25 EF 02 54 53 B2 AB 28 |.PE.PS..%..TS..(|
00001DB0: 44 46 46 B3 30 29 AC 28 AB 44 46 46 AA 31 29 AB |DFF.0).(.DFF.1).|
00001DC0: 28 44 46 46 B1 B2 30 29 00 D6 25 F1 02 4B 20 B2 |(DFF..0)..%..K .|
00001DD0: 20 54 53 AB 50 53 00 E6 25 F3 02 81 20 4C B2 50 | TS.PS..%... L.P|
00001DE0: 53 20 A4 20 50 45 00 FA 25 F5 02 54 28 4C AA 4B |S . PE..%..T(L.K|
00001DF0: 2C 4A 29 B2 50 28 4C 2C 4A 29 00 02 26 F7 02 82 |,J).P(L,J)..&...|
00001E00: 20 4C 00 0A 26 F8 02 82 20 4A 00 19 26 FA 02 81 | L..&... J..&...|
00001E10: 20 4C B2 31 20 A4 20 32 31 00 28 26 FC 02 81 20 | L.1 . 21.(&... |
00001E20: 4A B2 31 20 A4 20 32 34 00 3A 26 FE 02 50 28 4C |J.1 . 24.:&..P(L|
00001E30: 2C 4A 29 B2 54 28 4C 2C 4A 29 00 42 26 00 03 82 |,J).T(L,J).B&...|
00001E40: 20 4A 00 4A 26 02 03 82 20 4C 00 54 26 04 03 8D | J.J&... L.T&...|
00001E50: 20 39 38 30 00 5A 26 06 03 8E 00 60 26 0C 03 8F | 980.Z&....`&...|
00001E60: 00 6A 26 0D 03 8D 20 39 35 30 00 83 26 0E 03 81 |.j&... 950..&...|
00001E70: 20 4A B2 31 20 A4 20 32 31 3A 81 20 4B B2 31 20 | J.1 . 21:. K.1 |
00001E80: A4 20 33 00 9B 26 10 03 42 43 28 4A 2C 4B 29 B2 |. 3..&..BC(J,K).|
00001E90: 32 35 35 AB 42 43 28 4A 2C 4B 29 00 A7 26 12 03 |255.BC(J,K)..&..|
00001EA0: 82 20 4B 3A 82 20 4A 00 CA 26 14 03 81 4A B2 31 |. K:. J..&...J.1|
00001EB0: A4 32 31 3A 81 4B B2 31 A4 32 34 3A 50 28 4A 2C |.21:.K.1.24:P(J,|
00001EC0: 4B 29 B2 30 3A 82 4B 3A 82 4A 00 D4 26 1B 03 8D |K).0:.K:.J..&...|
00001ED0: 20 38 32 30 00 DA 26 1F 03 8E 00 E0 26 20 03 8F | 820..&.....& ..|
00001EE0: 00 F5 26 24 03 8C 3A 87 20 4C 4E 3A 53 4E B2 A5 |..&$..:. LN:SN..|
00001EF0: 41 28 4C 4E 29 00 10 27 26 03 99 22 13 22 A6 32 |A(LN)..'&..".".2|
00001F00: 36 29 22 57 48 49 43 48 20 53 50 52 49 54 45 22 |6)"WHICH SPRITE"|
00001F10: 00 29 27 27 03 99 A6 32 36 29 22 53 48 4F 55 4C |.)''...26)"SHOUL|
00001F20: 44 20 42 45 20 43 4F 2D 22 00 57 27 28 03 99 A6 |D BE CO-".W'(...|
00001F30: 32 36 29 22 50 49 45 44 3F 2E 31 2C 32 2C 45 54 |26)"PIED?.1,2,ET|
00001F40: 43 22 3A 99 A6 32 36 29 22 20 20 20 20 20 20 20 |C":..26)" |
00001F50: 20 20 20 20 20 20 22 00 94 27 29 03 85 22 1D 1D | "..').."..|
00001F60: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
00001F70: 1D 1D 1D 1D 1D 1D 1D 1D 49 4E 50 55 54 20 23 22 |........INPUT #"|
00001F80: 3B 4E 24 3A 8B 20 4E 24 B2 22 31 22 20 A7 20 89 |;N$:. N$."1" . .|
00001F90: 20 38 31 37 00 B6 27 2A 03 8B C5 28 4E 24 29 B1 | 817..'*...(N$).|
00001FA0: 53 4E AB 31 B0 C5 28 4E 24 29 B3 31 A7 8D 36 35 |SN.1..(N$).1..65|
00001FB0: 30 3A 89 38 30 36 00 CD 27 2E 03 8D 20 36 37 30 |0:.806..'... 670|
00001FC0: 3A 8B 20 4F 42 B2 31 20 A7 20 38 30 36 00 E6 27 |:. OB.1 . 806..'|
00001FD0: 2F 03 81 20 4A B2 31 20 A4 20 36 33 AC 28 C5 28 |/.. J.1 . 63.(.(|
00001FE0: 4E 24 29 AB 31 29 00 F2 27 30 03 87 20 54 3A 82 |N$).1)..'0.. T:.|
00001FF0: 20 4A 00 FC 27 31 03 8D 20 39 35 30 00 15 28 32 | J..'1.. 950..(2|
00002000: 03 81 20 4A 20 B2 20 31 20 A4 20 32 31 3A 81 20 |.. J . 1 . 21:. |
00002010: 4B B2 31 A4 33 00 29 28 33 03 87 20 42 43 28 4A |K.1.3.)(3.. BC(J|
00002020: 2C 4B 29 3A 82 4B 3A 82 4A 00 42 28 34 03 81 20 |,K):.K:.J.B(4.. |
00002030: 4A B2 31 20 A4 20 32 31 3A 81 20 4B B2 31 20 A4 |J.1 . 21:. K.1 .|
00002040: 20 33 00 5E 28 36 03 52 45 B2 42 43 28 4A 2C 4B | 3.^(6.RE.BC(J,K|
00002050: 29 3A 8B 20 52 45 B2 30 20 A7 20 38 34 35 00 6C |):. RE.0 . 845.l|
00002060: 28 39 03 81 20 4C B2 30 20 A4 20 37 00 7D 28 3B |(9.. L.0 . 7.}(;|
00002070: 03 51 55 4F 54 B2 B5 28 52 45 AD 32 29 00 9C 28 |.QUOT..(RE.2)..(|
00002080: 3E 03 50 28 4A 2C 38 AC 28 4B AB 31 29 AA 38 AB |>.P(J,8.(K.1).8.|
00002090: 4C 29 B2 52 45 AB 32 AC 51 55 4F 54 00 A8 28 43 |L).RE.2.QUOT..(C|
000020A0: 03 52 45 B2 51 55 4F 54 00 B0 28 48 03 82 20 4C |.RE.QUOT..(H.. L|
000020B0: 00 B8 28 4D 03 82 20 4B 00 C0 28 52 03 82 20 4A |..(M.. K..(R.. J|
000020C0: 00 CF 28 5C 03 81 20 59 B2 33 20 A4 20 32 33 00 |..(\.. Y.3 . 23.|
000020D0: DE 28 61 03 81 20 58 B2 32 20 A4 20 32 35 00 F6 |.(a.. X.2 . 25..|
000020E0: 28 66 03 41 44 44 B2 31 30 32 33 AA 58 AA 34 30 |(f.ADD.1023.X.40|
000020F0: AC 28 59 AB 31 29 00 14 29 6B 03 8B 20 50 28 59 |.(Y.1)..)k.. P(Y|
00002100: AB 32 2C 58 AB 31 29 B2 30 20 A7 20 97 20 41 44 |.2,X.1).0 . . AD|
00002110: 44 2C 33 32 00 36 29 70 03 8B 20 50 28 59 AB 32 |D,32.6)p.. P(Y.2|
00002120: 2C 58 AB 31 29 B2 31 20 A7 20 97 20 41 44 44 2C |,X.1).1 . . ADD,|
00002130: 33 32 AA 31 32 38 00 3E 29 75 03 82 20 58 00 46 |32.128.>)u.. X.F|
00002140: 29 7A 03 82 20 59 00 66 29 7B 03 58 B2 32 3A 59 |)z.. Y.f){.X.2:Y|
00002150: B2 33 3A 41 44 44 B2 31 30 32 33 AA 58 AA 34 30 |.3:ADD.1023.X.40|
00002160: AC 28 59 AB 31 29 00 70 29 7C 03 8D 20 36 35 30 |.(Y.1).p)|.. 650|
00002170: 00 79 29 7D 03 8D 34 30 30 00 7F 29 7F 03 8C 00 |.y)}..400..)....|
00002180: 85 29 83 03 8E 00 8B 29 84 03 8F 00 A6 29 86 03 |.).....).....)..|
00002190: 99 22 13 22 A6 32 36 29 22 48 4F 52 49 5A 4F 4E |.".".26)"HORIZON|
000021A0: 54 41 4C 20 20 22 00 BF 29 87 03 99 A6 32 36 29 |TAL "..)....26)|
000021B0: 22 4F 52 20 56 45 52 54 49 43 41 4C 20 20 22 00 |"OR VERTICAL ".|
000021C0: D6 29 88 03 99 A6 32 36 29 22 52 45 46 4C 45 43 |.)....26)"REFLEC|
000021D0: 54 49 4F 4E 3F 22 00 1B 2A 89 03 85 22 1D 1D 1D |TION?"..*..."...|
000021E0: 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D 1D |................|
000021F0: 1D 1D 1D 1D 1D 1D 1D 48 20 4F 52 20 56 22 3B 41 |.......H OR V";A|
00002200: 4E 24 3A 8B 41 4E 24 B3 B1 22 48 22 AF 41 4E 24 |N$:.AN$.."H".AN$|
00002210: B3 B1 22 56 22 20 A7 20 39 30 32 00 25 2A 8A 03 |.."V" . 902.%*..|
00002220: 8D 20 39 35 30 00 3E 2A 8E 03 8B 20 C8 28 41 4E |. 950.>*... .(AN|
00002230: 24 2C 31 29 B2 22 56 22 20 A7 20 39 31 33 00 84 |$,1)."V" . 913..|
00002240: 2A 8F 03 81 20 4C B2 31 20 A4 20 32 31 3A 81 20 |*... L.1 . 21:. |
00002250: 4A B2 31 20 A4 20 31 32 3A 54 45 4D 50 B2 50 28 |J.1 . 12:TEMP.P(|
00002260: 4C 2C 4A 29 3A 50 28 4C 2C 4A 29 B2 50 28 4C 2C |L,J):P(L,J).P(L,|
00002270: 32 35 AB 4A 29 3A 50 28 4C 2C 32 35 AB 4A 29 B2 |25.J):P(L,25.J).|
00002280: 54 45 4D 50 00 9E 2A 90 03 82 20 4A 3A 82 20 4C |TEMP..*... J:. L|
00002290: 3A 8D 20 39 35 30 3A 8D 20 39 38 30 3A 8E 00 DE |:. 950:. 980:...|
000022A0: 2A 91 03 81 4A B2 31 A4 32 34 3A 81 4C B2 31 A4 |*...J.1.24:.L.1.|
000022B0: 31 30 3A 54 45 4D 50 B2 50 28 4C 2C 4A 29 3A 50 |10:TEMP.P(L,J):P|
000022C0: 28 4C 2C 4A 29 B2 50 28 32 32 AB 4C 2C 4A 29 3A |(L,J).P(22.L,J):|
000022D0: 50 28 32 32 AB 4C 2C 4A 29 B2 54 45 4D 50 00 F1 |P(22.L,J).TEMP..|
000022E0: 2A 92 03 82 4C 3A 82 20 4A 3A 8D 20 39 38 30 3A |*...L:. J:. 980:|
000022F0: 8E 00 F7 2A B6 03 8F 00 01 2B B8 03 8D 20 36 35 |...*.....+... 65|
00002300: 30 00 1A 2B B9 03 99 22 13 22 A6 32 38 29 22 4F |0..+...".".28)"O|
00002310: 4E 45 20 4D 4F 4D 45 4E 54 22 00 2D 2B BA 03 99 |NE MOMENT".-+...|
00002320: A6 32 38 29 22 50 4C 45 41 53 45 2E 22 00 33 2B |.28)"PLEASE.".3+|
00002330: BB 03 8E 00 39 2B D4 03 8F 00 48 2B D7 03 81 20 |....9+....H+... |
00002340: 4C B2 31 20 A4 20 32 31 00 56 2B D8 03 81 20 4A |L.1 . 21.V+... J|
00002350: B2 30 20 A4 20 32 00 A6 2B DA 03 54 42 28 4A 29 |.0 . 2..+..TB(J)|
00002360: B2 31 32 38 AC 50 28 4C 2C 38 AC 4A AA 31 29 AA |.128.P(L,8.J.1).|
00002370: 36 34 AC 50 28 4C 2C 38 AC 4A AA 32 29 AA 33 32 |64.P(L,8.J.2).32|
00002380: AC 50 28 4C 2C 38 AC 4A AA 33 29 AA 31 36 AC 50 |.P(L,8.J.3).16.P|
00002390: 28 4C 2C 38 AC 4A AA 34 29 AA 38 AC 50 28 4C 2C |(L,8.J.4).8.P(L,|
000023A0: 38 AC 4A AA 35 29 00 DB 2B DB 03 54 42 28 4A 29 |8.J.5)..+..TB(J)|
000023B0: B2 34 AC 50 28 4C 2C 38 AC 4A AA 36 29 AA 32 AC |.4.P(L,8.J.6).2.|
000023C0: 50 28 4C 2C 38 AC 4A AA 37 29 AA 50 28 4C 2C 38 |P(L,8.J.7).P(L,8|
000023D0: AC 4A AA 38 29 AA 54 42 28 4A 29 00 E3 2B DC 03 |.J.8).TB(J)..+..|
000023E0: 82 20 4A 00 11 2C DD 03 42 43 28 4C 2C 31 29 B2 |. J..,..BC(L,1).|
000023F0: 54 42 28 30 29 3A 42 43 28 4C 2C 32 29 B2 54 42 |TB(0):BC(L,2).TB|
00002400: 28 31 29 3A 42 43 28 4C 2C 33 29 B2 54 42 28 32 |(1):BC(L,3).TB(2|
00002410: 29 00 19 2C DE 03 82 20 4C 00 23 2C E3 03 8D 20 |)..,... L.#,... |
00002420: 38 36 30 00 2D 2C E6 03 8D 20 34 30 30 00 33 2C |860.-,... 400.3,|
00002430: E7 03 8E 00 4B 2C E8 03 8F 20 42 45 47 49 4E 4E |....K,... BEGINN|
00002440: 49 4E 47 20 4F 46 20 4D 41 49 4E 00 55 2C ED 03 |ING OF MAIN.U,..|
00002450: 8D 20 34 30 30 00 5F 2C F2 03 8D 20 31 30 30 00 |. 400._,... 100.|
00002460: 69 2C FC 03 8D 20 31 35 30 00 7F 2C D0 07 8B 20 |i,... 150..,... |
00002470: 58 24 B3 B1 22 53 22 A7 20 89 20 31 30 31 30 00 |X$.."S". . 1010.|
00002480: 90 2C D5 07 97 20 35 33 32 34 38 AA 32 31 2C 30 |.,... 53248.21,0|
00002490: 00 9A 2C DA 07 8D 20 35 30 30 00 C0 2C EE 07 8F |..,... 500..,...|
000024A0: 20 53 54 41 52 54 20 4F 46 20 44 52 41 57 20 46 | START OF DRAW F|
000024B0: 4F 52 20 27 4E 45 58 54 27 20 53 50 52 49 54 45 |OR 'NEXT' SPRITE|
000024C0: 00 F1 2C 34 08 99 22 90 22 3A 99 22 11 11 1D 1D |..,4..".":."....|
000024D0: 1D 1D 1D 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 |...DO YOU WANT T|
000024E0: 4F 20 52 45 56 49 45 57 20 41 4C 4C 20 54 48 45 |O REVIEW ALL THE|
000024F0: 22 00 16 2D 3E 08 85 22 1D 1D 1D 1D 1D 53 50 52 |"..->..".....SPR|
00002500: 49 54 45 53 3F 20 59 45 53 2F 4E 4F 22 3B 41 4E |ITES? YES/NO";AN|
00002510: 24 3A 99 22 1C 22 00 33 2D 48 08 8B 20 C8 28 41 |$:.".".3-H.. .(A|
00002520: 4E 24 2C 31 29 B3 B1 22 59 22 20 A7 20 89 20 32 |N$,1).."Y" . . 2|
00002530: 33 30 30 00 44 2D 4A 08 97 20 35 33 32 34 38 AA |300.D-J.. 53248.|
00002540: 32 31 2C 30 00 6E 2D 52 08 99 22 93 22 3A 97 35 |21,0.n-R..".":.5|
00002550: 36 35 37 36 2C 28 C2 28 35 36 35 37 36 29 AF 32 |6576,(.(56576).2|
00002560: 35 32 29 B0 31 3A 97 35 33 32 37 32 2C 35 00 80 |52).1:.53272,5..|
00002570: 2D 53 08 97 36 34 38 2C 31 32 38 3A 99 22 93 22 |-S..648,128:."."|
00002580: 00 88 2D 57 08 51 B2 30 00 8E 2D 5B 08 8C 00 A5 |..-W.Q.0..-[....|
00002590: 2D 5C 08 87 20 4E 3A 4E B2 28 4E AB 31 30 30 30 |-\.. N:N.(N.1000|
000025A0: 30 29 AD 31 30 00 CE 2D 5D 08 8D 32 32 30 30 3A |0).10..-]..2200:|
000025B0: 46 4C 41 47 B2 30 3A 8B 4E B1 38 A7 46 4C 41 47 |FLAG.0:.N.8.FLAG|
000025C0: B2 4E AB 38 3A 51 B2 51 AA 31 3A 4E B2 38 00 D8 |.N.8:Q.Q.1:N.8..|
000025D0: 2D 61 08 8D 32 31 36 30 00 FF 2D 62 08 4C B2 30 |-a..2160..-b.L.0|
000025E0: 3A 81 47 B2 30 A4 4E AB 31 3A 4C B2 4C AA 32 AE |:.G.0.N.1:L.L.2.|
000025F0: 47 3A 82 3A 97 35 33 32 34 38 AA 32 31 2C 4C 00 |G:.:.53248.21,L.|
00002600: 0F 2E 63 08 81 20 47 B2 30 20 A4 20 4E AB 31 00 |..c.. G.0 . N.1.|
00002610: 20 2E 64 08 81 20 4C 20 B2 20 30 20 A4 20 36 32 | .d.. L . 0 . 62|
00002620: 00 29 2E 66 08 87 20 41 5A 00 3E 2E 67 08 97 33 |.).f.. AZ.>.g..3|
00002630: 33 37 39 32 AA 4C AA 36 34 AC 47 2C 41 5A 00 46 |3792.L.64.G,AZ.F|
00002640: 2E 68 08 82 20 4C 00 4E 2E 69 08 82 20 47 00 58 |.h.. L.N.i.. G.X|
00002650: 2E 6F 08 89 32 31 37 36 00 64 2E 70 08 56 B2 35 |.o..2176.d.p.V.5|
00002660: 33 32 34 38 00 86 2E 74 08 81 20 4A 20 B2 20 31 |3248...t.. J . 1|
00002670: 20 A4 20 38 3A 97 33 33 37 38 33 AA 4A 2C 31 35 | . 8:.33783.J,15|
00002680: AA 4A 3A 82 20 4A 00 A9 2E 76 08 97 20 56 AA 32 |.J:. J...v.. V.2|
00002690: 33 2C 32 35 35 3A 97 20 56 AA 32 39 2C 32 35 35 |3,255:. V.29,255|
000026A0: 3A 97 20 56 AA 31 36 2C 30 00 B7 2E 7A 08 81 20 |:. V.16,0...z.. |
000026B0: 4A B2 31 20 A4 20 38 00 F7 2E 7C 08 97 20 56 AA |J.1 . 8...|.. V.|
000026C0: 32 AC 28 4A AB 31 29 2C 28 4A B1 34 29 AC 32 35 |2.(J.1),(J.4).25|
000026D0: 36 AA 36 34 AC 28 4A AB 31 29 AA 33 35 3A 97 20 |6.64.(J.1).35:. |
000026E0: 56 AA 32 AC 28 4A AB 31 29 AA 31 2C 37 30 AB 28 |V.2.(J.1).1,70.(|
000026F0: 4A B1 34 29 AC 36 30 00 FF 2E 7E 08 82 20 4A 00 |J.4).60...~.. J.|
00002700: 05 2F 7F 08 8E 00 19 2F 80 08 8B 20 46 4C 41 47 |./...../... FLAG|
00002710: B2 30 20 A7 20 32 33 30 30 00 33 2F 81 08 99 22 |.0 . 2300.3/..."|
00002720: 13 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00002730: 11 11 22 00 5F 2F 82 08 99 22 1D 1D 1D 1D 1D 54 |.."._/...".....T|
00002740: 4F 20 53 45 45 20 54 48 45 20 52 45 53 54 20 4F |O SEE THE REST O|
00002750: 46 20 54 48 45 20 53 50 52 49 54 45 53 20 22 00 |F THE SPRITES ".|
00002760: 79 2F 84 08 99 22 1D 1D 1D 1D 1D 54 4F 55 43 48 |y/...".....TOUCH|
00002770: 20 41 4E 59 20 4B 45 59 2E 00 92 2F 8A 08 A1 20 | ANY KEY.../... |
00002780: 58 24 3A 20 8B 20 58 24 B2 22 22 20 A7 20 32 31 |X$: . X$."" . 21|
00002790: 38 36 00 A4 2F 8E 08 4E B2 46 4C 41 47 3A 89 20 |86../..N.FLAG:. |
000027A0: 32 31 34 31 00 AF 2F 97 08 89 20 32 33 30 30 00 |2141../... 2300.|
000027B0: B9 2F 98 08 99 22 93 90 22 00 D8 2F A2 08 4C 24 |./...".."../..L$|
000027C0: B2 22 C0 C0 C0 C0 C0 C0 C0 22 20 3A 53 24 B2 22 |."......." :S$."|
000027D0: 20 20 20 20 20 20 20 22 00 FC 2F AC 08 55 4C 24 | "../..UL$|
000027E0: B2 22 B0 22 3A 55 52 24 B2 22 AE 22 3A 4C 4C 24 |.".":UR$.".":LL$|
000027F0: B2 22 AD 22 3A 4C 52 24 B2 22 BD 22 00 2F 30 B6 |.".":LR$."."./0.|
00002800: 08 56 24 B2 22 DD 22 3A 55 56 24 B2 22 B2 22 3A |.V$.".":UV$.".":|
00002810: 4C 42 24 B2 22 AB 22 3A 52 42 24 B2 22 B3 22 3A |LB$.".":RB$.".":|
00002820: 4C 56 24 B2 22 B1 22 3A 43 52 24 B2 22 DB 22 00 |LV$.".":CR$.".".|
00002830: 3F 30 C0 08 81 20 4A 20 B2 20 31 20 A4 20 32 00 |?0... J . 1 . 2.|
00002840: 64 30 CA 08 99 55 4C 24 3B 4C 24 3B 55 56 24 3B |d0...UL$;L$;UV$;|
00002850: 4C 24 3B 55 56 24 3B 4C 24 3B 55 56 24 3B 4C 24 |L$;UV$;L$;UV$;L$|
00002860: 3B 55 52 24 00 72 30 CB 08 81 20 50 B2 31 20 A4 |;UR$.r0... P.1 .|
00002870: 20 36 00 92 30 CC 08 99 56 24 3B 53 24 3B 56 24 | 6..0...V$;S$;V$|
00002880: 3B 53 24 3B 56 24 3B 53 24 3B 56 24 3B 53 24 3B |;S$;V$;S$;V$;S$;|
00002890: 56 24 00 C7 30 CD 08 82 3A 53 4E B2 28 51 AC 38 |V$..0...:SN.(Q.8|
000028A0: 29 3A 81 50 B2 31 A4 34 3A 99 56 24 C9 28 22 20 |):.P.1.4:.V$.(" |
000028B0: 20 20 20 23 22 AA C4 28 53 4E AA 50 29 2C 37 29 | #"..(SN.P),7)|
000028C0: 3B 3A 82 3A 99 56 24 00 EC 30 CE 08 99 4C 42 24 |;:.:.V$..0...LB$|
000028D0: 3B 4C 24 3B 43 52 24 3B 4C 24 3B 43 52 24 3B 4C |;L$;CR$;L$;CR$;L|
000028E0: 24 3B 43 52 24 3B 4C 24 3B 52 42 24 00 FA 30 CF |$;CR$;L$;RB$..0.|
000028F0: 08 81 20 50 B2 31 20 A4 20 36 00 1A 31 D0 08 99 |.. P.1 . 6..1...|
00002900: 56 24 3B 53 24 3B 56 24 3B 53 24 3B 56 24 3B 53 |V$;S$;V$;S$;V$;S|
00002910: 24 3B 56 24 3B 53 24 3B 56 24 00 4F 31 D1 08 82 |$;V$;S$;V$.O1...|
00002920: 3A 53 4E B2 28 51 AC 38 29 3A 81 50 B2 35 A4 38 |:SN.(Q.8):.P.5.8|
00002930: 3A 99 56 24 C9 28 22 20 20 20 20 23 22 AA C4 28 |:.V$.(" #"..(|
00002940: 53 4E AA 50 29 2C 37 29 3B 3A 82 3A 99 56 24 00 |SN.P),7);:.:.V$.|
00002950: 74 31 D2 08 99 4C 4C 24 3B 4C 24 3B 4C 56 24 3B |t1...LL$;L$;LV$;|
00002960: 4C 24 3B 4C 56 24 3B 4C 24 3B 4C 56 24 3B 4C 24 |L$;LV$;L$;LV$;L$|
00002970: 3B 4C 52 24 00 7D 31 D3 08 99 22 1C 22 00 83 31 |;LR$.}1..."."..1|
00002980: D4 08 8E 00 C1 31 FC 08 99 22 13 11 11 11 11 11 |.....1..."......|
00002990: 11 11 11 11 11 11 11 11 11 11 11 11 11 57 4F 55 |.............WOU|
000029A0: 4C 44 20 59 4F 55 20 4C 49 4B 45 20 54 4F 20 43 |LD YOU LIKE TO C|
000029B0: 48 41 4E 47 45 20 41 4E 59 20 4F 46 20 54 48 45 |HANGE ANY OF THE|
000029C0: 22 00 F0 31 06 09 99 22 53 50 52 49 54 45 53 3F |"..1..."SPRITES?|
000029D0: 20 20 49 46 20 27 59 45 53 27 20 54 59 50 45 20 | IF 'YES' TYPE |
000029E0: 54 48 45 20 53 50 52 49 54 45 20 20 20 20 20 22 |THE SPRITE "|
000029F0: 00 1F 32 0B 09 99 22 20 20 20 20 20 20 20 20 20 |..2..." |
00002A00: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002A10: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00002A20: 4E 32 0C 09 99 22 20 20 20 20 20 20 20 20 20 20 |N2..." |
00002A30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002A40: 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 78 | ".x|
00002A50: 32 10 09 85 22 91 91 4E 55 4D 42 45 52 2C 20 49 |2..."..NUMBER, I|
00002A60: 46 20 27 4E 30 27 20 54 59 50 45 20 30 28 5A 45 |F 'N0' TYPE 0(ZE|
00002A70: 52 4F 29 22 3B 41 4E 24 00 9F 32 11 09 8C 3A 87 |RO)";AN$..2...:.|
00002A80: 58 3A 58 B2 28 58 AB 31 30 30 30 30 29 AD 31 30 |X:X.(X.10000).10|
00002A90: 3A 8B C5 28 41 4E 24 29 B1 58 A7 32 33 30 30 00 |:..(AN$).X.2300.|
00002AA0: D1 32 12 09 99 22 93 22 3A 97 36 34 38 2C 34 3A |.2...".":.648,4:|
00002AB0: 97 35 33 32 37 32 2C 32 31 3A 97 35 36 35 37 36 |.53272,21:.56576|
00002AC0: 2C 28 C2 28 35 36 35 37 36 29 AF 32 35 32 29 B0 |,(.(56576).252).|
00002AD0: 33 00 DE 32 15 09 97 20 56 AA 32 31 2C 30 00 EA |3..2... V.21,0..|
00002AE0: 32 1A 09 99 20 22 93 11 11 22 00 FF 32 24 09 8B |2... "..."..2$..|
00002AF0: C5 28 41 4E 24 29 B3 31 20 A7 20 32 34 30 30 00 |.(AN$).1 . 2400.|
00002B00: 0D 33 29 09 8C 3A 58 41 24 B2 41 4E 24 00 16 33 |.3)..:XA$.AN$..3|
00002B10: 2B 09 87 20 4C 4E 00 1C 33 2D 09 8C 00 37 33 2E |+.. LN..3-...73.|
00002B20: 09 58 B2 B5 28 4C 4E AD 32 35 36 29 3A 59 B2 4C |.X..(LN.256):Y.L|
00002B30: 4E AB 32 35 36 AC 58 00 52 33 30 09 4E 4C 4E B2 |N.256.X.R30.NLN.|
00002B40: 31 30 30 30 30 AA C5 28 41 4E 24 29 AC 31 30 AB |10000..(AN$).10.|
00002B50: 31 30 00 6F 33 32 09 51 B2 B5 28 4E 4C 4E AD 32 |10.o32.Q..(NLN.2|
00002B60: 35 36 29 3A 57 B2 4E 4C 4E AB 32 35 36 AC 51 00 |56):W.NLN.256.Q.|
00002B70: 93 33 34 09 97 20 37 30 34 2C 59 3A 97 20 37 30 |.34.. 704,Y:. 70|
00002B80: 35 2C 58 3A 97 20 37 30 36 2C 57 3A 97 20 37 30 |5,X:. 706,W:. 70|
00002B90: 37 2C 51 00 A3 33 38 09 41 4E 24 B2 22 59 22 3A |7,Q..38.AN$."Y":|
00002BA0: 89 20 39 00 D9 33 60 09 99 22 90 22 3A 99 22 93 |. 9..3`..".":.".|
00002BB0: 11 11 11 11 11 44 4F 20 59 4F 55 20 57 41 4E 54 |.....DO YOU WANT|
00002BC0: 20 54 4F 20 4D 41 4B 45 20 41 4E 4F 54 48 45 52 | TO MAKE ANOTHER|
00002BD0: 20 53 50 52 49 54 45 3F 22 00 F8 33 65 09 85 22 | SPRITE?"..3e.."|
00002BE0: 1D 1D 1D 1D 1D 59 45 53 20 4F 52 20 4E 4F 22 3B |.....YES OR NO";|
00002BF0: 41 4E 24 3A 99 22 1C 22 00 14 34 6A 09 8B 20 C8 |AN$:."."..4j.. .|
00002C00: 28 41 4E 24 2C 31 29 B2 22 4E 22 20 A7 20 89 20 |(AN$,1)."N" . . |
00002C10: 32 34 39 30 00 42 34 6F 09 99 22 11 11 1D 1D 1D |2490.B4o..".....|
00002C20: 1D 1D 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 4F |..DO YOU WANT TO|
00002C30: 20 52 45 44 52 41 57 2C 20 52 4F 54 41 54 45 2C | REDRAW, ROTATE,|
00002C40: 20 22 00 6C 34 74 09 99 22 1D 1D 1D 1D 1D 4F 52 | ".l4t..".....OR|
00002C50: 20 52 45 46 4C 45 43 54 20 41 20 50 52 45 56 49 | REFLECT A PREVI|
00002C60: 4F 55 53 20 53 50 52 49 54 45 3F 22 00 84 34 79 |OUS SPRITE?"..4y|
00002C70: 09 85 22 1D 1D 1D 1D 1D 59 45 53 2F 4E 4F 20 22 |..".....YES/NO "|
00002C80: 3B 41 4E 24 00 8C 34 7E 09 89 20 39 00 CB 34 BA |;AN$..4~.. 9..4.|
00002C90: 09 99 22 90 22 3A 99 22 13 11 11 11 11 11 11 11 |..".":."........|
00002CA0: 11 11 11 11 11 11 11 11 11 1D 1D 1D 1D 1D 44 4F |..............DO|
00002CB0: 20 59 4F 55 20 57 41 4E 54 20 54 4F 20 45 4C 49 | YOU WANT TO ELI|
00002CC0: 4D 49 4E 41 54 45 20 41 4C 4C 22 00 F7 34 BC 09 |MINATE ALL"..4..|
00002CD0: 85 22 1D 1D 1D 1D 1D 42 55 54 20 54 48 45 20 53 |.".....BUT THE S|
00002CE0: 50 52 49 54 45 20 44 41 54 41 3F 20 59 45 53 2F |PRITE DATA? YES/|
00002CF0: 4E 4F 22 3B 41 4E 24 00 18 35 BD 09 8B C8 28 41 |NO";AN$..5....(A|
00002D00: 4E 24 2C 31 29 B2 22 59 22 A7 99 22 93 22 3A 8D |N$,1)."Y"..".":.|
00002D10: 39 35 33 3A 8D 32 37 30 00 22 35 BE 09 99 20 22 |953:.270."5... "|
00002D20: 93 22 00 2F 35 BF 09 9B 20 31 30 30 30 30 AB 00 |."./5... 10000..|
00002D30: 46 35 C3 09 80 20 20 20 20 20 20 20 20 20 20 20 |F5... |
00002D40: 20 20 20 20 20 20 00 5A 35 C4 09 41 4E 24 B2 22 | .Z5..AN$."|
00002D50: 59 45 53 22 3A CB 20 A4 20 39 00 7E 35 10 27 83 |YES":. . 9.~5.'.|
00002D60: 20 32 35 34 2C 31 2C 32 35 35 2C 32 35 32 2C 30 | 254,1,255,252,0|
00002D70: 2C 32 35 35 2C 32 34 38 2C 30 2C 31 32 37 00 A5 |,255,248,0,127..|
00002D80: 35 11 27 83 20 32 35 34 2C 31 33 33 2C 32 35 35 |5.'. 254,133,255|
00002D90: 2C 32 35 34 2C 31 2C 32 35 35 2C 32 35 34 2C 34 |,254,1,255,254,4|
00002DA0: 39 2C 32 35 35 00 CC 35 12 27 83 20 32 35 35 2C |9,255..5.'. 255,|
00002DB0: 31 33 35 2C 32 35 35 2C 32 35 35 2C 31 33 35 2C |135,255,255,135,|
00002DC0: 32 35 35 2C 32 34 30 2C 30 2C 36 33 00 F5 35 13 |255,240,0,63..5.|
00002DD0: 27 83 20 32 35 33 2C 31 38 32 2C 32 35 35 2C 32 |'. 253,182,255,2|
00002DE0: 35 33 2C 31 37 30 2C 32 35 35 2C 32 35 33 2C 33 |53,170,255,253,3|
00002DF0: 34 2C 32 35 35 00 1A 36 14 27 83 20 32 35 33 2C |4,255..6.'. 253,|
00002E00: 33 34 2C 32 35 35 2C 32 35 32 2C 30 2C 32 35 35 |34,255,252,0,255|
00002E10: 2C 32 35 32 2C 30 2C 32 35 35 00 43 36 15 27 83 |,252,0,255.C6.'.|
00002E20: 20 32 35 35 2C 31 33 35 2C 32 35 35 2C 32 35 35 | 255,135,255,255|
00002E30: 2C 31 38 33 2C 32 35 35 2C 32 35 35 2C 35 31 2C |,183,255,255,51,|
00002E40: 32 35 35 00 6D 36 16 27 83 20 32 35 34 2C 31 32 |255.m6.'. 254,12|
00002E50: 31 2C 32 35 35 2C 32 35 35 2C 32 35 35 2C 32 35 |1,255,255,255,25|
00002E60: 35 2C 32 35 35 2C 32 35 35 2C 32 35 35 00 85 36 |5,255,255,255..6|
00002E70: 1A 27 83 20 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C |.'. 0,0,0,0,0,0,|
00002E80: 30 2C 30 2C 30 00 9D 36 1B 27 83 20 30 2C 30 2C |0,0,0..6.'. 0,0,|
00002E90: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 B7 36 |0,0,0,0,0,0,0..6|
00002EA0: 1C 27 83 20 30 2C 30 2C 30 2C 30 2C 31 36 2C 30 |.'. 0,0,0,0,16,0|
00002EB0: 2C 30 2C 31 36 2C 30 00 D2 36 1D 27 83 20 30 2C |,0,16,0..6.'. 0,|
00002EC0: 31 36 2C 30 2C 30 2C 31 36 2C 30 2C 30 2C 31 36 |16,0,0,16,0,0,16|
00002ED0: 2C 30 00 ED 36 1E 27 83 20 30 2C 31 36 2C 30 2C |,0..6.'. 0,16,0,|
00002EE0: 30 2C 31 36 2C 30 2C 30 2C 31 36 2C 30 00 06 37 |0,16,0,0,16,0..7|
00002EF0: 1F 27 83 20 30 2C 31 36 2C 30 2C 30 2C 30 2C 30 |.'. 0,16,0,0,0,0|
00002F00: 2C 30 2C 30 2C 30 00 1E 37 20 27 83 20 30 2C 30 |,0,0,0..7 '. 0,0|
00002F10: 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 36 |,0,0,0,0,0,0,0.6|
00002F20: 37 24 27 83 20 30 2C 30 2C 30 2C 30 2C 30 2C 30 |7$'. 0,0,0,0,0,0|
00002F30: 2C 30 2C 30 2C 30 00 4E 37 25 27 83 20 30 2C 30 |,0,0,0.N7%'. 0,0|
00002F40: 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 68 |,0,0,0,0,0,0,0.h|
00002F50: 37 26 27 83 20 30 2C 30 2C 30 2C 30 2C 31 36 2C |7&'. 0,0,0,0,16,|
00002F60: 30 2C 30 2C 31 36 2C 30 00 83 37 27 27 83 20 30 |0,0,16,0..7''. 0|
00002F70: 2C 31 36 2C 30 2C 30 2C 31 36 2C 30 2C 30 2C 31 |,16,0,0,16,0,0,1|
00002F80: 36 2C 30 00 9E 37 28 27 83 20 30 2C 31 36 2C 30 |6,0..7('. 0,16,0|
00002F90: 2C 30 2C 31 36 2C 30 2C 30 2C 31 36 2C 30 00 B7 |,0,16,0,0,16,0..|
00002FA0: 37 29 27 83 20 30 2C 31 36 2C 30 2C 30 2C 30 2C |7)'. 0,16,0,0,0,|
00002FB0: 30 2C 30 2C 30 2C 30 00 CF 37 2A 27 83 20 30 2C |0,0,0,0..7*'. 0,|
00002FC0: 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 2C 30 00 |0,0,0,0,0,0,0,0.|
00002FD0: EE 37 2E 27 83 20 34 38 2C 30 2C 32 34 2C 32 34 |.7.'. 48,0,24,24|
00002FE0: 2C 30 2C 34 38 2C 31 32 2C 36 38 2C 39 36 00 0F |,0,48,12,68,96..|
00002FF0: 38 2F 27 83 20 36 2C 31 30 38 2C 31 39 32 2C 33 |8/'. 6,108,192,3|
00003000: 2C 35 37 2C 31 32 38 2C 31 2C 31 34 37 2C 30 00 |,57,128,1,147,0.|
00003010: 2C 38 30 27 83 20 30 2C 32 31 34 2C 30 2C 30 2C |,80'. 0,214,0,0,|
00003020: 31 30 38 2C 30 2C 30 2C 35 36 2C 30 00 4F 38 31 |108,0,0,56,0.O81|
00003030: 27 83 20 30 2C 31 36 2C 30 2C 36 33 2C 32 35 35 |'. 0,16,0,63,255|
00003040: 2C 32 34 38 2C 36 33 2C 32 35 35 2C 32 34 38 00 |,248,63,255,248.|
00003050: 76 38 32 27 83 20 31 35 2C 32 35 35 2C 32 32 34 |v82'. 15,255,224|
00003060: 2C 31 35 2C 32 35 35 2C 32 32 34 2C 31 35 2C 32 |,15,255,224,15,2|
00003070: 35 35 2C 32 32 34 00 98 38 33 27 83 20 32 31 2C |55,224..83'. 21,|
00003080: 38 35 2C 38 30 2C 33 31 2C 32 35 35 2C 32 34 30 |85,80,31,255,240|
00003090: 2C 32 34 2C 30 2C 34 38 00 B6 38 34 27 83 20 32 |,24,0,48..84'. 2|
000030A0: 34 2C 30 2C 34 38 2C 32 34 2C 30 2C 34 38 2C 32 |4,0,48,24,0,48,2|
000030B0: 34 2C 30 2C 34 38 00 00 00 |4,0,48... |
..O....".......... SPRITE DES
IGNER":.". BY: DR. LEE T. HILL.
W....". (C) 1982 ACADEMY SOFTWARE.
.....52,128:.56,128:.:.53280,6:.53281,15
:.X.1.1500:..O...V.53248:. J.0.7:. V.39.
J,0:. J...... 704,0:.705,0:. 706,0:. 707
,0:XA$."0"...... P(21,24),T(24,24).9....
BC(21,3):. BINARY CODE CONVERTED.`....
HC(24),VC(21):. COORDINATE ARRAY.Y....LN
:.:.LN.10000.2030.....X.2:Y.3: ADD.1023.
X.40.(Y.1):. INITIAL COORDINATES.M.... .
A(X).(X.10000).10 . 1......"..":. 53280,
6......"O123456789012345678901234P......
J.1.21."...G.J.10..(J.10).;...R$.D(G):R
$.J(R$,2,1).^....R$"
.".F.... J...!.."L..................
..........#.. 660.D.$.. E(XA$).0 . SN.(B
(706).256.B(707).10000).10.1...%...26)"
SPRITE #";SN;...2..".........3...26)"O..
....PO...P.%.4..J.1.4:..26)". ..
.":.J.=.8...26)"L.......L.....P.;.."....
.........H.<...26)"O...PO......P...=.. J
.1.2:..26)". .. .":. J...?...26)"
L....L..........@..".".I.F.. H(AN$,1)."Y
" . . 420.Q.O.."....P...26)"MOVE THE I.
..Q...26)"CURSOR Z...R...26)"WITH
JZ.ZK.+.S...26)"THESE Z.A.T...26)"KE
YS==> M.Z.W.."...................R.X..
.26)" 'A'=TURN ON"...Z...26)" 'Z'=TURN O
FF...\...26)" 'S'=STOP.I.].."...........
......".26)"..MSPRITESN.....^...26)" .
...... ". ._..".......................
.......SKETCH PAD..............".+.C.. 1
000.1.D...Z.G.OX.X:OY.Y:. SAVE OLD CURSO
R POSITION.D.H.. 200.}.I.. X$:. X$."" .
. 105...N.. X$."I" . Y.Y.1:. Y.3 . Y.3..
.S.. X$."M" . Y.Y.1:. Y.23. Y.23...X.. X
$."J" . X.X.1:. X.2 . X.2...}.. X$."K" .
X.X.1:. X.25. X.25. .... X$."A" . P(Y.
2,X.1).1.=.... X$."Z" . P(Y.2,X.1).0.F.
...300.L.....R.....M...OADD.1023.OX.40.(
OY.1).....ADD.1023.X.40.(Y.1)...... P(OY
.2,OX.1).0 . . OADD,32.K.... P(OY.2,OX.1
).1 . . OADD,32.128... .. P(Y.2,X.1).1 .
. ADD,32.128...G.....H.....I.. P(Y.2,X.
1).0 . . ADD,42.9.J.. P(Y.2,X.1).1 . . A
DD,42.128.?.K...E.R..._....".".26)"WHAT
IS THE".X.....26)"ROTATE ANGLE?"......".
.........................DEGREES";ANGLE.
..... 950.A...H.12.5:V.11...... J.1.24:.
L.1.21:T(L,J).0:. L:.J.....PI.4.A(1)...
..ANGLE.ANGLE.PI.180...... J . 1 . 24...
... L . 1 . 21.C.... P(L,J).0 . 250.K...
NX..(.(ANGLE).(H.J)..(ANGLE).(V.L)).....
NY..(..(ANGLE).(H.J)..(ANGLE).(V.L))....
.. H.NX.1.H.NX.24.V.NY.0.V.NY.21 . 250.Q
...T(V.NY,H.NX).1.Y.... L...... J......
J .1 . 24...... L.1 . 21.....P(L,J).T(L,
J)...... L.".... J.,.... 980.2.....8....
.X...ADDRESS.B(2049).256.B(2050)...... B
(ADDRESS.2).B(ADDRESS.3).256.10000 . 275
.....ADDRESS.B(ADDRESS).256.B(ADDRESS.1)
...... 272.....X..(ADDRESS.256):Y.ADDRES
S.X.256......44,X:.43,Y.....LD.(B(45).25
6.B(46)).ADDRESS.(...P6..((2049.LD).256)
.>...P5.2049.LD.P6.256.S.... 845,P5:.846
,P6......"....POKE2049,Y:POKE2050,X:POKE
2051,0:POKE2052,0:POKE2053,143";......":
POKE2054,0".F. .."..POKE43,1:POKE44,8".Q
.".."..0"...$.."POKE45,PEEK(845):POKE46,
PEEK(846):CLR"...&.."..?CHR$(147):LIST".
5.(..198,5:.J.0.4:.631.J,13:..@.*..".":.
.F.+...L.,...`.1.BX. .((OX.6).8).M.6.BY.
OY.2.~.@.N.8.(BX.1).1...E.. J.0.7:C(J).
P(OY.2,N.J):. J...J.BC(BY,BX).128.C(0).6
4.C(1).32.C(2).16.C(3).8.C(4).4.C(5).2.C
(6).C(7)...O.. 832.3.(BY.1).(BX.1),BC(BY
,BX).5.Y..V.4,239:.V.5,101:. V.8,47:. V.
9,101.`.[..V.6,239:.V.7,151:. V.10,23:.
V.11,151.F.]...L.^.....H.. J.1.21:. K.1.
3:T(J,K).BC(J,K):. K:. J...K..:. LN:SN..
A(LN).H.L..".".26)"WHICH SPRITE"...M...2
6)"SHOULD BE "...N...26)"MERGED/INTER
-".9.O.."...........................SECT
ED #";N$:. N$."1" . . 375.P.P.. 670:. OB
.1 . 364.I.Q.. J.1 . 63.(E(N$).1).U.R..
T:. J..W.. 950...X.. J . 1 . 21:. K.1.3
...Y.. BC(J,K):.K:.J.A.{.. J.1.21:. K.1.
3...|.. A$."6".BC(J,K).BC(J,K).T(J,K)...
}.. A$."7".BC(J,K).BC(J,K).T(J,K).....
K:. J.8....J.1.21:.K.1.24:P(J,K).0:.K:.J
.B.... 820.H.....N.....Z...V.53248.H....
V.21,60...... 2042,13:. 2043,13:. 2044,
13:. 2045,13...... V.23,20:. V.29,36:. V
.16,48......V.4,239:.V.5,101:. V.8,47:.
V.9,101......V.6,239:.V.7,151:. V.10,23:
. V.11,151.<.... J.0.62:.832.J,BC(.(J.3)
.1,J.1..(J.3).3):. J.B.....^.... 800:. M
ENU SUBROUTINE.Y....".".26)"MENU::NONE=0
".......26)"REFLECTION= 1".......26)"ROT
ATION= 2".D.....26)"SHEAR= 3"....
...26)"TRANSLATION=4"......"............
".26)"REVERSE IMG=5".......26)"MERGE SPR
TE=6".6.....26)"INTERSECT =7".\...."...
.......................#";A$.Z...Z.E(A$)
:. Z.0 . Z.7 . 421...... 650:. A$."6".A$
."7". . 350...... A$."1" . . 900.E.... A
$."2" . . 210.Z.... A$."3" . . 710......
A$."4" . . 450...... A$."5" . . 780....
.. A$."0" . ..0....".".26)"DO YOU WANT "
.I.....26)"TO ROTATE,RE-".B.....26)"FLEC
T,ETC... "......".......................
...AGAIN? Y/N";AN$...... 650...... H(AN$
,1)."Y" . 421...A.....B.PS.1:TS.1:PT.1:T
T.1:FL.0:. SUBROUTINE TO TRANSLATE SPRIT
E...C..".".26)"WHAT IS THE".,.D...26)"HO
RIZ-TRANS.?".E.E...26)"CHOOSE # 0-24".^.
F...26)"LEFT/RIGHT? "...G.."...........
...............E.G. 10L";T$:. 490...H.."
.".26)"WHAT IS THE".D.I...26)"VERTCL-TRA
NS?"...J...26)"CHOOSE # 0-21"...K...26)"
ALSO UP/DOWN?"...L...26)"E.G. 10U ...
.";:. T$:. 490.8.M..".".26)"DO YOU WANT"
.Q.N...26)"WRAP-AROUND? ".}.R.."........
..................YES/NO";AN$...S.WR.0:.
H(AN$,1)."Y" . WR.1.E.T.. J.1.24:. L.1
. 24:T(J,L).0:. L:. J.O.W.. 950...... TS
.1 . . .A(X).(1.X.PS).(X.PS.1.25).(25.X.
PS).(X.PS.1.24).O.... PS.1 . . .A(X).(.1
.X.TS).(X.TS.1.0).(.25.X.TS).(X.TS.1.1).
..... PT.1 . . .B(X).(.1.X.TT).(X.TT.1.0
).(.22.X.TT).(X.TT.1.1).O.... TT.1 . . .
B(X).(1.X.PT).(X.PT.1.22).(22.X.PT).(X.P
T.1.21)...... J .1 . 21:. L.1 . 24:. P(J
,L).0 . 485.....X..A(L):Y..B(J).:.... WR
.0 . . 580:. F1.1 . T(Y,X).0:. 485.L...T
(Y,X).P(J,L).X.... L:. J.S.... J .1 . 24
:. L.1 . 21.....P(L,J).T(L,J):. L:. J...
... 980.......R...L.C(T$):.L.0.X.E(J(T$,
1,L.1)):C$.J(T$,L,1):T$.""......650:.C$.
."L".C$.."R".C$.."U".C$.."D".FL.0 . 451.
7....C$.."L".C$.."R".C$.."U".C$.."D".FL.
1 . 456.R.... C$."L" . PS.1:TS.X.1.M....
C$."D" . PT.1.X:TT.1...... C$."U" . PT.
1:TT.X.1...... C$."R" . PS.1.X:TS.1.....
. FL.0 . FL.1:. 456.L.... FL.1 . 461.R..
........"...".....D$.","...... 10040....
........ LN.....SLN.256.B(705).B(704).8.
..SNLN.256.B(707).B(706).E.... SLN.0 . .
"509 DATA";SLN:LN.SNLN:. 517.|.... "509
DATA";LN.10...... V.704 . 707:. V,0:. V
...... J.1 . 21 . 3.Y...S$.D(BC(J,1)).D$
.D(BC(J,2)).D$.D(BC(J,3))...... 600.....
S1$.R$.% ..S$.D$.D(BC(J.1,1)).D$.D(BC(J.
1,2)).D$.D(BC(J.1,3))./ ... 600.: ..S2$.
R$.Q ..S$.D$.D(BC(J.2,1)).D$.D(BC(J.2,2)
).D$.D(BC(J.2,3)).{ ... 600.. ..S3$.R$..
... LN;"DATA ".S1$.S2$.S3$.. ..LN.LN.1.
. &.. J.B +.."RUN".. 0.. 198,9:. A.631 .
639:. A,13:. A.. :..".".. ;.... <....!D
....!F.F1.0.$!H.. TS.1 . L.TS . F1.1.@!J
.. PT.1 . J.22.PT . F1.1.Y!L.. TT.1 . J.
TT . F1.1.U!N.. PS.1 . L.25.PS . F1.1.{!
W....!X....!].R$.""..!B.. P .1 . C(S$)..
!L.. J(S$,P,1)." " . . 640.N!V.R$.R$.J(S
$,P,1).V!... P..!.....!...".".26)"
".."...I.1.5:..26)" "
:.I.@"..."..........".26)" "
.D"...I.1.7:..26)" " :.I.J".
...U"...:. LN.."..SN . .A(LN).."....."..
..."..SN$.D(SN):SN$.I(SN$,C(SN$).1):OB.0
.J"...E(XA$).0 . ..." .. N$."0" . E(N$).
E(SN$). ..."... 650..#..."..".26)"YOU MU
ST USE".(#....26)"A # THAT IS: ".A#....2
6)"GREATR THAN 0".Z#....26)"AND LESS THA
N".P#....26)" ";SN$;"."..#... J .1.2000
:. J..#..OB.1..#.....#F.. SUBROUTINE TO
SHEAR SPRITE.N#O..".".26)"WHAT IS THE"..
#P...26)"SHEAR ANGLE"..#Q...26)"DEGREES?
"..$R...26)"+45 TO -45.I$S.."...........
...............ONLY! .......";ANGL
E.J$T.. ANGLE..45 . ANGLE.45 . 710.T$U..
650..$V..".".26)"WHAT IS THE"..$X...26)
"SHEAR POINT".T$Z.."....................
......1-24 OR M";AN$..$... 950..%... H(A
N$,1)."M" . MM.12.5:. 740..%..MM.E(AN$).
.%..PI.4.A(1)..%... J . 1 . 24.S%..DFF..
((J.MM)..(ANGLE.PI.180)..5).T%..PS..(DFF
.0).(DFF..0).(DFF.1)..%..PE..(DFF.0).(21
.DFF).(DFF..0).21..%..LD.PE.PS.H%..TS..(
DFF.0).(.DFF.1).(DFF..0).V%..K . TS.PS..
%... L.PS . PE..%..T(L.K,J).P(L,J)..&...
L..&... J..&... L.1 . 21.(&... J.1 . 24
.:&..P(L,J).T(L,J).B&... J.J&... L.T&...
980.Z&....`&....J&... 950..&... J.1 . 2
1:. K.1 . 3..&..BC(J,K).255.BC(J,K)..&..
. K:. J.J&...J.1.21:.K.1.24:P(J,K).0:.K:
.J.T&... 820.Z&.....& ....&$..:. LN:SN..
A(LN)..'&..".".26)"WHICH SPRITE".)''...2
6)"SHOULD BE CO-".W'(...26)"PIED?.1,2,ET
C":..26)" "..').."..........
................INPUT #";N$:. N$."1" . .
817..'*..E(N$).SN.1.E(N$).1..650:.806.M
'... 670:. OB.1 . 806..'/.. J.1 . 63.(E(
N$).1)..'0.. T:. J..'1.. 950..(2.. J . 1
. 21:. K.1.3.)(3.. BC(J,K):.K:.J.B(4..
J.1 . 21:. K.1 . 3.^(6.RE.BC(J,K):. RE.0
. 845.L(9.. L.0 . 7.}(;.QUOT..(RE.2)..(
>.P(J,8.(K.1).8.L).RE.2.QUOT..(C.RE.QUOT
..(H.. L..(M.. K..(R.. J.O(\.. Y.3 . 23.
.(A.. X.2 . 25..(F.ADD.1023.X.40.(Y.1)..
)K.. P(Y.2,X.1).0 . . ADD,32.6)P.. P(Y.2
,X.1).1 . . ADD,32.128.>)U.. X.F)Z.. Y.F
){.X.2:Y.3:ADD.1023.X.40.(Y.1).P)|.. 650
.Y)}..400.)....).....).....)...".".26)
"HORIZONTAL "..)....26)"OR VERTICAL ".
V)....26)"REFLECTION?"..*..."...........
...............H OR V";AN$:.AN$.."H".AN$
.."V" . 902.%*... 950.>*... H(AN$,1)."V"
. 913..*... L.1 . 21:. J.1 . 12:TEMP.P(
L,J):P(L,J).P(L,25.J):P(L,25.J).TEMP..*.
.. J:. L:. 950:. 980:...*...J.1.24:.L.1.
10:TEMP.P(L,J):P(L,J).P(22.L,J):P(22.L,J
).TEMP..*...L:. J:. 980:...*.....+... 65
0..+...".".28)"ONE MOMENT".-+....28)"PLE
ASE.".3+....9+T...H+W.. L.1 . 21.V+X.. J
.0 . 2..+Z.TB(J).128.P(L,8.J.1).64.P(L,8
.J.2).32.P(L,8.J.3).16.P(L,8.J.4).8.P(L,
8.J.5)..+..TB(J).4.P(L,8.J.6).2.P(L,8.J.
7).P(L,8.J.8).TB(J)..+... J..,..BC(L,1).
TB(0):BC(L,2).TB(1):BC(L,3).TB(2)..,...
L.#,... 860.-,... 400.3,....K,... BEGINN
ING OF MAIN.U,... 400._,... 100.I,... 15
0.,P.. X$.."S". . 1010..,U.. 53248.21,0
..,Z.. 500..,... START OF DRAW FOR 'NEXT
' SPRITE..,4..".":.".......DO YOU WANT T
O REVIEW ALL THE"..->..".....SPRITES? YE
S/NO";AN$:.".".3-H.. H(AN$,1).."Y" . . 2
300.D-J.. 53248.21,0.N-R..".":.56576,(B(
56576).252).1:.53272,5..-S..648,128:."."
..-W.Q.0..-[....-\.. N:N.(N.10000).10.N-
]..2200:FLAG.0:.N.8.FLAG.N.8:Q.Q.1:N.8.X
-A..2160..-B.L.0:.G.0.N.1:L.L.2.G:.:.532
48.21,L...C.. G.0 . N.1. .D.. L . 0 . 62
.).F.. AZ.>.G..33792.L.64.G,AZ.F.H.. L.N
.I.. G.X.O..2176.D.P.V.53248...T.. J . 1
. 8:.33783.J,15.J:. J...V.. V.23,255:.
V.29,255:. V.16,0...Z.. J.1 . 8...|.. V.
2.(J.1),(J.4).256.64.(J.1).35:. V.2.(J.1
).1,70.(J.4).60...~.. J../..../... FLAG
.0 . 2300.3/...".................."._/..
.".....TO SEE THE REST OF THE SPRITES ".
Y/...".....TOUCH ANY KEY.../... X$: . X$
."" . 2186../..N.FLAG:. 2141../... 2300.
./..."..".X/..L$."......." :S$." "
../..UL$.".":UR$.".":LL$.".":LR$."."./0.
.V$.".":UV$.".":LB$.".":RB$.".":LV$.".":
CR$.".".?0... J . 1 . 2.D0J..UL$;L$;UV$;
L$;UV$;L$;UV$;L$;UR$.R0K.. P.1 . 6..0L..
V$;S$;V$;S$;V$;S$;V$;S$;V$.G0M..:SN.(Q.8
):.P.1.4:.V$I(" #".D(SN.P),7);:.:.V$.
.0N..LB$;L$;CR$;L$;CR$;L$;CR$;L$;RB$..0O
.. P.1 . 6..1P..V$;S$;V$;S$;V$;S$;V$;S$;
V$.O1Q..:SN.(Q.8):.P.5.8:.V$I(" #".D(
SN.P),7);:.:.V$.T1R..LL$;L$;LV$;L$;LV$;L
$;LV$;L$;LR$.}1S.."."..1T...A1..."......
.............WOULD YOU LIKE TO CHANGE AN
Y OF THE"..1..."SPRITES? IF 'YES' TYPE
THE SPRITE "..2..."
".N2..."
".X2..."..N
UMBER, IF 'N0' TYPE 0(ZERO)";AN$..2...:.
X:X.(X.10000).10:.E(AN$).X.2300.Q2..."."
:.648,4:.53272,21:.56576,(B(56576).252).
3..2... V.21,0..2... "..."..2$..E(AN$).1
. 2400..3)..:XA$.AN$..3+.. LN..3-...73.
.X..(LN.256):Y.LN.256.X.R30.NLN.10000.E(
AN$).10.10.O32.Q..(NLN.256):W.NLN.256.Q.
.34.. 704,Y:. 705,X:. 706,W:. 707,Q..38.
AN$."Y":. 9.Y3`..".":."......DO YOU WANT
TO MAKE ANOTHER SPRITE?"..3E..".....YES
OR NO";AN$:."."..4J.. H(AN$,1)."N" . .
2490.B4O..".......DO YOU WANT TO REDRAW,
ROTATE, ".L4T..".....OR REFLECT A PREVI
OUS SPRITE?"..4Y..".....YES/NO ";AN$..4~
.. 9.K4...".":."......................DO
YOU WANT TO ELIMINATE ALL"..4...".....B
UT THE SPRITE DATA? YES/NO";AN$..5...H(A
N$,1)."Y"..".":.953:.270."5... "."./5...
10000..F5C.. .Z5D.AN$."
YES":K . 9.~5.'. 254,1,255,252,0,255,248
,0,127..5.'. 254,133,255,254,1,255,254,4
9,255.L5.'. 255,135,255,255,135,255,240,
0,63..5.'. 253,182,255,253,170,255,253,3
4,255..6.'. 253,34,255,252,0,255,252,0,2
55.C6.'. 255,135,255,255,183,255,255,51,
255.M6.'. 254,121,255,255,255,255,255,25
5,255..6.'. 0,0,0,0,0,0,0,0,0..6.'. 0,0,
0,0,0,0,0,0,0..6.'. 0,0,0,0,16,0,0,16,0.
R6.'. 0,16,0,0,16,0,0,16,0..6.'. 0,16,0,
0,16,0,0,16,0..7.'. 0,16,0,0,0,0,0,0,0..
7 '. 0,0,0,0,0,0,0,0,0.67$'. 0,0,0,0,0,0
,0,0,0.N7%'. 0,0,0,0,0,0,0,0,0.H7&'. 0,0
,0,0,16,0,0,16,0..7''. 0,16,0,0,16,0,0,1
6,0..7('. 0,16,0,0,16,0,0,16,0..7)'. 0,1
6,0,0,0,0,0,0,0.O7*'. 0,0,0,0,0,0,0,0,0.
.7.'. 48,0,24,24,0,48,12,68,96..8/'. 6,1
08,192,3,57,128,1,147,0.,80'. 0,214,0,0,
108,0,0,56,0.O81'. 0,16,0,63,255,248,63,
255,248.V82'. 15,255,224,15,255,224,15,2
55,224..83'. 21,85,80,31,255,240,24,0,48
..84'. 24,0,48,24,0,48,24,0,48...
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL