SPRITE HULP
FILE INFORMATION
FILENAME(S): SPRITE HULP
FILE TYPE(S): PRG
FILE SIZE: 5.1K
FIRST SEEN: 2025-11-30 21:24:37
APPEARS ON: 1 disk(s)
FILE HASH
173adab273cb7224f2db66ce7483cd13825c1499a4bbd1a4db8631f9148653e7
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ELITE | SPRITE HULP | PRG | DuncanTwain | 6 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 64 00 3A 00 29 08 6E 00 8F 20 53 50 |....d.:.).n.. SP|
00000010: 52 49 54 45 2D 54 45 4B 45 4E 48 55 4C 50 20 56 |RITE-TEKENHULP V|
00000020: 4F 4F 52 20 43 42 4D 36 34 00 2F 08 78 00 3A 00 |OOR CBM64./.x.:.|
00000030: 52 08 82 00 8F 20 56 41 4E 20 43 2E 4C 2E 20 45 |R.... VAN C.L. E|
00000040: 4D 42 45 52 4C 45 59 20 28 32 33 2F 30 31 2F 38 |MBERLEY (23/01/8|
00000050: 33 29 00 71 08 85 00 8F 20 55 49 54 20 43 4F 4D |3).q.... UIT COM|
00000060: 50 55 54 49 4E 47 20 41 50 52 49 4C 20 31 39 38 |PUTING APRIL 198|
00000070: 33 00 91 08 8C 00 8F 20 C3 C3 3E 20 41 41 4E 47 |3...... ..> AANG|
00000080: 45 50 41 53 54 45 20 56 45 52 53 49 45 20 3C C3 |EPASTE VERSIE <.|
00000090: C3 00 B1 08 96 00 8F 20 49 4E 49 54 20 56 41 4E |....... INIT VAN|
000000A0: 20 56 41 53 54 45 20 56 41 52 49 41 42 45 4C 45 | VASTE VARIABELE|
000000B0: 4E 00 B7 08 A0 00 3A 00 CD 08 AA 00 53 B2 31 30 |N.....:.....S.10|
000000C0: 32 34 20 20 3A 8F 20 53 43 48 45 52 4D 00 E2 08 |24 :. SCHERM...|
000000D0: B4 00 43 B2 35 35 32 39 36 20 3A 8F 20 4B 4C 45 |..C.55296 :. KLE|
000000E0: 55 52 00 FF 08 BE 00 53 44 B2 32 30 34 30 20 3A |UR.....SD.2040 :|
000000F0: 8F 20 53 2D 42 4C 4F 4B 20 57 49 4A 5A 45 52 00 |. S-BLOK WIJZER.|
00000100: 19 09 C8 00 56 B2 35 33 32 34 38 20 3A 8F 20 56 |....V.53248 :. V|
00000110: 49 44 45 4F 20 43 48 49 50 00 3C 09 D2 00 52 53 |IDEO CHIP.<...RS|
00000120: B2 31 36 30 20 20 3A 8F 20 50 4F 4B 45 20 52 45 |.160 :. POKE RE|
00000130: 56 45 52 53 45 2D 42 4C 41 4E 43 4F 00 57 09 DC |VERSE-BLANCO.W..|
00000140: 00 53 50 B2 33 32 20 20 20 3A 8F 20 50 4F 4B 45 |.SP.32 :. POKE|
00000150: 20 42 4C 41 4E 43 4F 00 7B 09 E6 00 86 20 41 24 | BLANCO.{.... A$|
00000160: 28 36 32 29 2C 20 42 28 36 32 29 2C 20 42 24 28 |(62), B(62), B$(|
00000170: 36 32 29 2C 20 44 24 28 36 32 29 00 81 09 2C 01 |62), D$(62)...,.|
00000180: 3A 00 93 09 36 01 8F 20 49 4E 53 54 52 55 4B 54 |:...6.. INSTRUKT|
00000190: 49 45 53 00 99 09 3B 01 3A 00 B6 09 40 01 97 20 |IES...;.:...@.. |
000001A0: 35 33 32 37 32 2C 32 33 20 20 3A 8F 20 4F 4E 44 |53272,23 :. OND|
000001B0: 45 52 4B 41 53 54 00 D8 09 4A 01 99 22 93 22 3B |ERKAST...J..".";|
000001C0: A6 31 31 29 3B 22 12 D3 50 52 49 54 45 20 D4 45 |.11);"..PRITE .E|
000001D0: 4B 45 4E 48 55 4C 50 22 00 08 0A 54 01 99 22 11 |KENHULP"...T..".|
000001E0: 27 4E 20 D3 50 52 49 54 45 20 49 53 20 27 4E 20 |'N .PRITE IS 'N |
000001F0: 32 34 20 58 20 32 31 20 50 55 4E 54 53 20 54 45 |24 X 21 PUNTS TE|
00000200: 4B 45 4E 49 4E 47 2E 22 00 36 0A 5E 01 99 22 C5 |KENING.".6.^..".|
00000210: 4C 4B 45 20 4C 49 4A 4E 20 57 4F 52 44 54 20 4F |LKE LIJN WORDT O|
00000220: 50 47 45 42 4F 55 57 44 20 55 49 54 20 33 20 42 |PGEBOUWD UIT 3 B|
00000230: 59 54 45 53 2E 22 00 5F 0A 68 01 99 22 C4 55 53 |YTES."._.h..".US|
00000240: 20 5A 49 4A 4E 20 45 52 20 36 33 20 42 59 54 45 | ZIJN ER 63 BYTE|
00000250: 53 20 4E 4F 44 49 47 20 4F 4D 20 45 45 4E 22 00 |S NODIG OM EEN".|
00000260: 7B 0A 72 01 99 22 53 50 52 49 54 45 20 54 45 20 |{.r.."SPRITE TE |
00000270: 47 45 4E 45 52 45 52 45 4E 2E 22 00 9C 0A 86 01 |GENEREREN.".....|
00000280: 99 22 CD 45 54 20 44 49 54 20 50 52 4F 47 52 41 |.".ET DIT PROGRA|
00000290: 4D 4D 41 20 4B 41 4E 20 4A 45 3A 22 00 BB 0A 90 |MMA KAN JE:"....|
000002A0: 01 99 22 31 29 20 45 45 4E 20 53 50 52 49 54 45 |.."1) EEN SPRITE|
000002B0: 20 4F 4E 54 57 45 52 50 45 4E 22 00 DD 0A 9A 01 | ONTWERPEN".....|
000002C0: 99 22 32 29 20 4B 4C 45 55 52 20 45 4E 20 47 52 |."2) KLEUR EN GR|
000002D0: 4F 4F 54 54 45 20 4B 49 45 5A 45 4E 22 00 02 0B |OOTTE KIEZEN"...|
000002E0: A4 01 99 22 33 29 20 53 50 52 49 54 45 20 4F 56 |..."3) SPRITE OV|
000002F0: 45 52 20 53 43 48 45 52 4D 20 42 45 57 45 47 45 |ER SCHERM BEWEGE|
00000300: 4E 22 00 2D 0B AE 01 99 22 34 29 20 44 45 20 53 |N".-...."4) DE S|
00000310: 50 52 49 54 45 2D 47 45 47 45 56 45 4E 53 20 57 |PRITE-GEGEVENS W|
00000320: 4F 52 44 45 4E 20 4E 41 20 48 45 54 22 00 5C 0B |ORDEN NA HET".\.|
00000330: B8 01 99 22 20 20 20 53 4C 55 49 54 45 4E 20 47 |..." SLUITEN G|
00000340: 45 47 45 56 45 4E 20 49 4E 20 52 45 47 45 4C 20 |EGEVEN IN REGEL |
00000350: 36 30 30 30 30 2D 36 30 30 30 36 22 00 8B 0B C2 |60000-60006"....|
00000360: 01 99 22 11 C4 45 20 53 50 52 49 54 45 20 57 4F |.."..E SPRITE WO|
00000370: 52 44 54 20 4F 4F 4B 20 52 45 43 48 54 53 4F 4E |RDT OOK RECHTSON|
00000380: 44 45 52 20 4F 50 20 48 45 54 22 00 A2 0B CC 01 |DER OP HET".....|
00000390: 99 22 53 43 48 45 52 4D 20 47 45 54 4F 4F 4E 44 |."SCHERM GETOOND|
000003A0: 2E 22 00 B8 0B D6 01 99 22 11 D4 49 4B 20 45 45 |."......"..IK EE|
000003B0: 4E 20 54 4F 45 54 53 22 00 D1 0B E0 01 A1 20 59 |N TOETS"...... Y|
000003C0: 24 20 20 3A 8B 20 59 24 B2 22 22 20 89 20 34 38 |$ :. Y$."" . 48|
000003D0: 30 00 F7 0B EA 01 99 22 93 49 4E 56 4F 45 52 3A |0......".INVOER:|
000003E0: 20 31 29 20 12 53 50 52 49 54 45 20 4F 4E 54 57 | 1) .SPRITE ONTW|
000003F0: 45 52 50 45 4E 92 22 00 16 0C F9 01 99 22 27 4B |ERPEN."......"'K|
00000400: 4F 4C 4F 4D 20 3C 5A 2C 30 2F 31 3E 27 20 57 41 |OLOM <Z,0/1>' WA|
00000410: 41 52 49 4E 3A 22 00 3E 0C FE 01 99 22 20 20 20 |ARIN:".>...." |
00000420: 20 20 20 4B 4F 4C 4F 4D 20 49 53 20 4B 4F 4C 4F | KOLOM IS KOLO|
00000430: 4D 4C 45 54 54 45 52 20 28 41 2D 58 29 22 00 5F |MLETTER (A-X)"._|
00000440: 0C 03 02 99 22 20 20 20 20 20 20 5A 20 20 20 20 |...." Z |
00000450: 20 3D 20 4E 41 41 52 20 53 54 41 50 20 32 22 00 | = NAAR STAP 2".|
00000460: 82 0C 08 02 99 22 20 20 20 20 20 20 30 2F 31 20 |....." 0/1 |
00000470: 20 20 3D 20 52 45 53 50 2E 20 55 49 54 2F 41 41 | = RESP. UIT/AA|
00000480: 4E 22 00 9D 0C 0D 02 99 22 27 4C 45 54 54 45 52 |N"......"'LETTER|
00000490: 20 56 41 4E 20 44 45 20 52 49 4A 27 22 00 CA 0C | VAN DE RIJ'"...|
000004A0: 12 02 99 22 11 49 4E 56 4F 45 52 3A 20 32 29 20 |...".INVOER: 2) |
000004B0: 12 53 50 52 49 54 45 20 47 52 4F 4F 54 54 45 20 |.SPRITE GROOTTE |
000004C0: 45 4E 20 4B 4C 45 55 52 92 22 00 F5 0C 1C 02 99 |EN KLEUR."......|
000004D0: 22 27 4B 4C 45 55 52 20 30 2D 31 34 2C 20 4D 41 |"'KLEUR 0-14, MA|
000004E0: 41 54 20 53 2F 4C 2C 20 58 2F 59 27 20 57 41 41 |AT S/L, X/Y' WAA|
000004F0: 52 49 4E 3A 22 00 1A 0D 21 02 99 22 20 20 20 20 |RIN:"...!.." |
00000500: 20 20 4B 4C 45 55 52 20 3D 20 30 2D 31 34 20 56 | KLEUR = 0-14 V|
00000510: 4F 4F 52 20 4B 4C 45 55 52 22 00 3B 0D 26 02 99 |OOR KLEUR".;.&..|
00000520: 22 20 20 20 20 20 20 53 2F 4C 20 20 20 3D 20 53 |" S/L = S|
00000530: 4D 41 4C 4C 2F 4C 41 52 47 45 22 00 61 0D 2B 02 |MALL/LARGE".a.+.|
00000540: 99 22 20 20 20 20 20 20 58 2F 59 20 20 20 3D 20 |." X/Y = |
00000550: 58 2D 20 4F 46 20 59 2D 52 49 43 48 54 49 4E 47 |X- OF Y-RICHTING|
00000560: 22 00 80 0D 30 02 99 22 54 49 4B 20 3C 30 2C 30 |"...0.."TIK <0,0|
00000570: 2C 30 3E 20 56 4F 4F 52 20 53 54 41 50 20 33 22 |,0> VOOR STAP 3"|
00000580: 00 A4 0D 35 02 99 22 11 49 4E 56 4F 45 52 3A 20 |...5..".INVOER: |
00000590: 33 29 20 12 53 50 52 49 54 45 20 42 45 57 45 47 |3) .SPRITE BEWEG|
000005A0: 45 4E 92 22 00 CB 0D 36 02 99 22 27 47 45 42 52 |EN."...6.."'GEBR|
000005B0: 55 49 4B 20 43 55 52 53 4F 52 54 4F 45 54 53 45 |UIK CURSORTOETSE|
000005C0: 4E 2C 20 45 3D 45 49 4E 44 27 22 00 E2 0D 3A 02 |N, E=EIND'"...:.|
000005D0: 99 22 11 11 D4 49 4B 20 45 45 4E 20 54 4F 45 54 |."...IK EEN TOET|
000005E0: 53 22 00 FB 0D 3F 02 A1 20 59 24 20 20 3A 8B 20 |S"...?.. Y$ :. |
000005F0: 59 24 B2 22 22 20 89 20 35 37 35 00 04 0E 41 02 |Y$."" . 575...A.|
00000600: 99 22 93 22 00 20 0E 44 02 97 20 35 33 32 37 32 |.".". .D.. 53272|
00000610: 2C 32 31 20 3A 8F 20 42 4F 56 45 4E 4B 41 53 54 |,21 :. BOVENKAST|
00000620: 00 26 0E 4E 02 3A 00 3A 0E 58 02 8F 20 4D 41 41 |.&.N.:.:.X.. MAA|
00000630: 4B 20 54 45 4B 45 4E 49 4E 47 00 40 0E 62 02 3A |K TEKENING.@.b.:|
00000640: 00 63 0E 6C 02 81 20 49 B2 30 20 A4 20 36 32 20 |.c.l.. I.0 . 62 |
00000650: 3A 8F 20 44 41 54 41 20 4E 41 41 52 20 42 4C 4F |:. DATA NAAR BLO|
00000660: 4B 31 33 00 6B 0E 76 02 87 20 41 00 88 0E 80 02 |K13.k.v.. A.....|
00000670: 97 20 38 33 32 AA 49 2C 41 20 20 3A 8F 20 56 55 |. 832.I,A :. VU|
00000680: 4C 20 42 4C 4F 4B 31 33 00 AD 0E 85 02 41 24 28 |L BLOK13.....A$(|
00000690: 49 29 B2 22 30 30 30 30 30 30 30 30 22 20 3A 8F |I)."00000000" :.|
000006A0: 20 53 54 41 52 54 57 41 41 52 44 45 4E 00 C2 0E | STARTWAARDEN...|
000006B0: 86 02 44 24 28 49 29 B2 22 20 20 20 20 20 20 20 |..D$(I)." |
000006C0: 20 22 00 DE 0E 87 02 42 28 49 29 B2 30 20 20 20 | ".....B(I).0 |
000006D0: 20 3A 42 24 28 49 29 B2 22 20 20 20 30 22 00 E6 | :B$(I)." 0"..|
000006E0: 0E 8A 02 82 20 49 00 FD 0E 94 02 83 20 30 2C 30 |.... I...... 0,0|
000006F0: 2C 30 20 3A 8F 20 4C 49 4A 4E 20 20 31 00 14 0F |,0 :. LIJN 1...|
00000700: 9E 02 83 20 30 2C 30 2C 30 20 3A 8F 20 4C 49 4A |... 0,0,0 :. LIJ|
00000710: 4E 20 20 32 00 2B 0F A8 02 83 20 30 2C 30 2C 30 |N 2.+.... 0,0,0|
00000720: 20 3A 8F 20 4C 49 4A 4E 20 20 33 00 42 0F B2 02 | :. LIJN 3.B...|
00000730: 83 20 30 2C 30 2C 30 20 3A 8F 20 4C 49 4A 4E 20 |. 0,0,0 :. LIJN |
00000740: 20 34 00 59 0F BC 02 83 20 30 2C 30 2C 30 20 3A | 4.Y.... 0,0,0 :|
00000750: 8F 20 4C 49 4A 4E 20 20 35 00 70 0F C6 02 83 20 |. LIJN 5.p.... |
00000760: 30 2C 30 2C 30 20 3A 8F 20 4C 49 4A 4E 20 20 36 |0,0,0 :. LIJN 6|
00000770: 00 87 0F D0 02 83 20 30 2C 30 2C 30 20 3A 8F 20 |...... 0,0,0 :. |
00000780: 4C 49 4A 4E 20 20 37 00 9E 0F DA 02 83 20 30 2C |LIJN 7...... 0,|
00000790: 30 2C 30 20 3A 8F 20 4C 49 4A 4E 20 20 38 00 B5 |0,0 :. LIJN 8..|
000007A0: 0F E4 02 83 20 30 2C 30 2C 30 20 3A 8F 20 4C 49 |.... 0,0,0 :. LI|
000007B0: 4A 4E 20 20 39 00 CC 0F EE 02 83 20 30 2C 30 2C |JN 9...... 0,0,|
000007C0: 30 20 3A 8F 20 4C 49 4A 4E 20 31 30 00 E3 0F F8 |0 :. LIJN 10....|
000007D0: 02 83 20 30 2C 30 2C 30 20 3A 8F 20 4C 49 4A 4E |.. 0,0,0 :. LIJN|
000007E0: 20 31 31 00 FA 0F 02 03 83 20 30 2C 30 2C 30 20 | 11...... 0,0,0 |
000007F0: 3A 8F 20 4C 49 4A 4E 20 31 32 00 11 10 0C 03 83 |:. LIJN 12......|
00000800: 20 30 2C 30 2C 30 20 3A 8F 20 4C 49 4A 4E 20 31 | 0,0,0 :. LIJN 1|
00000810: 33 00 28 10 16 03 83 20 30 2C 30 2C 30 20 3A 8F |3.(.... 0,0,0 :.|
00000820: 20 4C 49 4A 4E 20 31 34 00 3F 10 20 03 83 20 30 | LIJN 14.?. .. 0|
00000830: 2C 30 2C 30 20 3A 8F 20 4C 49 4A 4E 20 31 35 00 |,0,0 :. LIJN 15.|
00000840: 56 10 2A 03 83 20 30 2C 30 2C 30 20 3A 8F 20 4C |V.*.. 0,0,0 :. L|
00000850: 49 4A 4E 20 31 36 00 6D 10 34 03 83 20 30 2C 30 |IJN 16.m.4.. 0,0|
00000860: 2C 30 20 3A 8F 20 4C 49 4A 4E 20 31 37 00 84 10 |,0 :. LIJN 17...|
00000870: 3E 03 83 20 30 2C 30 2C 30 20 3A 8F 20 4C 49 4A |>.. 0,0,0 :. LIJ|
00000880: 4E 20 31 38 00 9B 10 48 03 83 20 30 2C 30 2C 30 |N 18...H.. 0,0,0|
00000890: 20 3A 8F 20 4C 49 4A 4E 20 31 39 00 B2 10 52 03 | :. LIJN 19...R.|
000008A0: 83 20 30 2C 30 2C 30 20 3A 8F 20 4C 49 4A 4E 20 |. 0,0,0 :. LIJN |
000008B0: 32 30 00 C9 10 5C 03 83 20 30 2C 30 2C 30 20 3A |20...\.. 0,0,0 :|
000008C0: 8F 20 4C 49 4A 4E 20 32 31 00 E6 10 66 03 97 20 |. LIJN 21...f.. |
000008D0: 53 44 2C 31 33 20 20 3A 8F 20 53 30 20 57 41 41 |SD,13 :. S0 WAA|
000008E0: 52 20 44 41 54 41 00 05 11 67 03 97 20 56 AA 31 |R DATA...g.. V.1|
000008F0: 36 2C 31 20 3A 8F 20 53 30 20 4D 53 42 20 58 2D |6,1 :. S0 MSB X-|
00000900: 43 4F 4F 52 44 00 1E 11 68 03 97 20 56 AA 30 2C |COORD...h.. V.0,|
00000910: 35 35 20 3A 8F 20 53 30 20 4C 53 42 20 58 00 37 |55 :. S0 LSB X.7|
00000920: 11 69 03 97 20 56 AA 31 2C 32 32 37 3A 8F 20 53 |.i.. V.1,227:. S|
00000930: 30 20 4C 53 42 20 59 00 56 11 6A 03 97 20 56 AA |0 LSB Y.V.j.. V.|
00000940: 32 31 2C 31 20 3A 8F 20 53 30 20 56 45 52 53 43 |21,1 :. S0 VERSC|
00000950: 48 49 4A 4E 45 4E 00 6B 11 6B 03 97 20 56 AA 33 |HIJNEN.k.k.. V.3|
00000960: 39 2C 37 20 3A 8F 20 47 45 45 4C 00 71 11 6C 03 |9,7 :. GEEL.q.l.|
00000970: 3A 00 94 11 70 03 41 5A 24 B2 22 41 42 43 44 45 |:...p.AZ$."ABCDE|
00000980: 46 47 48 49 4A 4B 4C 4D 4E 4F 50 51 52 53 54 55 |FGHIJKLMNOPQRSTU|
00000990: 56 57 58 22 00 B3 11 75 03 99 22 93 20 20 22 3B |VWX"...u..". ";|
000009A0: 41 5A 24 3B 22 20 3D 4B 4F 4C 4F 4D 4C 45 54 54 |AZ$;" =KOLOMLETT|
000009B0: 45 52 22 00 C2 11 84 03 81 20 49 B2 31 20 A4 20 |ER"...... I.1 . |
000009C0: 32 31 00 D8 11 8E 03 99 20 CA 28 41 5A 24 2C 49 |21...... .(AZ$,I|
000009D0: 2C 31 29 3B 22 20 22 3B 00 07 12 98 03 99 20 44 |,1);" ";...... D|
000009E0: 24 28 28 49 AB 31 29 AC 33 29 3B 44 24 28 28 49 |$((I.1).3);D$((I|
000009F0: AB 31 29 AC 33 AA 31 29 3B 44 24 28 28 49 AB 31 |.1).3.1);D$((I.1|
00000A00: 29 AC 33 AA 32 29 3B 00 35 12 9D 03 99 20 42 24 |).3.2);.5.... B$|
00000A10: 28 28 49 AB 31 29 AC 33 29 3B 42 24 28 28 49 AB |((I.1).3);B$((I.|
00000A20: 31 29 AC 33 AA 31 29 3B 42 24 28 28 49 AB 31 29 |1).3.1);B$((I.1)|
00000A30: AC 33 AA 32 29 00 3D 12 A2 03 82 20 49 00 5A 12 |.3.2).=.... I.Z.|
00000A40: E8 03 8F 20 2A 2A 2A 20 4F 4E 54 57 45 52 50 20 |... *** ONTWERP |
00000A50: 46 49 47 55 55 52 20 2A 2A 2A 00 7D 12 F2 03 4F |FIGUUR ***.}...O|
00000A60: B2 31 3A 4F 24 B2 22 31 22 3A 8F 20 20 44 45 46 |.1:O$."1":. DEF|
00000A70: 41 55 4C 54 3A 20 5A 45 54 20 41 41 4E 00 9F 12 |AULT: ZET AAN...|
00000A80: F7 03 99 22 4B 4F 4C 4F 4D 20 3C 5A 2C 30 2F 31 |..."KOLOM <Z,0/1|
00000A90: 3E 20 20 3D 20 20 20 20 20 9D 9D 9D 9D 9D 22 00 |> = .....".|
00000AA0: B8 12 FC 03 A1 20 4C 24 3A 20 8B 20 4C 24 B2 22 |..... L$: . L$."|
00000AB0: 22 20 A7 20 31 30 32 30 00 CC 12 FD 03 8B 20 4C |" . 1020...... L|
00000AC0: 24 B2 22 5A 22 20 A7 20 32 30 30 30 00 F3 12 FE |$."Z" . 2000....|
00000AD0: 03 8B 20 4C 24 B2 22 30 22 20 A7 20 4F B2 30 3A |.. L$."0" . O.0:|
00000AE0: 4F 24 B2 22 30 22 3A 99 22 91 91 22 3A 89 20 31 |O$."0":."..":. 1|
00000AF0: 30 31 35 00 1A 13 FF 03 8B 20 4C 24 B2 22 31 22 |015...... L$."1"|
00000B00: 20 A7 20 4F B2 31 3A 4F 24 B2 22 31 22 3A 99 22 | . O.1:O$."1":."|
00000B10: 91 91 22 3A 89 20 31 30 31 35 00 45 13 00 04 4E |..":. 1015.E...N|
00000B20: B2 C6 28 4C 24 29 AB 36 34 3A 8B 28 4E B3 31 29 |..(L$).64:.(N.1)|
00000B30: B0 28 4E B1 32 34 29 A7 20 99 22 91 91 22 3A 89 |.(N.24). ."..":.|
00000B40: 20 31 30 31 35 00 68 13 01 04 99 22 91 4C 45 54 | 1015.h....".LET|
00000B50: 54 45 52 20 56 2F 44 20 52 49 4A 20 3D 20 20 20 |TER V/D RIJ = |
00000B60: 20 20 9D 9D 9D 9D 9D 22 00 81 13 02 04 A1 20 4E | ....."...... N|
00000B70: 24 3A 20 8B 20 4E 24 B2 22 22 20 A7 20 31 30 32 |$: . N$."" . 102|
00000B80: 36 00 90 13 03 04 4E B2 C6 28 4E 24 29 AB 36 34 |6.....N..(N$).64|
00000B90: 00 AA 13 04 04 8B 20 28 4E B3 31 29 B0 28 4E B1 |...... (N.1).(N.|
00000BA0: 32 31 29 20 A7 20 31 30 32 35 00 C5 13 06 04 53 |21) . 1025.....S|
00000BB0: 51 55 41 52 45 B2 4E AC 34 30 AA 32 AA C6 28 4C |QUARE.N.40.2..(L|
00000BC0: 24 29 AB 36 35 00 E1 13 10 04 97 20 43 AA 53 51 |$).65...... C.SQ|
00000BD0: 55 41 52 45 2C 31 34 20 20 3A 8F 20 4B 4C 45 55 |UARE,14 :. KLEU|
00000BE0: 52 00 FB 13 1A 04 8B 20 4F B2 30 20 A7 20 97 20 |R...... O.0 . . |
00000BF0: 53 AA 53 51 55 41 52 45 2C 33 32 00 16 14 24 04 |S.SQUARE,32...$.|
00000C00: 8B 20 4F B2 31 20 A7 20 97 20 53 AA 53 51 55 41 |. O.1 . . S.SQUA|
00000C10: 52 45 2C 31 36 30 00 2A 14 2E 04 8F 20 56 45 52 |RE,160.*.... VER|
00000C20: 41 4E 44 45 52 20 44 41 54 41 00 4B 14 38 04 42 |ANDER DATA.K.8.B|
00000C30: 59 54 45 B2 28 4E AB 31 29 AC 33 AA B5 28 28 C6 |YTE.(N.1).3..((.|
00000C40: 28 4C 24 29 AB 36 35 29 AD 38 29 00 6B 14 42 04 |(L$).65).8).k.B.|
00000C50: 51 B2 B5 28 28 53 51 55 41 52 45 AB 32 29 AD 38 |Q..((SQUARE.2).8|
00000C60: 29 AC 38 AA 32 20 20 3A 42 B2 30 00 7B 14 4C 04 |).8.2 :B.0.{.L.|
00000C70: 81 20 49 B2 51 20 A4 20 51 AA 37 00 88 14 56 04 |. I.Q . Q.7...V.|
00000C80: 46 B2 C2 28 53 AA 49 29 00 A8 14 60 04 8B 20 46 |F..(S.I)...`.. F|
00000C90: B2 31 36 30 20 A7 20 4F 24 B2 22 31 22 20 3A 4F |.160 . O$."1" :O|
00000CA0: 4F 24 B2 22 12 20 92 22 00 C8 14 6A 04 8B 20 46 |O$.". ."...j.. F|
00000CB0: B2 33 32 20 20 A7 20 4F 24 B2 22 30 22 20 3A 4F |.32 . O$."0" :O|
00000CC0: 4F 24 B2 22 92 20 92 22 00 E2 14 74 04 41 24 B2 |O$.". ."...t.A$.|
00000CD0: C8 28 41 24 28 42 59 54 45 29 2C 49 AB 51 29 AA |.(A$(BYTE),I.Q).|
00000CE0: 4F 24 00 FE 14 79 04 41 24 B2 4F 24 AA C9 28 41 |O$...y.A$.O$..(A|
00000CF0: 24 28 42 59 54 45 29 2C 51 AA 37 AB 49 29 00 1D |$(BYTE),Q.7.I)..|
00000D00: 15 7E 04 44 24 B2 C8 28 44 24 28 42 59 54 45 29 |.~.D$..(D$(BYTE)|
00000D10: 2C 28 49 AB 51 29 AC 33 29 AA 4F 4F 24 00 3D 15 |,(I.Q).3).OO$.=.|
00000D20: 88 04 44 24 B2 44 24 AA C9 28 44 24 28 42 59 54 |..D$.D$..(D$(BYT|
00000D30: 45 29 2C 28 51 AA 37 AB 49 29 AC 33 29 00 59 15 |E),(Q.7.I).3).Y.|
00000D40: 92 04 41 24 28 42 59 54 45 29 B2 41 24 20 20 20 |..A$(BYTE).A$ |
00000D50: 3A 8F 20 42 49 4E 41 49 52 00 77 15 97 04 44 24 |:. BINAIR.w...D$|
00000D60: 28 42 59 54 45 29 B2 44 24 20 20 20 3A 8F 20 54 |(BYTE).D$ :. T|
00000D70: 45 4B 45 4E 49 4E 47 00 9B 15 9C 04 42 B2 32 AE |EKENING.....B.2.|
00000D80: 28 51 AA 37 AB 49 29 AC C5 28 4F 24 29 AA 42 20 |(Q.7.I)..(O$).B |
00000D90: 3A 8F 20 4E 55 4D 45 52 49 45 4B 00 A3 15 A6 04 |:. NUMERIEK.....|
00000DA0: 82 20 49 00 B1 15 B0 04 42 28 42 59 54 45 29 B2 |. I.....B(BYTE).|
00000DB0: 42 00 CE 15 BA 04 42 24 28 42 59 54 45 29 B2 C9 |B.....B$(BYTE)..|
00000DC0: 28 22 20 20 20 22 AA C4 28 42 29 2C 34 29 00 E5 |(" "..(B),4)..|
00000DD0: 15 BF 04 42 24 B2 C9 28 22 20 20 20 22 AA C4 28 |...B$..(" "..(|
00000DE0: 42 29 2C 33 29 00 F9 15 C4 04 44 31 B2 C5 28 CA |B),3).....D1..(.|
00000DF0: 28 42 24 2C 31 2C 31 29 29 00 0D 16 CE 04 44 32 |(B$,1,1)).....D2|
00000E00: B2 C5 28 CA 28 42 24 2C 32 2C 31 29 29 00 21 16 |..(.(B$,2,1)).!.|
00000E10: D8 04 44 33 B2 C5 28 CA 28 42 24 2C 33 2C 31 29 |..D3..(.(B$,3,1)|
00000E20: 29 00 44 16 E2 04 44 B2 4E AC 34 30 AA 32 36 AA |).D...D.N.40.26.|
00000E30: 28 42 59 54 45 AB B5 28 42 59 54 45 AD 33 29 AC |(BYTE..(BYTE.3).|
00000E40: 33 29 AC 34 00 62 16 EC 04 97 20 43 AA 44 AA 31 |3).4.b.... C.D.1|
00000E50: 2C 31 34 20 3A 97 20 53 AA 44 AA 31 2C 34 38 AA |,14 :. S.D.1,48.|
00000E60: 44 31 00 80 16 F6 04 97 20 43 AA 44 AA 32 2C 31 |D1...... C.D.2,1|
00000E70: 34 20 3A 97 20 53 AA 44 AA 32 2C 34 38 AA 44 32 |4 :. S.D.2,48.D2|
00000E80: 00 9E 16 00 05 97 20 43 AA 44 AA 33 2C 31 34 20 |...... C.D.3,14 |
00000E90: 3A 97 20 53 AA 44 AA 33 2C 34 38 AA 44 33 00 B5 |:. S.D.3,48.D3..|
00000EA0: 16 0A 05 97 20 38 33 32 AA 42 59 54 45 2C 42 28 |.... 832.BYTE,B(|
00000EB0: 42 59 54 45 29 00 C0 16 14 05 97 20 53 50 2C 31 |BYTE)...... SP,1|
00000EC0: 00 E9 16 19 05 99 22 91 20 20 20 20 20 20 20 20 |......". |
00000ED0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000EE0: 20 20 20 20 20 20 20 91 22 00 F6 16 1E 05 CB 20 | ."...... |
00000EF0: A4 20 31 30 31 35 00 FC 16 D0 07 3A 00 24 17 D5 |. 1015.....:.$..|
00000F00: 07 8F 20 41 4E 44 45 52 45 20 4B 4C 45 55 52 2C |.. ANDERE KLEUR,|
00000F10: 20 47 52 4F 4F 54 54 45 20 45 4E 20 52 49 43 48 | GROOTTE EN RICH|
00000F20: 54 49 4E 47 00 4D 17 DA 07 99 22 91 20 20 20 20 |TING.M....". |
00000F30: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00000F40: 20 20 20 20 20 20 20 20 20 20 20 91 22 00 79 17 | .".y.|
00000F50: E4 07 85 22 4B 4C 45 55 52 20 30 2D 31 34 2C 20 |..."KLEUR 0-14, |
00000F60: 4D 41 41 54 20 53 2F 4C 2C 20 58 2F 59 22 3B 43 |MAAT S/L, X/Y";C|
00000F70: 24 2C 53 49 24 2C 44 49 24 00 94 17 E5 07 8F 20 |$,SI$,DI$...... |
00000F80: 54 45 53 54 20 4F 50 20 41 4C 4C 45 45 4E 20 5A |TEST OP ALLEEN Z|
00000F90: 57 41 52 54 00 B2 17 E9 07 8B 20 43 24 B2 22 30 |WART...... C$."0|
00000FA0: 22 20 AF 20 53 49 24 B2 22 30 22 20 89 20 33 30 |" . SI$."0" . 30|
00000FB0: 30 30 00 BF 17 EE 07 4F 43 B2 C5 28 43 24 29 00 |00.....OC..(C$).|
00000FC0: D7 17 F8 07 97 20 56 AA 33 39 2C 4F 43 20 20 3A |..... V.39,OC :|
00000FD0: 8F 20 4B 4C 45 55 52 00 FA 17 F9 07 8B 20 53 49 |. KLEUR...... SI|
00000FE0: 24 B2 22 53 22 20 AF 20 44 49 24 B2 22 58 22 20 |$."S" . DI$."X" |
00000FF0: A7 20 97 20 56 AA 32 39 2C 30 00 1D 18 FA 07 8B |. . V.29,0......|
00001000: 20 53 49 24 B2 22 4C 22 20 AF 20 44 49 24 B2 22 | SI$."L" . DI$."|
00001010: 58 22 20 A7 20 97 20 56 AA 32 39 2C 31 00 40 18 |X" . . V.29,1.@.|
00001020: FB 07 8B 20 53 49 24 B2 22 53 22 20 AF 20 44 49 |... SI$."S" . DI|
00001030: 24 B2 22 59 22 20 A7 20 97 20 56 AA 32 33 2C 30 |$."Y" . . V.23,0|
00001040: 00 63 18 FC 07 8B 20 53 49 24 B2 22 4C 22 20 AF |.c.... SI$."L" .|
00001050: 20 44 49 24 B2 22 59 22 20 A7 20 97 20 56 AA 32 | DI$."Y" . . V.2|
00001060: 33 2C 31 00 92 18 02 08 99 22 91 20 20 20 20 20 |3,1......". |
00001070: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001080: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
00001090: 91 22 00 9D 18 0C 08 89 20 32 30 32 30 00 A3 18 |."...... 2020...|
000010A0: B8 0B 3A 00 B7 18 BD 0B 8F 20 42 45 57 45 45 47 |..:...... BEWEEG|
000010B0: 20 53 50 52 49 54 45 00 E0 18 C2 0B 99 22 91 20 | SPRITE......". |
000010C0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | |
000010D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 91 22 | ."|
000010E0: 00 0E 19 CC 0B 99 22 47 45 42 52 55 49 4B 20 43 |......"GEBRUIK C|
000010F0: 55 52 53 4F 52 54 4F 45 54 53 45 4E 2E 20 45 3D |URSORTOETSEN. E=|
00001100: 45 49 4E 44 45 20 20 20 20 9D 9D 9D 9D 22 00 23 |EINDE ....".#|
00001110: 19 D1 0B 59 B2 32 32 37 20 20 3A 58 B2 32 35 36 |...Y.227 :X.256|
00001120: AA 35 35 00 2C 19 D6 0B A1 20 41 24 00 40 19 DB |.55.,.... A$.@..|
00001130: 0B 8B 20 41 24 B2 22 45 22 20 89 20 34 30 30 30 |.. A$."E" . 4000|
00001140: 00 55 19 E0 0B 8B 20 41 24 B2 22 11 22 20 A7 20 |.U.... A$."." . |
00001150: 59 B2 59 AA 31 00 6A 19 EA 0B 8B 20 41 24 B2 22 |Y.Y.1.j.... A$."|
00001160: 91 22 20 A7 20 59 B2 59 AB 31 00 7F 19 F4 0B 8B |." . Y.Y.1......|
00001170: 20 41 24 B2 22 1D 22 20 A7 20 58 B2 58 AA 31 00 | A$."." . X.X.1.|
00001180: 94 19 FE 0B 8B 20 41 24 B2 22 9D 22 20 A7 20 58 |..... A$."." . X|
00001190: B2 58 AB 31 00 B9 19 08 0C 8B 20 58 B3 32 34 20 |.X.1...... X.24 |
000011A0: A7 20 58 B2 32 34 20 3A 8F 20 42 4C 49 4A 46 20 |. X.24 :. BLIJF |
000011B0: 4F 50 20 53 43 48 45 52 4D 00 CD 19 12 0C 8B 20 |OP SCHERM...... |
000011C0: 58 B1 33 32 30 20 A7 20 58 B2 33 32 30 00 DF 19 |X.320 . X.320...|
000011D0: 1C 0C 8B 20 59 B3 34 30 20 A7 20 59 B2 34 30 00 |... Y.40 . Y.40.|
000011E0: F3 19 26 0C 8B 20 59 B1 32 34 30 20 A7 20 59 B2 |..&.. Y.240 . Y.|
000011F0: 32 34 30 00 10 1A 6C 0C 97 20 56 AA 31 36 2C B5 |240...l.. V.16,.|
00001200: 28 58 AD 32 35 36 29 20 3A 8F 20 4D 53 42 20 58 |(X.256) :. MSB X|
00001210: 00 30 1A 76 0C 97 20 56 2C 58 AB B5 28 58 AD 32 |.0.v.. V,X..(X.2|
00001220: 35 36 29 AC 32 35 36 20 3A 8F 20 4C 53 42 20 58 |56).256 :. LSB X|
00001230: 00 51 1A 80 0C 97 20 56 AA 31 2C 59 20 20 20 20 |.Q.... V.1,Y |
00001240: 20 20 20 20 20 20 20 3A 8F 20 59 2D 43 4F 4F 52 | :. Y-COOR|
00001250: 44 00 5C 1A 8A 0C 89 20 33 30 33 30 00 62 1A A0 |D.\.... 3030.b..|
00001260: 0F 3A 00 6F 1A A5 0F 8F 20 4F 50 54 49 45 53 00 |.:.o.... OPTIES.|
00001270: 75 1A A6 0F 3A 00 88 1A AA 0F 99 22 93 12 55 20 |u...:......"..U |
00001280: 4B 55 4E 54 3A 92 11 22 00 A3 1A B4 0F 99 22 31 |KUNT:.."......"1|
00001290: 20 4F 50 4E 49 45 55 57 20 4F 4E 54 57 45 52 50 | OPNIEUW ONTWERP|
000012A0: 45 4E 22 00 CE 1A BE 0F 99 22 32 20 53 4C 55 49 |EN"......"2 SLUI|
000012B0: 54 45 4E 20 4D 45 54 20 53 50 52 49 54 45 20 49 |TEN MET SPRITE I|
000012C0: 4E 20 36 30 30 30 30 2D 36 30 30 30 36 22 00 E1 |N 60000-60006"..|
000012D0: 1A D2 0F 99 22 4B 49 45 53 20 31 20 4F 46 20 32 |...."KIES 1 OF 2|
000012E0: 22 00 FA 1A DC 0F A1 20 41 24 3A 20 8B 20 41 24 |"...... A$: . A$|
000012F0: B2 22 22 20 A7 20 34 30 36 30 00 0F 1B E6 0F 8B |."" . 4060......|
00001300: 20 41 24 B2 22 31 22 20 A7 20 89 20 38 37 30 00 | A$."1" . . 870.|
00001310: 26 1B F0 0F 8B 20 41 24 B3 B1 22 32 22 20 A7 20 |&.... A$.."2" . |
00001320: 89 20 34 30 30 30 00 2C 1B 88 13 3A 00 43 1B 92 |. 4000.,...:.C..|
00001330: 13 8F 20 53 43 48 52 49 4A 46 20 47 45 47 45 56 |.. SCHRIJF GEGEV|
00001340: 45 4E 53 00 49 1B 97 13 3A 00 54 1B 9C 13 99 22 |ENS.I...:.T...."|
00001350: 93 11 11 22 00 62 1B 8E 17 81 20 49 B2 31 20 A4 |...".b.... I.1 .|
00001360: 20 37 00 79 1B 98 17 99 36 30 30 30 30 AA 28 49 | 7.y....60000.(I|
00001370: AB 31 29 3B 22 44 C1 22 3B 00 87 1B A2 17 81 20 |.1);"D.";...... |
00001380: 4A B2 31 20 A4 20 39 00 9F 1B AC 17 99 20 42 28 |J.1 . 9...... B(|
00001390: 28 49 AB 31 29 AC 39 AA 28 4A AB 31 29 29 3B 00 |(I.1).9.(J.1));.|
000013A0: B2 1B B6 17 8B 20 4A B3 39 20 A7 20 99 20 22 2C |..... J.9 . . ",|
000013B0: 22 3B 00 BA 1B C0 17 82 20 4A 00 C0 1B C5 17 99 |";...... J......|
000013C0: 00 C8 1B CA 17 82 20 49 00 D8 1B D4 17 8F 20 50 |...... I...... P|
000013D0: 52 49 4E 54 22 13 22 3B 00 03 1C DE 17 8F 20 50 |RINT".";...... P|
000013E0: 4F 4B 45 20 31 39 38 2C 37 20 3A 52 45 4D 20 23 |OKE 198,7 :REM #|
000013F0: 20 4B 41 52 53 20 49 4E 20 4B 2F 42 20 42 55 46 | KARS IN K/B BUF|
00001400: 46 45 52 00 24 1C E8 17 81 20 49 B2 36 33 31 20 |FER.$.... I.631 |
00001410: A4 20 36 33 37 20 20 3A 8F 20 4B 2F 42 20 42 55 |. 637 :. K/B BU|
00001420: 46 46 45 52 00 34 1C F2 17 8F 20 50 4F 4B 45 20 |FFER.4.... POKE |
00001430: 49 2C 31 33 00 3C 1C F7 17 82 20 49 00 42 1C FC |I,13.<.... I.B..|
00001440: 17 80 00 00 00 |..... |
....D.:.).N.. SPRITE-TEKENHULP VOOR CBM6
4./.X.:.R.... VAN C.L. EMBERLEY (23/01/8
3).Q.... UIT COMPUTING APRIL 1983......
CC> AANGEPASTE VERSIE <CC...... INIT VAN
VASTE VARIABELEN... .:.M...S.1024 :. S
CHERM.....C.55296 :. KLEUR.....SD.2040 :
. S-BLOK WIJZER...H.V.53248 :. VIDEO CHI
P.<.R.RS.160 :. POKE REVERSE-BLANCO.W..
.SP.32 :. POKE BLANCO.{.... A$(62), B(
62), B$(62), D$(62)...,.:...6.. INSTRUKT
IES...;.:...@.. 53272,23 :. ONDERKAST.X
.J..".";.11);".SPRITE TEKENHULP"...T..".
'N SPRITE IS 'N 24 X 21 PUNTS TEKENING."
.6.^.."ELKE LIJN WORDT OPGEBOUWD UIT 3 B
YTES."._.H.."DUS ZIJN ER 63 BYTES NODIG
OM EEN".{.R.."SPRITE TE GENEREREN.".....
."MET DIT PROGRAMMA KAN JE:"......"1) EE
N SPRITE ONTWERPEN"......"2) KLEUR EN GR
OOTTE KIEZEN"......"3) SPRITE OVER SCHER
M BEWEGEN".-...."4) DE SPRITE-GEGEVENS W
ORDEN NA HET".\...." SLUITEN GEGEVEN I
N REGEL 60000-60006"...B..".DE SPRITE WO
RDT OOK RECHTSONDER OP HET"...L.."SCHERM
GETOOND."...V..".TIK EEN TOETS".Q.... Y
$ :. Y$."" . 480......".INVOER: 1) .SPR
ITE ONTWERPEN."......"'KOLOM <Z,0/1>' WA
ARIN:".>...." KOLOM IS KOLOMLETTER
(A-X)"._...." Z = NAAR STAP 2".
....." 0/1 = RESP. UIT/AAN"......
"'LETTER VAN DE RIJ'".J....".INVOER: 2)
.SPRITE GROOTTE EN KLEUR."......"'KLEUR
0-14, MAAT S/L, X/Y' WAARIN:"...!.."
KLEUR = 0-14 VOOR KLEUR".;.&.." S
/L = SMALL/LARGE".A.+.." X/Y =
X- OF Y-RICHTING"...0.."TIK <0,0,0> VOOR
STAP 3"...5..".INVOER: 3) .SPRITE BEWEG
EN.".K.6.."'GEBRUIK CURSORTOETSEN, E=EIN
D'"...:.."..TIK EEN TOETS"...?.. Y$ :.
Y$."" . 575...A..".". .D.. 53272,21 :. B
OVENKAST.&.N.:.:.X.. MAAK TEKENING.@.B.:
.C.L.. I.0 . 62 :. DATA NAAR BLOK13.K.V.
. A...... 832.I,A :. VUL BLOK13.....A$(
I)."00000000" :. STARTWAARDEN.B...D$(I).
" ".....B(I).0 :B$(I)." 0"..
.... I...... 0,0,0 :. LIJN 1...... 0,0,
0 :. LIJN 2.+.... 0,0,0 :. LIJN 3.B...
. 0,0,0 :. LIJN 4.Y.... 0,0,0 :. LIJN
5.P.F.. 0,0,0 :. LIJN 6...P.. 0,0,0 :.
LIJN 7...Z.. 0,0,0 :. LIJN 8...... 0,0
,0 :. LIJN 9.L.... 0,0,0 :. LIJN 10....
.. 0,0,0 :. LIJN 11...... 0,0,0 :. LIJN
12...... 0,0,0 :. LIJN 13.(.... 0,0,0 :.
LIJN 14.?. .. 0,0,0 :. LIJN 15.V.*.. 0,
0,0 :. LIJN 16.M.4.. 0,0,0 :. LIJN 17...
>.. 0,0,0 :. LIJN 18...H.. 0,0,0 :. LIJN
19...R.. 0,0,0 :. LIJN 20.I.\.. 0,0,0 :
. LIJN 21...F.. SD,13 :. S0 WAAR DATA..
.G.. V.16,1 :. S0 MSB X-COORD...H.. V.0,
55 :. S0 LSB X.7.I.. V.1,227:. S0 LSB Y.
V.J.. V.21,1 :. S0 VERSCHIJNEN.K.K.. V.3
9,7 :. GEEL.Q.L.:...P.AZ$."ABCDEFGHIJKLM
NOPQRSTUVWX"...U..". ";AZ$;" =KOLOMLETT
ER".B.... I.1 . 21.X.... J(AZ$,I,1);" ";
...... D$((I.1).3);D$((I.1).3.1);D$((I.1
).3.2);.5.... B$((I.1).3);B$((I.1).3.1);
B$((I.1).3.2).=.... I.Z.... *** ONTWERP
FIGUUR ***.}...O.1:O$."1":. DEFAULT: ZE
T AAN......"KOLOM <Z,0/1> = .....".
..... L$: . L$."" . 1020.L.... L$."Z" .
2000...... L$."0" . O.0:O$."0":."..":. 1
015...... L$."1" . O.1:O$."1":."..":. 10
15.E...N.F(L$).64:.(N.1).(N.24). ."..":.
1015.H....".LETTER V/D RIJ = ....."
...... N$: . N$."" . 1026.....N.F(N$).64
...... (N.1).(N.21) . 1025.E...SQUARE.N.
40.2.F(L$).65...... C.SQUARE,14 :. KLEU
R...... O.0 . . S.SQUARE,32...$.. O.1 .
. S.SQUARE,160.*.... VERANDER DATA.K.8.B
YTE.(N.1).3..((F(L$).65).8).K.B.Q..((SQU
ARE.2).8).8.2 :B.0.{.L.. I.Q . Q.7...V.
F.B(S.I)...`.. F.160 . O$."1" :OO$.". ."
.H.J.. F.32 . O$."0" :OO$.". ."...T.A$.
H(A$(BYTE),I.Q).O$...Y.A$.O$.I(A$(BYTE),
Q.7.I)...~.D$.H(D$(BYTE),(I.Q).3).OO$.=.
..D$.D$.I(D$(BYTE),(Q.7.I).3).Y...A$(BYT
E).A$ :. BINAIR.W...D$(BYTE).D$ :. T
EKENING.....B.2.(Q.7.I).E(O$).B :. NUMER
IEK...... I.....B(BYTE).B.N...B$(BYTE).I
(" ".D(B),4).....B$.I(" ".D(B),3)...
D.D1.E(J(B$,1,1))...N.D2.E(J(B$,2,1)).!.
X.D3.E(J(B$,3,1)).D...D.N.40.26.(BYTE..(
BYTE.3).3).4.B.... C.D.1,14 :. S.D.1,48.
D1...... C.D.2,14 :. S.D.2,48.D2...... C
.D.3,14 :. S.D.3,48.D3...... 832.BYTE,B(
BYTE)...... SP,1......".
.".....K . 1015...P.:.$.U
.. ANDERE KLEUR, GROOTTE EN RICHTING.M.Z
..". .".Y.
..."KLEUR 0-14, MAAT S/L, X/Y";C$,SI$,DI
$...... TEST OP ALLEEN ZWART...... C$."0
" . SI$."0" . 3000.....OC.E(C$).W.... V.
39,OC :. KLEUR...... SI$."S" . DI$."X"
. . V.29,0...... SI$."L" . DI$."X" . . V
.29,1.@.... SI$."S" . DI$."Y" . . V.23,0
.C.... SI$."L" . DI$."Y" . . V.23,1.....
.".
."...... 2020.....:...... BEWEEG SPRITE.
..B..". ."
...L.."GEBRUIK CURSORTOETSEN. E=EINDE
....".#.Q.Y.227 :X.256.55.,.V.. A$.@..
.. A$."E" . 4000.U.... A$."." . Y.Y.1.J.
... A$."." . Y.Y.1..... A$."." . X.X.1.
..... A$."." . X.X.1...... X.24 . X.24 :
. BLIJF OP SCHERM.M.... X.320 . X.320...
... Y.40 . Y.40...&.. Y.240 . Y.240...L.
. V.16,.(X.256) :. MSB X.0.V.. V,X..(X.2
56).256 :. LSB X.Q.... V.1,Y :
. Y-COORD.\.... 3030.B. .:.O.... OPTIES.
U...:......"..U KUNT:.."......"1 OPNIEUW
ONTWERPEN".N...."2 SLUITEN MET SPRITE I
N 60000-60006"...R.."KIES 1 OF 2"......
A$: . A$."" . 4060...... A$."1" . . 870.
&.... A$.."2" . . 4000.,...:.C.... SCHRI
JF GEGEVENS.I...:.T...."...".B.... I.1 .
7.Y....60000.(I.1);"DA";...... J.1 . 9.
..... B((I.1).9.(J.1));...... J.9 . . ",
";...... J...E...H.J.. I.X.T.. PRINT".";
...... POKE 198,7 :REM # KARS IN K/B BUF
FER.$.... I.631 . 637 :. K/B BUFFER.4..
.. POKE I,13.<.... I.B.......
> CLICK IMAGE PREVIEW FOR FULL MODAL