QUIZ3
FILE INFORMATION
FILENAME(S): QUIZ3
FILE TYPE(S): DEL
FILE SIZE: 9.8K
FIRST SEEN: 2025-11-30 21:09:59
APPEARS ON: 1 disk(s)
FILE HASH
ecf91d0c739fb25b03958d2fc4fd4e6bbd357a70a975c25cfa85dc344e122029
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GIGA ASSEMBLER | QUIZ3 | DEL | DuncanTwain | 27 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 4F 41 4C 41 46 49 4C 45 3A 20 12 C1 92 50 49 43 |OALAFILE: ...PIC|
00000010: 20 FF 22 00 1E 0A AD 4E 49 31 30 20 A8 22 20 20 | ."....NI10 ." |
00000020: 20 22 00 3D 0A AE 4E 49 31 31 20 A5 31 32 39 2C | ".=..NI11 .129,|
00000030: 38 30 2C 37 33 2C 36 37 2C 33 32 2C 33 32 2C 33 |80,73,67,32,32,3|
00000040: 32 00 52 0A AF 4E 49 31 32 20 A8 22 20 20 20 20 |2.R..NI12 ." |
00000050: 20 20 20 20 20 22 00 6A 0A B0 4E 49 31 33 20 A8 | ".j..NI13 .|
00000060: 22 20 20 20 20 20 20 20 20 20 20 20 20 22 00 71 |" ".q|
00000070: 0A B1 4E 20 E3 00 80 0A BF 4E 4C 4F 20 43 4C 52 |..N .....NLO CLR|
00000080: 48 4F 4D 45 00 99 0A C0 4E 20 54 45 58 54 A0 54 |HOME....N TEXT.T|
00000090: 45 4B 53 54 31 30 2C 30 2C 31 30 2C 31 00 B1 0A |EKST10,0,10,1...|
000000A0: D4 4E 20 49 4E 50 55 54 A0 49 33 2C 31 2C 32 31 |.N INPUT.I3,1,21|
000000B0: 2C 31 30 2C 31 00 BA 0A E8 4E 20 C3 23 31 00 C5 |,10,1....N .#1..|
000000C0: 0A FC 4E 20 CA 49 33 2C 59 00 D1 0A 10 4F 20 D2 |..N .I3,Y....O .|
000000D0: 49 30 2B 24 35 00 E0 0A 24 4F 20 4C 4F 41 44 A0 |I0+$5...$O LOAD.|
000000E0: 49 30 2C 37 00 F5 0A 38 4F 20 44 49 53 4B 45 52 |I0,7...8O DISKER|
000000F0: 52 4F 52 A0 30 2C 31 2C 31 00 02 0B 4C 4F 20 43 |ROR.0,1,1...LO C|
00000100: 4C 52 48 4F 4D 45 00 0E 0B 60 4F 20 D5 42 45 47 |LRHOME...`O .BEG|
00000110: 49 4E 00 1D 0B 74 4F 53 43 20 43 4C 52 48 4F 4D |IN...tOSC CLRHOM|
00000120: 45 00 36 0B 88 4F 20 54 45 58 54 A0 54 45 4B 53 |E.6..O TEXT.TEKS|
00000130: 54 31 31 2C 30 2C 31 30 2C 31 00 4E 0B 9C 4F 20 |T11,0,10,1.N..O |
00000140: 49 4E 50 55 54 A0 49 34 2C 31 2C 32 34 2C 31 30 |INPUT.I4,1,24,10|
00000150: 2C 31 00 57 0B B0 4F 20 C3 23 31 00 62 0B C4 4F |,1.W..O .#1.b..O|
00000160: 20 CA 49 34 2C 59 00 6E 0B D8 4F 20 D2 49 35 2B | .I4,Y.n..O .I5+|
00000170: 24 35 00 80 0B EC 4F 20 53 43 52 41 54 43 48 A0 |$5....O SCRATCH.|
00000180: 49 35 2C 37 00 95 0B 00 50 20 44 49 53 4B 45 52 |I5,7....P DISKER|
00000190: 52 4F 52 A0 30 2C 31 2C 31 00 A2 0B 14 50 20 43 |ROR.0,1,1....P C|
000001A0: 4C 52 48 4F 4D 45 00 AE 0B 15 50 20 D5 42 45 47 |LRHOME....P .BEG|
000001B0: 49 4E 00 BC 0B 28 50 49 34 20 A8 22 20 20 20 22 |IN...(PI4 ." "|
000001C0: 00 CE 0B 3C 50 49 35 20 A8 22 3F 50 49 43 20 20 |...<PI5 ."?PIC |
000001D0: 2A 22 00 F9 0B 50 50 54 45 4B 53 54 31 31 20 A8 |*"...PPTEKST11 .|
000001E0: 22 53 43 52 41 54 43 48 20 4B 4F 41 4C 41 46 49 |"SCRATCH KOALAFI|
000001F0: 4C 45 3A 20 12 C1 92 50 49 43 20 FF 22 00 07 0C |LE: ...PIC ."...|
00000200: 64 50 49 33 20 A8 22 20 20 20 22 00 19 0C 78 50 |dPI3 ." "...xP|
00000210: 49 30 20 A8 22 3F 50 49 43 20 20 2A 22 00 28 0C |I0 ."?PIC *".(.|
00000220: 8C 50 44 49 20 43 4C 52 48 4F 4D 45 00 31 0C A0 |.PDI CLRHOME.1..|
00000230: 50 20 44 49 52 00 46 0C A1 50 20 44 49 53 4B 45 |P DIR.F..P DISKE|
00000240: 52 52 4F 52 A0 30 2C 31 2C 31 00 52 0C B4 50 20 |RROR.0,1,1.R..P |
00000250: D5 42 45 47 49 4E 00 5E 0C C8 50 52 45 4E 20 D5 |.BEGIN.^..PREN .|
00000260: 51 51 00 69 0C DC 50 53 41 20 D5 51 51 00 78 0C |QQ.i..PSA .QQ.x.|
00000270: 04 51 56 41 20 44 49 53 4B 56 41 4C 00 85 0C 18 |.QVA DISKVAL....|
00000280: 51 20 43 4C 52 48 4F 4D 45 00 9B 0C 2C 51 20 44 |Q CLRHOME...,Q D|
00000290: 49 53 4B 53 54 41 54 55 53 A0 31 2C 31 2C 31 00 |ISKSTATUS.1,1,1.|
000002A0: A7 0C 40 51 20 D5 42 45 47 49 4E 00 B4 0C 54 51 |..@Q .BEGIN...TQ|
000002B0: 45 58 49 54 20 D5 51 51 00 CF 0C 68 51 49 4E 20 |EXIT .QQ...hQIN |
000002C0: 57 49 4E 44 4F 57 A0 31 34 2C 36 2C 31 32 2C 31 |WINDOW.14,6,12,1|
000002D0: 38 2C 31 00 EA 0C 7C 51 57 49 4E 20 54 45 58 54 |8,1...|QWIN TEXT|
000002E0: A0 54 45 4B 53 54 31 2C 31 35 2C 37 2C 31 00 02 |.TEKST1,15,7,1..|
000002F0: 0D 90 51 20 54 45 58 54 A0 54 45 4B 53 54 32 2C |..Q TEXT.TEKST2,|
00000300: 31 35 2C 39 2C 31 00 1B 0D A4 51 20 54 45 58 54 |15,9,1....Q TEXT|
00000310: A0 54 45 4B 53 54 33 2C 31 35 2C 31 31 2C 31 00 |.TEKST3,15,11,1.|
00000320: 34 0D B8 51 20 54 45 58 54 A0 54 45 4B 53 54 34 |4..Q TEXT.TEKST4|
00000330: 2C 31 35 2C 31 33 2C 31 00 4D 0D CC 51 20 54 45 |,15,13,1.M..Q TE|
00000340: 58 54 A0 54 45 4B 53 54 35 2C 31 35 2C 31 35 2C |XT.TEKST5,15,15,|
00000350: 31 00 66 0D E0 51 20 54 45 58 54 A0 54 45 4B 53 |1.f..Q TEXT.TEKS|
00000360: 54 37 2C 31 35 2C 31 37 2C 31 00 7F 0D F4 51 20 |T7,15,17,1....Q |
00000370: 54 45 58 54 A0 54 45 4B 53 54 36 2C 31 35 2C 31 |TEXT.TEKST6,15,1|
00000380: 39 2C 31 00 88 0D 08 52 51 51 20 E3 00 95 0D 09 |9,1....RQQ .....|
00000390: 52 54 54 20 A5 31 34 2C 38 00 9F 0D 0B 52 20 A8 |RTT .14,8....R .|
000003A0: 22 FF 22 00 B2 0D 1C 52 42 45 47 49 4E 20 50 52 |"."....RBEGIN PR|
000003B0: 49 4E 54 A0 54 54 00 BB 0D 1E 52 20 D6 49 4E 00 |INT.TT....R .IN.|
000003C0: C8 0D 30 52 45 45 4E 20 D6 57 49 4E 00 D9 0D 44 |..0REEN .WIN...D|
000003D0: 52 20 43 55 52 53 4F 52 A0 37 2C 31 35 00 E4 0D |R CURSOR.7,15...|
000003E0: 58 52 20 CA 23 32 35 30 00 F0 0D 6C 52 20 D6 24 |XR .#250...lR .$|
000003F0: 46 46 44 32 00 FF 0D 80 52 20 50 41 55 53 45 A0 |FFD2....R PAUSE.|
00000400: 31 30 30 00 0D 0E 94 52 49 4E 30 20 49 4E 4B 45 |100....RIN0 INKE|
00000410: 59 00 17 0E A8 52 20 C4 23 30 31 00 22 0E BC 52 |Y....R .#01."..R|
00000420: 20 F6 49 4E 4A 31 00 2B 0E D0 52 20 D5 44 49 00 | .INJ1.+..R .DI.|
00000430: 39 0E E4 52 49 4E 4A 31 20 C4 23 36 34 00 43 0E |9..RINJ1 .#64.C.|
00000440: F8 52 20 F7 49 4E 30 00 4D 0E 0C 53 20 D6 57 49 |.R .IN0.M..S .WI|
00000450: 4E 00 5E 0E 20 53 20 43 55 52 53 4F 52 A0 39 2C |N.^. S CURSOR.9,|
00000460: 31 35 00 69 0E 34 53 20 CA 23 32 35 30 00 75 0E |15.i.4S .#250.u.|
00000470: 48 53 20 D6 24 46 46 44 32 00 84 0E 5C 53 20 50 |HS .$FFD2...\S P|
00000480: 41 55 53 45 A0 31 30 30 00 92 0E 70 53 49 4E 31 |AUSE.100...pSIN1|
00000490: 20 49 4E 4B 45 59 00 9C 0E 84 53 20 C4 23 30 31 | INKEY....S .#01|
000004A0: 00 A7 0E 98 53 20 F6 49 4E 4A 32 00 B0 0E AC 53 |....S .INJ2....S|
000004B0: 20 D5 4C 4F 00 BE 0E C0 53 49 4E 4A 32 20 C4 23 | .LO....SINJ2 .#|
000004C0: 36 34 00 C8 0E D4 53 20 F7 49 4E 31 00 D2 0E E8 |64....S .IN1....|
000004D0: 53 20 D6 57 49 4E 00 E4 0E FC 53 20 43 55 52 53 |S .WIN....S CURS|
000004E0: 4F 52 A0 31 31 2C 31 35 00 EF 0E 10 54 20 CA 23 |OR.11,15....T .#|
000004F0: 32 35 30 00 FB 0E 24 54 20 D6 24 46 46 44 32 00 |250...$T .$FFD2.|
00000500: 0A 0F 38 54 20 50 41 55 53 45 A0 31 30 30 00 18 |..8T PAUSE.100..|
00000510: 0F 4C 54 49 4E 32 20 49 4E 4B 45 59 00 22 0F 60 |.LTIN2 INKEY.".`|
00000520: 54 20 C4 23 30 31 00 2D 0F 74 54 20 F6 49 4E 4A |T .#01.-.tT .INJ|
00000530: 33 00 36 0F 88 54 20 D5 53 41 00 44 0F 9C 54 49 |3.6..T .SA.D..TI|
00000540: 4E 4A 33 20 C4 23 36 34 00 4E 0F B0 54 20 F7 49 |NJ3 .#64.N..T .I|
00000550: 4E 32 00 58 0F C4 54 20 D6 57 49 4E 00 6A 0F D8 |N2.X..T .WIN.j..|
00000560: 54 20 43 55 52 53 4F 52 A0 31 33 2C 31 35 00 75 |T CURSOR.13,15.u|
00000570: 0F EC 54 20 CA 23 32 35 30 00 81 0F 00 55 20 D6 |..T .#250....U .|
00000580: 24 46 46 44 32 00 90 0F 14 55 20 50 41 55 53 45 |$FFD2....U PAUSE|
00000590: A0 31 30 30 00 9E 0F 28 55 49 4E 33 20 49 4E 4B |.100...(UIN3 INK|
000005A0: 45 59 00 A8 0F 3C 55 20 C4 23 30 31 00 B3 0F 50 |EY...<U .#01...P|
000005B0: 55 20 F6 49 4E 4A 34 00 BC 0F 64 55 20 D5 53 43 |U .INJ4...dU .SC|
000005C0: 00 CA 0F 78 55 49 4E 4A 34 20 C4 23 36 34 00 D4 |...xUINJ4 .#64..|
000005D0: 0F 8C 55 20 F7 49 4E 33 00 DE 0F A0 55 20 D6 57 |..U .IN3....U .W|
000005E0: 49 4E 00 F0 0F B4 55 20 43 55 52 53 4F 52 A0 31 |IN....U CURSOR.1|
000005F0: 35 2C 31 35 00 FB 0F C8 55 20 CA 23 32 35 30 00 |5,15....U .#250.|
00000600: 07 10 DC 55 20 D6 24 46 46 44 32 00 16 10 F0 55 |...U .$FFD2....U|
00000610: 20 50 41 55 53 45 A0 31 30 30 00 24 10 04 56 49 | PAUSE.100.$..VI|
00000620: 4E 34 20 49 4E 4B 45 59 00 2E 10 18 56 20 C4 23 |N4 INKEY....V .#|
00000630: 30 31 00 39 10 2C 56 20 F6 49 4E 4A 35 00 42 10 |01.9.,V .INJ5.B.|
00000640: 40 56 20 D5 56 41 00 50 10 54 56 49 4E 4A 35 20 |@V .VA.P.TVINJ5 |
00000650: C4 23 36 34 00 5A 10 68 56 20 F7 49 4E 34 00 64 |.#64.Z.hV .IN4.d|
00000660: 10 7C 56 20 D6 57 49 4E 00 76 10 90 56 20 43 55 |.|V .WIN.v..V CU|
00000670: 52 53 4F 52 A0 31 37 2C 31 35 00 81 10 A4 56 20 |RSOR.17,15....V |
00000680: CA 23 32 35 30 00 8D 10 B8 56 20 D6 24 46 46 44 |.#250....V .$FFD|
00000690: 32 00 9C 10 CC 56 20 50 41 55 53 45 A0 31 30 30 |2....V PAUSE.100|
000006A0: 00 AA 10 E0 56 49 4E 35 20 49 4E 4B 45 59 00 B4 |....VIN5 INKEY..|
000006B0: 10 F4 56 20 C4 23 30 31 00 BF 10 08 57 20 F6 49 |..V .#01....W .I|
000006C0: 4E 4A 36 00 C9 10 1C 57 20 D5 52 45 4E 00 D7 10 |NJ6....W .REN...|
000006D0: 30 57 49 4E 4A 36 20 C4 23 36 34 00 E1 10 44 57 |0WINJ6 .#64...DW|
000006E0: 20 F7 49 4E 35 00 EB 10 58 57 20 D6 57 49 4E 00 | .IN5...XW .WIN.|
000006F0: FD 10 6C 57 20 43 55 52 53 4F 52 A0 31 39 2C 31 |..lW CURSOR.19,1|
00000700: 35 00 08 11 80 57 20 CA 23 32 35 30 00 14 11 94 |5....W .#250....|
00000710: 57 20 D6 24 46 46 44 32 00 23 11 A8 57 20 50 41 |W .$FFD2.#..W PA|
00000720: 55 53 45 A0 31 30 30 00 31 11 BC 57 49 4E 36 20 |USE.100.1..WIN6 |
00000730: 49 4E 4B 45 59 00 3B 11 D0 57 20 C4 23 30 31 00 |INKEY.;..W .#01.|
00000740: 46 11 E4 57 20 F6 49 4E 4A 37 00 51 11 F8 57 20 |F..W .INJ7.Q..W |
00000750: D5 45 58 49 54 00 5F 11 0C 58 49 4E 4A 37 20 C4 |.EXIT._..XINJ7 .|
00000760: 23 36 34 00 69 11 20 58 20 F7 49 4E 36 00 73 11 |#64.i. X .IN6.s.|
00000770: 34 58 20 D5 45 45 4E 00 7A 11 48 58 20 E3 00 96 |4X .EEN.z.HX ...|
00000780: 11 5C 58 54 45 4B 53 54 31 20 A8 22 12 20 92 44 |.\XTEKST1 .". .D|
00000790: 49 52 45 43 54 4F 52 59 FF 22 00 B2 11 70 58 54 |IRECTORY."...pXT|
000007A0: 45 4B 53 54 32 20 A8 22 12 20 92 4C 4F 41 44 20 |EKST2 .". .LOAD |
000007B0: 20 20 20 20 FF 22 00 CE 11 84 58 54 45 4B 53 54 | ."....XTEKST|
000007C0: 33 20 A8 22 12 20 92 53 41 56 45 20 20 20 20 20 |3 .". .SAVE |
000007D0: FF 22 00 EA 11 98 58 54 45 4B 53 54 34 20 A8 22 |."....XTEKST4 ."|
000007E0: 12 20 92 53 43 52 41 54 43 48 20 20 FF 22 00 06 |. .SCRATCH ."..|
000007F0: 12 AC 58 54 45 4B 53 54 35 20 A8 22 12 20 92 56 |..XTEKST5 .". .V|
00000800: 41 4C 49 44 41 54 45 20 FF 22 00 22 12 C0 58 54 |ALIDATE ."."..XT|
00000810: 45 4B 53 54 36 20 A8 22 12 20 92 45 58 49 54 20 |EKST6 .". .EXIT |
00000820: 20 20 20 20 FF 22 00 3E 12 D4 58 54 45 4B 53 54 | .".>..XTEKST|
00000830: 37 20 A8 22 12 20 92 52 45 4E 41 4D 45 20 20 20 |7 .". .RENAME |
00000840: FF 22 00 66 12 E8 58 54 45 4B 53 54 31 30 20 A8 |.".f..XTEKST10 .|
00000850: 22 4C 4F 41 44 20 4B 4F 41 4C 41 46 49 4C 45 3A |"LOAD KOALAFILE:|
00000860: 20 12 C1 92 50 49 43 20 FF 22 00 83 12 FC 58 A1 | ...PIC ."....X.|
00000870: 57 49 4E 44 4F 57 A0 58 2C 59 2C 58 31 2C 59 31 |WINDOW.X,Y,X1,Y1|
00000880: 2C 43 4F 4C 56 41 4C 00 8C 12 10 59 20 C2 23 58 |,COLVAL....Y .#X|
00000890: 00 95 12 24 59 20 D3 54 39 00 9E 12 38 59 20 C2 |...$Y .T9...8Y .|
000008A0: 23 59 00 A7 12 4C 59 20 D3 54 38 00 B3 12 60 59 |#Y...LY .T8...`Y|
000008B0: 20 D5 42 45 47 49 4E 00 BF 12 74 59 54 31 20 A8 | .BEGIN...tYT1 .|
000008C0: 22 B0 22 00 CB 12 88 59 54 32 20 A8 22 AE 22 00 |"."....YT2 .".".|
000008D0: D7 12 9C 59 54 33 20 A8 22 AD 22 00 E3 12 B0 59 |...YT3 ."."....Y|
000008E0: 54 37 20 A8 22 BD 22 00 EF 12 C4 59 54 34 20 A8 |T7 ."."....YT4 .|
000008F0: 22 DD 22 00 FB 12 D8 59 54 35 20 A8 22 C0 22 00 |"."....YT5 .".".|
00000900: 07 13 EC 59 54 36 20 A8 22 20 22 00 12 13 00 5A |...YT6 ." "....Z|
00000910: 54 38 20 A5 30 30 00 1D 13 14 5A 54 39 20 A5 30 |T8 .00....ZT9 .0|
00000920: 30 00 2E 13 28 5A 53 45 54 20 CA 23 43 4F 4C 56 |0...(ZSET .#COLV|
00000930: 41 4C 00 3A 13 3C 5A 20 D2 24 30 32 38 36 00 48 |AL.:.<Z .$0286.H|
00000940: 13 50 5A 50 4F 49 4E 54 20 C2 54 38 00 51 13 64 |.PZPOINT .T8.Q.d|
00000950: 5A 20 C3 54 39 00 58 13 78 5A 20 E5 00 64 13 8C |Z .T9.X.xZ ..d..|
00000960: 5A 20 D6 24 46 46 46 30 00 6B 13 A0 5A 20 E3 00 |Z .$FFF0.k..Z ..|
00000970: 7A 13 B4 5A 42 45 47 49 4E 20 D6 53 45 54 00 83 |z..ZBEGIN .SET..|
00000980: 13 C8 5A 20 CA 54 31 00 8F 13 DC 5A 20 D6 24 46 |..Z .T1....Z .$F|
00000990: 46 44 32 00 99 13 F0 5A 20 C2 23 30 30 00 A2 13 |FD2....Z .#00...|
000009A0: 04 5B 20 CA 54 35 00 B1 13 18 5B 45 45 4E 20 D6 |.[ .T5....[EEN .|
000009B0: 24 46 46 44 32 00 B8 13 2C 5B 20 EF 00 C4 13 40 |$FFD2...,[ ....@|
000009C0: 5B 20 C0 23 58 31 2D 32 00 CE 13 54 5B 20 F6 45 |[ .#X1-2...T[ .E|
000009D0: 45 4E 00 D7 13 68 5B 20 CA 54 32 00 E3 13 7C 5B |EN...h[ .T2...|[|
000009E0: 20 D6 24 46 46 44 32 00 F0 13 90 5B 44 52 49 45 | .$FFD2....[DRIE|
000009F0: 20 C9 54 38 00 FA 13 A4 5B 20 D6 53 45 54 00 03 | .T8....[ .SET..|
00000A00: 14 B8 5B 20 CA 54 34 00 0F 14 CC 5B 20 D6 24 46 |..[ .T4....[ .$F|
00000A10: 46 44 32 00 19 14 E0 5B 20 C2 23 30 30 00 22 14 |FD2....[ .#00.".|
00000A20: F4 5B 20 CA 54 36 00 32 14 08 5C 45 45 4E 4E 20 |.[ .T6.2..\EENN |
00000A30: D6 24 46 46 44 32 00 39 14 1C 5C 20 EF 00 45 14 |.$FFD2.9..\ ..E.|
00000A40: 30 5C 20 C0 23 58 31 2D 32 00 50 14 44 5C 20 F6 |0\ .#X1-2.P.D\ .|
00000A50: 45 45 4E 4E 00 59 14 58 5C 20 CA 54 34 00 65 14 |EENN.Y.X\ .T4.e.|
00000A60: 6C 5C 20 D6 24 46 46 44 32 00 6E 14 80 5C 20 CA |l\ .$FFD2.n..\ .|
00000A70: 54 38 00 7A 14 94 5C 20 C4 23 59 31 2B 31 00 85 |T8.z..\ .#Y1+1..|
00000A80: 14 A8 5C 20 F6 44 52 49 45 00 8E 14 BC 5C 20 C9 |..\ .DRIE....\ .|
00000A90: 54 38 00 98 14 D0 5C 20 D6 53 45 54 00 A1 14 E4 |T8....\ .SET....|
00000AA0: 5C 20 CA 54 33 00 AD 14 F8 5C 20 D6 24 46 46 44 |\ .T3....\ .$FFD|
00000AB0: 32 00 B7 14 0C 5D 20 C2 23 30 30 00 C0 14 20 5D |2....] .#00... ]|
00000AC0: 20 CA 54 35 00 D1 14 34 5D 45 45 4E 4E 4E 20 D6 | .T5...4]EENNN .|
00000AD0: 24 46 46 44 32 00 D8 14 48 5D 20 EF 00 E4 14 5C |$FFD2...H] ....\|
00000AE0: 5D 20 C0 23 58 31 2D 32 00 F0 14 70 5D 20 F6 45 |] .#X1-2...p] .E|
00000AF0: 45 4E 4E 4E 00 F9 14 84 5D 20 CA 54 37 00 05 15 |ENNN....] .T7...|
00000B00: 98 5D 20 D6 24 46 46 44 32 00 0B 15 AC 5D A2 00 |.] .$FFD2....]..|
00000B10: 2F 15 C0 5D 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |/..];***********|
00000B20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B30: 2A 2A 2A 00 46 15 D4 5D A1 53 43 52 45 45 4E 43 |***.F..].SCREENC|
00000B40: 4F 4C 4F 52 A0 43 4F 4C 4F 52 00 53 15 E8 5D 20 |OLOR.COLOR.S..] |
00000B50: C3 23 43 4F 4C 4F 52 00 5F 15 FC 5D 20 D4 35 33 |.#COLOR._..] .53|
00000B60: 32 38 31 00 65 15 10 5E A2 00 89 15 24 5E 3B 2A |281.e..^....$^;*|
00000B70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A0 15 |*************...|
00000B90: 38 5E A1 42 4F 52 44 45 52 43 4F 4C 4F 52 A0 43 |8^.BORDERCOLOR.C|
00000BA0: 4F 4C 4F 52 00 AD 15 4C 5E 20 C3 23 43 4F 4C 4F |OLOR...L^ .#COLO|
00000BB0: 52 00 B9 15 60 5E 20 D4 35 33 32 38 30 00 BF 15 |R...`^ .53280...|
00000BC0: 74 5E A2 00 E3 15 88 5E 3B 2A 2A 2A 2A 2A 2A 2A |t^.....^;*******|
00000BD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000BE0: 2A 2A 2A 2A 2A 2A 2A 00 F8 15 9C 5E A1 46 49 4C |*******....^.FIL|
00000BF0: 4C 43 4F 4C 4F 52 A0 43 4F 4C 4F 52 00 05 16 B0 |LCOLOR.COLOR....|
00000C00: 5E 20 CA 23 43 4F 4C 4F 52 00 10 16 C4 5E 20 C2 |^ .#COLOR....^ .|
00000C10: 23 24 30 30 00 22 16 D8 5E 54 45 58 31 20 D2 24 |#$00."..^TEX1 .$|
00000C20: 44 38 30 30 2C 58 00 30 16 EC 5E 20 D2 24 44 39 |D800,X.0..^ .$D9|
00000C30: 30 30 2C 58 00 3E 16 00 5F 20 D2 24 44 41 30 30 |00,X.>.._ .$DA00|
00000C40: 2C 58 00 45 16 14 5F 20 EF 00 50 16 28 5F 20 F6 |,X.E.._ ..P.(_ .|
00000C50: 54 45 58 31 00 62 16 3C 5F 54 45 58 32 20 D2 24 |TEX1.b.<_TEX2 .$|
00000C60: 44 42 30 30 2C 58 00 69 16 50 5F 20 EF 00 74 16 |DB00,X.i.P_ ..t.|
00000C70: 64 5F 20 C0 23 24 45 38 00 7F 16 78 5F 20 F6 54 |d_ .#$E8...x_ .T|
00000C80: 45 58 32 00 85 16 8C 5F A2 00 A9 16 A0 5F 3B 2A |EX2...._....._;*|
00000C90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000CA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B7 16 |*************...|
00000CB0: B4 5F A1 43 4F 4C 4F 52 49 4E 43 00 C2 16 C8 5F |._.COLORINC...._|
00000CC0: 20 C2 23 24 30 30 00 D4 16 DC 5F 54 45 58 31 20 | .#$00...._TEX1 |
00000CD0: C9 24 44 38 30 30 2C 58 00 E2 16 F0 5F 20 C9 24 |.$D800,X...._ .$|
00000CE0: 44 39 30 30 2C 58 00 F0 16 04 60 20 C9 24 44 41 |D900,X....` .$DA|
00000CF0: 30 30 2C 58 00 F7 16 18 60 20 EF 00 02 17 2C 60 |00,X....` ....,`|
00000D00: 20 F6 54 45 58 31 00 14 17 40 60 54 45 58 32 20 | .TEX1...@`TEX2 |
00000D10: C9 24 44 42 30 30 2C 58 00 1B 17 54 60 20 EF 00 |.$DB00,X...T` ..|
00000D20: 26 17 68 60 20 C0 23 24 45 38 00 31 17 7C 60 20 |&.h` .#$E8.1.|` |
00000D30: F6 54 45 58 32 00 37 17 90 60 A2 00 5B 17 A4 60 |.TEX2.7..`..[..`|
00000D40: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************|
00000D50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000D60: 68 17 B8 60 A1 43 4C 52 48 4F 4D 45 00 73 17 CC |h..`.CLRHOME.s..|
00000D70: 60 20 CA 23 31 34 37 00 7F 17 E0 60 20 D6 24 46 |` .#147....` .$F|
00000D80: 46 44 32 00 85 17 F4 60 A2 00 A9 17 08 61 3B 2A |FD2....`.....a;*|
00000D90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 CD 17 |*************...|
00000DB0: 1C 61 3B 2A 20 4D 41 43 52 4F 20 54 45 58 54 20 |.a;* MACRO TEXT |
00000DC0: 41 44 52 45 53 2C 58 2C 59 2C 4B 4C 45 55 52 20 |ADRES,X,Y,KLEUR |
00000DD0: 2A 00 F1 17 30 61 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A |*...0a;*********|
00000DE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DF0: 2A 2A 2A 2A 2A 00 11 18 44 61 A1 54 45 58 54 A0 |*****...Da.TEXT.|
00000E00: 54 41 44 52 2C 58 56 41 4C 2C 59 56 41 4C 2C 43 |TADR,XVAL,YVAL,C|
00000E10: 4F 4C 56 41 4C 00 1F 18 58 61 20 CA 23 43 4F 4C |OLVAL...Xa .#COL|
00000E20: 56 41 4C 00 2B 18 6C 61 20 D2 24 30 32 38 36 00 |VAL.+.la .$0286.|
00000E30: 37 18 80 61 20 C2 23 59 56 41 4C 00 43 18 94 61 |7..a .#YVAL.C..a|
00000E40: 20 C3 23 58 56 41 4C 00 4A 18 A8 61 20 E5 00 56 | .#XVAL.J..a ..V|
00000E50: 18 BC 61 20 D6 24 46 46 46 30 00 61 18 D0 61 20 |..a .$FFF0.a..a |
00000E60: C2 23 24 30 30 00 72 18 E4 61 54 45 58 31 20 CA |.#$00.r..aTEX1 .|
00000E70: 54 41 44 52 2C 58 00 7D 18 F8 61 20 C4 23 24 46 |TADR,X.}..a .#$F|
00000E80: 46 00 88 18 0C 62 20 F7 54 45 58 32 00 94 18 20 |F....b .TEX2... |
00000E90: 62 20 D6 24 46 46 44 32 00 9B 18 34 62 20 EF 00 |b .$FFD2...4b ..|
00000EA0: A6 18 48 62 20 D5 54 45 58 31 00 B1 18 5C 62 54 |..Hb .TEX1...\bT|
00000EB0: 45 58 32 20 E4 00 B7 18 70 62 A2 00 D9 18 84 62 |EX2 ....pb.....b|
00000EC0: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************|
00000ED0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FB 18 |*************...|
00000EE0: 98 62 3B 2A 20 4D 41 43 52 4F 20 50 52 49 4E 54 |.b;* MACRO PRINT|
00000EF0: 20 41 44 52 45 53 20 20 20 20 20 20 20 20 2A 00 | ADRES *.|
00000F00: 1D 19 AC 62 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...b;***********|
00000F10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000F20: 2A 00 2D 19 C0 62 A1 50 52 49 4E 54 A0 54 41 44 |*.-..b.PRINT.TAD|
00000F30: 52 00 38 19 D4 62 20 C2 23 24 30 30 00 49 19 E8 |R.8..b .#$00.I..|
00000F40: 62 54 45 58 31 20 CA 54 41 44 52 2C 58 00 54 19 |bTEX1 .TADR,X.T.|
00000F50: FC 62 20 C4 23 24 46 46 00 5F 19 10 63 20 F7 54 |.b .#$FF._..c .T|
00000F60: 45 58 32 00 6B 19 24 63 20 D6 24 46 46 44 32 00 |EX2.k.$c .$FFD2.|
00000F70: 72 19 38 63 20 EF 00 7D 19 4C 63 20 D5 54 45 58 |r.8c ..}.Lc .TEX|
00000F80: 31 00 88 19 60 63 54 45 58 32 20 E4 00 93 19 74 |1...`cTEX2 ....t|
00000F90: 63 20 CA 23 24 30 44 00 9F 19 88 63 20 D6 24 46 |c .#$0D....c .$F|
00000FA0: 46 44 32 00 A5 19 9C 63 A2 00 C7 19 B0 63 3B 2A |FD2....c.....c;*|
00000FB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E9 19 C4 63 |***********....c|
00000FD0: 3B 2A 20 4D 41 43 52 4F 20 4B 45 59 20 57 41 49 |;* MACRO KEY WAI|
00000FE0: 54 20 20 20 20 20 20 20 20 20 20 20 2A 00 0B 1A |T *...|
00000FF0: D8 63 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.c;*************|
00001000: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001010: 19 1A EC 63 A1 4B 45 59 A0 57 41 49 54 00 28 1A |...c.KEY.WAIT.(.|
00001020: 00 64 54 45 58 31 20 C2 23 24 30 30 00 34 1A 14 |.dTEX1 .#$00.4..|
00001030: 64 20 D3 24 30 30 43 36 00 40 1A 28 64 20 CA 24 |d .$00C6.@.(d .$|
00001040: 30 30 43 35 00 4C 1A 3C 64 20 C4 23 57 41 49 54 |00C5.L.<d .#WAIT|
00001050: 00 57 1A 50 64 20 F6 54 45 58 31 00 5D 1A 64 64 |.W.Pd .TEX1.].dd|
00001060: A2 00 6D 1A 78 64 A1 43 55 52 53 4F 52 A0 58 2C |..m.xd.CURSOR.X,|
00001070: 59 00 76 1A 8C 64 20 C2 23 58 00 7F 1A A0 64 20 |Y.v..d .#X....d |
00001080: C3 23 59 00 86 1A B4 64 20 E5 00 92 1A C8 64 20 |.#Y....d .....d |
00001090: D6 24 46 46 46 30 00 98 1A DC 64 A2 00 A3 1A F0 |.$FFF0....d.....|
000010A0: 64 A1 49 4E 4B 45 59 00 AE 1A 04 65 20 C2 23 24 |d.INKEY....e .#$|
000010B0: 30 30 00 BA 1A 18 65 20 D3 24 30 30 43 36 00 C6 |00....e .$00C6..|
000010C0: 1A 2C 65 20 CA 24 30 30 43 35 00 CC 1A 40 65 A2 |.,e .$00C5...@e.|
000010D0: 00 D9 1A 54 65 A1 50 41 55 53 45 A0 50 00 E3 1A |...Te.PAUSE.P...|
000010E0: 68 65 20 C2 23 30 30 00 EE 1A 7C 65 20 C3 23 24 |he .#00...|e .#$|
000010F0: 46 46 00 FA 1A 90 65 20 D6 24 45 45 42 33 00 01 |FF....e .$EEB3..|
00001100: 1B A4 65 20 EF 00 0D 1B B8 65 20 C0 23 3C 28 50 |..e .....e .#<(P|
00001110: 29 00 17 1B CC 65 20 F6 2A 2D 36 00 1E 1B E0 65 |)....e .*-6....e|
00001120: 20 ED 00 2A 1B F4 65 20 C1 23 3E 28 50 29 00 35 | ..*..e .#>(P).5|
00001130: 1B 08 66 20 F6 2A 2D 31 31 00 3B 1B 1C 66 A2 00 |..f .*-11.;..f..|
00001140: 61 1B 30 66 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |a.0f;***********|
00001150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001160: 2A 2A 2A 2A 2A 00 87 1B 44 66 3B 2A 20 20 48 45 |*****...Df;* HE|
00001170: 52 42 49 45 27 53 20 44 49 53 4B 20 4D 41 43 52 |RBIE'S DISK MACR|
00001180: 4F 27 53 20 20 31 2E 31 20 20 2A 00 AD 1B 58 66 |O'S 1.1 *...Xf|
00001190: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************|
000011A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000011B0: 2A 00 BC 1B 6C 66 3B 4D 41 43 52 4F 20 44 49 52 |*...lf;MACRO DIR|
000011C0: 00 E1 1B 80 66 3B 4D 41 43 52 4F 20 4C 4F 41 44 |....f;MACRO LOAD|
000011D0: A0 4E 41 41 4D 41 44 52 45 53 2C 4C 45 4E 47 54 |.NAAMADRES,LENGT|
000011E0: 45 4E 41 41 4D 00 04 1C 94 66 3B 4D 41 43 52 4F |ENAAM....f;MACRO|
000011F0: 20 53 41 56 45 A0 4E 41 4D 41 44 52 2C 4C 2C 41 | SAVE.NAMADR,L,A|
00001200: 44 52 31 2C 41 44 52 32 00 28 1C A8 66 3B 4D 41 |DR1,ADR2.(..f;MA|
00001210: 43 52 4F 20 53 43 52 41 54 43 48 A0 4E 41 41 4D |CRO SCRATCH.NAAM|
00001220: 41 44 52 45 53 2C 4C 45 4E 47 54 45 00 48 1C BC |ADRES,LENGTE.H..|
00001230: 66 3B 4D 41 43 52 4F 20 44 49 53 4B 53 54 41 54 |f;MACRO DISKSTAT|
00001240: 55 53 A0 58 2C 59 2C 43 4F 4C 4F 52 00 67 1C D0 |US.X,Y,COLOR.g..|
00001250: 66 3B 4D 41 43 52 4F 20 44 49 53 4B 45 52 52 4F |f;MACRO DISKERRO|
00001260: 52 A0 58 2C 59 2C 43 4F 4C 4F 52 00 7B 1C E4 66 |R.X,Y,COLOR.{..f|
00001270: 3B 4D 41 43 52 4F 20 44 49 53 4B 49 4E 49 54 00 |;MACRO DISKINIT.|
00001280: 8E 1C F8 66 3B 4D 41 43 52 4F 20 44 49 53 4B 56 |...f;MACRO DISKV|
00001290: 41 4C 00 B4 1C 0C 67 3B 2A 2A 2A 2A 2A 2A 2A 2A |AL....g;********|
000012A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000012B0: 2A 2A 2A 2A 2A 2A 2A 2A 00 BD 1C 20 67 A1 44 49 |********... g.DI|
000012C0: 52 00 C8 1C 34 67 20 CA 23 24 32 34 00 D4 1C 48 |R...4g .#$24...H|
000012D0: 67 20 D2 24 30 31 30 30 00 E0 1C 5C 67 20 D6 24 |g .$0100...\g .$|
000012E0: 41 41 44 37 00 EB 1C 70 67 20 CA 23 24 30 31 00 |AAD7...pg .#$01.|
000012F0: F2 1C 84 67 20 DA 00 FD 1C 98 67 20 C2 23 24 30 |...g .....g .#$0|
00001300: 30 00 09 1D AC 67 20 D6 24 46 46 42 44 00 14 1D |0....g .$FFBD...|
00001310: C0 67 20 C2 23 24 30 38 00 1F 1D D4 67 20 C3 23 |.g .#$08....g .#|
00001320: 24 36 30 00 2B 1D E8 67 20 D6 24 46 46 42 41 00 |$60.+..g .$FFBA.|
00001330: 37 1D FC 67 20 D6 24 46 33 44 35 00 41 1D 10 68 |7..g .$F3D5.A..h|
00001340: 20 CA 24 42 41 00 4D 1D 24 68 20 D6 24 46 46 42 | .$BA.M.$h .$FFB|
00001350: 34 00 57 1D 38 68 20 CA 24 42 39 00 63 1D 4C 68 |4.W.8h .$B9.c.Lh|
00001360: 20 D6 24 46 46 39 36 00 6E 1D 60 68 20 CA 23 24 | .$FF96.n.`h .#$|
00001370: 30 30 00 78 1D 74 68 20 D2 24 39 30 00 83 1D 88 |00.x.th .$90....|
00001380: 68 20 C3 23 24 30 33 00 91 1D 9C 68 54 45 58 30 |h .#$03....hTEX0|
00001390: 20 D4 24 46 46 00 9D 1D B0 68 20 D6 24 46 46 41 | .$FF....h .$FFA|
000013A0: 35 00 A7 1D C4 68 20 D2 24 46 45 00 B1 1D D8 68 |5....h .$FE....h|
000013B0: 20 C3 24 39 30 00 BC 1D EC 68 20 F6 54 45 58 34 | .$90....h .TEX4|
000013C0: 00 C8 1D 00 69 20 D6 24 46 46 41 35 00 D2 1D 14 |....i .$FFA5....|
000013D0: 69 20 C3 24 39 30 00 DD 1D 28 69 20 F6 54 45 58 |i .$90...(i .TEX|
000013E0: 34 00 E7 1D 3C 69 20 C3 24 46 46 00 EE 1D 50 69 |4...<i .$FF...Pi|
000013F0: 20 EC 00 F9 1D 64 69 20 F6 54 45 58 30 00 03 1E | ....di .TEX0...|
00001400: 78 69 20 C2 24 46 45 00 0F 1E 8C 69 20 D6 24 42 |xi .$FE....i .$B|
00001410: 44 43 44 00 1A 1E A0 69 20 D6 54 45 58 35 00 2A |DCD....i .TEX5.*|
00001420: 1E B4 69 54 45 58 31 20 D6 24 46 46 41 35 00 34 |..iTEX1 .$FFA5.4|
00001430: 1E C8 69 20 C2 24 39 30 00 3F 1E DC 69 20 F6 54 |..i .$90.?..i .T|
00001440: 45 58 34 00 46 1E F0 69 20 DA 00 4D 1E 04 6A 20 |EX4.F..i ..M..j |
00001450: D8 00 58 1E 18 6A 20 F7 54 45 58 32 00 64 1E 2C |..X..j .TEX2.d.,|
00001460: 6A 20 D6 24 46 46 44 32 00 6F 1E 40 6A 20 D5 54 |j .$FFD2.o.@j .T|
00001470: 45 58 31 00 7F 1E 54 6A 54 45 58 32 20 D6 24 41 |EX1...TjTEX2 .$A|
00001480: 41 44 37 00 8A 1E 68 6A 20 CA 23 24 30 30 00 94 |AD7...hj .#$00..|
00001490: 1E 7C 6A 20 D2 24 43 36 00 9E 1E 90 6A 20 CA 24 |.|j .$C6....j .$|
000014A0: 43 35 00 A8 1E A4 6A 20 C4 23 36 30 00 B3 1E B8 |C5....j .#60....|
000014B0: 6A 20 F7 54 45 58 37 00 BD 1E CC 6A 20 C4 23 36 |j .TEX7....j .#6|
000014C0: 33 00 C8 1E E0 6A 20 F7 54 45 58 34 00 D7 1E F4 |3....j .TEX4....|
000014D0: 6A 54 45 58 33 20 C3 23 24 30 32 00 E2 1E 08 6B |jTEX3 .#$02....k|
000014E0: 20 D5 54 45 58 30 00 F2 1E 1C 6B 54 45 58 34 20 | .TEX0....kTEX4 |
000014F0: D6 24 46 36 34 32 00 FD 1E 30 6B 20 CA 23 24 30 |.$F642...0k .#$0|
00001500: 38 00 07 1F 44 6B 20 D2 24 42 41 00 13 1F 58 6B |8...Dk .$BA...Xk|
00001510: 20 D6 24 46 46 42 34 00 1E 1F 6C 6B 20 CA 23 24 | .$FFB4...lk .#$|
00001520: 36 46 00 28 1F 80 6B 20 D2 24 42 39 00 34 1F 94 |6F.(..k .$B9.4..|
00001530: 6B 20 D6 24 46 46 39 36 00 40 1F A8 6B 20 D6 24 |k .$FF96.@..k .$|
00001540: 46 46 41 42 00 4B 1F BC 6B 20 CA 23 24 30 30 00 |FFAB.K..k .#$00.|
00001550: 55 1F D0 6B 20 D2 24 43 36 00 61 1F E4 6B 20 D5 |U..k .$C6.a..k .|
00001560: 54 45 58 31 30 00 70 1F F8 6B 54 45 58 35 20 CA |TEX10.p..kTEX5 .|
00001570: 23 24 32 30 00 7C 1F 0C 6C 20 D5 24 46 46 44 32 |#$20.|..l .$FFD2|
00001580: 00 88 1F 20 6C 20 C2 24 30 32 46 37 00 94 1F 34 |... l .$02F7...4|
00001590: 6C 20 D6 24 46 46 43 39 00 9F 1F 48 6C 20 F4 54 |l .$FFC9...Hl .T|
000015A0: 45 58 36 00 AB 1F 5C 6C 20 D5 24 45 30 46 39 00 |EX6...\l .$E0F9.|
000015B0: B6 1F 70 6C 54 45 58 36 20 E3 00 C5 1F 84 6C 54 |..plTEX6 .....lT|
000015C0: 45 58 37 20 C2 23 24 30 30 00 D5 1F 98 6C 54 45 |EX7 .#$00....lTE|
000015D0: 58 38 20 D6 24 45 45 42 33 00 DC 1F AC 6C 20 EF |X8 .$EEB3....l .|
000015E0: 00 E7 1F C0 6C 20 F6 54 45 58 38 00 F6 1F D4 6C |....l .TEX8....l|
000015F0: 54 45 58 39 20 CA 23 24 30 30 00 00 20 E8 6C 20 |TEX9 .#$00.. .l |
00001600: D2 24 43 36 00 0A 20 FC 6C 20 CA 24 43 35 00 14 |.$C6.. .l .$C5..|
00001610: 20 10 6D 20 C4 23 36 30 00 1F 20 24 6D 20 F6 54 | .m .#60.. $m .T|
00001620: 45 58 39 00 2A 20 38 6D 20 D5 54 45 58 33 00 36 |EX9.* 8m .TEX3.6|
00001630: 20 4C 6D 54 45 58 31 30 20 E4 00 3C 20 60 6D A2 | LmTEX10 ..< `m.|
00001640: 00 61 20 74 6D 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.a tm;**********|
00001650: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001660: 2A 2A 2A 2A 2A 00 7B 20 88 6D A1 44 49 53 4B 53 |*****.{ .m.DISKS|
00001670: 54 41 54 55 53 A0 58 2C 59 2C 43 4F 4C 4F 52 00 |TATUS.X,Y,COLOR.|
00001680: 85 20 9C 6D 20 D5 45 45 4E 00 98 20 B0 6D 54 45 |. .m .EEN.. .mTE|
00001690: 58 31 30 30 20 A8 22 44 4F 53 3A 22 00 A8 20 C4 |X100 ."DOS:".. .|
000016A0: 6D 45 45 4E 20 CA 23 43 4F 4C 4F 52 00 B4 20 D8 |mEEN .#COLOR.. .|
000016B0: 6D 20 D2 24 30 32 38 36 00 BD 20 EC 6D 20 C2 23 |m .$0286.. .m .#|
000016C0: 59 00 C6 20 00 6E 20 C3 23 58 00 CD 20 14 6E 20 |Y.. .n .#X.. .n |
000016D0: E5 00 D9 20 28 6E 20 D6 24 46 46 46 30 00 E2 20 |... (n .$FFF0.. |
000016E0: 3C 6E 20 C2 23 30 00 F1 20 50 6E 20 CA 54 45 58 |<n .#0.. Pn .TEX|
000016F0: 31 30 30 2C 58 00 FD 20 64 6E 20 D6 24 46 46 44 |100,X.. dn .$FFD|
00001700: 32 00 04 21 78 6E 20 EF 00 0D 21 8C 6E 20 C0 23 |2..!xn ...!.n .#|
00001710: 34 00 17 21 A0 6E 20 F6 2A 2D 39 00 20 21 B4 6E |4..!.n .*-9. !.n|
00001720: 20 CA 23 30 00 27 21 C8 6E 20 DA 00 2E 21 DC 6E | .#0.'!.n ...!.n|
00001730: 20 D8 00 3A 21 F0 6E 20 D6 24 46 46 42 44 00 44 | ..:!.n .$FFBD.D|
00001740: 21 04 6F 20 CA 23 31 35 00 4D 21 18 6F 20 C2 23 |!.o .#15.M!.o .#|
00001750: 38 00 54 21 2C 6F 20 DA 00 60 21 40 6F 20 D6 24 |8.T!,o ..`!@o .$|
00001760: 46 46 42 41 00 6C 21 54 6F 20 D6 24 46 46 43 30 |FFBA.l!To .$FFC0|
00001770: 00 76 21 68 6F 20 C2 23 31 35 00 82 21 7C 6F 20 |.v!ho .#15..!|o |
00001780: D6 24 46 46 43 36 00 8D 21 90 6F 20 C3 23 24 30 |.$FFC6..!.o .#$0|
00001790: 30 00 9E 21 A4 6F 54 45 58 39 38 20 D6 24 46 46 |0..!.oTEX98 .$FF|
000017A0: 43 46 00 A9 21 B8 6F 20 C4 23 24 30 44 00 B5 21 |CF..!.o .#$0D..!|
000017B0: CC 6F 20 F7 54 45 58 39 39 00 C1 21 E0 6F 20 D6 |.o .TEX99..!.o .|
000017C0: 24 46 46 44 32 00 CD 21 F4 6F 20 D5 54 45 58 39 |$FFD2..!.o .TEX9|
000017D0: 38 00 DC 21 08 70 54 45 58 39 39 20 CA 23 31 35 |8..!.pTEX99 .#15|
000017E0: 00 E8 21 1C 70 20 D6 24 46 46 43 33 00 F4 21 30 |..!.p .$FFC3..!0|
000017F0: 70 20 D6 24 46 46 45 37 00 FD 21 44 70 20 CA 23 |p .$FFE7..!Dp .#|
00001800: 30 00 07 22 58 70 20 D2 24 43 36 00 0D 22 6C 70 |0.."Xp .$C6.."lp|
00001810: A2 00 33 22 80 70 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A |..3".p;*********|
00001820: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001830: 2A 2A 2A 2A 2A 2A 2A 00 4C 22 94 70 A1 44 49 53 |*******.L".p.DIS|
00001840: 4B 45 52 52 4F 52 A0 58 2C 59 2C 43 4F 4C 4F 52 |KERROR.X,Y,COLOR|
00001850: 00 59 22 A8 70 20 CA 23 43 4F 4C 4F 52 00 65 22 |.Y".p .#COLOR.e"|
00001860: BC 70 20 D2 24 30 32 38 36 00 6E 22 D0 70 20 C2 |.p .$0286.n".p .|
00001870: 23 59 00 77 22 E4 70 20 C3 23 58 00 7E 22 F8 70 |#Y.w".p .#X.~".p|
00001880: 20 E5 00 8A 22 0C 71 20 D6 24 46 46 46 30 00 93 | ...".q .$FFF0..|
00001890: 22 20 71 20 CA 23 30 00 9A 22 34 71 20 DA 00 A1 |" q .#0.."4q ...|
000018A0: 22 48 71 20 D8 00 AD 22 5C 71 20 D6 24 46 46 42 |"Hq ..."\q .$FFB|
000018B0: 44 00 B7 22 70 71 20 CA 23 31 35 00 C0 22 84 71 |D.."pq .#15..".q|
000018C0: 20 C2 23 38 00 C7 22 98 71 20 DA 00 D3 22 AC 71 | .#8..".q ...".q|
000018D0: 20 D6 24 46 46 42 41 00 DF 22 C0 71 20 D6 24 46 | .$FFBA..".q .$F|
000018E0: 46 43 30 00 E9 22 D4 71 20 C2 23 31 35 00 F5 22 |FC0..".q .#15.."|
000018F0: E8 71 20 D6 24 46 46 43 36 00 00 23 FC 71 20 C3 |.q .$FFC6..#.q .|
00001900: 23 24 30 30 00 11 23 10 72 54 45 58 39 38 20 D6 |#$00..#.rTEX98 .|
00001910: 24 46 46 43 46 00 1A 23 24 72 20 C1 23 30 00 26 |$FFCF..#$r .#0.&|
00001920: 23 38 72 20 F7 54 45 58 39 37 00 32 23 4C 72 54 |#8r .TEX97.2#LrT|
00001930: 45 58 39 36 20 ED 00 3D 23 60 72 20 C4 23 24 30 |EX96 ..=#`r .#$0|
00001940: 44 00 49 23 74 72 20 F7 54 45 58 39 39 00 55 23 |D.I#tr .TEX99.U#|
00001950: 88 72 20 D6 24 46 46 44 32 00 61 23 9C 72 20 D5 |.r .$FFD2.a#.r .|
00001960: 54 45 58 39 38 00 73 23 B0 72 54 45 58 39 39 20 |TEX98.s#.rTEX99 |
00001970: D4 54 45 58 31 30 33 00 7D 23 C4 72 20 CA 23 31 |.TEX103.}#.r .#1|
00001980: 35 00 89 23 D8 72 20 D6 24 46 46 43 33 00 95 23 |5..#.r .$FFC3..#|
00001990: EC 72 20 D6 24 46 46 45 37 00 9E 23 00 73 20 CA |.r .$FFE7..#.s .|
000019A0: 23 30 00 A8 23 14 73 20 D2 24 43 36 00 B5 23 28 |#0..#.s .$C6..#(|
000019B0: 73 20 D5 54 45 58 31 30 32 00 C4 23 3C 73 54 45 |s .TEX102..#<sTE|
000019C0: 58 39 37 20 C4 23 34 38 00 D0 23 50 73 20 F7 54 |X97 .#48..#Ps .T|
000019D0: 45 58 39 39 00 DA 23 64 73 20 C4 23 34 39 00 E6 |EX99..#ds .#49..|
000019E0: 23 78 73 20 F7 54 45 58 39 39 00 ED 23 8C 73 20 |#xs .TEX99..#.s |
000019F0: DA 00 F6 23 A0 73 20 C2 23 30 00 05 24 B4 73 20 |...#.s .#0..$.s |
00001A00: CA 54 45 58 31 30 30 2C 58 00 11 24 C8 73 20 D6 |.TEX100,X..$.s .|
00001A10: 24 46 46 44 32 00 18 24 DC 73 20 EF 00 22 24 F0 |$FFD2..$.s .."$.|
00001A20: 73 20 C0 23 32 30 00 2C 24 04 74 20 F6 2A 2D 39 |s .#20.,$.t .*-9|
00001A30: 00 33 24 18 74 20 D9 00 3C 24 2C 74 20 C3 23 30 |.3$.t ..<$,t .#0|
00001A40: 00 48 24 40 74 20 D5 54 45 58 39 36 00 69 24 54 |.H$@t .TEX96.i$T|
00001A50: 74 54 45 58 31 30 30 20 A8 22 44 4F 53 20 45 52 |tTEX100 ."DOS ER|
00001A60: 52 4F 52 20 4D 45 53 53 41 47 45 3A 22 00 73 24 |ROR MESSAGE:".s$|
00001A70: 68 74 20 A5 24 30 44 00 87 24 7C 74 54 45 58 31 |ht .$0D..$|tTEX1|
00001A80: 30 31 20 A5 24 30 44 2C 24 30 44 00 A5 24 90 74 |01 .$0D,$0D..$.t|
00001A90: 20 A8 22 2D 48 49 59 20 4B 45 59 20 54 4F 20 43 | ."-HIY KEY TO C|
00001AA0: 4F 4E 54 49 4E 55 45 2D 22 00 B4 24 A4 74 54 45 |ONTINUE-"..$.tTE|
00001AB0: 58 31 30 33 20 A5 30 30 00 C7 24 B8 74 54 45 58 |X103 .00..$.tTEX|
00001AC0: 31 30 32 20 C2 54 45 58 31 30 33 00 D4 24 CC 74 |102 .TEX103..$.t|
00001AD0: 20 F7 54 45 58 31 30 34 00 DF 24 E0 74 20 C2 23 | .TEX104..$.t .#|
00001AE0: 24 30 30 00 EE 24 F4 74 20 CA 54 45 58 31 30 31 |$00..$.t .TEX101|
00001AF0: 2C 58 00 FA 24 08 75 20 D6 24 46 46 44 32 00 01 |,X..$.u .$FFD2..|
00001B00: 25 1C 75 20 EF 00 0B 25 30 75 20 C0 23 32 33 00 |%.u ...%0u .#23.|
00001B10: 15 25 44 75 20 F6 2A 2D 39 00 1E 25 58 75 20 C2 |.%Du .*-9..%Xu .|
00001B20: 23 30 00 28 25 6C 75 20 D3 24 43 36 00 32 25 80 |#0.(%lu .$C6.2%.|
00001B30: 75 20 C2 24 43 35 00 3C 25 94 75 20 C0 23 36 34 |u .$C5.<%.u .#64|
00001B40: 00 46 25 A8 75 20 F7 2A 2D 38 00 53 25 BC 75 54 |.F%.u .*-8.S%.uT|
00001B50: 45 58 31 30 34 20 E4 00 59 25 D0 75 A2 00 7F 25 |EX104 ..Y%.u...%|
00001B60: E4 75 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.u;*************|
00001B70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001B80: 2A 2A 2A 00 8D 25 F8 75 A1 44 49 53 4B 49 4E 49 |***..%.u.DISKINI|
00001B90: 54 00 98 25 0C 76 20 D5 54 57 45 45 00 A8 25 20 |T..%.v .TWEE..% |
00001BA0: 76 4E 41 41 4D 20 A8 22 49 2F 30 22 00 B5 25 34 |vNAAM ."I/0"..%4|
00001BB0: 76 54 57 45 45 20 CA 23 33 00 C4 25 48 76 20 C3 |vTWEE .#3..%Hv .|
00001BC0: 23 3E 28 4E 41 41 4D 29 00 D3 25 5C 76 20 C2 23 |#>(NAAM)..%\v .#|
00001BD0: 3C 28 4E 41 41 4D 29 00 DF 25 70 76 20 D6 24 46 |<(NAAM)..%pv .$F|
00001BE0: 46 42 44 00 E9 25 84 76 20 CA 23 31 35 00 F2 25 |FBD..%.v .#15..%|
00001BF0: 98 76 20 C2 23 38 00 FC 25 AC 76 20 C3 23 31 35 |.v .#8..%.v .#15|
00001C00: 00 08 26 C0 76 20 D6 24 46 46 42 41 00 14 26 D4 |..&.v .$FFBA..&.|
00001C10: 76 20 D6 24 46 46 43 30 00 1E 26 E8 76 20 CA 23 |v .$FFC0..&.v .#|
00001C20: 31 35 00 2A 26 FC 76 20 D6 24 46 46 43 33 00 36 |15.*&.v .$FFC3.6|
00001C30: 26 10 77 20 D6 24 46 46 45 37 00 3C 26 24 77 A2 |&.w .$FFE7.<&$w.|
00001C40: 00 62 26 38 77 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.b&8w;**********|
00001C50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001C60: 2A 2A 2A 2A 2A 2A 00 6F 26 4C 77 A1 44 49 53 4B |******.o&Lw.DISK|
00001C70: 56 41 4C 00 7A 26 60 77 20 D5 44 52 49 45 00 89 |VAL.z&`w .DRIE..|
00001C80: 26 74 77 4E 41 41 4D 33 20 A8 22 56 22 00 96 26 |&twNAAM3 ."V"..&|
00001C90: 88 77 44 52 49 45 20 CA 23 31 00 A6 26 9C 77 20 |.wDRIE .#1..&.w |
00001CA0: C3 23 3E 28 4E 41 41 4D 33 29 00 B6 26 B0 77 20 |.#>(NAAM3)..&.w |
00001CB0: C2 23 3C 28 4E 41 41 4D 33 29 00 C2 26 C4 77 20 |.#<(NAAM3)..&.w |
00001CC0: D6 24 46 46 42 44 00 CC 26 D8 77 20 CA 23 31 35 |.$FFBD..&.w .#15|
00001CD0: 00 D5 26 EC 77 20 C2 23 38 00 DF 26 00 78 20 C3 |..&.w .#8..&.x .|
00001CE0: 23 31 35 00 EB 26 14 78 20 D6 24 46 46 42 41 00 |#15..&.x .$FFBA.|
00001CF0: F7 26 28 78 20 D6 24 46 46 43 30 00 01 27 3C 78 |.&(x .$FFC0..'<x|
00001D00: 20 CA 23 31 35 00 0D 27 50 78 20 D6 24 46 46 43 | .#15..'Px .$FFC|
00001D10: 33 00 19 27 64 78 20 D6 24 46 46 45 37 00 1F 27 |3..'dx .$FFE7..'|
00001D20: 78 78 A2 00 46 27 8C 78 3B 2A 2A 2A 2A 2A 2A 2A |xx..F'.x;*******|
00001D30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 65 27 A0 78 A1 |**********.e'.x.|
00001D50: 4C 4F 41 44 A0 4E 41 41 4D 41 44 52 45 53 2C 4C |LOAD.NAAMADRES,L|
00001D60: 45 4E 47 54 45 4E 41 41 4D 00 70 27 B4 78 20 CA |ENGTENAAM.p'.x .|
00001D70: 23 24 30 34 00 7B 27 C8 78 20 C2 23 24 30 38 00 |#$04.{'.x .#$08.|
00001D80: 86 27 DC 78 20 C3 23 24 30 31 00 92 27 F0 78 20 |.'.x .#$01..'.x |
00001D90: D6 24 46 46 42 41 00 A4 27 04 79 20 CA 23 4C 45 |.$FFBA..'.y .#LE|
00001DA0: 4E 47 54 45 4E 41 41 4D 00 B8 27 18 79 20 C2 23 |NGTENAAM..'.y .#|
00001DB0: 3C 28 4E 41 41 4D 41 44 52 45 53 29 00 CC 27 2C |<(NAAMADRES)..',|
00001DC0: 79 20 C3 23 3E 28 4E 41 41 4D 41 44 52 45 53 29 |y .#>(NAAMADRES)|
00001DD0: 00 D8 27 40 79 20 D6 24 46 46 42 44 00 E3 27 54 |..'@y .$FFBD..'T|
00001DE0: 79 20 CA 23 24 30 30 00 EE 27 68 79 20 C2 23 24 |y .#$00..'hy .#$|
00001DF0: 46 46 00 F9 27 7C 79 20 C3 23 24 46 46 00 05 28 |FF..'|y .#$FF..(|
00001E00: 90 79 20 D6 24 46 46 44 35 00 0B 28 A4 79 A2 00 |.y .$FFD5..(.y..|
00001E10: 32 28 B8 79 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |2(.y;***********|
00001E20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001E30: 2A 2A 2A 2A 2A 2A 00 4F 28 CC 79 A1 53 41 56 45 |******.O(.y.SAVE|
00001E40: A0 4E 41 4D 41 44 52 2C 4C 2C 41 44 52 31 2C 41 |.NAMADR,L,ADR1,A|
00001E50: 44 52 32 00 5A 28 E0 79 20 CA 23 24 30 34 00 65 |DR2.Z(.y .#$04.e|
00001E60: 28 F4 79 20 C2 23 24 30 38 00 70 28 08 7A 20 C3 |(.y .#$08.p(.z .|
00001E70: 23 24 30 31 00 7C 28 1C 7A 20 D6 24 46 46 42 41 |#$01.|(.z .$FFBA|
00001E80: 00 85 28 30 7A 20 CA 23 4C 00 96 28 44 7A 20 C2 |..(0z .#L..(Dz .|
00001E90: 23 3C 28 4E 41 4D 41 44 52 29 00 A7 28 58 7A 20 |#<(NAMADR)..(Xz |
00001EA0: C3 23 3E 28 4E 41 4D 41 44 52 29 00 B3 28 6C 7A |.#>(NAMADR)..(lz|
00001EB0: 20 D6 24 46 46 42 44 00 C2 28 80 7A 20 CA 23 3C | .$FFBD..(.z .#<|
00001EC0: 28 41 44 52 31 29 00 CC 28 94 7A 20 D2 24 30 32 |(ADR1)..(.z .$02|
00001ED0: 00 DB 28 A8 7A 20 CA 23 3E 28 41 44 52 31 29 00 |..(.z .#>(ADR1).|
00001EE0: E5 28 BC 7A 20 D2 24 30 33 00 F4 28 D0 7A 20 C2 |.(.z .$03..(.z .|
00001EF0: 23 3C 28 41 44 52 32 29 00 03 29 E4 7A 20 C3 23 |#<(ADR2)..).z .#|
00001F00: 3E 28 41 44 52 32 29 00 0E 29 F8 7A 20 CA 23 24 |>(ADR2)..).z .#$|
00001F10: 30 32 00 1A 29 0C 7B 20 D6 24 46 46 44 38 00 20 |02..).{ .$FFD8. |
00001F20: 29 20 7B A2 00 46 29 34 7B 3B 2A 2A 2A 2A 2A 2A |) {..F)4{;******|
00001F30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001F40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 64 29 48 7B A1 |**********.d)H{.|
00001F50: 53 43 52 41 54 43 48 A0 4E 41 41 4D 41 44 52 45 |SCRATCH.NAAMADRE|
00001F60: 53 2C 4C 45 4E 47 54 45 00 70 29 5C 7B 20 D5 42 |S,LENGTE.p)\{ .B|
00001F70: 45 47 49 4E 00 90 29 70 7B 4E 41 41 4D 20 A8 22 |EGIN..)p{NAAM ."|
00001F80: 53 30 3A 20 20 20 20 20 20 20 20 20 20 20 20 20 |S0: |
00001F90: 20 20 20 22 00 9F 29 84 7B 42 45 47 49 4E 20 C2 | "..).{BEGIN .|
00001FA0: 23 30 30 00 B7 29 98 7B 54 45 58 32 30 30 20 CA |#00..).{TEX200 .|
00001FB0: 4E 41 41 4D 41 44 52 45 53 2C 58 00 C8 29 AC 7B |NAAMADRES,X..).{|
00001FC0: 20 D2 4E 41 41 4D 2B 24 30 33 2C 58 00 CF 29 C0 | .NAAM+$03,X..).|
00001FD0: 7B 20 EF 00 DD 29 D4 7B 20 C0 23 4C 45 4E 47 54 |{ ...).{ .#LENGT|
00001FE0: 45 00 EA 29 E8 7B 20 F6 54 45 58 32 30 30 00 FA |E..).{ .TEX200..|
00001FF0: 29 FC 7B 20 CA 23 4C 45 4E 47 54 45 2B 33 00 09 |).{ .#LENGTE+3..|
00002000: 2A 10 7C 20 C3 23 3E 28 4E 41 41 4D 29 00 18 2A |*.| .#>(NAAM)..*|
00002010: 24 7C 20 C2 23 3C 28 4E 41 41 4D 29 00 24 2A 38 |$| .#<(NAAM).$*8|
00002020: 7C 20 D6 24 46 46 42 44 00 2E 2A 4C 7C 20 CA 23 || .$FFBD..*L| .#|
00002030: 31 35 00 37 2A 60 7C 20 C2 23 38 00 41 2A 74 7C |15.7*`| .#8.A*t||
00002040: 20 C3 23 31 35 00 4D 2A 88 7C 20 D6 24 46 46 42 | .#15.M*.| .$FFB|
00002050: 41 00 59 2A 9C 7C 20 D6 24 46 46 43 30 00 63 2A |A.Y*.| .$FFC0.c*|
00002060: B0 7C 20 CA 23 31 35 00 6F 2A C4 7C 20 D6 24 46 |.| .#15.o*.| .$F|
00002070: 46 43 33 00 7B 2A D8 7C 20 D6 24 46 46 45 37 00 |FC3.{*.| .$FFE7.|
00002080: 81 2A EC 7C A2 00 A7 2A 00 7D 3B 2A 2A 2A 2A 2A |.*.|...*.};*****|
00002090: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000020A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 CA 2A 14 7D |***********..*.}|
000020B0: 3B 4D 41 43 52 4F 20 49 4E 50 55 54 A0 41 44 52 |;MACRO INPUT.ADR|
000020C0: 2C 4D 41 58 2C 58 2C 59 2C 43 4F 4C 4F 52 00 F0 |,MAX,X,Y,COLOR..|
000020D0: 2A 28 7D 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |*(};************|
000020E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000020F0: 2A 2A 2A 2A 00 15 2B 3C 7D 3B 53 45 54 20 47 4C |****..+<};SET GL|
00002100: 4F 42 41 4C 20 49 4E 50 55 54 42 41 53 45 20 54 |OBAL INPUTBASE T|
00002110: 4F 20 49 4E 50 42 41 53 45 00 35 2B 50 7D 3B 28 |O INPBASE.5+P};(|
00002120: 49 4E 50 42 41 53 45 3D 53 54 41 52 54 20 53 55 |INPBASE=START SU|
00002130: 42 52 4F 55 54 49 4E 45 29 00 57 2B 64 7D 3B 52 |BROUTINE).W+d};R|
00002140: 45 4D 20 20 20 20 20 20 49 4E 49 54 49 4E 50 55 |EM INITINPU|
00002150: 54 A0 30 2C 30 2C 30 2C 30 2C 30 00 69 2B 78 7D |T.0,0,0,0,0.i+x}|
00002160: 3B 52 45 4D 20 20 20 20 20 20 52 54 53 00 8C 2B |;REM RTS..+|
00002170: 8C 7D 3B 28 43 41 4C 4C 20 49 4E 49 54 49 4E 50 |.};(CALL INITINP|
00002180: 55 54 20 54 4F 20 49 4E 54 49 41 4C 49 53 45 29 |UT TO INTIALISE)|
00002190: 00 92 2B A0 7D 3B 00 B7 2B B4 7D 3B 2A 20 49 4E |..+.};..+.};* IN|
000021A0: 50 55 54 20 57 4F 52 44 54 20 56 41 4E 41 46 20 |PUT WORDT VANAF |
000021B0: 41 44 52 45 53 20 28 41 44 52 29 00 D3 2B C8 7D |ADRES (ADR)..+.}|
000021C0: 3B 2A 20 4E 45 45 52 47 45 5A 45 54 20 49 4E 20 |;* NEERGEZET IN |
000021D0: 46 4F 52 4D 41 54 3A 00 EE 2B DC 7D 3B 2A 20 4C |FORMAT:..+.};* L|
000021E0: 45 4E 47 54 45 49 4E 50 55 54 2C 49 4E 50 55 54 |ENGTEINPUT,INPUT|
000021F0: 2C 30 00 F4 2B F0 7D 3B 00 1A 2C 04 7E 3B 2A 2A |,0..+.};..,.~;**|
00002200: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002210: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3B |**************.;|
00002220: 2C 18 7E A1 49 4E 49 54 49 4E 50 55 54 A0 41 44 |,.~.INITINPUT.AD|
00002230: 52 2C 4D 41 58 2C 58 2C 59 2C 43 4F 4C 4F 52 00 |R,MAX,X,Y,COLOR.|
00002240: 4E 2C 2C 7E 49 4E 50 42 41 53 45 20 D5 54 45 58 |N,,~INPBASE .TEX|
00002250: 35 38 00 60 2C 40 7E 54 45 58 35 31 20 A5 3E 28 |58.`,@~TEX51 .>(|
00002260: 41 44 52 29 00 72 2C 54 7E 54 45 58 35 32 20 A5 |ADR).r,T~TEX52 .|
00002270: 3C 28 41 44 52 29 00 81 2C 68 7E 54 45 58 35 33 |<(ADR)..,h~TEX53|
00002280: 20 A5 4D 41 58 00 8E 2C 7C 7E 54 45 58 35 34 20 | .MAX..,|~TEX54 |
00002290: A5 58 00 9B 2C 90 7E 54 45 58 35 35 20 A5 59 00 |.X..,.~TEX55 .Y.|
000022A0: AC 2C A4 7E 54 45 58 35 30 20 A5 43 4F 4C 4F 52 |.,.~TEX50 .COLOR|
000022B0: 00 BD 2C B8 7E 54 45 58 35 38 20 C2 54 45 58 35 |..,.~TEX58 .TEX5|
000022C0: 30 00 C9 2C CC 7E 20 D3 24 30 32 38 36 00 D5 2C |0..,.~ .$0286..,|
000022D0: E0 7E 20 C2 54 45 58 35 31 00 DF 2C F4 7E 20 D3 |.~ .TEX51..,.~ .|
000022E0: 24 30 33 00 EB 2C 08 7F 20 C2 54 45 58 35 32 00 |$03..,.. .TEX52.|
000022F0: F5 2C 1C 7F 20 D3 24 30 32 00 01 2D 30 7F 20 C2 |.,.. .$02..-0. .|
00002300: 54 45 58 35 34 00 0D 2D 44 7F 20 C3 54 45 58 35 |TEX54..-D. .TEX5|
00002310: 35 00 14 2D 58 7F 20 E5 00 20 2D 6C 7F 20 D6 24 |5..-X. .. -l. .$|
00002320: 46 46 46 30 00 30 2D 80 7F 54 45 58 32 33 20 C2 |FFF0.0-..TEX23 .|
00002330: 23 24 30 30 00 3C 2D 94 7F 20 D3 54 45 58 32 32 |#$00.<-.. .TEX22|
00002340: 00 48 2D A8 7F 20 D5 54 45 58 32 30 00 56 2D BC |.H-.. .TEX20.V-.|
00002350: 7F 54 45 58 32 32 20 A5 30 30 00 66 2D D0 7F 54 |.TEX22 .00.f-..T|
00002360: 45 58 32 30 20 CA 23 31 38 35 00 72 2D E4 7F 20 |EX20 .#185.r-.. |
00002370: D6 24 46 46 44 32 00 83 2D F8 7F 54 45 58 32 31 |.$FFD2..-..TEX21|
00002380: 20 D6 24 46 46 45 34 00 8F 2D 0C 80 20 C9 54 45 | .$FFE4..-.. .TE|
00002390: 58 32 32 00 9B 2D 20 80 20 C3 54 45 58 32 32 00 |X22..- . .TEX22.|
000023A0: A7 2D 34 80 20 C1 54 45 58 35 33 00 B3 2D 48 80 |.-4. .TEX53..-H.|
000023B0: 20 F7 54 45 58 32 39 00 BE 2D 5C 80 20 C4 23 24 | .TEX29..-\. .#$|
000023C0: 30 30 00 CA 2D 70 80 20 F6 54 45 58 32 34 00 D6 |00..-p. .TEX24..|
000023D0: 2D 84 80 20 C7 54 45 58 32 32 00 E2 2D 98 80 20 |-.. .TEX22..-.. |
000023E0: D5 54 45 58 32 31 00 F1 2D AC 80 54 45 58 32 34 |.TEX21..-..TEX24|
000023F0: 20 C4 23 31 33 00 FD 2D C0 80 20 F7 54 45 58 32 | .#13..-.. .TEX2|
00002400: 38 00 08 2E D4 80 20 C4 23 31 34 38 00 14 2E E8 |8..... .#148....|
00002410: 80 20 F7 54 45 58 32 31 00 1F 2E FC 80 20 C4 23 |. .TEX21..... .#|
00002420: 31 35 37 00 2B 2E 10 81 20 F7 54 45 58 32 31 00 |157.+... .TEX21.|
00002430: 35 2E 24 81 20 C4 23 32 39 00 41 2E 38 81 20 F7 |5.$. .#29.A.8. .|
00002440: 54 45 58 32 31 00 4B 2E 4C 81 20 C4 23 31 37 00 |TEX21.K.L. .#17.|
00002450: 57 2E 60 81 20 F7 54 45 58 32 31 00 62 2E 74 81 |W.`. .TEX21.b.t.|
00002460: 20 C4 23 31 34 35 00 6E 2E 88 81 20 F7 54 45 58 | .#145.n... .TEX|
00002470: 32 31 00 78 2E 9C 81 20 C4 23 32 30 00 84 2E B0 |21.x... .#20....|
00002480: 81 20 F6 54 45 58 32 36 00 8F 2E C4 81 20 C1 23 |. .TEX26..... .#|
00002490: 24 30 31 00 9B 2E D8 81 20 F6 54 45 58 32 35 00 |$01..... .TEX25.|
000024A0: A6 2E EC 81 20 C3 23 24 30 30 00 B2 2E 00 82 20 |.... .#$00..... |
000024B0: D4 54 45 58 32 32 00 BE 2E 14 82 20 D5 54 45 58 |.TEX22..... .TEX|
000024C0: 32 31 00 CF 2E 28 82 54 45 58 32 35 20 C7 54 45 |21...(.TEX25 .TE|
000024D0: 58 32 32 00 DB 2E 3C 82 20 C7 54 45 58 32 32 00 |X22...<. .TEX22.|
000024E0: E7 2E 50 82 20 D5 54 45 58 32 37 00 FA 2E 64 82 |..P. .TEX27...d.|
000024F0: 54 45 58 32 36 20 D2 28 24 30 32 29 2C 59 00 06 |TEX26 .($02),Y..|
00002500: 2F 78 82 54 45 58 32 37 20 D8 00 11 2F 8C 82 20 |/x.TEX27 .../.. |
00002510: CA 23 31 35 37 00 1D 2F A0 82 20 D6 24 46 46 44 |.#157../.. .$FFD|
00002520: 32 00 24 2F B4 82 20 D7 00 30 2F C8 82 20 D6 24 |2.$/.. ..0/.. .$|
00002530: 46 46 44 32 00 3C 2F DC 82 20 D5 54 45 58 32 30 |FFD2.</.. .TEX20|
00002540: 00 4B 2F F0 82 54 45 58 32 38 20 CA 23 32 30 00 |.K/..TEX28 .#20.|
00002550: 57 2F 04 83 20 D6 24 46 46 44 32 00 63 2F 18 83 |W/.. .$FFD2.c/..|
00002560: 20 C3 54 45 58 32 32 00 6D 2F 2C 83 20 CA 23 30 | .TEX22.m/,. .#0|
00002570: 30 00 7B 2F 40 83 20 D2 28 24 30 32 29 2C 59 00 |0.{/@. .($02),Y.|
00002580: 87 2F 54 83 20 C7 54 45 58 32 32 00 93 2F 68 83 |./T. .TEX22../h.|
00002590: 20 CA 54 45 58 32 32 00 9E 2F 7C 83 20 C3 23 24 | .TEX22../|. .#$|
000025A0: 30 30 00 AC 2F 90 83 20 D2 28 24 30 32 29 2C 59 |00../.. .($02),Y|
000025B0: 00 B3 2F A4 83 20 E3 00 C2 2F B8 83 54 45 58 32 |../.. .../..TEX2|
000025C0: 39 20 CA 23 32 30 00 D3 2F CC 83 54 45 58 33 30 |9 .#20../..TEX30|
000025D0: 20 D6 24 46 46 44 32 00 DA 2F E0 83 20 EC 00 E6 | .$FFD2../.. ...|
000025E0: 2F F4 83 20 F6 54 45 58 33 30 00 F2 2F 08 84 20 |/.. .TEX30../.. |
000025F0: D5 54 45 58 32 33 00 F8 2F 1C 84 A2 00 1E 30 30 |.TEX23../.....00|
00002600: 84 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.;**************|
00002610: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002620: 2A 2A 00 3B 30 44 84 A1 49 4E 50 55 54 A0 41 44 |**.;0D..INPUT.AD|
00002630: 52 2C 4D 41 58 2C 58 2C 59 2C 43 4F 4C 4F 52 00 |R,MAX,X,Y,COLOR.|
00002640: 47 30 58 84 20 D5 54 45 58 35 38 00 59 30 6C 84 |G0X. .TEX58.Y0l.|
00002650: 54 45 58 35 36 20 A5 3E 28 41 44 52 29 00 66 30 |TEX56 .>(ADR).f0|
00002660: 80 84 20 A5 3C 28 41 44 52 29 00 72 30 94 84 20 |.. .<(ADR).r0.. |
00002670: A5 4D 41 58 2B 32 00 7A 30 A8 84 20 A5 59 00 82 |.MAX+2.z0.. .Y..|
00002680: 30 BC 84 20 A5 58 00 8E 30 D0 84 20 A5 43 4F 4C |0.. .X..0.. .COL|
00002690: 4F 52 00 9E 30 E4 84 54 45 58 35 38 20 C2 23 24 |OR..0..TEX58 .#$|
000026A0: 30 30 00 B1 30 F8 84 54 45 58 35 37 20 CA 54 45 |00..0..TEX57 .TE|
000026B0: 58 35 36 2C 58 00 C7 30 0C 85 20 D2 49 4E 50 55 |X56,X..0.. .INPU|
000026C0: 54 42 41 53 45 2B 24 30 33 2C 58 00 CE 30 20 85 |TBASE+$03,X..0 .|
000026D0: 20 EF 00 D7 30 34 85 20 C0 23 36 00 E3 30 48 85 | ...04. .#6..0H.|
000026E0: 20 F6 54 45 58 35 37 00 F3 30 5C 85 20 D6 49 4E | .TEX57..0\. .IN|
000026F0: 50 55 54 42 41 53 45 00 F9 30 70 85 A2 00 00 00 |PUTBASE..0p.....|
OALAFILE: .A.PIC ."....NI10 ." ".=..NI
11 .129,80,73,67,32,32,32.R..NI12 ."
".J..NI13 ." ".Q..N ....
.NLO CLRHOME....N TEXT TEKST10,0,10,1...
TN INPUT I3,1,21,10,1....N C#1.E..N JI3,
Y.Q..O RI0+$5...$O LOAD I0,7...8O DISKER
ROR 0,1,1...LO CLRHOME...`O UBEGIN...TOS
C CLRHOME.6..O TEXT TEKST11,0,10,1.N..O
INPUT I4,1,24,10,1.W..O C#1.B.DO JI4,Y.N
.XO RI5+$5....O SCRATCH I5,7....P DISKER
ROR 0,1,1....P CLRHOME....P UBEGIN...(PI
4 ." ".N.<PI5 ."?PIC *"...PPTEKST11 .
"SCRATCH KOALAFILE: .A.PIC ."...DPI3 ."
"...XPI0 ."?PIC *".(..PDI CLRHOME.1.
P DIR.F..P DISKERROR 0,1,1.R..P UBEGIN.^
.HPREN UQQ.I..PSA UQQ.X..QVA DISKVAL....
Q CLRHOME...,Q DISKSTATUS 1,1,1...@Q UBE
GIN...TQEXIT UQQ.O.HQIN WINDOW 14,6,12,1
8,1...|QWIN TEXT TEKST1,15,7,1....Q TEXT
TEKST2,15,9,1....Q TEXT TEKST3,15,11,1.
4..Q TEXT TEKST4,15,13,1.M.LQ TEXT TEKST
5,15,15,1.F..Q TEXT TEKST7,15,17,1...Q
TEXT TEKST6,15,19,1....RQQ .....RTT .14,
8....R ."."....RBEGIN PRINT TT....R VIN.
H.0REEN VWIN.Y.DR CURSOR 7,15...XR J#250
...LR V$FFD2....R PAUSE 100....RIN0 INKE
Y....R D#01."..R .INJ1.+.PR UDI.9..RINJ1
D#64.C..R .IN0.M..S VWIN.^. S CURSOR 9,
15.I.4S J#250.U.HS V$FFD2...\S PAUSE 100
...PSIN1 INKEY....S D#01....S .INJ2....S
ULO....SINJ2 D#64.H.TS .IN1.R..S VWIN..
..S CURSOR 11,15....T J#250...$T V$FFD2.
..8T PAUSE 100...LTIN2 INKEY.".`T D#01.-
.TT .INJ3.6..T USA.D..TINJ3 D#64.N..T .I
N2.X.DT VWIN.J.XT CURSOR 13,15.U..T J#25
0....U V$FFD2....U PAUSE 100...(UIN3 INK
EY...<U D#01...PU .INJ4...DU USC.J.XUINJ
4 D#64.T..U .IN3... U VWIN....U CURSOR 1
5,15...HU J#250....U V$FFD2....U PAUSE 1
00.$..VIN4 INKEY....V D#01.9.,V .INJ5.B.
@V UVA.P.TVINJ5 D#64.Z.HV .IN4.D.|V VWIN
.V..V CURSOR 17,15....V J#250....V V$FFD
2...LV PAUSE 100....VIN5 INKEY....V D#01
....W .INJ6.I..W UREN.W.0WINJ6 D#64...DW
.IN5...XW VWIN...LW CURSOR 19,15....W J
#250....W V$FFD2.#..W PAUSE 100.1..WIN6
INKEY.;.PW D#01.F..W .INJ7.Q..W UEXIT._.
.XINJ7 D#64.I. X .IN6.S.4X UEEN.Z.HX ...
.\XTEKST1 .". .DIRECTORY."...PXTEKST2 ."
. .LOAD .".N..XTEKST3 .". .SAVE
."....XTEKST4 .". .SCRATCH ."....XTEKST
5 .". .VALIDATE ."."..XTEKST6 .". .EXIT
.".>.TXTEKST7 .". .RENAME .".F..XT
EKST10 ."LOAD KOALAFILE: .A.PIC ."....X.
WINDOW X,Y,X1,Y1,COLVAL....Y B#X...$Y ST
9...8Y B#Y...LY ST8...`Y UBEGIN...TYT1 .
".".K..YT2 .".".W..YT3 ."."....YT7 .".".
..DYT4 ."."...XYT5 ."."....YT6 ." "....Z
T8 .00....ZT9 .00...(ZSET J#COLVAL.:.<Z
R$0286.H.PZPOINT BT8.Q.DZ CT9.X.XZ ..D..
Z V$FFF0.K. Z ..Z..ZBEGIN VSET...HZ JT1.
...Z V$FFD2....Z B#00....[ JT5....[EEN V
$FFD2...,[ ..D.@[ .#X1-2.N.T[ .EEN.W.H[
JT2...|[ V$FFD2....[DRIE IT8....[ VSET..
..[ JT4...L[ V$FFD2....[ B#00."..[ JT6.2
..\EENN V$FFD2.9..\ ..E.0\ .#X1-2.P.D\ .
EENN.Y.X\ JT4.E.L\ V$FFD2.N..\ JT8.Z..\
D#Y1+1....\ .DRIE....\ IT8...P\ VSET....
\ JT3....\ V$FFD2....] B#00... ] JT5.Q.4
]EENNN V$FFD2.X.H] ....\] .#X1-2...P] .E
ENNN....] JT7....] V$FFD2....]../..];***
***************************.F.T].SCREENC
OLOR COLOR.S..] C#COLOR._..] T53281.E..^
....$^;******************************. .
8^.BORDERCOLOR COLOR...L^ C#COLOR...`^ T
53280...T^.....^;***********************
*******....^.FILLCOLOR COLOR....^ J#COLO
R...D^ B#$00.".X^TEX1 R$D800,X.0..^ R$D9
00,X.>.._ R$DA00,X.E.._ ..P.(_ .TEX1.B.<
_TEX2 R$DB00,X.I.P_ ..T.D_ .#$E8..X_ .T
EX2...._.... _;*************************
*****...._.COLORINC.B.H_ B#$00.T.._TEX1
I$D800,X...._ I$D900,X....` I$DA00,X....
` ....,` .TEX1...@`TEX2 I$DB00,X...T` ..
&.H` .#$E8.1.|` .TEX2.7..`..[..`;*******
***********************.H..`.CLRHOME.S.L
` J#147...` V$FFD2....`.....A;*********
*********************.M..A;* MACRO TEXT
ADRES,X,Y,KLEUR *...0A;*****************
*************...DA.TEXT TADR,XVAL,YVAL,C
OLVAL...XA J#COLVAL.+.LA R$0286.7..A B#Y
VAL.C..A C#XVAL.J..A ..V..A V$FFF0.A.PA
B#$00.R..ATEX1 JTADR,X.}..A D#$FF....B .
TEX2... B V$FFD2...4B ....HB UTEX1...\BT
EX2 ....PB..Y..B;***********************
*****....B;* MACRO PRINT ADRES *.
...B;****************************.-..B.P
RINT TADR.8.TB B#$00.I..BTEX1 JTADR,X.T.
.B D#$FF._..C .TEX2.K.$C V$FFD2.R.8C ..}
.LC UTEX1...`CTEX2 ....TC J#$0D....C V$F
FD2....C..G..C;*************************
***...DC;* MACRO KEY WAIT *...
XC;****************************....C.KEY
WAIT.(..DTEX1 B#$00.4..D S$00C6.@.(D J$
00C5.L.<D D#WAIT.W.PD .TEX1.].DD..M.XD.C
URSOR X,Y.V..D B#X.. D C#Y....D ....HD
V$FFF0....D.....D.INKEY....E B#$00....E
S$00C6.F.,E J$00C5.L.@E..Y.TE.PAUSE P...
HE B#00...|E C#$FF....E V$EEB3....E ....
.E .#<(P)...LE .*-6....E ..*..E A#>(P).5
..F .*-11.;..F..A.0F;*******************
*************...DF;* HERBIE'S DISK MACR
O'S 1.1 *...XF;***********************
*********...LF;MACRO DIR....F;MACRO LOAD
NAAMADRES,LENGTENAAM....F;MACRO SAVE NA
MADR,L,ADR1,ADR2.(..F;MACRO SCRATCH NAAM
ADRES,LENGTE.H..F;MACRO DISKSTATUS X,Y,C
OLOR.G.PF;MACRO DISKERROR X,Y,COLOR.{..F
;MACRO DISKINIT....F;MACRO DISKVAL....G;
********************************... G.DI
R.H.4G J#$24.T.HG R$0100...\G V$AAD7...P
G J#$01....G Z....G B#$00....G V$FFBD...
.G B#$08...TG C#$60.+..G V$FFBA.7..G V$F
3D5.A..H J$BA.M.$H V$FFB4.W.8H J$B9.C.LH
V$FF96.N.`H J#$00.X.TH R$90....H C#$03.
...HTEX0 T$FF....H V$FFA5...DH R$FE...XH
C$90....H .TEX4.H..I V$FFA5.R..I C$90..
.(I .TEX4...<I C$FF...PI ....DI .TEX0...
XI B$FE....I V$BDCD... I VTEX5.*..ITEX1
V$FFA5.4.HI B$90.?..I .TEX4.F..I Z.M..J
X.X..J .TEX2.D.,J V$FFD2.O.@J UTEX1..TJ
TEX2 V$AAD7...HJ J#$00...|J R$C6....J J$
C5....J D#60....J .TEX7...LJ D#63.H..J .
TEX4.W..JTEX3 C#$02....K UTEX0....KTEX4
V$F642...0K J#$08...DK R$BA...XK V$FFB4.
..LK J#$6F.(..K R$B9.4..K V$FF96.@..K V$
FFAB.K..K J#$00.U.PK R$C6.A..K UTEX10.P.
.KTEX5 J#$20.|..L U$FFD2... L B$02F7...4
L V$FFC9...HL .TEX6...\L U$E0F9...PLTEX6
..E..LTEX7 B#$00.U..LTEX8 V$EEB3....L .
....L .TEX8...TLTEX9 J#$00.. .L R$C6.. .
L J$C5.. .M D#60.. $M .TEX9.* 8M UTEX3.6
LMTEX10 ..< `M..A TM;******************
*************.{ .M.DISKSTATUS X,Y,COLOR.
. .M UEEN.. .MTEX100 ."DOS:".. DMEEN J#C
OLOR.. XM R$0286.. .M B#Y.F .N C#X.M .N
..Y (N V$FFF0.. <N B#0.. PN JTEX100,X..
DN V$FFD2..!XN ...!.N .#4..! N .*-9. !.N
J#0.'!HN Z..!.N X.:!.N V$FFBD.D!.O J#15
.M!.O B#8.T!,O Z.`!@O V$FFBA.L!TO V$FFC0
.V!HO B#15..!|O V$FFC6..!.O C#$00..!.OTE
X98 V$FFCF..!.O D#$0D..!LO .TEX99.A!.O V
$FFD2.M!.O UTEX98..!.PTEX99 J#15..!.P V$
FFC3..!0P V$FFE7..!DP J#0.."XP R$C6.."LP
..3".P;********************************.
L".P.DISKERROR X,Y,COLOR.Y".P J#COLOR.E"
.P R$0286.N"PP B#Y.W".P C#X.~".P ...".Q
V$FFF0.." Q J#0.."4Q Z.."HQ X.."\Q V$FFB
D.."PQ J#15..".Q B#8.G".Q Z.S".Q V$FFBA.
.".Q V$FFC0.."TQ B#15..".Q V$FFC6..#.Q C
#$00..#.RTEX98 V$FFCF..#$R A#0.R .TEX
97.2#LRTEX96 ..=#`R D#$0D.I#TR .TEX99.U#
.R V$FFD2.A#.R UTEX98.S#.RTEX99 TTEX103.
}#DR J#15..#XR V$FFC3..#.R V$FFE7..#.S J
#0..#.S R$C6..#(S UTEX102.D#<STEX97 D#48
.P#PS .TEX99.Z#DS D#49..#XS .TEX99..#.S
Z..# S B#0..$.S JTEX100,X..$HS V$FFD2..$
.S .."$.S .#20.,$.T .*-9.3$.T Y.<$,T C#0
.H$@T UTEX96.I$TTTEX100 ."DOS ERROR MESS
AGE:".S$HT .$0D..$|TTEX101 .$0D,$0D..$.T
."-HIY KEY TO CONTINUE-"..$.TTEX103 .00
.G$.TTEX102 BTEX103.T$LT .TEX104..$.T B#
$00..$.T JTEX101,X..$.U V$FFD2..%.U ...%
0U .#23..%DU .*-9..%XU B#0.(%LU S$C6.2%.
U B$C5.<%.U .#64.F%.U .*-8.S%.UTEX104 ..
Y%PU..%.U;*****************************
***..%.U.DISKINIT..%.V UTWEE..% VNAAM ."
I/0"..%4VTWEE J#3.D%HV C#>(NAAM).S%\V B#
<(NAAM)..%PV V$FFBD..%.V J#15..%.V B#8..
%.V C#15..&.V V$FFBA..&TV V$FFC0..&.V J#
15.*&.V V$FFC3.6&.W V$FFE7.<&$W..B&8W;**
******************************.O&LW.DISK
VAL.Z&`W UDRIE..&TWNAAM3 ."V"..&.WDRIE J
#1..&.W C#>(NAAM3)..&.W B#<(NAAM3).B&DW
V$FFBD.L&XW J#15.U&.W B#8..&.X C#15..&.X
V$FFBA..&(X V$FFC0..'<X J#15..'PX V$FFC
3..'DX V$FFE7..'XX..F'.X;***************
******************.E' X.LOAD NAAMADRES,L
ENGTENAAM.P'.X J#$04.{'HX B#$08..'.X C#$
01..'.X V$FFBA..'.Y J#LENGTENAAM..'.Y B#
<(NAAMADRES).L',Y C#>(NAAMADRES).X'@Y V$
FFBD..'TY J#$00..'HY B#$FF..'|Y C#$FF..(
.Y V$FFD5..(.Y..2(.Y;*******************
**************.O(LY.SAVE NAMADR,L,ADR1,A
DR2.Z(.Y J#$04.E(.Y B#$08.P(.Z C#$01.|(.
Z V$FFBA..(0Z J#L..(DZ B#<(NAMADR)..(XZ
C#>(NAMADR)..(LZ V$FFBD.B(.Z J#<(ADR1).L
(.Z R$02..(.Z J#>(ADR1)..(.Z R$03..(PZ B
#<(ADR2)..).Z C#>(ADR2)..).Z J#$02..).{
V$FFD8. ) {..F)4{;**********************
**********.D)H{.SCRATCH NAAMADRES,LENGTE
.P)\{ UBEGIN..)P{NAAM ."S0:
"..).{BEGIN B#00..).{TEX200 JNAAMADRE
S,X.H).{ RNAAM+$03,X.O).{ ...)T{ .#LENGT
E..).{ .TEX200..).{ J#LENGTE+3..*.| C#>(
NAAM)..*$| B#<(NAAM).$*8| V$FFBD..*L| J#
15.7*`| B#8.A*T| C#15.M*.| V$FFBA.Y*.| V
$FFC0.C*.| J#15.O*D| V$FFC3.{*X| V$FFE7.
.*.|...*.};*****************************
***.J*.};MACRO INPUT ADR,MAX,X,Y,COLOR..
*(};********************************..+<
};SET GLOBAL INPUTBASE TO INPBASE.5+P};(
INPBASE=START SUBROUTINE).W+D};REM
INITINPUT 0,0,0,0,0.I+X};REM RTS..+
.};(CALL INITINPUT TO INTIALISE)..+ };..
+.};* INPUT WORDT VANAF ADRES (ADR).S+H}
;* NEERGEZET IN FORMAT:..+.};* LENGTEINP
UT,INPUT,0..+.};..,.~;******************
**************.;,.~.INITINPUT ADR,MAX,X,
Y,COLOR.N,,~INPBASE UTEX58.`,@~TEX51 .>(
ADR).R,T~TEX52 .<(ADR)..,H~TEX53 .MAX..,
|~TEX54 .X..,.~TEX55 .Y..,.~TEX50 .COLOR
..,.~TEX58 BTEX50.I,L~ S$0286.U,.~ BTEX5
1..,.~ S$03..,. BTEX52..,. S$02..-0 B
TEX54..-D CTEX55..-X .. -L V$FFF0.0-.
TEX23 B#$00.<-. STEX22.H-. UTEX20.V-.
TEX22 .00.F-PTEX20 J#185.R-. V$FFD2..
-.TEX21 V$FFE4..-.. ITEX22..- . CTEX22.
.-4. ATEX53..-H. .TEX29..-\. D#$00.J-P.
.TEX24.V-.. GTEX22..-.. UTEX21..-..TEX24
D#13..-.. .TEX28...T. D#148..... .TEX21
..... D#157.+... .TEX21.5.$. D#29.A.8. .
TEX21.K.L. D#17.W.`. .TEX21.B.T. D#145.N
... .TEX21.X... D#20..... .TEX26...D. A#
$01...X. .TEX25..... C#$00..... TTEX22..
... UTEX21.O.(.TEX25 GTEX22...<. GTEX22.
..P. UTEX27...D.TEX26 R($02),Y../X.TEX27
X../.. J#157../ . V$FFD2.$/.. W.0/H. V$
FFD2.</.. UTEX20.K/..TEX28 J#20.W/.. V$F
FD2.C/.. CTEX22.M/,. J#00.{/@. R($02),Y.
./T. GTEX22../H. JTEX22../|. C#$00../..
R($02),Y../.. ..B/..TEX29 J#20.S/L.TEX30
V$FFD2.Z/.. .../.. .TEX30../.. UTEX23..
/.....00.;******************************
**.;0D..INPUT ADR,MAX,X,Y,COLOR.G0X. UTE
X58.Y0L.TEX56 .>(ADR).F0.. .<(ADR).R0..
.MAX+2.Z0.. .Y..0.. .X..0P. .COLOR..0..T
EX58 B#$00..0..TEX57 JTEX56,X.G0.. RINPU
TBASE+$03,X.N0 . ..W04. .#6..0H. .TEX57.
.0\. VINPUTBASE..0P.....
> CLICK IMAGE PREVIEW FOR FULL MODAL