SPRITE EDITOR
FILE INFORMATION
FILENAME(S): SPRITE EDITOR
FILE TYPE(S): PRG
FILE SIZE: 11K
FIRST SEEN: 2025-12-01 01:08:01
APPEARS ON: 1 disk(s)
FILE HASH
2a6ba8c22d9d2e54e3554405dc97636932a2b26c0aa2c6265ff85d149d4b2bf5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 0116B | SPRITE EDITOR | PRG | hedning, Kaevlinge | 19 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 27 08 0A 00 8F 20 2A 2A 2A 2A 2A 2A 2A 2A |..'.... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000020: 2A 2A 2A 2A 2A 2A 2A 00 4E 08 0B 00 8F 2A 2A 2A |*******.N....***|
00000030: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 75 |**************.u|
00000050: 08 0C 00 8F 2A 2A 20 43 4F 4D 4D 4F 44 4F 52 45 |....** COMMODORE|
00000060: 20 36 34 20 53 50 52 49 54 45 20 45 44 49 54 4F | 64 SPRITE EDITO|
00000070: 52 2E 20 2A 2A 00 9C 08 0D 00 8F 2A 2A 2A 2A 2A |R. **......*****|
00000080: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 C3 08 0E |************....|
000000A0: 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..**************|
000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000C0: 2A 2A 2A 00 EA 08 0F 00 8F 2A 2A 2A 2A 2A 2A 2A |***......*******|
000000D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000000E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 11 09 10 00 8F |**********......|
000000F0: 2A 2A 2A 2A 2A 2A 20 41 55 54 48 4F 52 3A 4B 45 |****** AUTHOR:KE|
00000100: 56 49 4E 20 49 52 56 49 4E 47 20 2A 2A 2A 2A 2A |VIN IRVING *****|
00000110: 2A 00 38 09 11 00 8F 2A 2A 20 28 43 29 20 43 4F |*.8....** (C) CO|
00000120: 50 59 52 49 47 48 54 20 4A 41 4E 55 41 52 59 20 |PYRIGHT JANUARY |
00000130: 31 39 38 33 2E 20 2A 2A 00 5F 09 12 00 8F 2A 2A |1983. **._....**|
00000140: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000160: 86 09 13 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.....***********|
00000170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000180: 2A 2A 2A 2A 2A 2A 00 AD 09 14 00 8F 2A 2A 2A 2A |******......****|
00000190: 2A 20 50 52 4F 47 52 41 4D 20 4C 45 4E 47 54 48 |* PROGRAM LENGTH|
000001A0: 3D 31 31 2E 31 20 4B 20 2A 2A 2A 2A 2A 00 D4 09 |=11.1 K *****...|
000001B0: 15 00 8F 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*************|
000001C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001D0: 2A 2A 2A 2A 00 FB 09 16 00 8F 2A 2A 2A 2A 2A 2A |****......******|
000001E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000001F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 01 0A 17 00 |***********.....|
00000200: 8F 00 19 0A 1E 00 8F 20 2A 20 53 50 52 49 54 45 |....... * SPRITE|
00000210: 20 45 44 49 54 4F 52 20 2A 00 23 0A 5A 00 8D 34 | EDITOR *.#.Z..4|
00000220: 31 30 30 00 34 0A 5F 00 99 C7 28 38 29 3B C7 28 |100.4._...(8);.(|
00000230: 31 34 32 29 00 3E 0A 64 00 8D 34 38 30 30 00 5F |142).>.d..4800._|
00000240: 0A 8C 00 8B C2 28 34 34 29 B2 38 AF C2 28 34 33 |.....(44).8..(43|
00000250: 29 B2 31 A7 97 34 34 2C 31 30 3A 89 32 31 30 00 |).1..44,10:.210.|
00000260: 94 0A 91 00 8B C2 28 32 35 36 30 29 B2 30 AF C2 |......(2560).0..|
00000270: 28 32 35 36 31 29 B2 32 35 AF C2 28 32 35 36 32 |(2561).25..(2562|
00000280: 29 B2 31 30 AF C2 28 32 35 36 35 29 B2 31 34 33 |).10..(2565).143|
00000290: A7 32 31 30 00 B6 0A 96 00 99 22 11 11 1C 20 20 |.210......"... |
000002A0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 45 | E|
000002B0: 52 52 4F 52 3A 22 00 E8 0A 97 00 99 22 D2 D2 D2 |RROR:"......"...|
000002C0: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................|
000002D0: D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 D2 |................|
000002E0: D2 D2 D2 D2 D2 12 22 3B 00 19 0B 9B 00 99 22 42 |......";......"B|
000002F0: 45 43 41 55 53 45 20 42 41 53 49 43 20 44 4F 45 |ECAUSE BASIC DOE|
00000300: 53 20 4E 4F 54 20 53 54 41 52 54 20 41 54 20 4C |S NOT START AT L|
00000310: 4F 43 41 54 49 4F 4E 22 3B 00 4A 0B A0 00 99 22 |OCATION";.J...."|
00000320: 32 30 34 39 28 24 38 30 31 29 20 54 48 49 53 20 |2049($801) THIS |
00000330: 50 52 4F 47 52 41 4D 20 43 41 4E 4E 4F 54 20 43 |PROGRAM CANNOT C|
00000340: 4F 4E 54 49 4E 55 45 2E 22 3B 00 7B 0B B4 00 99 |ONTINUE.";.{....|
00000350: 22 53 57 49 54 43 48 20 54 48 45 20 43 4F 4D 50 |"SWITCH THE COMP|
00000360: 55 54 45 52 20 4F 46 46 20 41 4E 44 20 4F 4E 20 |UTER OFF AND ON |
00000370: 54 48 45 4E 20 4C 4F 41 44 22 3B 00 AC 0B BE 00 |THEN LOAD";.....|
00000380: 99 22 55 50 20 54 48 49 53 20 50 52 4F 47 52 41 |."UP THIS PROGRA|
00000390: 4D 20 41 47 41 49 4E 2E 20 20 20 20 20 20 20 20 |M AGAIN. |
000003A0: 20 20 20 20 20 20 20 20 20 20 22 3B 00 BE 0B C8 | ";....|
000003B0: 00 99 22 9A 11 11 11 11 11 11 11 22 3A A2 00 EC |.."........":...|
000003C0: 0B D2 00 99 22 11 11 1C 41 55 54 48 4F 52 90 3A |...."...AUTHOR.:|
000003D0: 20 1C 4B 45 56 49 4E 20 49 52 56 49 4E 47 2E 22 | .KEVIN IRVING."|
000003E0: 3A 81 49 B2 30 A4 32 30 30 30 3A 82 00 FC 0B 2C |:.I.0.2000:....,|
000003F0: 01 8D 34 31 30 30 3A 8D 34 38 30 30 00 29 0C 31 |..4100:.4800.).1|
00000400: 01 99 22 95 11 20 20 20 20 54 48 45 20 53 50 52 |..".. THE SPR|
00000410: 49 54 45 20 45 44 49 54 49 4E 47 20 4F 50 54 49 |ITE EDITING OPTI|
00000420: 4F 4E 53 20 41 52 45 3A 22 00 54 0C 32 01 99 22 |ONS ARE:".T.2.."|
00000430: 20 20 20 20 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 | ............|
00000440: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00000450: C5 C5 C5 22 00 80 0C 36 01 99 22 1C 11 11 20 20 |..."...6.."... |
00000460: 31 2E 29 97 20 45 52 41 53 45 20 41 4C 4C 20 45 |1.). ERASE ALL E|
00000470: 58 49 53 54 49 4E 47 20 53 50 52 49 54 45 53 22 |XISTING SPRITES"|
00000480: 00 A6 0C 3B 01 99 22 1C 20 20 32 2E 29 97 20 4C |...;..". 2.). L|
00000490: 4F 41 44 20 53 50 52 49 54 45 53 20 46 52 4F 4D |OAD SPRITES FROM|
000004A0: 20 54 41 50 45 22 00 CA 0C 40 01 99 22 1C 20 20 | TAPE"...@..". |
000004B0: 33 2E 29 97 20 53 41 56 45 20 53 50 52 49 54 45 |3.). SAVE SPRITE|
000004C0: 53 20 54 4F 20 54 41 50 45 22 00 F4 0C 45 01 99 |S TO TAPE"...E..|
000004D0: 22 1C 20 20 34 2E 29 97 20 57 52 49 54 45 20 41 |". 4.). WRITE A|
000004E0: 20 50 52 4F 47 52 41 4D 20 43 4F 4E 54 41 49 4E | PROGRAM CONTAIN|
000004F0: 49 4E 47 22 00 1E 0D 4A 01 99 22 20 20 20 20 20 |ING"...J.." |
00000500: 20 20 20 53 50 52 49 54 45 20 50 4F 4B 45 20 56 | SPRITE POKE V|
00000510: 41 4C 55 45 53 20 4F 4E 20 44 41 54 41 22 00 33 |ALUES ON DATA".3|
00000520: 0D 4D 01 99 22 20 20 20 20 20 20 20 20 4C 49 4E |.M.." LIN|
00000530: 45 53 22 00 73 0D 4F 01 99 22 1C 20 20 35 2E 29 |ES".s.O..". 5.)|
00000540: 97 20 44 49 53 50 4C 41 59 20 54 48 45 20 50 4F |. DISPLAY THE PO|
00000550: 4B 45 20 56 41 4C 55 45 53 20 46 4F 52 20 41 20 |KE VALUES FOR A |
00000560: 20 20 20 20 20 20 20 20 20 20 20 20 53 50 52 49 | SPRI|
00000570: 54 45 22 00 97 0D 54 01 99 22 1C 20 20 36 2E 29 |TE"...T..". 6.)|
00000580: 97 20 45 44 49 54 2F 43 52 45 41 54 45 20 41 20 |. EDIT/CREATE A |
00000590: 53 50 52 49 54 45 22 00 B3 0D 59 01 99 22 1C 20 |SPRITE"...Y..". |
000005A0: 20 37 2E 29 97 20 43 4F 50 59 20 53 50 52 49 54 | 7.). COPY SPRIT|
000005B0: 45 53 22 00 D3 0D 5A 01 99 22 1C 20 20 38 2E 29 |ES"...Z..". 8.)|
000005C0: 97 20 45 58 43 48 41 4E 47 45 20 53 50 52 49 54 |. EXCHANGE SPRIT|
000005D0: 45 53 22 00 E7 0D 5B 01 99 22 1C 20 20 39 2E 29 |ES"...[..". 9.)|
000005E0: 97 20 51 55 49 54 22 00 1A 0E 5E 01 99 22 11 11 |. QUIT"...^.."..|
000005F0: 12 1F 53 45 4C 45 43 54 3A 20 90 92 91 D2 11 20 |..SELECT: ..... |
00000600: 11 9D 9D C5 91 1C 22 3B 3A 49 48 B2 35 37 3A 49 |......";:IH.57:I|
00000610: 4C B2 34 39 3A 8D 34 30 30 30 00 24 0E 63 01 8D |L.49:.4000.$.c..|
00000620: 34 31 30 30 00 58 0E 68 01 91 49 56 AB 34 38 89 |4100.X.h..IV.48.|
00000630: 34 30 30 2C 31 30 30 30 2C 38 30 30 2C 31 35 30 |400,1000,800,150|
00000640: 30 2C 37 34 30 2C 35 30 30 2C 31 32 30 30 2C 31 |0,740,500,1200,1|
00000650: 34 30 30 2C 31 33 30 30 00 75 0E 8F 01 8F 2A 2A |400,1300.u....**|
00000660: 2A 2A 2A 43 4C 45 41 52 20 53 50 52 49 54 45 53 |***CLEAR SPRITES|
00000670: 2A 2A 2A 2A 2A 00 9B 0E 90 01 99 22 95 20 20 20 |*****......". |
00000680: 20 20 20 20 20 20 20 20 20 45 52 41 53 45 20 41 | ERASE A|
00000690: 4C 4C 20 53 50 52 49 54 45 53 22 00 C0 0E 95 01 |LL SPRITES".....|
000006A0: 99 22 20 20 20 20 20 20 20 20 20 20 20 20 C5 C5 |." ..|
000006B0: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 |..............."|
000006C0: 00 F4 0E 96 01 99 22 1C 11 11 20 41 52 45 20 59 |......"... ARE Y|
000006D0: 4F 55 20 53 55 52 45 20 54 48 41 54 20 59 4F 55 |OU SURE THAT YOU|
000006E0: 20 57 41 4E 54 20 54 4F 20 45 52 41 53 45 20 41 | WANT TO ERASE A|
000006F0: 4C 4C 22 3B 00 2C 0F 97 01 99 22 4F 46 20 54 48 |LL";.,...."OF TH|
00000700: 45 20 53 50 52 49 54 45 53 20 28 59 2F 4E 29 3F |E SPRITES (Y/N)?|
00000710: 20 94 5B 20 5D 1C 9D 9D 22 3B 3A 8D 34 37 30 30 | .[ ]...";:.4700|
00000720: 3A 99 3A 8B 49 56 B2 30 A7 33 30 30 00 36 0F 98 |:.:.IV.0.300.6..|
00000730: 01 99 22 91 91 22 00 4C 0F 9A 01 81 49 B2 32 30 |.."..".L....I.20|
00000740: 34 38 A4 32 35 35 39 3A 97 49 2C 30 00 7D 0F A4 |48.2559:.I,0.}..|
00000750: 01 99 22 13 1F 11 11 11 11 11 11 11 11 43 4C 45 |.."..........CLE|
00000760: 41 52 49 4E 47 20 53 50 52 49 54 45 3A 20 22 B5 |ARING SPRITE: ".|
00000770: 28 28 49 AB 32 30 34 38 29 AD 36 34 29 00 83 0F |((I.2048).64)...|
00000780: AE 01 82 00 B5 0F B8 01 99 22 13 11 11 11 11 11 |........."......|
00000790: 11 11 11 20 20 20 2A 2A 2A 2A 20 46 49 4E 49 53 |... **** FINIS|
000007A0: 48 45 44 20 2A 2A 2A 2A 22 3A 81 49 B2 30 A4 31 |HED ****":.I.0.1|
000007B0: 30 30 30 3A 82 00 BE 0F C2 01 89 33 30 30 00 DD |000:.......300..|
000007C0: 0F F3 01 8F 2A 2A 2A 2A 2A 43 52 45 41 54 45 2F |....*****CREATE/|
000007D0: 45 44 49 54 20 41 20 53 50 52 49 54 45 00 E7 0F |EDIT A SPRITE...|
000007E0: F4 01 8D 34 39 30 30 00 20 10 26 02 99 A3 32 36 |...4900. .&...26|
000007F0: 29 22 11 1C 53 50 52 49 54 45 90 3A 1C 20 20 20 |)"..SPRITE.:. |
00000800: 20 20 22 3B 3A 49 4C B2 34 38 3A 49 48 B2 35 35 | ";:IL.48:IH.55|
00000810: 3A 8D 34 30 30 30 3A 53 B2 49 56 AB 34 38 3A 99 |:.4000:S.IV.48:.|
00000820: 00 50 10 30 02 99 A3 32 36 29 22 4D 55 4C 54 49 |.P.0...26)"MULTI|
00000830: 43 4F 4C 4F 55 52 90 3A 1C 22 3B 3A 8D 34 37 30 |COLOUR.:.";:.470|
00000840: 30 3A 97 56 AA 32 38 2C 32 AE 53 AC 49 56 3A 99 |0:.V.28,2.S.IV:.|
00000850: 00 80 10 3A 02 99 A3 32 36 29 22 45 58 50 41 4E |...:...26)"EXPAN|
00000860: 44 2D 58 90 3A 1C 20 20 20 22 3B 3A 8D 34 37 30 |D-X.:. ";:.470|
00000870: 30 3A 97 56 AA 32 39 2C 32 AE 53 AC 49 56 3A 99 |0:.V.29,2.S.IV:.|
00000880: 00 B0 10 44 02 99 A3 32 36 29 22 45 58 50 41 4E |...D...26)"EXPAN|
00000890: 44 2D 59 90 3A 1C 20 20 20 22 3B 3A 8D 34 37 30 |D-Y.:. ";:.470|
000008A0: 30 3A 97 56 AA 32 33 2C 32 AE 53 AC 49 56 3A 99 |0:.V.23,2.S.IV:.|
000008B0: 00 C5 10 58 02 81 49 B2 30 A4 31 36 3A 97 56 AA |...X..I.0.16:.V.|
000008C0: 49 2C 30 3A 82 00 E0 10 62 02 97 56 AA 32 31 2C |I,0:....b..V.21,|
000008D0: 32 AE 53 3A 53 41 B2 32 30 34 38 AA 53 AC 36 34 |2.S:SA.2048.S.64|
000008E0: 00 05 11 6C 02 97 56 AA 53 AC 32 2C 33 34 3A 97 |...l..V.S.2,34:.|
000008F0: 56 AA 53 AC 32 AA 31 2C 32 30 35 3A 97 56 AA 31 |V.S.2.1,205:.V.1|
00000900: 36 2C 32 AE 53 00 28 11 76 02 97 38 37 31 2C 53 |6,2.S.(.v..871,S|
00000910: 41 AD 32 35 36 3A 97 38 37 30 2C 53 41 AB C2 28 |A.256:.870,SA..(|
00000920: 38 37 31 29 AC 32 35 36 00 3B 11 77 02 9E 38 33 |871).256.;.w..83|
00000930: 35 3A 50 31 B2 30 3A 50 32 B2 30 00 52 11 78 02 |5:P1.0:P2.0.R.x.|
00000940: 50 31 B2 30 3A 50 32 B2 30 3A 97 36 35 30 2C 32 |P1.0:P2.0:.650,2|
00000950: 35 35 00 98 11 79 02 A1 41 24 3A 50 41 B2 31 31 |55...y..A$:PA.11|
00000960: 34 35 AA 50 31 AA 50 32 AC 34 30 3A 42 4C B2 53 |45.P1.P2.40:BL.S|
00000970: 41 AA 50 32 AC 33 AA B5 28 50 31 AD 38 29 3A 42 |A.P2.3..(P1.8):B|
00000980: 49 B2 32 AE 28 37 AB 28 50 31 AD 38 AB B5 28 50 |I.2.(7.(P1.8..(P|
00000990: 31 AD 38 29 29 AC 38 29 00 B8 11 7A 02 97 50 41 |1.8)).8)...z..PA|
000009A0: AA 35 34 32 37 32 2C 32 3A 50 45 B2 C2 28 50 41 |.54272,2:PE..(PA|
000009B0: 29 3A 97 50 41 2C 34 32 00 DB 11 7B 02 99 22 13 |):.PA,42...{..".|
000009C0: 11 11 11 11 11 11 11 11 11 9D 9D 9D 9D 9D 9D 9D |................|
000009D0: 9D 9D 58 3A 22 50 31 22 9D 20 22 00 EF 11 7C 02 |..X:"P1". "...|.|
000009E0: 99 A3 33 31 29 22 59 3A 22 50 32 22 9D 20 22 00 |..31)"Y:"P2". ".|
000009F0: 05 12 7D 02 8B 41 24 B2 22 13 22 A7 50 31 B2 30 |..}..A$.".".P1.0|
00000A00: 3A 50 32 B2 30 00 19 12 7E 02 8B 41 24 B2 22 11 |:P2.0...~..A$.".|
00000A10: 22 A7 50 32 B2 50 32 AA 31 00 2D 12 7F 02 8B 41 |".P2.P2.1.-....A|
00000A20: 24 B2 22 91 22 A7 50 32 B2 50 32 AB 31 00 41 12 |$.".".P2.P2.1.A.|
00000A30: 80 02 8B 41 24 B2 22 1D 22 A7 50 31 B2 50 31 AA |...A$.".".P1.P1.|
00000A40: 31 00 55 12 81 02 8B 41 24 B2 22 9D 22 A7 50 31 |1.U....A$.".".P1|
00000A50: B2 50 31 AB 31 00 68 12 82 02 8B 41 24 B2 C7 28 |.P1.1.h....A$..(|
00000A60: 31 33 29 A7 50 31 B2 30 00 7D 12 83 02 8B 41 24 |13).P1.0.}....A$|
00000A70: B2 C7 28 31 34 31 29 A7 50 31 B2 32 33 00 8D 12 |..(141).P1.23...|
00000A80: 84 02 8B 41 24 B2 22 03 22 A7 33 30 30 00 A4 12 |...A$.".".300...|
00000A90: 85 02 97 50 41 AA 35 34 32 37 32 2C 30 3A 97 50 |...PA.54272,0:.P|
00000AA0: 41 2C 50 45 00 CD 12 86 02 8B 41 24 B2 22 85 22 |A,PE......A$."."|
00000AB0: A7 97 50 41 2C 31 36 30 3A 97 42 4C 2C C2 28 42 |..PA,160:.BL,.(B|
00000AC0: 4C 29 B0 42 49 3A 50 31 B2 50 31 AA 31 00 F6 12 |L).BI:P1.P1.1...|
00000AD0: 87 02 8B 41 24 B2 22 89 22 A7 97 50 41 2C 31 36 |...A$."."..PA,16|
00000AE0: 30 3A 97 42 4C 2C C2 28 42 4C 29 B0 42 49 3A 50 |0:.BL,.(BL).BI:P|
00000AF0: 31 B2 50 31 AB 31 00 1F 13 88 02 8B 41 24 B2 22 |1.P1.1......A$."|
00000B00: 88 22 A7 97 50 41 2C 33 32 3A 97 42 4C 2C C2 28 |."..PA,32:.BL,.(|
00000B10: 42 4C 29 AF A8 42 49 3A 50 31 B2 50 31 AA 31 00 |BL)..BI:P1.P1.1.|
00000B20: 48 13 89 02 8B 41 24 B2 22 8C 22 A7 97 50 41 2C |H....A$."."..PA,|
00000B30: 33 32 3A 97 42 4C 2C C2 28 42 4C 29 AF A8 42 49 |32:.BL,.(BL)..BI|
00000B40: 3A 50 31 B2 50 31 AB 31 00 7C 13 8A 02 8B 41 24 |:P1.P1.1.|....A$|
00000B50: B2 22 93 22 A7 81 49 B2 53 41 A4 53 41 AA 36 32 |."."..I.SA.SA.62|
00000B60: 3A 97 49 2C 30 3A 82 3A 8D 34 39 30 30 3A 9E 38 |:.I,0:.:.4900:.8|
00000B70: 33 35 3A 50 31 B2 30 3A 50 32 B2 30 00 8F 13 8F |35:P1.0:P2.0....|
00000B80: 02 8B 50 31 B1 32 33 A7 50 31 B2 50 31 AB 31 00 |..P1.23.P1.P1.1.|
00000B90: 9E 13 90 02 8B 50 31 B3 30 A7 50 31 B2 30 00 B1 |.....P1.0.P1.0..|
00000BA0: 13 91 02 8B 50 32 B1 32 30 A7 50 32 B2 50 32 AB |....P2.20.P2.P2.|
00000BB0: 31 00 C0 13 92 02 8B 50 32 B3 30 A7 50 32 B2 30 |1......P2.0.P2.0|
00000BC0: 00 D1 13 93 02 8B 41 24 B2 22 55 22 A7 8D 36 37 |......A$."U"..67|
00000BD0: 30 00 E2 13 94 02 8B 41 24 B2 22 52 22 A7 8D 36 |0......A$."R"..6|
00000BE0: 38 30 00 F3 13 95 02 8B 41 24 B2 22 49 22 A7 8D |80......A$."I"..|
00000BF0: 36 39 30 00 04 14 97 02 8B 41 24 B2 22 41 22 A7 |690......A$."A".|
00000C00: 8D 37 30 30 00 15 14 98 02 8B 41 24 B2 22 53 22 |.700......A$."S"|
00000C10: A7 8D 37 31 30 00 26 14 99 02 8B 41 24 B2 22 5A |..710.&....A$."Z|
00000C20: 22 A7 8D 37 32 30 00 37 14 9A 02 8B 41 24 B2 22 |"..720.7....A$."|
00000C30: 57 22 A7 8D 37 33 30 00 40 14 9B 02 89 36 33 33 |W"..730.@....633|
00000C40: 00 60 14 9E 02 81 49 B2 30 A4 39 3A 81 4A B2 30 |.`....I.0.9:.J.0|
00000C50: A4 32 3A 4B B2 C2 28 49 AC 33 AA 4A AA 53 41 29 |.2:K..(I.3.J.SA)|
00000C60: 00 81 14 9F 02 97 28 49 AC 33 AA 4A AA 53 41 29 |......(I.3.J.SA)|
00000C70: 2C C2 28 28 32 30 AB 49 29 AC 33 AA 4A AA 53 41 |,.((20.I).3.J.SA|
00000C80: 29 00 9C 14 A0 02 97 28 28 32 30 AB 49 29 AC 33 |)......((20.I).3|
00000C90: AA 4A AA 53 41 29 2C 4B 3A 82 3A 82 00 AD 14 A1 |.J.SA),K:.:.....|
00000CA0: 02 8D 34 39 30 30 3A 9E 38 33 35 3A 8E 00 D8 14 |..4900:.835:....|
00000CB0: A8 02 81 49 B2 53 41 A4 53 41 AA 36 32 3A 97 49 |...I.SA.SA.62:.I|
00000CC0: 2C 32 35 35 AB C2 28 49 29 3A 82 3A 8D 34 39 30 |,255..(I):.:.490|
00000CD0: 30 3A 9E 38 33 35 3A 8E 00 F0 14 B2 02 81 49 B2 |0:.835:.......I.|
00000CE0: 30 A4 32 30 3A 4A B2 C2 28 53 41 AA 49 AC 33 29 |0.20:J..(SA.I.3)|
00000CF0: 00 08 15 B3 02 97 53 41 AA 49 AC 33 2C C2 28 53 |......SA.I.3,.(S|
00000D00: 41 AA 32 AA 49 AC 33 29 00 1A 15 B4 02 97 53 41 |A.2.I.3)......SA|
00000D10: AA 32 AA 49 AC 33 2C 4A 3A 82 00 2D 15 B5 02 4B |.2.I.3,J:..-...K|
00000D20: B2 B4 28 C2 28 56 AA 32 38 29 29 AA 31 00 46 15 |..(.(V.28)).1.F.|
00000D30: B6 02 81 49 B2 30 A4 36 32 3A 4C B2 30 3A 81 4A |...I.0.62:L.0:.J|
00000D40: B2 30 A4 37 A9 4B 00 76 15 B7 02 8B 4B B2 31 A7 |.0.7.K.v....K.1.|
00000D50: 4C B2 4C AA B4 28 C2 28 53 41 AA 49 29 AF A8 28 |L.L..(.(SA.I)..(|
00000D60: 32 35 35 AB 32 AE 4A 29 29 AC 32 AE 28 37 AB 4A |255.2.J)).2.(7.J|
00000D70: 29 3A 89 36 39 37 00 AB 15 B8 02 81 4D B2 30 A4 |):.697......M.0.|
00000D80: 31 3A 4C B2 4C AA B4 28 C2 28 53 41 AA 49 29 AF |1:L.L..(.(SA.I).|
00000D90: A8 28 32 35 35 AB 32 AE 28 4A AA 4D 29 29 29 AC |.(255.2.(J.M))).|
00000DA0: 32 AE 28 36 AB 4A AA 4D 29 3A 82 00 C8 15 B9 02 |2.(6.J.M):......|
00000DB0: 82 3A 97 53 41 AA 49 2C 4C 3A 82 3A 8D 34 39 30 |.:.SA.I,L:.:.490|
00000DC0: 30 3A 9E 38 33 35 3A 8E 00 F3 15 BC 02 4D B2 B4 |0:.835:......M..|
00000DD0: 28 C2 28 56 AA 32 38 29 29 AC 32 AA 32 3A 81 49 |(.(V.28)).2.2:.I|
00000DE0: B2 30 A4 32 30 3A 4C B2 30 3A 81 4A B2 32 A4 30 |.0.20:L.0:.J.2.0|
00000DF0: A9 AB 31 00 1A 16 BD 02 4B B2 28 C2 28 53 41 AA |..1.....K.(.(SA.|
00000E00: 49 AC 33 AA 4A 29 AF 28 31 32 37 AB 33 32 AC 28 |I.3.J).(127.32.(|
00000E10: 4D AB 32 29 29 29 AC 4D B0 4C 00 4A 16 BE 02 4C |M.2))).M.L.J...L|
00000E20: B2 28 C2 28 53 41 AA 49 AC 33 AA 4A 29 AF 31 32 |.(.(SA.I.3.J).12|
00000E30: 38 AA 33 32 AC 28 4D AB 32 29 29 AD 28 31 32 38 |8.32.(M.2)).(128|
00000E40: AB 33 32 AC 28 4D AB 32 29 29 00 5C 16 BF 02 97 |.32.(M.2)).\....|
00000E50: 53 41 AA 49 AC 33 AA 4A 2C 4B 3A 82 00 78 16 C0 |SA.I.3.J,K:..x..|
00000E60: 02 97 53 41 AA 32 AA 49 AC 33 2C C2 28 53 41 AA |..SA.2.I.3,.(SA.|
00000E70: 32 AA 49 AC 33 29 B0 4C 00 8B 16 C1 02 82 3A 8D |2.I.3).L......:.|
00000E80: 34 39 30 30 3A 9E 38 33 35 3A 8E 00 B3 16 C6 02 |4900:.835:......|
00000E90: 4D B2 B4 28 C2 28 56 AA 32 38 29 29 AC 32 AA 32 |M..(.(V.28)).2.2|
00000EA0: 3A 81 49 B2 30 A4 32 30 3A 4C B2 30 3A 81 4A B2 |:.I.0.20:L.0:.J.|
00000EB0: 30 A4 32 00 C9 16 C7 02 4B B2 C2 28 53 41 AA 49 |0.2.....K..(SA.I|
00000EC0: AC 33 AA 4A 29 AD 4D B0 4C 00 F2 16 C8 02 4C B2 |.3.J).M.L.....L.|
00000ED0: 28 C2 28 53 41 AA 49 AC 33 AA 4A 29 AF 28 4D AB |(.(SA.I.3.J).(M.|
00000EE0: 31 29 29 AC 28 31 32 38 AB 33 32 AC 28 4D AB 32 |1)).(128.32.(M.2|
00000EF0: 29 29 00 04 17 C9 02 97 53 41 AA 49 AC 33 AA 4A |))......SA.I.3.J|
00000F00: 2C 4B 3A 82 00 1C 17 CA 02 97 53 41 AA 49 AC 33 |,K:.......SA.I.3|
00000F10: 2C C2 28 53 41 AA 49 AC 33 29 B0 4C 00 2F 17 CB |,.(SA.I.3).L./..|
00000F20: 02 82 3A 8D 34 39 30 30 3A 9E 38 33 35 3A 8E 00 |..:.4900:.835:..|
00000F30: 47 17 D0 02 81 4A B2 30 A4 32 3A 4B B2 C2 28 53 |G....J.0.2:K..(S|
00000F40: 41 AA 36 30 AA 4A 29 00 70 17 D1 02 81 49 B2 31 |A.60.J).p....I.1|
00000F50: 39 A4 30 A9 AB 31 3A 97 53 41 AA 33 AA 49 AC 33 |9.0..1:.SA.3.I.3|
00000F60: AA 4A 2C C2 28 53 41 AA 49 AC 33 AA 4A 29 3A 82 |.J,.(SA.I.3.J):.|
00000F70: 00 7E 17 D2 02 97 53 41 AA 4A 2C 4B 3A 82 00 8F |.~....SA.J,K:...|
00000F80: 17 D3 02 8D 34 39 30 30 3A 9E 38 33 35 3A 8E 00 |....4900:.835:..|
00000F90: A4 17 DA 02 81 4A B2 30 A4 32 3A 4B B2 C2 28 53 |.....J.0.2:K..(S|
00000FA0: 41 AA 4A 29 00 CA 17 DB 02 81 49 B2 30 A4 31 39 |A.J)......I.0.19|
00000FB0: 3A 97 53 41 AA 49 AC 33 AA 4A 2C C2 28 53 41 AA |:.SA.I.3.J,.(SA.|
00000FC0: 33 AA 49 AC 33 AA 4A 29 3A 82 00 DB 17 DC 02 97 |3.I.3.J):.......|
00000FD0: 53 41 AA 36 30 AA 4A 2C 4B 3A 82 00 EC 17 DD 02 |SA.60.J,K:......|
00000FE0: 8D 34 39 30 30 3A 9E 38 33 35 3A 8E 00 0F 18 E3 |.4900:.835:.....|
00000FF0: 02 8F 2A 2A 2A 2A 2A 44 49 53 50 4C 41 59 20 50 |..*****DISPLAY P|
00001000: 4F 4B 45 20 56 41 4C 55 45 53 2A 2A 2A 2A 2A 00 |OKE VALUES*****.|
00001010: 35 18 E4 02 99 22 95 20 20 20 20 20 20 20 20 20 |5....". |
00001020: 20 44 49 53 50 4C 41 59 20 50 4F 4B 45 20 56 41 | DISPLAY POKE VA|
00001030: 4C 55 45 53 22 00 5A 18 E5 02 99 22 A0 A0 A0 A0 |LUES".Z...."....|
00001040: A0 A0 A0 A0 A0 A0 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00001050: C5 C5 C5 C5 C5 C5 C5 C5 C5 22 00 8D 18 E6 02 99 |........."......|
00001060: 22 1C 11 57 48 49 43 48 20 53 50 52 49 54 45 20 |"..WHICH SPRITE |
00001070: 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 48 45 20 |DO YOU WANT THE |
00001080: 50 4F 4B 45 20 56 41 4C 55 45 53 22 3B 00 C5 18 |POKE VALUES";...|
00001090: E7 02 99 22 44 49 53 50 4C 41 59 45 44 20 46 4F |..."DISPLAYED FO|
000010A0: 52 20 28 30 54 4F 37 29 3F 20 94 5B 20 5D 1C 9D |R (0TO7)? .[ ]..|
000010B0: 9D 22 3B 3A 49 4C B2 34 38 3A 49 48 B2 35 35 3A |.";:IL.48:IH.55:|
000010C0: 8D 34 30 30 30 00 07 19 E8 02 8D 34 31 30 30 3A |.4000......4100:|
000010D0: 99 22 11 11 54 48 45 20 50 4F 4B 45 20 56 41 4C |."..THE POKE VAL|
000010E0: 55 45 53 20 46 4F 52 20 53 50 52 49 54 45 22 49 |UES FOR SPRITE"I|
000010F0: 56 AB 34 38 22 41 52 45 3A 90 11 22 3A 99 22 20 |V.48"ARE:..":." |
00001100: 20 20 20 20 20 22 3B 00 32 19 E9 02 4A B2 31 3A | ";.2...J.1:|
00001110: 81 49 B2 32 30 34 38 AA 28 49 56 AB 34 38 29 AC |.I.2048.(IV.48).|
00001120: 36 34 A4 32 31 31 31 AA 28 49 56 AB 34 38 29 AC |64.2111.(IV.48).|
00001130: 36 34 00 53 19 EE 02 99 C9 28 C4 28 C2 28 49 29 |64.S.....(.(.(I)|
00001140: 29 2C C3 28 C4 28 C2 28 49 29 29 29 AB 31 29 22 |),.(.(.(I))).1)"|
00001150: 2C 22 3B 00 70 19 F1 02 8B 49 AB 28 49 56 AB 34 |,";.p....I.(IV.4|
00001160: 38 29 AC 36 34 B2 32 31 31 31 A7 99 22 9D 20 22 |8).64.2111..". "|
00001170: 00 87 19 F3 02 8B C2 28 32 31 31 29 B1 33 35 A7 |.......(211).35.|
00001180: 99 3A 99 22 20 22 3B 00 8D 19 F8 02 82 00 97 19 |.:." ";.........|
00001190: 02 03 89 34 32 30 30 00 B3 19 1F 03 8F 2A 2A 2A |...4200......***|
000011A0: 2A 2A 53 41 56 45 20 53 50 52 49 54 45 53 2A 2A |**SAVE SPRITES**|
000011B0: 2A 2A 2A 00 D6 19 20 03 99 22 95 20 20 20 20 20 |***... ..". |
000011C0: 20 20 20 20 20 20 20 20 53 41 56 45 20 20 53 50 | SAVE SP|
000011D0: 52 49 54 45 53 22 00 F8 19 25 03 99 22 20 20 20 |RITES"...%.." |
000011E0: 20 20 20 20 20 20 20 20 20 20 C5 C5 C5 C5 C5 C5 | ......|
000011F0: C5 C5 C5 C5 C5 C5 C5 22 00 2A 1A 39 03 99 22 1F |.......".*.9..".|
00001200: 20 20 20 59 4F 55 20 4D 55 53 54 20 54 45 4C 4C | YOU MUST TELL|
00001210: 20 4D 45 20 54 48 45 20 52 41 4E 47 45 20 4F 46 | ME THE RANGE OF|
00001220: 20 53 50 52 49 54 45 53 22 3B 00 42 1A 3E 03 99 | SPRITES";.B.>..|
00001230: 22 54 4F 20 42 45 20 53 41 56 45 44 2E 20 45 47 |"TO BE SAVED. EG|
00001240: 2E 22 00 72 1A 43 03 99 22 20 53 54 41 52 54 3D |.".r.C.." START=|
00001250: 33 2C 45 4E 44 3D 35 20 57 49 4C 4C 20 53 41 56 |3,END=5 WILL SAV|
00001260: 45 20 53 50 52 49 54 45 53 20 33 2C 34 20 26 20 |E SPRITES 3,4 & |
00001270: 35 22 00 9E 1A 48 03 99 22 11 1C 45 4E 54 45 52 |5"...H.."..ENTER|
00001280: 20 54 48 45 20 53 50 52 49 54 45 20 52 41 4E 47 | THE SPRITE RANG|
00001290: 45 20 54 4F 20 42 45 20 53 41 56 45 44 22 00 CF |E TO BE SAVED"..|
000012A0: 1A 4D 03 99 22 20 20 53 54 41 52 54 28 30 2D 37 |.M.." START(0-7|
000012B0: 3E 90 20 5B 20 5D 1C 9D 9D 22 3B 3A 49 4C B2 34 |>. [ ]...";:IL.4|
000012C0: 38 3A 49 48 B2 35 35 3A 8D 34 30 30 30 3A 99 00 |8:IH.55:.4000:..|
000012D0: 0C 1B 52 03 53 53 B2 49 56 AB 34 38 3A 99 22 20 |..R.SS.IV.48:." |
000012E0: 20 20 20 45 4E 44 3C 22 C9 28 C4 28 53 53 29 2C | END<".(.(SS),|
000012F0: 31 29 22 2D 37 3E 90 20 5B 20 5D 1C 9D 9D 22 3B |1)"-7>. [ ]...";|
00001300: 3A 49 4C B2 49 56 3A 8D 34 30 30 30 00 4D 1B 5C |:IL.IV:.4000.M.\|
00001310: 03 53 45 B2 49 56 AB 34 37 3A 99 3A 99 22 20 20 |.SE.IV.47:.:." |
00001320: 20 4E 41 4D 45 20 94 5B 20 20 20 20 20 20 20 20 | NAME .[ |
00001330: 20 20 20 20 20 20 20 20 5D 1C 9D 9D 9D 9D 9D 9D | ].......|
00001340: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 22 3B 00 7B 1B |...........";.{.|
00001350: 61 03 49 4C B2 33 32 3A 49 48 B2 39 35 3A 49 49 |a.IL.32:IH.95:II|
00001360: B2 31 35 3A 8D 34 36 30 30 3A 99 3A 8D 35 30 30 |.15:.4600:.:.500|
00001370: 30 3A 8B 49 56 B2 30 A7 33 30 30 00 A3 1B 63 03 |0:.IV.0.300...c.|
00001380: 81 49 B2 53 53 AC 36 34 A4 53 45 AC 36 34 3A 97 |.I.SS.64.SE.64:.|
00001390: 34 39 31 35 32 AA 49 2C C2 28 32 30 34 38 AA 49 |49152.I,.(2048.I|
000013A0: 29 3A 82 00 DC 1B 66 03 99 22 93 22 3B 3A 8B C2 |):....f..".";:..|
000013B0: 28 31 29 B2 35 35 A7 99 22 94 20 20 20 20 20 20 |(1).55..". |
000013C0: 50 52 45 53 53 20 50 4C 41 59 20 26 20 52 45 43 |PRESS PLAY & REC|
000013D0: 4F 52 44 20 4F 4E 20 54 41 50 45 22 00 01 1C 70 |ORD ON TAPE"...p|
000013E0: 03 99 22 13 9A 11 11 11 53 41 56 45 22 C7 28 33 |..".....SAVE".(3|
000013F0: 34 29 3B 53 24 3B C7 28 33 34 29 22 2C 31 2C 31 |4);S$;.(34)",1,1|
00001400: 22 00 3F 1C 7A 03 99 22 11 11 11 11 11 11 11 11 |".?.z.."........|
00001410: 50 4F 4B 45 34 33 2C 31 3A 50 4F 4B 45 34 34 2C |POKE43,1:POKE44,|
00001420: 31 30 3A 50 4F 4B 45 34 35 2C 22 C2 28 34 35 29 |10:POKE45,".(45)|
00001430: 22 3A 50 4F 4B 45 34 36 2C 22 C2 28 34 36 29 00 |":POKE46,".(46).|
00001440: 69 1C 84 03 99 22 11 11 43 4F 4E 54 13 22 3A 97 |i...."..CONT.":.|
00001450: 31 39 38 2C 31 30 3A 81 49 B2 30 A4 39 3A 97 36 |198,10:.I.0.9:.6|
00001460: 33 31 AA 49 2C 31 33 3A 82 00 9F 1C 8E 03 97 34 |31.I,13:.......4|
00001470: 34 2C 28 34 39 31 35 32 AA 53 53 AC 36 34 29 AD |4,(49152.SS.64).|
00001480: 32 35 36 3A 97 34 33 2C 28 34 39 31 35 32 AA 53 |256:.43,(49152.S|
00001490: 53 AC 36 34 29 AB C2 28 34 34 29 AC 32 35 36 00 |S.64)..(44).256.|
000014A0: DB 1C 98 03 97 31 30 30 31 2C 28 34 39 31 35 32 |.....1001,(49152|
000014B0: AA 53 45 AC 36 34 29 AD 32 35 36 3A 97 31 30 30 |.SE.64).256:.100|
000014C0: 30 2C 28 34 39 31 35 32 AA 53 45 AC 36 34 29 AB |0,(49152.SE.64).|
000014D0: C2 28 31 30 30 31 29 AC 32 35 36 00 F7 1C A7 03 |.(1001).256.....|
000014E0: 97 34 35 2C C2 28 31 30 30 30 29 3A 97 34 36 2C |.45,.(1000):.46,|
000014F0: C2 28 31 30 30 31 29 00 FD 1C AC 03 80 00 06 1D |.(1001).........|
00001500: B6 03 89 33 30 30 00 2C 1D E7 03 8F 2A 2A 2A 2A |...300.,....****|
00001510: 2A 4C 4F 41 44 20 53 50 52 49 54 45 53 20 46 52 |*LOAD SPRITES FR|
00001520: 4F 4D 20 54 41 50 45 2A 2A 2A 2A 2A 00 50 1D E8 |OM TAPE*****.P..|
00001530: 03 99 22 11 95 20 20 20 20 20 20 20 20 20 20 20 |..".. |
00001540: 20 20 4C 4F 41 44 20 20 53 50 52 49 54 45 53 22 | LOAD SPRITES"|
00001550: 00 72 1D ED 03 99 22 20 20 20 20 20 20 20 20 20 |.r...." |
00001560: 20 20 20 20 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 | ............|
00001570: C5 22 00 97 1D FC 03 99 22 11 11 11 1F 20 20 20 |."......".... |
00001580: 20 20 20 20 20 20 20 20 20 20 20 50 4C 45 41 53 | PLEAS|
00001590: 45 20 57 41 49 54 22 00 B1 1D 06 04 81 49 B2 30 |E WAIT"......I.0|
000015A0: A4 35 31 31 3A 97 34 39 31 35 32 AA 49 2C 30 3A |.511:.49152.I,0:|
000015B0: 82 00 EB 1D 10 04 8D 34 31 30 30 3A 99 22 11 11 |.......4100:."..|
000015C0: 1F 20 20 20 20 45 4E 54 45 52 20 54 48 45 20 4E |. ENTER THE N|
000015D0: 41 4D 45 20 55 4E 44 45 52 20 57 48 49 43 48 20 |AME UNDER WHICH |
000015E0: 59 4F 55 20 53 41 56 45 44 22 3B 00 1C 1E 15 04 |YOU SAVED";.....|
000015F0: 99 22 54 48 45 20 53 50 52 49 54 45 53 2E 4A 55 |."THE SPRITES.JU|
00001600: 53 54 20 50 52 45 53 53 20 54 48 45 20 52 45 54 |ST PRESS THE RET|
00001610: 55 52 4E 20 4B 45 59 20 49 46 22 3B 00 3A 1E 1A |URN KEY IF";.:..|
00001620: 04 99 22 54 48 45 20 4E 41 4D 45 20 49 53 20 4E |.."THE NAME IS N|
00001630: 4F 54 20 4B 4E 4F 57 4E 2E 22 00 72 1E 24 04 99 |OT KNOWN.".r.$..|
00001640: 22 11 1C 20 20 20 4E 41 4D 45 20 90 5B 20 20 20 |".. NAME .[ |
00001650: 20 20 20 20 20 20 20 20 20 20 20 20 20 5D 1C 9D | ]..|
00001660: 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D 9D |................|
00001670: 22 3B 00 A0 1E 27 04 49 4C B2 33 32 3A 49 48 B2 |";...'.IL.32:IH.|
00001680: 39 35 3A 49 49 B2 31 35 3A 8D 34 36 30 30 3A 99 |95:II.15:.4600:.|
00001690: 3A 8D 35 30 30 30 3A 8B 49 56 B2 30 A7 33 30 30 |:.5000:.IV.0.300|
000016A0: 00 D7 1E 29 04 99 22 93 9A 22 3B 3A 8B C2 28 31 |...).."..";:..(1|
000016B0: 29 B2 35 35 A7 99 22 20 20 20 20 20 20 20 20 20 |).55.." |
000016C0: 20 20 90 50 52 45 53 53 20 50 4C 41 59 20 4F 4E | .PRESS PLAY ON|
000016D0: 20 54 41 50 45 9A 22 00 E9 1E 2A 04 8B C2 28 31 | TAPE."...*...(1|
000016E0: 29 B2 35 35 A7 31 30 36 36 00 FA 1E 2E 04 41 B2 |).55.1066.....A.|
000016F0: 31 30 38 30 3A 89 34 33 30 30 00 0A 1F 38 04 8D |1080:.4300...8..|
00001700: 34 31 30 30 3A 8D 34 38 30 30 00 2D 1F 3D 04 81 |4100:.4800.-.=..|
00001710: 4B B2 30 A4 37 3A 8B C2 28 34 39 32 31 35 AA 4B |K.0.7:..(49215.K|
00001720: AC 36 34 29 B2 30 A7 82 3A 89 33 30 30 00 4B 1F |.64).0..:.300.K.|
00001730: 42 04 8D 34 31 30 30 3A 8D 34 39 30 30 3A 41 44 |B..4100:.4900:AD|
00001740: B2 34 39 31 35 32 AA 4B AC 36 34 00 73 1F 4C 04 |.49152.K.64.s.L.|
00001750: 97 38 37 31 2C 41 44 AD 32 35 36 3A 97 38 37 30 |.871,AD.256:.870|
00001760: 2C 41 44 AB C2 28 38 37 31 29 AC 32 35 36 3A 9E |,AD..(871).256:.|
00001770: 38 33 35 00 8F 1F 56 04 99 A3 32 36 29 22 11 1C |835...V...26)"..|
00001780: 54 48 49 53 20 57 41 53 20 53 41 56 45 44 22 00 |THIS WAS SAVED".|
00001790: AA 1F 5B 04 99 A3 32 36 29 22 91 41 53 20 53 50 |..[...26)".AS SP|
000017A0: 52 49 54 45 22 4B 22 9D 2E 22 00 C4 1F 60 04 99 |RITE"K".."...`..|
000017B0: A3 32 36 29 22 44 4F 20 59 4F 55 20 57 41 4E 54 |.26)"DO YOU WANT|
000017C0: 20 54 4F 22 00 F2 1F 65 04 99 A3 32 36 29 22 91 | TO"...e...26)".|
000017D0: 55 53 45 20 49 54 20 28 59 2F 4E 29 3F 22 3B 3A |USE IT (Y/N)?";:|
000017E0: 8D 34 37 30 30 3A 8B 49 56 B2 30 A7 82 3A 89 33 |.4700:.IV.0..:.3|
000017F0: 30 30 00 0D 20 6A 04 99 3A 99 A3 32 36 29 22 50 |00.. j..:..26)"P|
00001800: 4C 45 41 53 45 20 41 53 53 49 47 4E 22 00 26 20 |LEASE ASSIGN".& |
00001810: 6F 04 99 A3 32 36 29 22 54 48 49 53 20 53 50 52 |o...26)"THIS SPR|
00001820: 49 54 45 20 41 22 00 54 20 74 04 99 A3 32 36 29 |ITE A".T t...26)|
00001830: 22 4E 55 4D 42 45 52 20 3C 30 2D 37 3E 90 3A 1C |"NUMBER <0-7>.:.|
00001840: 22 3B 3A 49 4C B2 34 38 3A 49 48 B2 35 35 3A 8D |";:IL.48:IH.55:.|
00001850: 34 30 30 30 00 7D 20 7E 04 81 4A B2 30 A4 36 32 |4000.} ~..J.0.62|
00001860: 3A 97 32 30 34 38 AA 28 49 56 AB 34 38 29 AC 36 |:.2048.(IV.48).6|
00001870: 34 AA 4A 2C C2 28 41 44 AA 4A 29 3A 82 00 88 20 |4.J,.(AD.J):... |
00001880: 88 04 82 3A 89 33 30 30 00 A4 20 AF 04 8F 2A 2A |...:.300.. ...**|
00001890: 2A 2A 2A 43 4F 50 59 20 53 50 52 49 54 45 53 2A |***COPY SPRITES*|
000018A0: 2A 2A 2A 2A 00 C6 20 B0 04 99 22 95 20 20 20 20 |****.. ...". |
000018B0: 20 20 20 20 20 20 20 20 20 43 4F 50 59 20 53 50 | COPY SP|
000018C0: 52 49 54 45 53 22 00 E7 20 B5 04 99 22 20 20 20 |RITES".. ..." |
000018D0: 20 20 20 20 20 20 20 20 20 20 C5 C5 C5 C5 C5 C5 | ......|
000018E0: C5 C5 C5 C5 C5 C5 22 00 2A 21 BA 04 99 22 11 11 |......".*!..."..|
000018F0: 1C 45 4E 54 45 52 20 53 50 52 49 54 45 20 54 4F |.ENTER SPRITE TO|
00001900: 20 42 45 20 43 4F 50 49 45 44 20 46 52 4F 4D 20 | BE COPIED FROM |
00001910: 3C 30 2D 37 3E 20 5B 20 5D 9D 9D 1C 22 3B 3A 49 |<0-7> [ ]...";:I|
00001920: 4C B2 34 38 3A 49 48 B2 35 35 00 4B 21 C4 04 8D |L.48:IH.55.K!...|
00001930: 34 30 30 30 3A 53 33 B2 49 56 AB 34 38 3A 53 31 |4000:S3.IV.48:S1|
00001940: B2 32 30 34 38 AA 53 33 AC 36 34 00 80 21 CE 04 |.2048.S3.64..!..|
00001950: 99 22 1D 45 4E 54 45 52 20 53 50 52 49 54 45 20 |.".ENTER SPRITE |
00001960: 54 4F 20 42 45 20 43 4F 50 49 45 44 20 54 4F 20 |TO BE COPIED TO |
00001970: 20 20 3C 30 2D 37 3E 90 5B 20 5D 9D 9D 1C 22 3B | <0-7>.[ ]...";|
00001980: 00 A1 21 D8 04 8D 34 30 30 30 3A 53 34 B2 49 56 |..!...4000:S4.IV|
00001990: AB 34 38 3A 53 32 B2 32 30 34 38 AA 53 34 AC 36 |.48:S2.2048.S4.6|
000019A0: 34 00 D2 21 E2 04 99 22 1D 11 11 11 1F 20 20 20 |4..!..."..... |
000019B0: 20 20 20 53 50 52 49 54 45 22 53 33 22 57 49 4C | SPRITE"S3"WIL|
000019C0: 4C 20 42 45 20 57 52 49 54 54 45 4E 20 4F 56 45 |L BE WRITTEN OVE|
000019D0: 52 22 00 FD 21 EC 04 99 22 20 20 20 20 20 53 50 |R"..!..." SP|
000019E0: 52 49 54 45 22 53 34 22 41 4E 44 20 54 48 45 20 |RITE"S4"AND THE |
000019F0: 4F 4C 44 20 53 50 52 49 54 45 22 53 34 00 1D 22 |OLD SPRITE"S4.."|
00001A00: F6 04 99 22 20 20 20 20 20 57 49 4C 4C 20 42 45 |..." WILL BE|
00001A10: 20 44 45 53 54 52 4F 59 45 44 2E 11 22 00 31 22 | DESTROYED..".1"|
00001A20: 00 05 8D 35 30 30 30 3A 8B 49 56 B2 30 A7 33 30 |...5000:.IV.0.30|
00001A30: 30 00 52 22 0A 05 81 49 B2 30 A4 36 32 3A 97 49 |0.R"...I.0.62:.I|
00001A40: AA 53 32 2C C2 28 49 AA 53 31 29 3A 82 3A 89 33 |.S2,.(I.S1):.:.3|
00001A50: 30 30 00 65 22 13 05 8F 2A 2A 2A 2A 2A 45 4E 44 |00.e"...*****END|
00001A60: 2A 2A 2A 2A 2A 00 72 22 14 05 97 36 35 30 2C 32 |*****.r"...650,2|
00001A70: 35 35 00 A5 22 1E 05 99 22 11 11 20 20 20 20 54 |55.."...".. T|
00001A80: 48 49 53 20 50 52 4F 47 52 41 4D 20 57 41 53 20 |HIS PROGRAM WAS |
00001A90: 45 4E 44 45 44 2E 20 54 48 45 20 53 54 41 52 54 |ENDED. THE START|
00001AA0: 20 4F 46 22 3B 00 DD 22 28 05 99 22 42 41 53 49 | OF";.."(.."BASI|
00001AB0: 43 20 48 41 53 20 42 45 45 4E 20 4D 4F 56 45 44 |C HAS BEEN MOVED|
00001AC0: 20 55 50 20 54 4F 20 4C 4F 43 41 54 49 4F 4E 20 | UP TO LOCATION |
00001AD0: 32 35 36 30 28 24 41 30 30 29 2E 22 3B 00 E8 22 |2560($A00).";.."|
00001AE0: 2D 05 9E 35 32 39 37 38 00 F9 22 32 05 99 22 11 |-..52978.."2..".|
00001AF0: 11 11 11 11 11 9A 22 3A 80 00 19 23 77 05 8F 2A |......":...#w..*|
00001B00: 2A 2A 2A 2A 45 58 43 48 41 4E 47 45 20 53 50 52 |****EXCHANGE SPR|
00001B10: 49 54 45 53 2A 2A 2A 2A 2A 00 3D 23 78 05 99 22 |ITES*****.=#x.."|
00001B20: 95 20 20 20 20 20 20 20 20 20 20 20 45 58 43 48 |. EXCH|
00001B30: 41 4E 47 45 20 53 50 52 49 54 45 53 22 00 60 23 |ANGE SPRITES".`#|
00001B40: 7D 05 99 22 20 20 20 20 20 20 20 20 20 20 20 C5 |}.." .|
00001B50: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 22 |..............."|
00001B60: 00 93 23 82 05 99 22 11 1F 20 20 20 20 20 50 4C |..#...".. PL|
00001B70: 45 41 53 45 20 45 4E 54 45 52 20 54 48 45 20 4E |EASE ENTER THE N|
00001B80: 55 4D 42 45 52 53 20 4F 46 20 54 48 45 20 54 57 |UMBERS OF THE TW|
00001B90: 4F 22 3B 00 B4 23 8C 05 99 22 53 50 52 49 54 45 |O";..#..."SPRITE|
00001BA0: 53 20 54 4F 20 42 45 20 45 58 43 48 41 4E 47 45 |S TO BE EXCHANGE|
00001BB0: 44 2E 11 22 00 F4 23 96 05 99 22 1C 20 20 20 31 |D.."..#...". 1|
00001BC0: 53 54 20 53 50 52 49 54 45 20 3C 30 2D 37 3E 20 |ST SPRITE <0-7> |
00001BD0: 90 5B 20 5D 9D 9D 1C 22 3B 3A 49 4C B2 34 38 3A |.[ ]...";:IL.48:|
00001BE0: 49 48 B2 35 35 3A 8D 34 30 30 30 3A 53 33 B2 49 |IH.55:.4000:S3.I|
00001BF0: 56 AB 34 38 00 08 24 9B 05 99 3A 53 31 B2 32 30 |V.48..$...:S1.20|
00001C00: 34 38 AA 53 33 AC 36 34 00 49 24 A0 05 99 22 20 |48.S3.64.I$..." |
00001C10: 20 20 32 4E 44 20 53 50 52 49 54 45 20 3C 30 2D | 2ND SPRITE <0-|
00001C20: 37 3E 20 90 5B 20 5D 9D 9D 1C 22 3B 3A 8D 34 30 |7> .[ ]...";:.40|
00001C30: 30 30 3A 53 34 B2 49 56 AB 34 38 3A 53 32 B2 32 |00:S4.IV.48:S2.2|
00001C40: 30 34 38 AA 53 34 AC 36 34 00 79 24 AA 05 99 3A |048.S4.64.y$...:|
00001C50: 99 22 11 11 11 1F 20 20 20 20 20 20 50 4C 45 41 |.".... PLEA|
00001C60: 53 45 20 57 41 49 54 20 57 48 49 4C 45 20 49 20 |SE WAIT WHILE I |
00001C70: 45 58 43 48 41 4E 47 45 22 00 A4 24 AF 05 99 22 |EXCHANGE"..$..."|
00001C80: 20 20 20 20 20 20 20 20 53 50 52 49 54 45 22 53 | SPRITE"S|
00001C90: 33 22 57 49 54 48 20 53 50 52 49 54 45 22 53 34 |3"WITH SPRITE"S4|
00001CA0: 22 9D 2E 22 00 D2 24 B4 05 81 49 B2 30 A4 36 32 |".."..$...I.0.62|
00001CB0: 3A 4D B2 C2 28 53 31 AA 49 29 3A 97 53 31 AA 49 |:M..(S1.I):.S1.I|
00001CC0: 2C C2 28 53 32 AA 49 29 3A 97 53 32 AA 49 2C 4D |,.(S2.I):.S2.I,M|
00001CD0: 3A 82 00 DB 24 BE 05 89 33 30 30 00 19 25 DB 05 |:...$...300..%..|
00001CE0: 8F 2A 2A 2A 2A 2A 57 52 49 54 45 20 50 52 4F 47 |.*****WRITE PROG|
00001CF0: 52 41 4D 20 43 4F 4E 54 41 49 4E 49 4E 47 20 53 |RAM CONTAINING S|
00001D00: 50 52 49 54 45 53 20 4F 4E 20 44 41 54 41 20 4C |PRITES ON DATA L|
00001D10: 49 4E 45 53 2A 2A 2A 2A 2A 00 46 25 DC 05 99 22 |INES*****.F%..."|
00001D20: 95 20 20 20 57 52 49 54 45 20 41 20 50 52 4F 47 |. WRITE A PROG|
00001D30: 52 41 4D 20 43 4F 4E 54 41 49 4E 49 4E 47 20 53 |RAM CONTAINING S|
00001D40: 50 52 49 54 45 22 00 72 25 E1 05 99 22 20 20 20 |PRITE".r%..." |
00001D50: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00001D60: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00001D70: C5 22 00 9C 25 F0 05 99 22 20 20 20 20 20 20 20 |."..%..." |
00001D80: 20 50 4F 4B 45 20 56 41 4C 4C 55 45 53 20 4F 4E | POKE VALLUES ON|
00001D90: 20 44 41 54 41 20 4C 49 4E 45 53 22 00 C6 25 F5 | DATA LINES"..%.|
00001DA0: 05 99 22 20 20 20 20 20 20 20 20 C5 C5 C5 C5 C5 |.." .....|
00001DB0: C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 C5 |................|
00001DC0: C5 C5 C5 C5 C5 22 00 F9 25 FA 05 99 22 11 1F 20 |....."..%...".. |
00001DD0: 20 20 59 4F 55 20 4D 55 53 54 20 54 45 4C 4C 20 | YOU MUST TELL |
00001DE0: 4D 45 20 54 48 45 20 52 41 4E 47 45 20 4F 46 20 |ME THE RANGE OF |
00001DF0: 53 50 52 49 54 45 53 22 3B 00 20 26 FF 05 99 22 |SPRITES";. &..."|
00001E00: 54 4F 20 42 45 20 53 54 4F 52 45 44 20 4F 4E 20 |TO BE STORED ON |
00001E10: 44 41 54 41 20 4C 49 4E 45 53 2E 20 45 47 2E 22 |DATA LINES. EG."|
00001E20: 00 4A 26 04 06 99 22 20 53 54 41 52 54 3D 33 2C |.J&..." START=3,|
00001E30: 45 4E 44 3D 35 20 57 49 4C 4C 20 53 54 4F 52 45 |END=5 WILL STORE|
00001E40: 20 54 48 45 20 50 4F 4B 45 22 00 75 26 09 06 99 | THE POKE".u&...|
00001E50: 22 20 56 41 4C 55 45 53 20 46 4F 52 20 53 50 52 |" VALUES FOR SPR|
00001E60: 49 54 45 53 20 33 2C 34 20 26 20 35 20 4F 4E 20 |ITES 3,4 & 5 ON |
00001E70: 44 41 54 41 22 00 84 26 0E 06 99 22 20 4C 49 4E |DATA"..&..." LIN|
00001E80: 45 53 2E 22 00 B0 26 18 06 99 22 11 1C 45 4E 54 |ES."..&..."..ENT|
00001E90: 45 52 20 54 48 45 20 53 50 52 49 54 45 20 52 41 |ER THE SPRITE RA|
00001EA0: 4E 47 45 20 54 4F 20 42 45 20 53 41 56 45 44 22 |NGE TO BE SAVED"|
00001EB0: 00 E1 26 1D 06 99 22 20 20 53 54 41 52 54 3C 30 |..&..." START<0|
00001EC0: 2D 37 3E 90 20 5B 20 5D 1C 9D 9D 22 3B 3A 49 4C |-7>. [ ]...";:IL|
00001ED0: B2 34 38 3A 49 48 B2 35 35 3A 8D 34 30 30 30 3A |.48:IH.55:.4000:|
00001EE0: 99 00 01 27 1F 06 44 53 B2 28 49 56 AB 34 38 29 |...'..DS.(IV.48)|
00001EF0: AC 36 34 AA 32 30 34 38 3A 53 53 B2 49 56 AB 34 |.64.2048:SS.IV.4|
00001F00: 38 00 35 27 22 06 99 22 20 20 20 20 45 4E 44 3C |8.5'".." END<|
00001F10: 22 C9 28 C4 28 53 53 29 2C 31 29 22 2D 37 3E 90 |".(.(SS),1)"-7>.|
00001F20: 20 5B A0 5D 1C 9D 9D 22 3B 3A 49 4C B2 49 56 3A | [.]...";:IL.IV:|
00001F30: 8D 34 30 30 30 00 4E 27 27 06 99 3A 44 45 B2 28 |.4000.N''..:DE.(|
00001F40: 49 56 AB 34 37 29 AC 36 34 AA 32 30 34 38 00 7F |IV.47).64.2048..|
00001F50: 27 2C 06 99 22 11 1F 20 20 20 20 20 49 20 4E 4F |',..".. I NO|
00001F60: 57 20 4E 45 45 44 20 54 4F 20 4B 4E 4F 57 20 54 |W NEED TO KNOW T|
00001F70: 48 45 20 4C 49 4E 45 20 4E 55 4D 42 45 52 22 00 |HE LINE NUMBER".|
00001F80: AE 27 31 06 99 22 41 54 20 57 48 49 43 48 20 49 |.'1.."AT WHICH I|
00001F90: 20 53 48 41 4C 4C 20 53 54 41 52 54 20 57 52 49 | SHALL START WRI|
00001FA0: 54 49 4E 47 20 54 48 45 20 44 41 54 41 22 00 BC |TING THE DATA"..|
00001FB0: 27 36 06 99 22 4C 49 4E 45 53 2E 22 00 EF 27 40 |'6.."LINES."..'@|
00001FC0: 06 99 22 11 1C 20 20 53 54 41 52 54 49 4E 47 20 |..".. STARTING |
00001FD0: 4C 49 4E 45 20 4E 55 4D 42 45 52 20 90 5B 20 20 |LINE NUMBER .[ |
00001FE0: 20 20 20 20 5D 1C 9D 9D 9D 9D 9D 9D 9D 22 3B 00 | ]........";.|
00001FF0: 15 28 4A 06 49 4C B2 34 38 3A 49 48 B2 35 37 3A |.(J.IL.48:IH.57:|
00002000: 49 49 B2 35 3A 8D 34 36 30 30 3A 4C 4E B2 C5 28 |II.5:.4600:LN..(|
00002010: 53 24 29 3A 99 00 29 28 4D 06 8D 35 30 30 30 3A |S$):..)(M..5000:|
00002020: 8B 49 56 B2 30 A7 33 30 30 00 5F 28 4F 06 8D 34 |.IV.0.300._(O..4|
00002030: 31 30 30 3A 99 22 11 11 11 1F 20 20 20 20 20 57 |100:.".... W|
00002040: 41 49 54 20 57 48 49 4C 45 20 49 20 57 52 49 54 |AIT WHILE I WRIT|
00002050: 45 20 59 4F 55 52 20 50 52 4F 47 52 41 4D 22 00 |E YOUR PROGRAM".|
00002060: 72 28 54 06 8B 4C 4E B1 36 35 35 33 35 A7 35 31 |r(T..LN.65535.51|
00002070: 37 35 00 85 28 5E 06 53 50 B2 34 39 31 35 32 3A |75..(^.SP.49152:|
00002080: 89 35 31 30 30 00 A2 28 9F 0F 8F 2A 2A 2A 2A 2A |.5100..(...*****|
00002090: 49 4E 50 55 54 20 52 4F 55 54 49 4E 45 2A 2A 2A |INPUT ROUTINE***|
000020A0: 2A 2A 00 AB 28 A0 0F 52 45 B2 30 00 B6 28 A1 0F |**..(..RE.0..(..|
000020B0: 97 31 39 38 2C 30 00 C7 28 A2 0F 99 22 BA 9D 22 |.198,0..(...".."|
000020C0: 3B 3A 8D 34 30 31 30 00 D8 28 A3 0F 99 22 D0 9D |;:.4010..(..."..|
000020D0: 22 3B 3A 8D 34 30 31 30 00 E9 28 A4 0F 99 22 BE |";:.4010..(...".|
000020E0: 9D 22 3B 3A 8D 34 30 31 30 00 FA 28 A5 0F 99 22 |.";:.4010..(..."|
000020F0: BB 9D 22 3B 3A 8D 34 30 31 30 00 0A 29 A6 0F 8B |..";:.4010..)...|
00002100: 49 B3 B1 39 39 A7 34 30 30 32 00 2A 29 A7 0F 99 |I..99.4002.*)...|
00002110: C7 28 49 56 29 3B 3A 92 31 39 37 2C 36 34 3A 81 |.(IV);:.197,64:.|
00002120: 49 B2 30 A4 32 30 3A 82 3A 8E 00 36 29 AA 0F 8B |I.0.20:.:..6)...|
00002130: 49 B2 39 39 A7 8E 00 46 29 AF 0F 81 49 B2 30 A4 |I.99...F)...I.0.|
00002140: 32 30 3A A1 41 24 00 55 29 B4 0F 8B 41 24 B2 22 |20:.A$.U)...A$."|
00002150: 22 A7 82 3A 8E 00 73 29 BE 0F 49 56 B2 C6 28 41 |"..:..s)..IV..(A|
00002160: 24 29 3A 8B 49 56 B2 31 33 AF 52 45 B2 31 A7 34 |$):.IV.13.RE.1.4|
00002170: 30 34 30 00 88 29 C3 0F 8B 49 56 B3 49 4C B0 49 |040..)...IV.IL.I|
00002180: 56 B1 49 48 A7 82 3A 8E 00 93 29 C8 0F 49 B2 39 |V.IH..:...)..I.9|
00002190: 39 3A 8E 00 B1 29 03 10 8F 2A 2A 2A 2A 2A 44 49 |9:...)...*****DI|
000021A0: 53 50 4C 41 59 20 48 45 41 44 45 52 2A 2A 2A 2A |SPLAY HEADER****|
000021B0: 2A 00 E5 29 04 10 99 22 93 1F 12 20 20 20 20 20 |*..)..."... |
000021C0: 20 20 43 4F 4D 4D 4F 44 4F 52 45 20 36 34 20 53 | COMMODORE 64 S|
000021D0: 50 52 49 54 45 20 45 44 49 54 4F 52 20 20 20 20 |PRITE EDITOR |
000021E0: 20 20 20 22 3B 00 15 2A 0E 10 99 22 20 20 20 20 | ";..*..." |
000021F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002200: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002210: 20 20 20 20 22 00 1B 2A 18 10 8E 00 48 2A 67 10 | "..*....H*g.|
00002220: 8F 2A 2A 2A 2A 2A 50 52 45 53 53 20 53 50 41 43 |.*****PRESS SPAC|
00002230: 45 20 42 41 52 20 54 4F 20 47 4F 20 54 4F 20 4D |E BAR TO GO TO M|
00002240: 45 4E 55 2A 2A 2A 2A 2A 00 8E 2A 68 10 99 22 13 |ENU*****..*h..".|
00002250: 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 11 |................|
00002260: 11 11 11 11 11 20 20 20 12 05 50 52 45 53 53 20 |..... ..PRESS |
00002270: 53 50 41 43 45 20 42 41 52 20 54 4F 20 52 45 54 |SPACE BAR TO RET|
00002280: 55 52 4E 20 54 4F 20 4D 45 4E 55 2E 9A 22 00 A9 |URN TO MENU.."..|
00002290: 2A 72 10 49 4C B2 33 32 3A 49 48 B2 33 32 3A 8D |*r.IL.32:IH.32:.|
000022A0: 34 30 30 30 3A 89 33 30 30 00 CB 2A CB 10 8F 2A |4000:.300..*...*|
000022B0: 2A 2A 2A 2A 20 4D 2F 43 20 4C 4F 41 44 20 52 4F |**** M/C LOAD RO|
000022C0: 55 54 49 4E 45 20 2A 2A 2A 2A 2A 00 EC 2A CC 10 |UTINE *****..*..|
000022D0: 99 22 93 11 11 4C 4F 41 44 22 C7 28 33 34 29 53 |."...LOAD".(34)S|
000022E0: 24 C7 28 33 34 29 22 2C 31 2C 31 22 00 1A 2B D6 |$.(34)",1,1"..+.|
000022F0: 10 99 22 11 11 11 11 11 11 11 11 11 11 11 50 4F |.."...........PO|
00002300: 4B 45 34 35 2C 22 C2 28 34 35 29 22 3A 50 4F 4B |KE45,".(45)":POK|
00002310: 45 34 36 2C 22 C2 28 34 36 29 00 28 2B E0 10 99 |E46,".(46).(+...|
00002320: 22 11 11 52 55 4E 22 41 00 46 2B EA 10 97 31 39 |"..RUN"A.F+...19|
00002330: 38 2C 39 3A 81 49 B2 36 33 31 A4 36 34 30 3A 97 |8,9:.I.631.640:.|
00002340: 49 2C 31 33 3A 82 00 52 2B F4 10 99 22 13 22 3B |I,13:..R+...".";|
00002350: 3A 80 00 76 2B F7 11 8F 2A 2A 2A 2A 2A 53 54 52 |:..v+...*****STR|
00002360: 49 4E 47 20 49 4E 50 55 54 20 52 4F 55 54 49 4E |ING INPUT ROUTIN|
00002370: 45 2A 2A 2A 2A 2A 00 85 2B F8 11 53 24 B2 22 22 |E*****..+..S$.""|
00002380: 3A 52 45 B2 31 00 8F 2B FD 11 8D 34 30 30 31 00 |:RE.1..+...4001.|
00002390: A1 2B 02 12 8B 49 56 B2 31 33 A7 52 45 B2 30 3A |.+...IV.13.RE.0:|
000023A0: 8E 00 C1 2B 0C 12 8B C3 28 53 24 29 B3 49 49 A7 |...+....(S$).II.|
000023B0: 53 24 B2 53 24 AA C7 28 49 56 29 3A 89 34 36 30 |S$.S$..(IV):.460|
000023C0: 35 00 D3 2B 16 12 99 22 9D 20 9D 22 3B 3A 89 34 |5..+...". .";:.4|
000023D0: 36 30 35 00 F2 2B 5B 12 8F 2A 2A 2A 2A 2A 47 45 |605..+[..*****GE|
000023E0: 54 20 59 20 2F 20 4E 20 52 45 50 4C 59 2A 2A 2A |T Y / N REPLY***|
000023F0: 2A 2A 00 08 2C 5C 12 49 4C B2 37 38 3A 49 48 B2 |**..,\.IL.78:IH.|
00002400: 38 39 3A 8D 34 30 30 30 00 29 2C 66 12 8B 49 56 |89:.4000.),f..IV|
00002410: B3 B1 37 38 AF 49 56 B3 B1 38 39 A7 99 22 9D 20 |..78.IV..89..". |
00002420: 9D 22 3B 3A 89 34 37 30 30 00 3B 2C 70 12 49 56 |.";:.4700.;,p.IV|
00002430: B2 B4 28 49 56 AB 37 38 29 3A 8E 00 58 2C BF 12 |..(IV.78):..X,..|
00002440: 8F 2A 2A 2A 2A 2A 53 45 54 20 55 50 20 4D 45 4D |.*****SET UP MEM|
00002450: 4F 52 59 2A 2A 2A 2A 2A 00 91 2C C0 12 97 35 34 |ORY*****..,...54|
00002460: 32 39 36 2C 30 3A 56 B2 35 33 32 34 38 3A 97 56 |296,0:V.53248:.V|
00002470: AA 32 31 2C 30 3A 97 56 AA 31 37 2C 32 37 3A 97 |.21,0:.V.17,27:.|
00002480: 56 AA 32 32 2C 32 30 30 3A 97 56 AA 32 34 2C 32 |V.22,200:.V.24,2|
00002490: 31 00 BF 2C CA 12 97 56 AA 33 33 2C 31 34 3A 97 |1..,...V.33,14:.|
000024A0: 56 AA 33 32 2C 36 3A 97 36 35 30 2C 36 37 3A 97 |V.32,6:.650,67:.|
000024B0: 56 AA 33 37 2C 30 3A 97 56 AA 33 38 2C 31 31 00 |V.37,0:.V.38,11.|
000024C0: DA 2C D4 12 8C 3A 81 49 B2 38 33 35 A4 39 31 33 |.,...:.I.835.913|
000024D0: 3A 87 4A 3A 97 49 2C 4A 3A 82 00 01 2D DE 12 81 |:.J:.I,J:...-...|
000024E0: 49 B2 30 A4 32 30 3A 4A B2 31 31 34 35 AA 34 30 |I.0.20:J.1145.40|
000024F0: AC 49 3A 97 39 32 31 AA 49 AC 32 2C 4A AD 32 35 |.I:.921.I.2,J.25|
00002500: 36 00 21 2D E8 12 97 39 32 30 AA 49 AC 32 2C 4A |6.!-...920.I.2,J|
00002510: AB C2 28 39 32 31 AA 49 AC 32 29 AC 32 35 36 3A |..(921.I.2).256:|
00002520: 82 00 45 2D F2 12 81 49 B2 30 A4 37 3A 97 32 30 |..E-...I.0.7:.20|
00002530: 34 30 AA 49 2C 49 AA 33 32 3A 97 56 AA 49 AA 33 |40.I,I.32:.V.I.3|
00002540: 39 2C 31 3A 82 00 69 2D 06 13 81 49 B2 35 32 39 |9,1:..i-...I.529|
00002550: 36 37 A4 35 32 39 39 31 3A 87 4A 3A 97 49 2C 4A |67.52991:.J:.I,J|
00002560: 3A 82 3A 9E 35 32 39 36 37 00 87 2D 10 13 81 49 |:.:.52967..-...I|
00002570: B2 30 A4 37 3A 97 32 31 31 31 AA 49 AC 36 34 2C |.0.7:.2111.I.64,|
00002580: 49 AA 31 32 38 3A 82 00 8D 2D 1A 13 8E 00 B9 2D |I.128:...-.....-|
00002590: 23 13 8F 2A 2A 2A 2A 2A 53 45 54 20 55 50 20 53 |#..*****SET UP S|
000025A0: 50 52 49 54 45 20 4D 41 54 52 49 58 20 44 49 53 |PRITE MATRIX DIS|
000025B0: 50 4C 41 59 2A 2A 2A 2A 2A 00 DF 2D 24 13 99 22 |PLAY*****..-$.."|
000025C0: 90 13 11 11 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 |................|
000025D0: B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 B2 22 00 |..............".|
000025E0: 0B 2E 2E 13 81 49 B2 30 A4 32 30 3A 99 22 AB 20 |.....I.0.20:.". |
000025F0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00002600: 20 20 20 20 20 20 20 B3 22 3A 82 00 2E 2E 38 13 | .":....8.|
00002610: 99 22 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 |."..............|
00002620: B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 B1 13 22 00 34 |.............".4|
00002630: 2E 42 13 8E 00 59 2E 87 13 8F 2A 2A 2A 2A 2A 43 |.B...Y....*****C|
00002640: 48 45 43 4B 20 49 46 20 55 53 45 52 20 49 53 20 |HECK IF USER IS |
00002650: 53 55 52 45 2A 2A 2A 2A 2A 00 95 2E 88 13 99 22 |SURE*****......"|
00002660: 20 20 1C 44 4F 20 59 4F 55 20 57 41 4E 54 20 54 | .DO YOU WANT T|
00002670: 4F 20 43 4F 4E 54 49 4E 55 45 20 3C 59 2F 4E 3E |O CONTINUE <Y/N>|
00002680: 3F 20 90 5B A0 5D 1C 9D 9D 22 3B 3A 8D 34 37 30 |? .[.]...";:.470|
00002690: 30 3A 99 3A 8E 00 BF 2E EB 13 8F 2A 2A 2A 2A 2A |0:.:.......*****|
000026A0: 50 52 4F 47 52 41 4D 20 57 52 49 54 49 4E 47 20 |PROGRAM WRITING |
000026B0: 53 55 42 52 4F 55 54 49 4E 45 2A 2A 2A 2A 2A 00 |SUBROUTINE*****.|
000026C0: D9 2E EC 13 50 53 B2 53 50 AA 31 3A 97 53 50 2C |....PS.SP.1:.SP,|
000026D0: 30 3A 53 50 B2 53 50 AA 31 00 FF 2E F6 13 97 53 |0:SP.SP.1......S|
000026E0: 50 AA 33 2C 4C 4E AD 32 35 36 3A 97 53 50 AA 32 |P.3,LN.256:.SP.2|
000026F0: 2C 4C 4E AB C2 28 53 50 AA 33 29 AC 32 35 36 00 |,LN..(SP.3).256.|
00002700: 12 2F 00 14 97 53 50 AA 34 2C 31 33 31 3A 50 30 |./...SP.4,131:P0|
00002710: B2 35 00 27 2F 0A 14 43 48 B2 C2 28 44 53 29 3A |.5.'/..CH..(DS):|
00002720: 44 53 B2 44 53 AA 31 00 42 2F 14 14 41 24 B2 C9 |DS.DS.1.B/..A$..|
00002730: 28 C4 28 43 48 29 2C C3 28 C4 28 43 48 29 29 AB |(.(CH),.(.(CH)).|
00002740: 31 29 00 6F 2F 1E 14 81 49 B2 31 A4 C3 28 41 24 |1).o/...I.1..(A$|
00002750: 29 3A 97 53 50 AA 50 30 2C C6 28 CA 28 41 24 2C |):.SP.P0,.(.(A$,|
00002760: 49 2C 31 29 29 3A 50 30 B2 50 30 AA 31 3A 82 00 |I,1)):P0.P0.1:..|
00002770: 7F 2F 28 14 8B 44 53 B2 44 45 A7 35 32 30 30 00 |./(..DS.DE.5200.|
00002780: 96 2F 32 14 8B 50 30 B1 37 30 A7 8D 35 33 30 30 |./2..P0.70..5300|
00002790: 3A 89 35 31 31 30 00 A9 2F 36 14 8B 4C 4E B3 36 |:.5110../6..LN.6|
000027A0: 35 35 33 35 A7 35 31 38 30 00 D9 2F 37 14 99 22 |5535.5180../7.."|
000027B0: 11 1F 20 20 20 20 20 54 48 45 20 4C 49 4E 45 20 |.. THE LINE |
000027C0: 4E 55 4D 42 45 52 20 57 48 49 43 48 20 59 4F 55 |NUMBER WHICH YOU|
000027D0: 20 47 41 56 45 20 4D 45 22 00 0A 30 38 14 99 22 | GAVE ME"..08.."|
000027E0: 49 53 20 54 4F 4F 20 48 49 47 48 2E 20 49 46 20 |IS TOO HIGH. IF |
000027F0: 59 4F 55 20 53 54 49 4C 4C 20 57 41 4E 54 20 41 |YOU STILL WANT A|
00002800: 20 50 52 4F 47 52 41 4D 22 3B 00 40 30 39 14 99 | PROGRAM";.@09..|
00002810: 22 57 52 49 54 54 45 4E 20 54 48 45 4E 20 54 52 |"WRITTEN THEN TR|
00002820: 59 20 41 47 41 49 4E 20 57 49 54 48 20 41 20 4C |Y AGAIN WITH A L|
00002830: 4F 57 45 52 20 4C 49 4E 45 4E 55 4D 42 45 52 22 |OWER LINENUMBER"|
00002840: 00 4A 30 3A 14 89 34 32 30 30 00 66 30 3C 14 97 |.J0:..4200.f0<..|
00002850: 53 50 AA 50 30 2C 34 34 3A 50 30 B2 50 30 AA 31 |SP.P0,44:P0.P0.1|
00002860: 3A 89 35 31 33 30 00 86 30 50 14 8D 35 33 30 30 |:.5130..0P..5300|
00002870: 3A 97 53 50 2C 30 3A 97 53 50 AA 31 2C 30 3A 50 |:.SP,0:.SP.1,0:P|
00002880: 45 B2 53 50 AA 32 00 B7 30 55 14 99 22 1F 11 20 |E.SP.2..0U..".. |
00002890: 20 20 20 20 59 4F 55 52 20 50 52 4F 47 52 41 4D | YOUR PROGRAM|
000028A0: 20 49 53 20 52 45 41 44 59 2E 20 49 46 20 59 4F | IS READY. IF YO|
000028B0: 55 20 57 41 4E 54 22 00 E6 30 56 14 99 22 54 4F |U WANT"..0V.."TO|
000028C0: 20 43 41 4E 43 45 4C 20 54 48 45 20 50 52 4F 47 | CANCEL THE PROG|
000028D0: 52 41 4D 20 41 4E 44 20 52 45 54 55 52 4E 20 54 |RAM AND RETURN T|
000028E0: 4F 20 54 48 45 22 00 15 31 57 14 99 22 4D 45 4E |O THE"..1W.."MEN|
000028F0: 55 20 41 54 20 54 48 49 53 20 50 4F 49 4E 54 20 |U AT THIS POINT |
00002900: 54 48 45 4E 20 59 4F 55 20 4D 41 59 2E 20 49 46 |THEN YOU MAY. IF|
00002910: 20 4E 4F 54 22 00 44 31 58 14 99 22 54 48 45 4E | NOT".D1X.."THEN|
00002920: 20 43 4F 4E 54 49 4E 55 45 20 41 4E 44 20 49 20 | CONTINUE AND I |
00002930: 57 49 4C 4C 20 4C 45 41 56 45 20 59 4F 55 20 57 |WILL LEAVE YOU W|
00002940: 49 54 48 22 00 72 31 59 14 99 22 54 48 45 20 50 |ITH".r1Y.."THE P|
00002950: 52 4F 47 52 41 4D 20 54 48 41 54 20 49 20 48 41 |ROGRAM THAT I HA|
00002960: 56 45 20 4A 55 53 54 20 57 52 49 54 54 45 4E 2E |VE JUST WRITTEN.|
00002970: 11 22 00 86 31 5A 14 8D 35 30 30 30 3A 8B 49 56 |."..1Z..5000:.IV|
00002980: B2 30 A7 33 30 30 00 A6 31 64 14 97 34 34 2C 50 |.0.300..1d..44,P|
00002990: 53 AD 32 35 36 3A 97 34 33 2C 50 53 AB C2 28 34 |S.256:.43,PS..(4|
000029A0: 34 29 AC 32 35 36 00 CC 31 6E 14 97 31 30 30 31 |4).256..1n..1001|
000029B0: 2C 50 45 AD 32 35 36 3A 97 31 30 30 30 2C 50 45 |,PE.256:.1000,PE|
000029C0: AB C2 28 31 30 30 31 29 AC 32 35 36 00 E8 31 78 |..(1001).256..1x|
000029D0: 14 97 34 36 2C C2 28 31 30 30 31 29 3A 97 34 35 |..46,.(1001):.45|
000029E0: 2C C2 28 31 30 30 30 29 00 03 32 7D 14 97 35 36 |,.(1000)..2}..56|
000029F0: 2C 32 30 37 3A 97 35 35 2C 32 35 35 3A 9E 35 32 |,207:.55,255:.52|
00002A00: 39 37 38 00 0D 32 82 14 9C 3A 80 3A 8A 00 3D 32 |978..2...:.:..=2|
00002A10: B4 14 97 53 50 AA 31 2C 28 53 50 AA 50 30 AA 31 |...SP.1,(SP.P0.1|
00002A20: 29 AD 32 35 36 3A 97 53 50 2C 53 50 AA 50 30 AA |).256:.SP,SP.P0.|
00002A30: 31 AB C2 28 53 50 AA 31 29 AC 32 35 36 00 52 32 |1..(SP.1).256.R2|
00002A40: BE 14 4C 4E B2 4C 4E AA 31 3A 97 50 30 AA 53 50 |..LN.LN.1:.P0.SP|
00002A50: 2C 30 00 63 32 C8 14 53 50 B2 53 50 AA 50 30 AA |,0.c2..SP.SP.P0.|
00002A60: 31 3A 8E 00 A3 32 18 F6 83 31 36 39 2C 30 2C 31 |1:...2...169,0,1|
00002A70: 34 31 2C 36 32 2C 33 2C 31 34 31 2C 36 33 2C 33 |41,62,3,141,63,3|
00002A80: 2C 31 37 33 2C 36 33 2C 33 2C 32 34 2C 31 30 39 |,173,63,3,24,109|
00002A90: 2C 36 33 2C 33 2C 31 37 30 2C 31 38 39 2C 31 35 |,63,3,170,189,15|
00002AA0: 32 2C 33 00 EC 32 19 F6 83 31 34 31 2C 31 31 36 |2,3..2...141,116|
00002AB0: 2C 33 2C 31 38 39 2C 31 35 33 2C 33 2C 31 34 31 |,3,189,153,3,141|
00002AC0: 2C 31 31 37 2C 33 2C 31 36 39 2C 30 2C 37 32 2C |,117,3,169,0,72,|
00002AD0: 31 37 34 2C 36 32 2C 33 2C 31 38 38 2C 30 2C 30 |174,62,3,188,0,0|
00002AE0: 2C 31 30 34 2C 31 37 30 2C 31 35 32 00 36 33 1A |,104,170,152.63.|
00002AF0: F6 83 31 36 30 2C 30 2C 34 32 2C 31 34 34 2C 37 |..160,0,42,144,7|
00002B00: 2C 37 32 2C 31 36 39 2C 31 36 30 2C 31 35 37 2C |,72,169,160,157,|
00002B10: 30 2C 30 2C 31 30 34 2C 32 33 32 2C 32 30 30 2C |0,0,104,232,200,|
00002B20: 31 39 32 2C 38 2C 32 30 38 2C 32 34 30 2C 32 33 |192,8,208,240,23|
00002B30: 38 2C 36 32 2C 33 00 79 33 1B F6 83 31 33 38 2C |8,62,3.y3...138,|
00002B40: 37 32 2C 32 32 34 2C 32 34 2C 32 30 38 2C 32 32 |72,224,24,208,22|
00002B50: 30 2C 31 30 34 2C 32 33 38 2C 36 33 2C 33 2C 31 |0,104,238,63,3,1|
00002B60: 37 33 2C 36 32 2C 33 2C 32 30 31 2C 36 33 2C 32 |73,62,3,201,63,2|
00002B70: 30 38 2C 31 38 36 2C 39 36 00 A3 33 1C F6 83 31 |08,186,96..3...1|
00002B80: 36 39 2C 32 35 33 2C 31 34 31 2C 34 30 2C 33 2C |69,253,141,40,3,|
00002B90: 31 36 39 2C 32 30 36 2C 31 34 31 2C 34 31 2C 33 |169,206,141,41,3|
00002BA0: 2C 39 36 00 D8 33 1D F6 83 31 36 39 2C 32 33 37 |,96..3...169,237|
00002BB0: 2C 31 34 31 2C 34 30 2C 33 2C 31 36 39 2C 32 34 |,141,40,3,169,24|
00002BC0: 36 2C 31 34 31 2C 34 31 2C 33 2C 39 36 2C 31 36 |6,141,41,3,96,16|
00002BD0: 39 2C 32 35 35 2C 39 36 00 00 00 FF FF FF FF FF |9,255,96........|
00002BE0: 20 | |
..'.... *******************************.
N....*********************************.U
....** COMMODORE 64 SPRITE EDITOR. **...
...*********************************.C..
..*********************************.....
.*********************************......
****** AUTHOR:KEVIN IRVING ******.8....*
* (C) COPYRIGHT JANUARY 1983. **._....**
*******************************......***
******************************......****
* PROGRAM LENGTH=11.1 K *****.T....*****
****************************......******
***************************............
* SPRITE EDITOR *.#.Z..4100.4._..G(8);G(
142).>.D..4800._....B(44).8.B(43).1..44,
10:.210......B(2560).0.B(2561).25.B(2562
).10.B(2565).143.210......"...
ERROR:"......"RRRRRRRRRRRRRRRRRRR
RRRRRRRRRRRRRRRRRRRRR.";......"BECAUSE B
ASIC DOES NOT START AT LOCATION";.J. .."
2049($801) THIS PROGRAM CANNOT CONTINUE.
";.{...."SWITCH THE COMPUTER OFF AND ON
THEN LOAD";......"UP THIS PROGRAM AGAIN.
";...H.."........":...
.R.."...AUTHOR.: .KEVIN IRVING.":.I.0.20
00:....,..4100:.4800.).1..".. THE SPR
ITE EDITING OPTIONS ARE:".T.2.." EEEE
EEEEEEEEEEEEEEEEEEEEEEEEEEE"...6.."...
1.). ERASE ALL EXISTING SPRITES"...;..".
2.). LOAD SPRITES FROM TAPE".J.@..".
3.). SAVE SPRITES TO TAPE"...E..". 4.).
WRITE A PROGRAM CONTAINING"...J.."
SPRITE POKE VALUES ON DATA".3.M.."
LINES".S.O..". 5.). DISPLAY THE PO
KE VALUES FOR A SPRITE"...T.
.". 6.). EDIT/CREATE A SPRITE"...Y..".
7.). COPY SPRITES".S.Z..". 8.). EXCHAN
GE SPRITES"...[..". 9.). QUIT"...^.."..
..SELECT: ...R. ...E..";:IH.57:IL.49:.40
00.$.C..4100.X.H..IV.48.400,1000,800,150
0,740,500,1200,1400,1300.U....*****CLEAR
SPRITES*****......". ERASE A
LL SPRITES"......" EEEEEEEEEE
EEEEEEE"......"... ARE YOU SURE THAT YOU
WANT TO ERASE ALL";.,...."OF THE SPRITE
S (Y/N)? .[ ]...";:.4700:.:.IV.0.300.6..
.."..".L....I.2048.2559:.I,0.}....".....
.....CLEARING SPRITE: ".((I.2048).64)...
........."......... **** FINISHED ****
":.I.0.1000:....B..300......*****CREATE/
EDIT A SPRITE......4900. .&...26)"..SPRI
TE.:. ";:IL.48:IH.55:.4000:S.IV.48:.
.P.0...26)"MULTICOLOUR.:.";:.4700:.V.28,
2.S.IV:....:...26)"EXPAND-X.:. ";:.470
0:.V.29,2.S.IV:....D...26)"EXPAND-Y.:.
";:.4700:.V.23,2.S.IV:..E.X..I.0.16:.V.
I,0:....B..V.21,2.S:SA.2048.S.64...L..V.
S.2,34:.V.S.2.1,205:.V.16,2.S.(.V..871,S
A.256:.870,SA.B(871).256.;.W..835:P1.0:P
2.0.R.X.P1.0:P2.0:.650,255...Y..A$:PA.11
45.P1.P2.40:BL.SA.P2.3..(P1.8):BI.2.(7.(
P1.8..(P1.8)).8)...Z..PA.54272,2:PE.B(PA
):.PA,42...{.."...................X:"P1"
. "...|...31)"Y:"P2". "...}..A$.".".P1.0
:P2.0...~..A$.".".P2.P2.1.-...A$.".".P2
.P2.1.A....A$.".".P1.P1.1.U....A$.".".P1
.P1.1.H....A$.G(13).P1.0.}....A$.G(141).
P1.23......A$.".".300......PA.54272,0:.P
A,PE.M....A$."."..PA,160:.BL,B(BL).BI:P1
.P1.1......A$."."..PA,160:.BL,B(BL).BI:P
1.P1.1......A$."."..PA,32:.BL,B(BL)..BI:
P1.P1.1.H....A$."."..PA,32:.BL,B(BL)..BI
:P1.P1.1.|....A$."."..I.SA.SA.62:.I,0:.:
.4900:.835:P1.0:P2.0......P1.23.P1.P1.1.
.....P1.0.P1.0......P2.20.P2.P2.1......P
2.0.P2.0.Q....A$."U"..670......A$."R"..6
80......A$."I"..690......A$."A"..700....
..A$."S"..710.&....A$."Z"..720.7....A$."
W"..730.@....633.`....I.0.9:.J.0.2:K.B(I
.3.J.SA)......(I.3.J.SA),B((20.I).3.J.SA
)... ..((20.I).3.J.SA),K:.:.......4900:.
835:..X....I.SA.SA.62:.I,255.B(I):.:.490
0:.835:.......I.0.20:J.B(SA.I.3)......SA
.I.3,B(SA.2.I.3)......SA.2.I.3,J:..-...K
..(B(V.28)).1.F....I.0.62:L.0:.J.0.7.K.V
....K.1.L.L..(B(SA.I)..(255.2.J)).2.(7.J
):.697......M.0.1:L.L..(B(SA.I)..(255.2.
(J.M))).2.(6.J.M):..H....:.SA.I,L:.:.490
0:.835:......M..(B(V.28)).2.2:.I.0.20:L.
0:.J.2.0..1.....K.(B(SA.I.3.J).(127.32.(
M.2))).M.L.J...L.(B(SA.I.3.J).128.32.(M.
2)).(128.32.(M.2)).\....SA.I.3.J,K:..X..
..SA.2.I.3,B(SA.2.I.3).L...A..:.4900:.83
5:....F.M..(B(V.28)).2.2:.I.0.20:L.0:.J.
0.2.I.G.K.B(SA.I.3.J).M.L...H.L.(B(SA.I.
3.J).(M.1)).(128.32.(M.2))...I..SA.I.3.J
,K:....J..SA.I.3,B(SA.I.3).L./.K..:.4900
:.835:..G.P..J.0.2:K.B(SA.60.J).P.Q..I.1
9.0..1:.SA.3.I.3.J,B(SA.I.3.J):..~.R..SA
.J,K:....S..4900:.835:....Z..J.0.2:K.B(S
A.J).J....I.0.19:.SA.I.3.J,B(SA.3.I.3.J)
:.......SA.60.J,K:.......4900:.835:.....
..*****DISPLAY POKE VALUES*****.5....".
DISPLAY POKE VALUES".Z...."
EEEEEEEEEEEEEEEEEEE"......"..WHICH
SPRITE DO YOU WANT THE POKE VALUES";.E.
..."DISPLAYED FOR (0TO7)? .[ ]...";:IL.4
8:IH.55:.4000......4100:."..THE POKE VAL
UES FOR SPRITE"IV.48"ARE:..":." ";.
2...J.1:.I.2048.(IV.48).64.2111.(IV.48).
64.S....I(D(B(I)),C(D(B(I))).1)",";.P...
.I.(IV.48).64.2111..". "......B(211).35.
.:." ";............4200......*****SAVE S
PRITES*****.V. ..". SAVE SP
RITES"...%.." EEEEEEEEEEEEE"
.*.9..". YOU MUST TELL ME THE RANGE OF
SPRITES";.B.>.."TO BE SAVED. EG.".R.C..
" START=3,END=5 WILL SAVE SPRITES 3,4 &
5"...H.."..ENTER THE SPRITE RANGE TO BE
SAVED".O.M.." START(0-7>. [ ]...";:IL.4
8:IH.55:.4000:....R.SS.IV.48:." END<"
I(D(SS),1)"-7>. [ ]...";:IL.IV:.4000.M.\
.SE.IV.47:.:." NAME .[
]..................";.{.A.IL.32:IH.95:II
.15:.4600:.:.5000:.IV.0.300...C..I.SS.64
.SE.64:.49152.I,B(2048.I):....F..".";:.B
(1).55..". PRESS PLAY & RECORD ON T
APE"...P..".....SAVE"G(34);S$;G(34)",1,1
".?.Z.."........POKE43,1:POKE44,10:POKE4
5,"B(45)":POKE46,"B(46).I...."..CONT.":.
198,10:.I.0.9:.631.I,13:.......44,(49152
.SS.64).256:.43,(49152.SS.64).B(44).256.
.....1001,(49152.SE.64).256:.1000,(49152
.SE.64).B(1001).256......45,B(1000):.46,
B(1001)............300.,....*****LOAD SP
RITES FROM TAPE*****.P...."..
LOAD SPRITES".R...." EEEE
EEEEEEEEE"......".... PLEAS
E WAIT"......I.0.511:.49152.I,0:.......4
100:."... ENTER THE NAME UNDER WHICH
YOU SAVED";......"THE SPRITES.JUST PRESS
THE RETURN KEY IF";.:...."THE NAME IS N
OT KNOWN.".R.$..".. NAME .[
]..................";. .'.IL.32:IH.
95:II.15:.4600:.:.5000:.IV.0.300.W.)..".
.";:.B(1).55.." .PRESS PLAY ON
TAPE."...*..B(1).55.1066.....A.1080:.43
00...8..4100:.4800.-.=..K.0.7:.B(49215.K
.64).0..:.300.K.B..4100:.4900:AD.49152.K
.64.S.L..871,AD.256:.870,AD.B(871).256:.
835...V...26)"..THIS WAS SAVED"...[...26
)".AS SPRITE"K"..".D.`...26)"DO YOU WANT
TO"...E...26)".USE IT (Y/N)?";:.4700:.I
V.0..:.300.. J..:..26)"PLEASE ASSIGN".&
O...26)"THIS SPRITE A".T T...26)"NUMBER
<0-7>.:.";:IL.48:IH.55:.4000.} ~..J.0.62
:.2048.(IV.48).64.J,B(AD.J):... ...:.300
.. ...*****COPY SPRITES*****.F ...".
COPY SPRITES".. ..."
EEEEEEEEEEEE".*!..."...ENTER SPRITE TO
BE COPIED FROM <0-7> [ ]...";:IL.48:IH.
55.K!D..4000:S3.IV.48:S1.2048.S3.64..!N.
.".ENTER SPRITE TO BE COPIED TO <0-7>.
[ ]...";..!X..4000:S4.IV.48:S2.2048.S4.6
4.R!..."..... SPRITE"S3"WILL BE WRI
TTEN OVER"..!..." SPRITE"S4"AND THE
OLD SPRITE"S4.."..." WILL BE DESTROY
ED..".1"...5000:.IV.0.300.R"...I.0.62:.I
.S2,B(I.S1):.:.300.E"...*****END*****.R"
...650,255.."...".. THIS PROGRAM WAS
ENDED. THE START OF";.."(.."BASIC HAS BE
EN MOVED UP TO LOCATION 2560($A00).";.."
-..52978.."2..".......":...#W..*****EXCH
ANGE SPRITES*****.=#X..". EXCH
ANGE SPRITES".`#}.." EEEEEEEEE
EEEEEEE"..#...".. PLEASE ENTER THE N
UMBERS OF THE TWO";..#..."SPRITES TO BE
EXCHANGED.."..#...". 1ST SPRITE <0-7>
.[ ]...";:IL.48:IH.55:.4000:S3.IV.48..$.
..:S1.2048.S3.64.I$ .." 2ND SPRITE <0-
7> .[ ]...";:.4000:S4.IV.48:S2.2048.S4.6
4.Y$...:.".... PLEASE WAIT WHILE I
EXCHANGE"..$..." SPRITE"S3"WITH S
PRITE"S4"..".R$...I.0.62:M.B(S1.I):.S1.I
,B(S2.I):.S2.I,M:...$...300..%...*****WR
ITE PROGRAM CONTAINING SPRITES ON DATA L
INES*****.F%...". WRITE A PROGRAM CONT
AINING SPRITE".R%..." EEEEEEEEEEEEEEEE
EEEEEEEEEEEEEEEEE"..%..." POKE VA
LLUES ON DATA LINES".F%..." EEEEE
EEEEEEEEEEEEEEEEEEEEE"..%...".. YOU MU
ST TELL ME THE RANGE OF SPRITES";. &..."
TO BE STORED ON DATA LINES. EG.".J&..."
START=3,END=5 WILL STORE THE POKE".U&...
" VALUES FOR SPRITES 3,4 & 5 ON DATA"..&
..." LINES."..&..."..ENTER THE SPRITE RA
NGE TO BE SAVED"..&..." START<0-7>. [ ]
...";:IL.48:IH.55:.4000:...'..DS.(IV.48)
.64.2048:SS.IV.48.5'".." END<"I(D(SS)
,1)"-7>. [ ]...";:IL.IV:.4000.N''..:DE.(
IV.47).64.2048.',..".. I NOW NEED T
O KNOW THE LINE NUMBER"..'1.."AT WHICH I
SHALL START WRITING THE DATA"..'6.."LIN
ES."..'@..".. STARTING LINE NUMBER .[
]........";..(J.IL.48:IH.57:II.5:.46
00:LN.E(S$):..)(M..5000:.IV.0.300._(O..4
100:.".... WAIT WHILE I WRITE YOUR P
ROGRAM".R(T..LN.65535.5175..(^.SP.49152:
.5100..(...*****INPUT ROUTINE*****..( .R
E.0..(...198,0.G(..."..";:.4010.X(..."P.
";:.4010..(..."..";:.4010..(..."..";:.40
10..)...I..99.4002.*)...G(IV);:.197,64:.
I.0.20:.:..6)...I.99...F)...I.0.20:.A$.U
)...A$.""..:..S)..IV.F(A$):.IV.13.RE.1.4
040..)C..IV.IL.IV.IH..:...)H.I.99:...)..
.*****DISPLAY HEADER*****..)..."...
COMMODORE 64 SPRITE EDITOR ";..*
..."
"..*....H*G..*****PRESS SPACE BAR TO
GO TO MENU*****..*H..".................
..... ..PRESS SPACE BAR TO RETURN TO M
ENU.."..*R.IL.32:IH.32:.4000:.300.K*K..*
**** M/C LOAD ROUTINE *****..*L.."...LOA
D"G(34)S$G(34)",1,1"..+V.."...........PO
KE45,"B(45)":POKE46,"B(46).(+..."..RUN"A
.F+...198,9:.I.631.640:.I,13:..R+...".";
:..V+...*****STRING INPUT ROUTINE*****..
+..S$."":RE.1..+...4001..+...IV.13.RE.0:
..A+...C(S$).II.S$.S$.G(IV):.4605.S+..."
. .";:.4605..+[..*****GET Y / N REPLY***
**..,\.IL.78:IH.89:.4000.),F..IV..78.IV.
.89..". .";:.4700.;,P.IV..(IV.78):..X,..
.*****SET UP MEMORY*****..,...54296,0:V.
53248:.V.21,0:.V.17,27:.V.22,200:.V.24,2
1..,J..V.33,14:.V.32,6:.650,67:.V.37,0:.
V.38,11.Z,T..:.I.835.913:.J:.I,J:...-...
I.0.20:J.1145.40.I:.921.I.2,J.256.!-...9
20.I.2,J.B(921.I.2).256:..E-...I.0.7:.20
40.I,I.32:.V.I.39,1:..I-...I.52967.52991
:.J:.I,J:.:.52967..-...I.0.7:.2111.I.64,
I.128:...-.....-#..*****SET UP SPRITE MA
TRIX DISPLAY*****..-$.."................
.............."......I.0.20:.".
.":....8.."..............
.............".4.B...Y....*****CHECK IF
USER IS SURE*****......" .DO YOU WANT T
O CONTINUE <Y/N>? .[ ]...";:.4700:.:....
...*****PROGRAM WRITING SUBROUTINE*****.
Y...PS.SP.1:.SP,0:SP.SP.1......SP.3,LN.2
56:.SP.2,LN.B(SP.3).256../...SP.4,131:P0
.5.'/..CH.B(DS):DS.DS.1.B/..A$.I(D(CH),C
(D(CH)).1).O/...I.1.C(A$):.SP.P0,F(J(A$,
I,1)):P0.P0.1:../(..DS.DE.5200../2..P0.
70..5300:.5110../6..LN.65535.5180.Y/7.."
.. THE LINE NUMBER WHICH YOU GAVE ME
"..08.."IS TOO HIGH. IF YOU STILL WANT A
PROGRAM";.@09.."WRITTEN THEN TRY AGAIN
WITH A LOWER LINENUMBER".J0:..4200.F0<..
SP.P0,44:P0.P0.1:.5130..0P..5300:.SP,0:.
SP.1,0:PE.SP.2..0U..".. YOUR PROGRAM
IS READY. IF YOU WANT"..0V.."TO CANCEL
THE PROGRAM AND RETURN TO THE"..1W.."MEN
U AT THIS POINT THEN YOU MAY. IF NOT".D1
X.."THEN CONTINUE AND I WILL LEAVE YOU W
ITH".R1Y.."THE PROGRAM THAT I HAVE JUST
WRITTEN.."..1Z..5000:.IV.0.300..1D..44,P
S.256:.43,PS.B(44).256.L1N..1001,PE.256:
.1000,PE.B(1001).256..1X..46,B(1001):.45
,B(1000)..2}..56,207:.55,255:.52978..2..
.:.:..=2...SP.1,(SP.P0.1).256:.SP,SP.P0.
1.B(SP.1).256.R2..LN.LN.1:.P0.SP,0.C2H.S
P.SP.P0.1:...2...169,0,141,62,3,141,63,3
,173,63,3,24,109,63,3,170,189,152,3..2..
.141,116,3,189,153,3,141,117,3,169,0,72,
174,62,3,188,0,0,104,170,152.63...160,0,
42,144,7,72,169,160,157,0,0,104,232,200,
192,8,208,240,238,62,3.Y3...138,72,224,2
4,208,220,104,238,63,3,173,62,3,201,63,2
08,186,96..3...169,253,141,40,3,169,206,
141,41,3,96.X3...169,237,141,40,3,169,24
6,141,41,3,96,169,255,96........
> CLICK IMAGE PREVIEW FOR FULL MODAL