Multiple names: MA AV1, QUIZ2
FILE INFORMATION
FILENAME(S):
• MA AV1<br>• QUIZ2
FILE TYPE(S): PRG, DEL
FILE SIZE: 10.2K
FIRST SEEN: 2025-11-30 21:09:59
APPEARS ON: 3 disk(s)
FILE HASH
0ac526689b1208da4cb800bd840020ba1b914c3374be607f992d46adef0f30ed
FOUND ON DISKS (3 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GIGA ASSEMBLER | MA AV1 | PRG | DuncanTwain | 27 | 0 | DOWNLOAD FILE |
| GIGA ASSEMBLER | QUIZ2 | DEL | DuncanTwain | 27 | 0 | DOWNLOAD FILE |
| ASSEMBLER | MA AV1 | PRG | DuncanTwain | 22 | 0 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 08 24 08 20 4E 3B 4D 41 43 52 4F 20 49 4E 50 |..$. N;MACRO INP|
00000010: 55 54 A0 41 44 52 2C 4D 41 58 2C 58 2C 59 2C 43 |UT.ADR,MAX,X,Y,C|
00000020: 4F 4C 4F 52 00 48 08 34 4E 3B 2A 20 4D 41 43 52 |OLOR.H.4N;* MACR|
00000030: 4F 20 54 45 58 54 20 41 44 52 45 53 2C 58 2C 59 |O TEXT ADRES,X,Y|
00000040: 2C 4B 4C 45 55 52 20 2A 00 53 08 48 4E AA 24 34 |,KLEUR *.S.HN.$4|
00000050: 30 30 30 00 68 08 5C 4E A3 49 4E 50 55 54 42 41 |000.h.\N.INPUTBA|
00000060: 53 45 3D 24 34 30 30 30 00 73 08 70 4E B7 42 45 |SE=$4000.s.pN.BE|
00000070: 47 49 4E 00 8C 08 84 4E 20 49 4E 49 54 49 4E 50 |GIN....N INITINP|
00000080: 55 54 A0 30 2C 30 2C 30 2C 30 2C 30 00 93 08 8E |UT.0,0,0,0,0....|
00000090: 4E 20 E3 00 A0 08 8F 4E 4A 4F 45 50 20 C2 23 30 |N .....NJOEP .#0|
000000A0: 00 AA 08 90 4E 54 45 52 20 D7 00 B6 08 91 4E 20 |....NTER .....N |
000000B0: D2 49 31 32 2C 58 00 BD 08 92 4E 20 EF 00 C6 08 |.I12,X....N ....|
000000C0: 93 4E 20 C0 23 39 00 D0 08 94 4E 20 F6 54 45 52 |.N .#9....N .TER|
000000D0: 00 E9 08 95 4E 20 54 45 58 54 A0 54 45 4B 53 54 |....N TEXT.TEKST|
000000E0: 31 34 2C 30 2C 31 30 2C 31 00 02 09 96 4E 20 49 |14,0,10,1....N I|
000000F0: 4E 50 55 54 A0 49 31 30 2C 31 2C 32 31 2C 31 30 |NPUT.I10,1,21,10|
00000100: 2C 31 00 1B 09 97 4E 20 49 4E 50 55 54 A0 49 31 |,1....N INPUT.I1|
00000110: 33 2C 39 2C 32 33 2C 31 30 2C 31 00 24 09 98 4E |3,9,23,10,1.$..N|
00000120: 20 C2 23 31 00 2D 09 99 4E 20 C3 23 30 00 3D 09 | .#1.-..N .#0.=.|
00000130: 9A 4E 54 45 52 32 20 CA 49 31 33 2C 58 00 49 09 |.NTER2 .I13,X.I.|
00000140: 9B 4E 20 D2 49 31 32 2C 59 00 50 09 9C 4E 20 EF |.N .I12,Y.P..N .|
00000150: 00 57 09 9D 4E 20 ED 00 62 09 9F 4E 20 C4 23 24 |.W..N ..b..N .#$|
00000160: 30 30 00 6D 09 A0 4E 20 F6 54 45 52 32 00 76 09 |00.m..N .TER2.v.|
00000170: A2 4E 20 C2 23 30 00 7F 09 A3 4E 20 CA 23 30 00 |.N .#0....N .#0.|
00000180: 88 09 A5 4E 20 C3 23 31 00 94 09 A6 4E 20 CA 49 |...N .#1....N .I|
00000190: 31 30 2C 59 00 A1 09 A7 4E 20 D2 49 31 31 2B 24 |10,Y....N .I11+$|
000001A0: 35 00 BE 09 A8 4E 20 53 41 56 45 A0 49 31 31 2C |5....N SAVE.I11,|
000001B0: 31 36 2C 24 30 38 30 30 2C 24 30 39 30 30 00 D3 |16,$0800,$0900..|
000001C0: 09 A9 4E 20 44 49 53 4B 45 52 52 4F 52 A0 30 2C |..N DISKERROR.0,|
000001D0: 31 2C 31 00 E0 09 AA 4E 20 43 4C 52 48 4F 4D 45 |1,1....N CLRHOME|
000001E0: 00 E7 09 AB 4E 20 E3 00 0F 0A AC 4E 54 45 4B 53 |....N .....NTEKS|
000001F0: 54 31 34 20 A8 22 53 41 56 45 20 4B 4F 41 4C 41 |T14 ."SAVE KOALA|
00000200: 46 49 4C 45 3A 20 12 C1 92 50 49 43 20 FF 22 00 |FILE: ...PIC .".|
00000210: 1E 0A AD 4E 49 31 30 20 A8 22 20 20 20 22 00 3D |...NI10 ." ".=|
00000220: 0A AE 4E 49 31 31 20 A5 31 32 39 2C 38 30 2C 37 |..NI11 .129,80,7|
00000230: 33 2C 36 37 2C 33 32 2C 33 32 2C 33 32 00 52 0A |3,67,32,32,32.R.|
00000240: AF 4E 49 31 32 20 A8 22 20 20 20 20 20 20 20 20 |.NI12 ." |
00000250: 20 22 00 6A 0A B0 4E 49 31 33 20 A8 22 20 20 20 | ".j..NI13 ." |
00000260: 20 20 20 20 20 20 20 20 20 22 00 71 0A B1 4E 20 | ".q..N |
00000270: E3 00 80 0A BF 4E 4C 4F 20 43 4C 52 48 4F 4D 45 |.....NLO CLRHOME|
00000280: 00 99 0A C0 4E 20 54 45 58 54 A0 54 45 4B 53 54 |....N TEXT.TEKST|
00000290: 31 30 2C 30 2C 31 30 2C 31 00 B1 0A D4 4E 20 49 |10,0,10,1....N I|
000002A0: 4E 50 55 54 A0 49 33 2C 31 2C 32 31 2C 31 30 2C |NPUT.I3,1,21,10,|
000002B0: 31 00 BA 0A E8 4E 20 C3 23 31 00 C5 0A FC 4E 20 |1....N .#1....N |
000002C0: CA 49 33 2C 59 00 D1 0A 10 4F 20 D2 49 30 2B 24 |.I3,Y....O .I0+$|
000002D0: 35 00 E0 0A 24 4F 20 4C 4F 41 44 A0 49 30 2C 37 |5...$O LOAD.I0,7|
000002E0: 00 F5 0A 38 4F 20 44 49 53 4B 45 52 52 4F 52 A0 |...8O DISKERROR.|
000002F0: 30 2C 31 2C 31 00 02 0B 4C 4F 20 43 4C 52 48 4F |0,1,1...LO CLRHO|
00000300: 4D 45 00 0E 0B 60 4F 20 D5 42 45 47 49 4E 00 1D |ME...`O .BEGIN..|
00000310: 0B 74 4F 53 43 20 43 4C 52 48 4F 4D 45 00 36 0B |.tOSC CLRHOME.6.|
00000320: 88 4F 20 54 45 58 54 A0 54 45 4B 53 54 31 31 2C |.O TEXT.TEKST11,|
00000330: 30 2C 31 30 2C 31 00 4E 0B 9C 4F 20 49 4E 50 55 |0,10,1.N..O INPU|
00000340: 54 A0 49 34 2C 31 2C 32 34 2C 31 30 2C 31 00 57 |T.I4,1,24,10,1.W|
00000350: 0B B0 4F 20 C3 23 31 00 62 0B C4 4F 20 CA 49 34 |..O .#1.b..O .I4|
00000360: 2C 59 00 6E 0B D8 4F 20 D2 49 35 2B 24 35 00 80 |,Y.n..O .I5+$5..|
00000370: 0B EC 4F 20 53 43 52 41 54 43 48 A0 49 35 2C 37 |..O SCRATCH.I5,7|
00000380: 00 95 0B 00 50 20 44 49 53 4B 45 52 52 4F 52 A0 |....P DISKERROR.|
00000390: 30 2C 31 2C 31 00 A2 0B 14 50 20 43 4C 52 48 4F |0,1,1....P CLRHO|
000003A0: 4D 45 00 AE 0B 15 50 20 D5 42 45 47 49 4E 00 BC |ME....P .BEGIN..|
000003B0: 0B 28 50 49 34 20 A8 22 20 20 20 22 00 CE 0B 3C |.(PI4 ." "...<|
000003C0: 50 49 35 20 A8 22 3F 50 49 43 20 20 2A 22 00 F9 |PI5 ."?PIC *"..|
000003D0: 0B 50 50 54 45 4B 53 54 31 31 20 A8 22 53 43 52 |.PPTEKST11 ."SCR|
000003E0: 41 54 43 48 20 4B 4F 41 4C 41 46 49 4C 45 3A 20 |ATCH KOALAFILE: |
000003F0: 12 C1 92 50 49 43 20 FF 22 00 07 0C 64 50 49 33 |...PIC ."...dPI3|
00000400: 20 A8 22 20 20 20 22 00 19 0C 78 50 49 30 20 A8 | ." "...xPI0 .|
00000410: 22 3F 50 49 43 20 20 2A 22 00 28 0C 8C 50 44 49 |"?PIC *".(..PDI|
00000420: 20 43 4C 52 48 4F 4D 45 00 31 0C A0 50 20 44 49 | CLRHOME.1..P DI|
00000430: 52 00 46 0C A1 50 20 44 49 53 4B 45 52 52 4F 52 |R.F..P DISKERROR|
00000440: A0 30 2C 31 2C 31 00 52 0C B4 50 20 D5 42 45 47 |.0,1,1.R..P .BEG|
00000450: 49 4E 00 5E 0C C8 50 52 45 4E 20 D5 51 51 00 69 |IN.^..PREN .QQ.i|
00000460: 0C DC 50 53 41 20 D5 51 51 00 78 0C 04 51 56 41 |..PSA .QQ.x..QVA|
00000470: 20 44 49 53 4B 56 41 4C 00 85 0C 18 51 20 43 4C | DISKVAL....Q CL|
00000480: 52 48 4F 4D 45 00 9B 0C 2C 51 20 44 49 53 4B 53 |RHOME...,Q DISKS|
00000490: 54 41 54 55 53 A0 31 2C 31 2C 31 00 A7 0C 40 51 |TATUS.1,1,1...@Q|
000004A0: 20 D5 42 45 47 49 4E 00 B4 0C 54 51 45 58 49 54 | .BEGIN...TQEXIT|
000004B0: 20 D5 51 51 00 CF 0C 68 51 49 4E 20 57 49 4E 44 | .QQ...hQIN WIND|
000004C0: 4F 57 A0 31 34 2C 36 2C 31 32 2C 31 38 2C 31 00 |OW.14,6,12,18,1.|
000004D0: EA 0C 7C 51 57 49 4E 20 54 45 58 54 A0 54 45 4B |..|QWIN TEXT.TEK|
000004E0: 53 54 31 2C 31 35 2C 37 2C 31 00 02 0D 90 51 20 |ST1,15,7,1....Q |
000004F0: 54 45 58 54 A0 54 45 4B 53 54 32 2C 31 35 2C 39 |TEXT.TEKST2,15,9|
00000500: 2C 31 00 1B 0D A4 51 20 54 45 58 54 A0 54 45 4B |,1....Q TEXT.TEK|
00000510: 53 54 33 2C 31 35 2C 31 31 2C 31 00 34 0D B8 51 |ST3,15,11,1.4..Q|
00000520: 20 54 45 58 54 A0 54 45 4B 53 54 34 2C 31 35 2C | TEXT.TEKST4,15,|
00000530: 31 33 2C 31 00 4D 0D CC 51 20 54 45 58 54 A0 54 |13,1.M..Q TEXT.T|
00000540: 45 4B 53 54 35 2C 31 35 2C 31 35 2C 31 00 66 0D |EKST5,15,15,1.f.|
00000550: E0 51 20 54 45 58 54 A0 54 45 4B 53 54 37 2C 31 |.Q TEXT.TEKST7,1|
00000560: 35 2C 31 37 2C 31 00 7F 0D F4 51 20 54 45 58 54 |5,17,1....Q TEXT|
00000570: A0 54 45 4B 53 54 36 2C 31 35 2C 31 39 2C 31 00 |.TEKST6,15,19,1.|
00000580: 88 0D 08 52 51 51 20 E3 00 95 0D 09 52 54 54 20 |...RQQ .....RTT |
00000590: A5 31 34 2C 38 00 9F 0D 0B 52 20 A8 22 FF 22 00 |.14,8....R .".".|
000005A0: B2 0D 1C 52 42 45 47 49 4E 20 50 52 49 4E 54 A0 |...RBEGIN PRINT.|
000005B0: 54 54 00 BB 0D 1E 52 20 D6 49 4E 00 C8 0D 30 52 |TT....R .IN...0R|
000005C0: 45 45 4E 20 D6 57 49 4E 00 D9 0D 44 52 20 43 55 |EEN .WIN...DR CU|
000005D0: 52 53 4F 52 A0 37 2C 31 35 00 E4 0D 58 52 20 CA |RSOR.7,15...XR .|
000005E0: 23 32 35 30 00 F0 0D 6C 52 20 D6 24 46 46 44 32 |#250...lR .$FFD2|
000005F0: 00 FF 0D 80 52 20 50 41 55 53 45 A0 31 30 30 00 |....R PAUSE.100.|
00000600: 0D 0E 94 52 49 4E 30 20 49 4E 4B 45 59 00 17 0E |...RIN0 INKEY...|
00000610: A8 52 20 C4 23 30 31 00 22 0E BC 52 20 F6 49 4E |.R .#01."..R .IN|
00000620: 4A 31 00 2B 0E D0 52 20 D5 44 49 00 39 0E E4 52 |J1.+..R .DI.9..R|
00000630: 49 4E 4A 31 20 C4 23 36 34 00 43 0E F8 52 20 F7 |INJ1 .#64.C..R .|
00000640: 49 4E 30 00 4D 0E 0C 53 20 D6 57 49 4E 00 5E 0E |IN0.M..S .WIN.^.|
00000650: 20 53 20 43 55 52 53 4F 52 A0 39 2C 31 35 00 69 | S CURSOR.9,15.i|
00000660: 0E 34 53 20 CA 23 32 35 30 00 75 0E 48 53 20 D6 |.4S .#250.u.HS .|
00000670: 24 46 46 44 32 00 84 0E 5C 53 20 50 41 55 53 45 |$FFD2...\S PAUSE|
00000680: A0 31 30 30 00 92 0E 70 53 49 4E 31 20 49 4E 4B |.100...pSIN1 INK|
00000690: 45 59 00 9C 0E 84 53 20 C4 23 30 31 00 A7 0E 98 |EY....S .#01....|
000006A0: 53 20 F6 49 4E 4A 32 00 B0 0E AC 53 20 D5 4C 4F |S .INJ2....S .LO|
000006B0: 00 BE 0E C0 53 49 4E 4A 32 20 C4 23 36 34 00 C8 |....SINJ2 .#64..|
000006C0: 0E D4 53 20 F7 49 4E 31 00 D2 0E E8 53 20 D6 57 |..S .IN1....S .W|
000006D0: 49 4E 00 E4 0E FC 53 20 43 55 52 53 4F 52 A0 31 |IN....S CURSOR.1|
000006E0: 31 2C 31 35 00 EF 0E 10 54 20 CA 23 32 35 30 00 |1,15....T .#250.|
000006F0: FB 0E 24 54 20 D6 24 46 46 44 32 00 0A 0F 38 54 |..$T .$FFD2...8T|
00000700: 20 50 41 55 53 45 A0 31 30 30 00 18 0F 4C 54 49 | PAUSE.100...LTI|
00000710: 4E 32 20 49 4E 4B 45 59 00 22 0F 60 54 20 C4 23 |N2 INKEY.".`T .#|
00000720: 30 31 00 2D 0F 74 54 20 F6 49 4E 4A 33 00 36 0F |01.-.tT .INJ3.6.|
00000730: 88 54 20 D5 53 41 00 44 0F 9C 54 49 4E 4A 33 20 |.T .SA.D..TINJ3 |
00000740: C4 23 36 34 00 4E 0F B0 54 20 F7 49 4E 32 00 58 |.#64.N..T .IN2.X|
00000750: 0F C4 54 20 D6 57 49 4E 00 6A 0F D8 54 20 43 55 |..T .WIN.j..T CU|
00000760: 52 53 4F 52 A0 31 33 2C 31 35 00 75 0F EC 54 20 |RSOR.13,15.u..T |
00000770: CA 23 32 35 30 00 81 0F 00 55 20 D6 24 46 46 44 |.#250....U .$FFD|
00000780: 32 00 90 0F 14 55 20 50 41 55 53 45 A0 31 30 30 |2....U PAUSE.100|
00000790: 00 9E 0F 28 55 49 4E 33 20 49 4E 4B 45 59 00 A8 |...(UIN3 INKEY..|
000007A0: 0F 3C 55 20 C4 23 30 31 00 B3 0F 50 55 20 F6 49 |.<U .#01...PU .I|
000007B0: 4E 4A 34 00 BC 0F 64 55 20 D5 53 43 00 CA 0F 78 |NJ4...dU .SC...x|
000007C0: 55 49 4E 4A 34 20 C4 23 36 34 00 D4 0F 8C 55 20 |UINJ4 .#64....U |
000007D0: F7 49 4E 33 00 DE 0F A0 55 20 D6 57 49 4E 00 F0 |.IN3....U .WIN..|
000007E0: 0F B4 55 20 43 55 52 53 4F 52 A0 31 35 2C 31 35 |..U CURSOR.15,15|
000007F0: 00 FB 0F C8 55 20 CA 23 32 35 30 00 07 10 DC 55 |....U .#250....U|
00000800: 20 D6 24 46 46 44 32 00 16 10 F0 55 20 50 41 55 | .$FFD2....U PAU|
00000810: 53 45 A0 31 30 30 00 24 10 04 56 49 4E 34 20 49 |SE.100.$..VIN4 I|
00000820: 4E 4B 45 59 00 2E 10 18 56 20 C4 23 30 31 00 39 |NKEY....V .#01.9|
00000830: 10 2C 56 20 F6 49 4E 4A 35 00 42 10 40 56 20 D5 |.,V .INJ5.B.@V .|
00000840: 56 41 00 50 10 54 56 49 4E 4A 35 20 C4 23 36 34 |VA.P.TVINJ5 .#64|
00000850: 00 5A 10 68 56 20 F7 49 4E 34 00 64 10 7C 56 20 |.Z.hV .IN4.d.|V |
00000860: D6 57 49 4E 00 76 10 90 56 20 43 55 52 53 4F 52 |.WIN.v..V CURSOR|
00000870: A0 31 37 2C 31 35 00 81 10 A4 56 20 CA 23 32 35 |.17,15....V .#25|
00000880: 30 00 8D 10 B8 56 20 D6 24 46 46 44 32 00 9C 10 |0....V .$FFD2...|
00000890: CC 56 20 50 41 55 53 45 A0 31 30 30 00 AA 10 E0 |.V PAUSE.100....|
000008A0: 56 49 4E 35 20 49 4E 4B 45 59 00 B4 10 F4 56 20 |VIN5 INKEY....V |
000008B0: C4 23 30 31 00 BF 10 08 57 20 F6 49 4E 4A 36 00 |.#01....W .INJ6.|
000008C0: C9 10 1C 57 20 D5 52 45 4E 00 D7 10 30 57 49 4E |...W .REN...0WIN|
000008D0: 4A 36 20 C4 23 36 34 00 E1 10 44 57 20 F7 49 4E |J6 .#64...DW .IN|
000008E0: 35 00 EB 10 58 57 20 D6 57 49 4E 00 FD 10 6C 57 |5...XW .WIN...lW|
000008F0: 20 43 55 52 53 4F 52 A0 31 39 2C 31 35 00 08 11 | CURSOR.19,15...|
00000900: 80 57 20 CA 23 32 35 30 00 14 11 94 57 20 D6 24 |.W .#250....W .$|
00000910: 46 46 44 32 00 23 11 A8 57 20 50 41 55 53 45 A0 |FFD2.#..W PAUSE.|
00000920: 31 30 30 00 31 11 BC 57 49 4E 36 20 49 4E 4B 45 |100.1..WIN6 INKE|
00000930: 59 00 3B 11 D0 57 20 C4 23 30 31 00 46 11 E4 57 |Y.;..W .#01.F..W|
00000940: 20 F6 49 4E 4A 37 00 51 11 F8 57 20 D5 45 58 49 | .INJ7.Q..W .EXI|
00000950: 54 00 5F 11 0C 58 49 4E 4A 37 20 C4 23 36 34 00 |T._..XINJ7 .#64.|
00000960: 69 11 20 58 20 F7 49 4E 36 00 73 11 34 58 20 D5 |i. X .IN6.s.4X .|
00000970: 45 45 4E 00 7A 11 48 58 20 E3 00 96 11 5C 58 54 |EEN.z.HX ....\XT|
00000980: 45 4B 53 54 31 20 A8 22 12 20 92 44 49 52 45 43 |EKST1 .". .DIREC|
00000990: 54 4F 52 59 FF 22 00 B2 11 70 58 54 45 4B 53 54 |TORY."...pXTEKST|
000009A0: 32 20 A8 22 12 20 92 4C 4F 41 44 20 20 20 20 20 |2 .". .LOAD |
000009B0: FF 22 00 CE 11 84 58 54 45 4B 53 54 33 20 A8 22 |."....XTEKST3 ."|
000009C0: 12 20 92 53 41 56 45 20 20 20 20 20 FF 22 00 EA |. .SAVE ."..|
000009D0: 11 98 58 54 45 4B 53 54 34 20 A8 22 12 20 92 53 |..XTEKST4 .". .S|
000009E0: 43 52 41 54 43 48 20 20 FF 22 00 06 12 AC 58 54 |CRATCH ."....XT|
000009F0: 45 4B 53 54 35 20 A8 22 12 20 92 56 41 4C 49 44 |EKST5 .". .VALID|
00000A00: 41 54 45 20 FF 22 00 22 12 C0 58 54 45 4B 53 54 |ATE ."."..XTEKST|
00000A10: 36 20 A8 22 12 20 92 45 58 49 54 20 20 20 20 20 |6 .". .EXIT |
00000A20: FF 22 00 3E 12 D4 58 54 45 4B 53 54 37 20 A8 22 |.".>..XTEKST7 ."|
00000A30: 12 20 92 52 45 4E 41 4D 45 20 20 20 FF 22 00 66 |. .RENAME .".f|
00000A40: 12 E8 58 54 45 4B 53 54 31 30 20 A8 22 4C 4F 41 |..XTEKST10 ."LOA|
00000A50: 44 20 4B 4F 41 4C 41 46 49 4C 45 3A 20 12 C1 92 |D KOALAFILE: ...|
00000A60: 50 49 43 20 FF 22 00 83 12 FC 58 A1 57 49 4E 44 |PIC ."....X.WIND|
00000A70: 4F 57 A0 58 2C 59 2C 58 31 2C 59 31 2C 43 4F 4C |OW.X,Y,X1,Y1,COL|
00000A80: 56 41 4C 00 8C 12 10 59 20 C2 23 58 00 95 12 24 |VAL....Y .#X...$|
00000A90: 59 20 D3 54 39 00 9E 12 38 59 20 C2 23 59 00 A7 |Y .T9...8Y .#Y..|
00000AA0: 12 4C 59 20 D3 54 38 00 B3 12 60 59 20 D5 42 45 |.LY .T8...`Y .BE|
00000AB0: 47 49 4E 00 BF 12 74 59 54 31 20 A8 22 B0 22 00 |GIN...tYT1 .".".|
00000AC0: CB 12 88 59 54 32 20 A8 22 AE 22 00 D7 12 9C 59 |...YT2 ."."....Y|
00000AD0: 54 33 20 A8 22 AD 22 00 E3 12 B0 59 54 37 20 A8 |T3 ."."....YT7 .|
00000AE0: 22 BD 22 00 EF 12 C4 59 54 34 20 A8 22 DD 22 00 |"."....YT4 .".".|
00000AF0: FB 12 D8 59 54 35 20 A8 22 C0 22 00 07 13 EC 59 |...YT5 ."."....Y|
00000B00: 54 36 20 A8 22 20 22 00 12 13 00 5A 54 38 20 A5 |T6 ." "....ZT8 .|
00000B10: 30 30 00 1D 13 14 5A 54 39 20 A5 30 30 00 2E 13 |00....ZT9 .00...|
00000B20: 28 5A 53 45 54 20 CA 23 43 4F 4C 56 41 4C 00 3A |(ZSET .#COLVAL.:|
00000B30: 13 3C 5A 20 D2 24 30 32 38 36 00 48 13 50 5A 50 |.<Z .$0286.H.PZP|
00000B40: 4F 49 4E 54 20 C2 54 38 00 51 13 64 5A 20 C3 54 |OINT .T8.Q.dZ .T|
00000B50: 39 00 58 13 78 5A 20 E5 00 64 13 8C 5A 20 D6 24 |9.X.xZ ..d..Z .$|
00000B60: 46 46 46 30 00 6B 13 A0 5A 20 E3 00 7A 13 B4 5A |FFF0.k..Z ..z..Z|
00000B70: 42 45 47 49 4E 20 D6 53 45 54 00 83 13 C8 5A 20 |BEGIN .SET....Z |
00000B80: CA 54 31 00 8F 13 DC 5A 20 D6 24 46 46 44 32 00 |.T1....Z .$FFD2.|
00000B90: 99 13 F0 5A 20 C2 23 30 30 00 A2 13 04 5B 20 CA |...Z .#00....[ .|
00000BA0: 54 35 00 B1 13 18 5B 45 45 4E 20 D6 24 46 46 44 |T5....[EEN .$FFD|
00000BB0: 32 00 B8 13 2C 5B 20 EF 00 C4 13 40 5B 20 C0 23 |2...,[ ....@[ .#|
00000BC0: 58 31 2D 32 00 CE 13 54 5B 20 F6 45 45 4E 00 D7 |X1-2...T[ .EEN..|
00000BD0: 13 68 5B 20 CA 54 32 00 E3 13 7C 5B 20 D6 24 46 |.h[ .T2...|[ .$F|
00000BE0: 46 44 32 00 F0 13 90 5B 44 52 49 45 20 C9 54 38 |FD2....[DRIE .T8|
00000BF0: 00 FA 13 A4 5B 20 D6 53 45 54 00 03 14 B8 5B 20 |....[ .SET....[ |
00000C00: CA 54 34 00 0F 14 CC 5B 20 D6 24 46 46 44 32 00 |.T4....[ .$FFD2.|
00000C10: 19 14 E0 5B 20 C2 23 30 30 00 22 14 F4 5B 20 CA |...[ .#00."..[ .|
00000C20: 54 36 00 32 14 08 5C 45 45 4E 4E 20 D6 24 46 46 |T6.2..\EENN .$FF|
00000C30: 44 32 00 39 14 1C 5C 20 EF 00 45 14 30 5C 20 C0 |D2.9..\ ..E.0\ .|
00000C40: 23 58 31 2D 32 00 50 14 44 5C 20 F6 45 45 4E 4E |#X1-2.P.D\ .EENN|
00000C50: 00 59 14 58 5C 20 CA 54 34 00 65 14 6C 5C 20 D6 |.Y.X\ .T4.e.l\ .|
00000C60: 24 46 46 44 32 00 6E 14 80 5C 20 CA 54 38 00 7A |$FFD2.n..\ .T8.z|
00000C70: 14 94 5C 20 C4 23 59 31 2B 31 00 85 14 A8 5C 20 |..\ .#Y1+1....\ |
00000C80: F6 44 52 49 45 00 8E 14 BC 5C 20 C9 54 38 00 98 |.DRIE....\ .T8..|
00000C90: 14 D0 5C 20 D6 53 45 54 00 A1 14 E4 5C 20 CA 54 |..\ .SET....\ .T|
00000CA0: 33 00 AD 14 F8 5C 20 D6 24 46 46 44 32 00 B7 14 |3....\ .$FFD2...|
00000CB0: 0C 5D 20 C2 23 30 30 00 C0 14 20 5D 20 CA 54 35 |.] .#00... ] .T5|
00000CC0: 00 D1 14 34 5D 45 45 4E 4E 4E 20 D6 24 46 46 44 |...4]EENNN .$FFD|
00000CD0: 32 00 D8 14 48 5D 20 EF 00 E4 14 5C 5D 20 C0 23 |2...H] ....\] .#|
00000CE0: 58 31 2D 32 00 F0 14 70 5D 20 F6 45 45 4E 4E 4E |X1-2...p] .EENNN|
00000CF0: 00 F9 14 84 5D 20 CA 54 37 00 05 15 98 5D 20 D6 |....] .T7....] .|
00000D00: 24 46 46 44 32 00 0B 15 AC 5D A2 00 2F 15 C0 5D |$FFD2....]../..]|
00000D10: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************|
00000D20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00000D30: 46 15 D4 5D A1 53 43 52 45 45 4E 43 4F 4C 4F 52 |F..].SCREENCOLOR|
00000D40: A0 43 4F 4C 4F 52 00 53 15 E8 5D 20 C3 23 43 4F |.COLOR.S..] .#CO|
00000D50: 4C 4F 52 00 5F 15 FC 5D 20 D4 35 33 32 38 31 00 |LOR._..] .53281.|
00000D60: 65 15 10 5E A2 00 89 15 24 5E 3B 2A 2A 2A 2A 2A |e..^....$^;*****|
00000D70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A0 15 38 5E A1 42 |*********...8^.B|
00000D90: 4F 52 44 45 52 43 4F 4C 4F 52 A0 43 4F 4C 4F 52 |ORDERCOLOR.COLOR|
00000DA0: 00 AD 15 4C 5E 20 C3 23 43 4F 4C 4F 52 00 B9 15 |...L^ .#COLOR...|
00000DB0: 60 5E 20 D4 35 33 32 38 30 00 BF 15 74 5E A2 00 |`^ .53280...t^..|
00000DC0: E3 15 88 5E 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...^;***********|
00000DD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DE0: 2A 2A 2A 00 F8 15 9C 5E A1 46 49 4C 4C 43 4F 4C |***....^.FILLCOL|
00000DF0: 4F 52 A0 43 4F 4C 4F 52 00 05 16 B0 5E 20 CA 23 |OR.COLOR....^ .#|
00000E00: 43 4F 4C 4F 52 00 10 16 C4 5E 20 C2 23 24 30 30 |COLOR....^ .#$00|
00000E10: 00 22 16 D8 5E 54 45 58 31 20 D2 24 44 38 30 30 |."..^TEX1 .$D800|
00000E20: 2C 58 00 30 16 EC 5E 20 D2 24 44 39 30 30 2C 58 |,X.0..^ .$D900,X|
00000E30: 00 3E 16 00 5F 20 D2 24 44 41 30 30 2C 58 00 45 |.>.._ .$DA00,X.E|
00000E40: 16 14 5F 20 EF 00 50 16 28 5F 20 F6 54 45 58 31 |.._ ..P.(_ .TEX1|
00000E50: 00 62 16 3C 5F 54 45 58 32 20 D2 24 44 42 30 30 |.b.<_TEX2 .$DB00|
00000E60: 2C 58 00 69 16 50 5F 20 EF 00 74 16 64 5F 20 C0 |,X.i.P_ ..t.d_ .|
00000E70: 23 24 45 38 00 7F 16 78 5F 20 F6 54 45 58 32 00 |#$E8...x_ .TEX2.|
00000E80: 85 16 8C 5F A2 00 A9 16 A0 5F 3B 2A 2A 2A 2A 2A |..._....._;*****|
00000E90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B7 16 B4 5F A1 43 |*********...._.C|
00000EB0: 4F 4C 4F 52 49 4E 43 00 C2 16 C8 5F 20 C2 23 24 |OLORINC...._ .#$|
00000EC0: 30 30 00 D4 16 DC 5F 54 45 58 31 20 C9 24 44 38 |00...._TEX1 .$D8|
00000ED0: 30 30 2C 58 00 E2 16 F0 5F 20 C9 24 44 39 30 30 |00,X...._ .$D900|
00000EE0: 2C 58 00 F0 16 04 60 20 C9 24 44 41 30 30 2C 58 |,X....` .$DA00,X|
00000EF0: 00 F7 16 18 60 20 EF 00 02 17 2C 60 20 F6 54 45 |....` ....,` .TE|
00000F00: 58 31 00 14 17 40 60 54 45 58 32 20 C9 24 44 42 |X1...@`TEX2 .$DB|
00000F10: 30 30 2C 58 00 1B 17 54 60 20 EF 00 26 17 68 60 |00,X...T` ..&.h`|
00000F20: 20 C0 23 24 45 38 00 31 17 7C 60 20 F6 54 45 58 | .#$E8.1.|` .TEX|
00000F30: 32 00 37 17 90 60 A2 00 5B 17 A4 60 3B 2A 2A 2A |2.7..`..[..`;***|
00000F40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000F50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 68 17 B8 60 |***********.h..`|
00000F60: A1 43 4C 52 48 4F 4D 45 00 73 17 CC 60 20 CA 23 |.CLRHOME.s..` .#|
00000F70: 31 34 37 00 7F 17 E0 60 20 D6 24 46 46 44 32 00 |147....` .$FFD2.|
00000F80: 85 17 F4 60 A2 00 A9 17 08 61 3B 2A 2A 2A 2A 2A |...`.....a;*****|
00000F90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 CD 17 1C 61 3B 2A |*********....a;*|
00000FB0: 20 4D 41 43 52 4F 20 54 45 58 54 20 41 44 52 45 | MACRO TEXT ADRE|
00000FC0: 53 2C 58 2C 59 2C 4B 4C 45 55 52 20 2A 00 F1 17 |S,X,Y,KLEUR *...|
00000FD0: 30 61 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |0a;*************|
00000FE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FF0: 2A 00 11 18 44 61 A1 54 45 58 54 A0 54 41 44 52 |*...Da.TEXT.TADR|
00001000: 2C 58 56 41 4C 2C 59 56 41 4C 2C 43 4F 4C 56 41 |,XVAL,YVAL,COLVA|
00001010: 4C 00 1F 18 58 61 20 CA 23 43 4F 4C 56 41 4C 00 |L...Xa .#COLVAL.|
00001020: 2B 18 6C 61 20 D2 24 30 32 38 36 00 37 18 80 61 |+.la .$0286.7..a|
00001030: 20 C2 23 59 56 41 4C 00 43 18 94 61 20 C3 23 58 | .#YVAL.C..a .#X|
00001040: 56 41 4C 00 4A 18 A8 61 20 E5 00 56 18 BC 61 20 |VAL.J..a ..V..a |
00001050: D6 24 46 46 46 30 00 61 18 D0 61 20 C2 23 24 30 |.$FFF0.a..a .#$0|
00001060: 30 00 72 18 E4 61 54 45 58 31 20 CA 54 41 44 52 |0.r..aTEX1 .TADR|
00001070: 2C 58 00 7D 18 F8 61 20 C4 23 24 46 46 00 88 18 |,X.}..a .#$FF...|
00001080: 0C 62 20 F7 54 45 58 32 00 94 18 20 62 20 D6 24 |.b .TEX2... b .$|
00001090: 46 46 44 32 00 9B 18 34 62 20 EF 00 A6 18 48 62 |FFD2...4b ....Hb|
000010A0: 20 D5 54 45 58 31 00 B1 18 5C 62 54 45 58 32 20 | .TEX1...\bTEX2 |
000010B0: E4 00 B7 18 70 62 A2 00 D9 18 84 62 3B 2A 2A 2A |....pb.....b;***|
000010C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000010D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FB 18 98 62 3B 2A |*********....b;*|
000010E0: 20 4D 41 43 52 4F 20 50 52 49 4E 54 20 41 44 52 | MACRO PRINT ADR|
000010F0: 45 53 20 20 20 20 20 20 20 20 2A 00 1D 19 AC 62 |ES *....b|
00001100: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************|
00001110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2D 19 |*************.-.|
00001120: C0 62 A1 50 52 49 4E 54 A0 54 41 44 52 00 38 19 |.b.PRINT.TADR.8.|
00001130: D4 62 20 C2 23 24 30 30 00 49 19 E8 62 54 45 58 |.b .#$00.I..bTEX|
00001140: 31 20 CA 54 41 44 52 2C 58 00 54 19 FC 62 20 C4 |1 .TADR,X.T..b .|
00001150: 23 24 46 46 00 5F 19 10 63 20 F7 54 45 58 32 00 |#$FF._..c .TEX2.|
00001160: 6B 19 24 63 20 D6 24 46 46 44 32 00 72 19 38 63 |k.$c .$FFD2.r.8c|
00001170: 20 EF 00 7D 19 4C 63 20 D5 54 45 58 31 00 88 19 | ..}.Lc .TEX1...|
00001180: 60 63 54 45 58 32 20 E4 00 93 19 74 63 20 CA 23 |`cTEX2 ....tc .#|
00001190: 24 30 44 00 9F 19 88 63 20 D6 24 46 46 44 32 00 |$0D....c .$FFD2.|
000011A0: A5 19 9C 63 A2 00 C7 19 B0 63 3B 2A 2A 2A 2A 2A |...c.....c;*****|
000011B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000011C0: 2A 2A 2A 2A 2A 2A 2A 00 E9 19 C4 63 3B 2A 20 4D |*******....c;* M|
000011D0: 41 43 52 4F 20 4B 45 59 20 57 41 49 54 20 20 20 |ACRO KEY WAIT |
000011E0: 20 20 20 20 20 20 20 20 2A 00 0B 1A D8 63 3B 2A | *....c;*|
000011F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001200: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 19 1A EC 63 |***********....c|
00001210: A1 4B 45 59 A0 57 41 49 54 00 28 1A 00 64 54 45 |.KEY.WAIT.(..dTE|
00001220: 58 31 20 C2 23 24 30 30 00 34 1A 14 64 20 D3 24 |X1 .#$00.4..d .$|
00001230: 30 30 43 36 00 40 1A 28 64 20 CA 24 30 30 43 35 |00C6.@.(d .$00C5|
00001240: 00 4C 1A 3C 64 20 C4 23 57 41 49 54 00 57 1A 50 |.L.<d .#WAIT.W.P|
00001250: 64 20 F6 54 45 58 31 00 5D 1A 64 64 A2 00 6D 1A |d .TEX1.].dd..m.|
00001260: 78 64 A1 43 55 52 53 4F 52 A0 58 2C 59 00 76 1A |xd.CURSOR.X,Y.v.|
00001270: 8C 64 20 C2 23 58 00 7F 1A A0 64 20 C3 23 59 00 |.d .#X....d .#Y.|
00001280: 86 1A B4 64 20 E5 00 92 1A C8 64 20 D6 24 46 46 |...d .....d .$FF|
00001290: 46 30 00 98 1A DC 64 A2 00 A3 1A F0 64 A1 49 4E |F0....d.....d.IN|
000012A0: 4B 45 59 00 AE 1A 04 65 20 C2 23 24 30 30 00 BA |KEY....e .#$00..|
000012B0: 1A 18 65 20 D3 24 30 30 43 36 00 C6 1A 2C 65 20 |..e .$00C6...,e |
000012C0: CA 24 30 30 43 35 00 CC 1A 40 65 A2 00 D9 1A 54 |.$00C5...@e....T|
000012D0: 65 A1 50 41 55 53 45 A0 50 00 E3 1A 68 65 20 C2 |e.PAUSE.P...he .|
000012E0: 23 30 30 00 EE 1A 7C 65 20 C3 23 24 46 46 00 FA |#00...|e .#$FF..|
000012F0: 1A 90 65 20 D6 24 45 45 42 33 00 01 1B A4 65 20 |..e .$EEB3....e |
00001300: EF 00 0D 1B B8 65 20 C0 23 3C 28 50 29 00 17 1B |.....e .#<(P)...|
00001310: CC 65 20 F6 2A 2D 36 00 1E 1B E0 65 20 ED 00 2A |.e .*-6....e ..*|
00001320: 1B F4 65 20 C1 23 3E 28 50 29 00 35 1B 08 66 20 |..e .#>(P).5..f |
00001330: F6 2A 2D 31 31 00 3B 1B 1C 66 A2 00 61 1B 30 66 |.*-11.;..f..a.0f|
00001340: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************|
00001350: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001360: 2A 00 87 1B 44 66 3B 2A 20 20 48 45 52 42 49 45 |*...Df;* HERBIE|
00001370: 27 53 20 44 49 53 4B 20 4D 41 43 52 4F 27 53 20 |'S DISK MACRO'S |
00001380: 20 31 2E 31 20 20 2A 00 AD 1B 58 66 3B 2A 2A 2A | 1.1 *...Xf;***|
00001390: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000013A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 BC 1B |*************...|
000013B0: 6C 66 3B 4D 41 43 52 4F 20 44 49 52 00 E1 1B 80 |lf;MACRO DIR....|
000013C0: 66 3B 4D 41 43 52 4F 20 4C 4F 41 44 A0 4E 41 41 |f;MACRO LOAD.NAA|
000013D0: 4D 41 44 52 45 53 2C 4C 45 4E 47 54 45 4E 41 41 |MADRES,LENGTENAA|
000013E0: 4D 00 04 1C 94 66 3B 4D 41 43 52 4F 20 53 41 56 |M....f;MACRO SAV|
000013F0: 45 A0 4E 41 4D 41 44 52 2C 4C 2C 41 44 52 31 2C |E.NAMADR,L,ADR1,|
00001400: 41 44 52 32 00 28 1C A8 66 3B 4D 41 43 52 4F 20 |ADR2.(..f;MACRO |
00001410: 53 43 52 41 54 43 48 A0 4E 41 41 4D 41 44 52 45 |SCRATCH.NAAMADRE|
00001420: 53 2C 4C 45 4E 47 54 45 00 48 1C BC 66 3B 4D 41 |S,LENGTE.H..f;MA|
00001430: 43 52 4F 20 44 49 53 4B 53 54 41 54 55 53 A0 58 |CRO DISKSTATUS.X|
00001440: 2C 59 2C 43 4F 4C 4F 52 00 67 1C D0 66 3B 4D 41 |,Y,COLOR.g..f;MA|
00001450: 43 52 4F 20 44 49 53 4B 45 52 52 4F 52 A0 58 2C |CRO DISKERROR.X,|
00001460: 59 2C 43 4F 4C 4F 52 00 7B 1C E4 66 3B 4D 41 43 |Y,COLOR.{..f;MAC|
00001470: 52 4F 20 44 49 53 4B 49 4E 49 54 00 8E 1C F8 66 |RO DISKINIT....f|
00001480: 3B 4D 41 43 52 4F 20 44 49 53 4B 56 41 4C 00 B4 |;MACRO DISKVAL..|
00001490: 1C 0C 67 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..g;************|
000014A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000014B0: 2A 2A 2A 2A 00 BD 1C 20 67 A1 44 49 52 00 C8 1C |****... g.DIR...|
000014C0: 34 67 20 CA 23 24 32 34 00 D4 1C 48 67 20 D2 24 |4g .#$24...Hg .$|
000014D0: 30 31 30 30 00 E0 1C 5C 67 20 D6 24 41 41 44 37 |0100...\g .$AAD7|
000014E0: 00 EB 1C 70 67 20 CA 23 24 30 31 00 F2 1C 84 67 |...pg .#$01....g|
000014F0: 20 DA 00 FD 1C 98 67 20 C2 23 24 30 30 00 09 1D | .....g .#$00...|
00001500: AC 67 20 D6 24 46 46 42 44 00 14 1D C0 67 20 C2 |.g .$FFBD....g .|
00001510: 23 24 30 38 00 1F 1D D4 67 20 C3 23 24 36 30 00 |#$08....g .#$60.|
00001520: 2B 1D E8 67 20 D6 24 46 46 42 41 00 37 1D FC 67 |+..g .$FFBA.7..g|
00001530: 20 D6 24 46 33 44 35 00 41 1D 10 68 20 CA 24 42 | .$F3D5.A..h .$B|
00001540: 41 00 4D 1D 24 68 20 D6 24 46 46 42 34 00 57 1D |A.M.$h .$FFB4.W.|
00001550: 38 68 20 CA 24 42 39 00 63 1D 4C 68 20 D6 24 46 |8h .$B9.c.Lh .$F|
00001560: 46 39 36 00 6E 1D 60 68 20 CA 23 24 30 30 00 78 |F96.n.`h .#$00.x|
00001570: 1D 74 68 20 D2 24 39 30 00 83 1D 88 68 20 C3 23 |.th .$90....h .#|
00001580: 24 30 33 00 91 1D 9C 68 54 45 58 30 20 D4 24 46 |$03....hTEX0 .$F|
00001590: 46 00 9D 1D B0 68 20 D6 24 46 46 41 35 00 A7 1D |F....h .$FFA5...|
000015A0: C4 68 20 D2 24 46 45 00 B1 1D D8 68 20 C3 24 39 |.h .$FE....h .$9|
000015B0: 30 00 BC 1D EC 68 20 F6 54 45 58 34 00 C8 1D 00 |0....h .TEX4....|
000015C0: 69 20 D6 24 46 46 41 35 00 D2 1D 14 69 20 C3 24 |i .$FFA5....i .$|
000015D0: 39 30 00 DD 1D 28 69 20 F6 54 45 58 34 00 E7 1D |90...(i .TEX4...|
000015E0: 3C 69 20 C3 24 46 46 00 EE 1D 50 69 20 EC 00 F9 |<i .$FF...Pi ...|
000015F0: 1D 64 69 20 F6 54 45 58 30 00 03 1E 78 69 20 C2 |.di .TEX0...xi .|
00001600: 24 46 45 00 0F 1E 8C 69 20 D6 24 42 44 43 44 00 |$FE....i .$BDCD.|
00001610: 1A 1E A0 69 20 D6 54 45 58 35 00 2A 1E B4 69 54 |...i .TEX5.*..iT|
00001620: 45 58 31 20 D6 24 46 46 41 35 00 34 1E C8 69 20 |EX1 .$FFA5.4..i |
00001630: C2 24 39 30 00 3F 1E DC 69 20 F6 54 45 58 34 00 |.$90.?..i .TEX4.|
00001640: 46 1E F0 69 20 DA 00 4D 1E 04 6A 20 D8 00 58 1E |F..i ..M..j ..X.|
00001650: 18 6A 20 F7 54 45 58 32 00 64 1E 2C 6A 20 D6 24 |.j .TEX2.d.,j .$|
00001660: 46 46 44 32 00 6F 1E 40 6A 20 D5 54 45 58 31 00 |FFD2.o.@j .TEX1.|
00001670: 7F 1E 54 6A 54 45 58 32 20 D6 24 41 41 44 37 00 |..TjTEX2 .$AAD7.|
00001680: 8A 1E 68 6A 20 CA 23 24 30 30 00 94 1E 7C 6A 20 |..hj .#$00...|j |
00001690: D2 24 43 36 00 9E 1E 90 6A 20 CA 24 43 35 00 A8 |.$C6....j .$C5..|
000016A0: 1E A4 6A 20 C4 23 36 30 00 B3 1E B8 6A 20 F7 54 |..j .#60....j .T|
000016B0: 45 58 37 00 BD 1E CC 6A 20 C4 23 36 33 00 C8 1E |EX7....j .#63...|
000016C0: E0 6A 20 F7 54 45 58 34 00 D7 1E F4 6A 54 45 58 |.j .TEX4....jTEX|
000016D0: 33 20 C3 23 24 30 32 00 E2 1E 08 6B 20 D5 54 45 |3 .#$02....k .TE|
000016E0: 58 30 00 F2 1E 1C 6B 54 45 58 34 20 D6 24 46 36 |X0....kTEX4 .$F6|
000016F0: 34 32 00 FD 1E 30 6B 20 CA 23 24 30 38 00 07 1F |42...0k .#$08...|
00001700: 44 6B 20 D2 24 42 41 00 13 1F 58 6B 20 D6 24 46 |Dk .$BA...Xk .$F|
00001710: 46 42 34 00 1E 1F 6C 6B 20 CA 23 24 36 46 00 28 |FB4...lk .#$6F.(|
00001720: 1F 80 6B 20 D2 24 42 39 00 34 1F 94 6B 20 D6 24 |..k .$B9.4..k .$|
00001730: 46 46 39 36 00 40 1F A8 6B 20 D6 24 46 46 41 42 |FF96.@..k .$FFAB|
00001740: 00 4B 1F BC 6B 20 CA 23 24 30 30 00 55 1F D0 6B |.K..k .#$00.U..k|
00001750: 20 D2 24 43 36 00 61 1F E4 6B 20 D5 54 45 58 31 | .$C6.a..k .TEX1|
00001760: 30 00 70 1F F8 6B 54 45 58 35 20 CA 23 24 32 30 |0.p..kTEX5 .#$20|
00001770: 00 7C 1F 0C 6C 20 D5 24 46 46 44 32 00 88 1F 20 |.|..l .$FFD2... |
00001780: 6C 20 C2 24 30 32 46 37 00 94 1F 34 6C 20 D6 24 |l .$02F7...4l .$|
00001790: 46 46 43 39 00 9F 1F 48 6C 20 F4 54 45 58 36 00 |FFC9...Hl .TEX6.|
000017A0: AB 1F 5C 6C 20 D5 24 45 30 46 39 00 B6 1F 70 6C |..\l .$E0F9...pl|
000017B0: 54 45 58 36 20 E3 00 C5 1F 84 6C 54 45 58 37 20 |TEX6 .....lTEX7 |
000017C0: C2 23 24 30 30 00 D5 1F 98 6C 54 45 58 38 20 D6 |.#$00....lTEX8 .|
000017D0: 24 45 45 42 33 00 DC 1F AC 6C 20 EF 00 E7 1F C0 |$EEB3....l .....|
000017E0: 6C 20 F6 54 45 58 38 00 F6 1F D4 6C 54 45 58 39 |l .TEX8....lTEX9|
000017F0: 20 CA 23 24 30 30 00 00 20 E8 6C 20 D2 24 43 36 | .#$00.. .l .$C6|
00001800: 00 0A 20 FC 6C 20 CA 24 43 35 00 14 20 10 6D 20 |.. .l .$C5.. .m |
00001810: C4 23 36 30 00 1F 20 24 6D 20 F6 54 45 58 39 00 |.#60.. $m .TEX9.|
00001820: 2A 20 38 6D 20 D5 54 45 58 33 00 36 20 4C 6D 54 |* 8m .TEX3.6 LmT|
00001830: 45 58 31 30 20 E4 00 3C 20 60 6D A2 00 61 20 74 |EX10 ..< `m..a t|
00001840: 6D 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |m;**************|
00001850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001860: 2A 00 7B 20 88 6D A1 44 49 53 4B 53 54 41 54 55 |*.{ .m.DISKSTATU|
00001870: 53 A0 58 2C 59 2C 43 4F 4C 4F 52 00 85 20 9C 6D |S.X,Y,COLOR.. .m|
00001880: 20 D5 45 45 4E 00 98 20 B0 6D 54 45 58 31 30 30 | .EEN.. .mTEX100|
00001890: 20 A8 22 44 4F 53 3A 22 00 A8 20 C4 6D 45 45 4E | ."DOS:".. .mEEN|
000018A0: 20 CA 23 43 4F 4C 4F 52 00 B4 20 D8 6D 20 D2 24 | .#COLOR.. .m .$|
000018B0: 30 32 38 36 00 BD 20 EC 6D 20 C2 23 59 00 C6 20 |0286.. .m .#Y.. |
000018C0: 00 6E 20 C3 23 58 00 CD 20 14 6E 20 E5 00 D9 20 |.n .#X.. .n ... |
000018D0: 28 6E 20 D6 24 46 46 46 30 00 E2 20 3C 6E 20 C2 |(n .$FFF0.. <n .|
000018E0: 23 30 00 F1 20 50 6E 20 CA 54 45 58 31 30 30 2C |#0.. Pn .TEX100,|
000018F0: 58 00 FD 20 64 6E 20 D6 24 46 46 44 32 00 04 21 |X.. dn .$FFD2..!|
00001900: 78 6E 20 EF 00 0D 21 8C 6E 20 C0 23 34 00 17 21 |xn ...!.n .#4..!|
00001910: A0 6E 20 F6 2A 2D 39 00 20 21 B4 6E 20 CA 23 30 |.n .*-9. !.n .#0|
00001920: 00 27 21 C8 6E 20 DA 00 2E 21 DC 6E 20 D8 00 3A |.'!.n ...!.n ..:|
00001930: 21 F0 6E 20 D6 24 46 46 42 44 00 44 21 04 6F 20 |!.n .$FFBD.D!.o |
00001940: CA 23 31 35 00 4D 21 18 6F 20 C2 23 38 00 54 21 |.#15.M!.o .#8.T!|
00001950: 2C 6F 20 DA 00 60 21 40 6F 20 D6 24 46 46 42 41 |,o ..`!@o .$FFBA|
00001960: 00 6C 21 54 6F 20 D6 24 46 46 43 30 00 76 21 68 |.l!To .$FFC0.v!h|
00001970: 6F 20 C2 23 31 35 00 82 21 7C 6F 20 D6 24 46 46 |o .#15..!|o .$FF|
00001980: 43 36 00 8D 21 90 6F 20 C3 23 24 30 30 00 9E 21 |C6..!.o .#$00..!|
00001990: A4 6F 54 45 58 39 38 20 D6 24 46 46 43 46 00 A9 |.oTEX98 .$FFCF..|
000019A0: 21 B8 6F 20 C4 23 24 30 44 00 B5 21 CC 6F 20 F7 |!.o .#$0D..!.o .|
000019B0: 54 45 58 39 39 00 C1 21 E0 6F 20 D6 24 46 46 44 |TEX99..!.o .$FFD|
000019C0: 32 00 CD 21 F4 6F 20 D5 54 45 58 39 38 00 DC 21 |2..!.o .TEX98..!|
000019D0: 08 70 54 45 58 39 39 20 CA 23 31 35 00 E8 21 1C |.pTEX99 .#15..!.|
000019E0: 70 20 D6 24 46 46 43 33 00 F4 21 30 70 20 D6 24 |p .$FFC3..!0p .$|
000019F0: 46 46 45 37 00 FD 21 44 70 20 CA 23 30 00 07 22 |FFE7..!Dp .#0.."|
00001A00: 58 70 20 D2 24 43 36 00 0D 22 6C 70 A2 00 33 22 |Xp .$C6.."lp..3"|
00001A10: 80 70 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.p;*************|
00001A20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001A30: 2A 2A 2A 00 4C 22 94 70 A1 44 49 53 4B 45 52 52 |***.L".p.DISKERR|
00001A40: 4F 52 A0 58 2C 59 2C 43 4F 4C 4F 52 00 59 22 A8 |OR.X,Y,COLOR.Y".|
00001A50: 70 20 CA 23 43 4F 4C 4F 52 00 65 22 BC 70 20 D2 |p .#COLOR.e".p .|
00001A60: 24 30 32 38 36 00 6E 22 D0 70 20 C2 23 59 00 77 |$0286.n".p .#Y.w|
00001A70: 22 E4 70 20 C3 23 58 00 7E 22 F8 70 20 E5 00 8A |".p .#X.~".p ...|
00001A80: 22 0C 71 20 D6 24 46 46 46 30 00 93 22 20 71 20 |".q .$FFF0.." q |
00001A90: CA 23 30 00 9A 22 34 71 20 DA 00 A1 22 48 71 20 |.#0.."4q ..."Hq |
00001AA0: D8 00 AD 22 5C 71 20 D6 24 46 46 42 44 00 B7 22 |..."\q .$FFBD.."|
00001AB0: 70 71 20 CA 23 31 35 00 C0 22 84 71 20 C2 23 38 |pq .#15..".q .#8|
00001AC0: 00 C7 22 98 71 20 DA 00 D3 22 AC 71 20 D6 24 46 |..".q ...".q .$F|
00001AD0: 46 42 41 00 DF 22 C0 71 20 D6 24 46 46 43 30 00 |FBA..".q .$FFC0.|
00001AE0: E9 22 D4 71 20 C2 23 31 35 00 F5 22 E8 71 20 D6 |.".q .#15..".q .|
00001AF0: 24 46 46 43 36 00 00 23 FC 71 20 C3 23 24 30 30 |$FFC6..#.q .#$00|
00001B00: 00 11 23 10 72 54 45 58 39 38 20 D6 24 46 46 43 |..#.rTEX98 .$FFC|
00001B10: 46 00 1A 23 24 72 20 C1 23 30 00 26 23 38 72 20 |F..#$r .#0.r |
00001B20: F7 54 45 58 39 37 00 32 23 4C 72 54 45 58 39 36 |.TEX97.2#LrTEX96|
00001B30: 20 ED 00 3D 23 60 72 20 C4 23 24 30 44 00 49 23 | ..=#`r .#$0D.I#|
00001B40: 74 72 20 F7 54 45 58 39 39 00 55 23 88 72 20 D6 |tr .TEX99.U#.r .|
00001B50: 24 46 46 44 32 00 61 23 9C 72 20 D5 54 45 58 39 |$FFD2.a#.r .TEX9|
00001B60: 38 00 73 23 B0 72 54 45 58 39 39 20 D4 54 45 58 |8.s#.rTEX99 .TEX|
00001B70: 31 30 33 00 7D 23 C4 72 20 CA 23 31 35 00 89 23 |103.}#.r .#15..#|
00001B80: D8 72 20 D6 24 46 46 43 33 00 95 23 EC 72 20 D6 |.r .$FFC3..#.r .|
00001B90: 24 46 46 45 37 00 9E 23 00 73 20 CA 23 30 00 A8 |$FFE7..#.s .#0..|
00001BA0: 23 14 73 20 D2 24 43 36 00 B5 23 28 73 20 D5 54 |#.s .$C6..#(s .T|
00001BB0: 45 58 31 30 32 00 C4 23 3C 73 54 45 58 39 37 20 |EX102..#<sTEX97 |
00001BC0: C4 23 34 38 00 D0 23 50 73 20 F7 54 45 58 39 39 |.#48..#Ps .TEX99|
00001BD0: 00 DA 23 64 73 20 C4 23 34 39 00 E6 23 78 73 20 |..#ds .#49..#xs |
00001BE0: F7 54 45 58 39 39 00 ED 23 8C 73 20 DA 00 F6 23 |.TEX99..#.s ...#|
00001BF0: A0 73 20 C2 23 30 00 05 24 B4 73 20 CA 54 45 58 |.s .#0..$.s .TEX|
00001C00: 31 30 30 2C 58 00 11 24 C8 73 20 D6 24 46 46 44 |100,X..$.s .$FFD|
00001C10: 32 00 18 24 DC 73 20 EF 00 22 24 F0 73 20 C0 23 |2..$.s .."$.s .#|
00001C20: 32 30 00 2C 24 04 74 20 F6 2A 2D 39 00 33 24 18 |20.,$.t .*-9.3$.|
00001C30: 74 20 D9 00 3C 24 2C 74 20 C3 23 30 00 48 24 40 |t ..<$,t .#0.H$@|
00001C40: 74 20 D5 54 45 58 39 36 00 69 24 54 74 54 45 58 |t .TEX96.i$TtTEX|
00001C50: 31 30 30 20 A8 22 44 4F 53 20 45 52 52 4F 52 20 |100 ."DOS ERROR |
00001C60: 4D 45 53 53 41 47 45 3A 22 00 73 24 68 74 20 A5 |MESSAGE:".s$ht .|
00001C70: 24 30 44 00 87 24 7C 74 54 45 58 31 30 31 20 A5 |$0D..$|tTEX101 .|
00001C80: 24 30 44 2C 24 30 44 00 A5 24 90 74 20 A8 22 2D |$0D,$0D..$.t ."-|
00001C90: 48 49 59 20 4B 45 59 20 54 4F 20 43 4F 4E 54 49 |HIY KEY TO CONTI|
00001CA0: 4E 55 45 2D 22 00 B4 24 A4 74 54 45 58 31 30 33 |NUE-"..$.tTEX103|
00001CB0: 20 A5 30 30 00 C7 24 B8 74 54 45 58 31 30 32 20 | .00..$.tTEX102 |
00001CC0: C2 54 45 58 31 30 33 00 D4 24 CC 74 20 F7 54 45 |.TEX103..$.t .TE|
00001CD0: 58 31 30 34 00 DF 24 E0 74 20 C2 23 24 30 30 00 |X104..$.t .#$00.|
00001CE0: EE 24 F4 74 20 CA 54 45 58 31 30 31 2C 58 00 FA |.$.t .TEX101,X..|
00001CF0: 24 08 75 20 D6 24 46 46 44 32 00 01 25 1C 75 20 |$.u .$FFD2..%.u |
00001D00: EF 00 0B 25 30 75 20 C0 23 32 33 00 15 25 44 75 |...%0u .#23..%Du|
00001D10: 20 F6 2A 2D 39 00 1E 25 58 75 20 C2 23 30 00 28 | .*-9..%Xu .#0.(|
00001D20: 25 6C 75 20 D3 24 43 36 00 32 25 80 75 20 C2 24 |%lu .$C6.2%.u .$|
00001D30: 43 35 00 3C 25 94 75 20 C0 23 36 34 00 46 25 A8 |C5.<%.u .#64.F%.|
00001D40: 75 20 F7 2A 2D 38 00 53 25 BC 75 54 45 58 31 30 |u .*-8.S%.uTEX10|
00001D50: 34 20 E4 00 59 25 D0 75 A2 00 7F 25 E4 75 3B 2A |4 ..Y%.u...%.u;*|
00001D60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001D80: 8D 25 F8 75 A1 44 49 53 4B 49 4E 49 54 00 98 25 |.%.u.DISKINIT..%|
00001D90: 0C 76 20 D5 54 57 45 45 00 A8 25 20 76 4E 41 41 |.v .TWEE..% vNAA|
00001DA0: 4D 20 A8 22 49 2F 30 22 00 B5 25 34 76 54 57 45 |M ."I/0"..%4vTWE|
00001DB0: 45 20 CA 23 33 00 C4 25 48 76 20 C3 23 3E 28 4E |E .#3..%Hv .#>(N|
00001DC0: 41 41 4D 29 00 D3 25 5C 76 20 C2 23 3C 28 4E 41 |AAM)..%\v .#<(NA|
00001DD0: 41 4D 29 00 DF 25 70 76 20 D6 24 46 46 42 44 00 |AM)..%pv .$FFBD.|
00001DE0: E9 25 84 76 20 CA 23 31 35 00 F2 25 98 76 20 C2 |.%.v .#15..%.v .|
00001DF0: 23 38 00 FC 25 AC 76 20 C3 23 31 35 00 08 26 C0 |#8..%.v .#15..&.|
00001E00: 76 20 D6 24 46 46 42 41 00 14 26 D4 76 20 D6 24 |v .$FFBA..&.v .$|
00001E10: 46 46 43 30 00 1E 26 E8 76 20 CA 23 31 35 00 2A |FFC0..&.v .#15.*|
00001E20: 26 FC 76 20 D6 24 46 46 43 33 00 36 26 10 77 20 |&.v .$FFC3.6&.w |
00001E30: D6 24 46 46 45 37 00 3C 26 24 77 A2 00 62 26 38 |.$FFE7.<&$w..b&8|
00001E40: 77 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |w;**************|
00001E50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001E60: 2A 2A 00 6F 26 4C 77 A1 44 49 53 4B 56 41 4C 00 |**.o&Lw.DISKVAL.|
00001E70: 7A 26 60 77 20 D5 44 52 49 45 00 89 26 74 77 4E |z&`w .DRIE..&twN|
00001E80: 41 41 4D 33 20 A8 22 56 22 00 96 26 88 77 44 52 |AAM3 ."V"..&.wDR|
00001E90: 49 45 20 CA 23 31 00 A6 26 9C 77 20 C3 23 3E 28 |IE .#1..&.w .#>(|
00001EA0: 4E 41 41 4D 33 29 00 B6 26 B0 77 20 C2 23 3C 28 |NAAM3)..&.w .#<(|
00001EB0: 4E 41 41 4D 33 29 00 C2 26 C4 77 20 D6 24 46 46 |NAAM3)..&.w .$FF|
00001EC0: 42 44 00 CC 26 D8 77 20 CA 23 31 35 00 D5 26 EC |BD..&.w .#15..&.|
00001ED0: 77 20 C2 23 38 00 DF 26 00 78 20 C3 23 31 35 00 |w .#8..&.x .#15.|
00001EE0: EB 26 14 78 20 D6 24 46 46 42 41 00 F7 26 28 78 |.&.x .$FFBA..&(x|
00001EF0: 20 D6 24 46 46 43 30 00 01 27 3C 78 20 CA 23 31 | .$FFC0..'<x .#1|
00001F00: 35 00 0D 27 50 78 20 D6 24 46 46 43 33 00 19 27 |5..'Px .$FFC3..'|
00001F10: 64 78 20 D6 24 46 46 45 37 00 1F 27 78 78 A2 00 |dx .$FFE7..'xx..|
00001F20: 46 27 8C 78 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |F'.x;***********|
00001F30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001F40: 2A 2A 2A 2A 2A 2A 00 65 27 A0 78 A1 4C 4F 41 44 |******.e'.x.LOAD|
00001F50: A0 4E 41 41 4D 41 44 52 45 53 2C 4C 45 4E 47 54 |.NAAMADRES,LENGT|
00001F60: 45 4E 41 41 4D 00 70 27 B4 78 20 CA 23 24 30 34 |ENAAM.p'.x .#$04|
00001F70: 00 7B 27 C8 78 20 C2 23 24 30 38 00 86 27 DC 78 |.{'.x .#$08..'.x|
00001F80: 20 C3 23 24 30 31 00 92 27 F0 78 20 D6 24 46 46 | .#$01..'.x .$FF|
00001F90: 42 41 00 A4 27 04 79 20 CA 23 4C 45 4E 47 54 45 |BA..'.y .#LENGTE|
00001FA0: 4E 41 41 4D 00 B8 27 18 79 20 C2 23 3C 28 4E 41 |NAAM..'.y .#<(NA|
00001FB0: 41 4D 41 44 52 45 53 29 00 CC 27 2C 79 20 C3 23 |AMADRES)..',y .#|
00001FC0: 3E 28 4E 41 41 4D 41 44 52 45 53 29 00 D8 27 40 |>(NAAMADRES)..'@|
00001FD0: 79 20 D6 24 46 46 42 44 00 E3 27 54 79 20 CA 23 |y .$FFBD..'Ty .#|
00001FE0: 24 30 30 00 EE 27 68 79 20 C2 23 24 46 46 00 F9 |$00..'hy .#$FF..|
00001FF0: 27 7C 79 20 C3 23 24 46 46 00 05 28 90 79 20 D6 |'|y .#$FF..(.y .|
00002000: 24 46 46 44 35 00 0B 28 A4 79 A2 00 32 28 B8 79 |$FFD5..(.y..2(.y|
00002010: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************|
00002020: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002030: 2A 2A 00 4F 28 CC 79 A1 53 41 56 45 A0 4E 41 4D |**.O(.y.SAVE.NAM|
00002040: 41 44 52 2C 4C 2C 41 44 52 31 2C 41 44 52 32 00 |ADR,L,ADR1,ADR2.|
00002050: 5A 28 E0 79 20 CA 23 24 30 34 00 65 28 F4 79 20 |Z(.y .#$04.e(.y |
00002060: C2 23 24 30 38 00 70 28 08 7A 20 C3 23 24 30 31 |.#$08.p(.z .#$01|
00002070: 00 7C 28 1C 7A 20 D6 24 46 46 42 41 00 85 28 30 |.|(.z .$FFBA..(0|
00002080: 7A 20 CA 23 4C 00 96 28 44 7A 20 C2 23 3C 28 4E |z .#L..(Dz .#<(N|
00002090: 41 4D 41 44 52 29 00 A7 28 58 7A 20 C3 23 3E 28 |AMADR)..(Xz .#>(|
000020A0: 4E 41 4D 41 44 52 29 00 B3 28 6C 7A 20 D6 24 46 |NAMADR)..(lz .$F|
000020B0: 46 42 44 00 C2 28 80 7A 20 CA 23 3C 28 41 44 52 |FBD..(.z .#<(ADR|
000020C0: 31 29 00 CC 28 94 7A 20 D2 24 30 32 00 DB 28 A8 |1)..(.z .$02..(.|
000020D0: 7A 20 CA 23 3E 28 41 44 52 31 29 00 E5 28 BC 7A |z .#>(ADR1)..(.z|
000020E0: 20 D2 24 30 33 00 F4 28 D0 7A 20 C2 23 3C 28 41 | .$03..(.z .#<(A|
000020F0: 44 52 32 29 00 03 29 E4 7A 20 C3 23 3E 28 41 44 |DR2)..).z .#>(AD|
00002100: 52 32 29 00 0E 29 F8 7A 20 CA 23 24 30 32 00 1A |R2)..).z .#$02..|
00002110: 29 0C 7B 20 D6 24 46 46 44 38 00 20 29 20 7B A2 |).{ .$FFD8. ) {.|
00002120: 00 46 29 34 7B 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.F)4{;**********|
00002130: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002140: 2A 2A 2A 2A 2A 2A 00 64 29 48 7B A1 53 43 52 41 |******.d)H{.SCRA|
00002150: 54 43 48 A0 4E 41 41 4D 41 44 52 45 53 2C 4C 45 |TCH.NAAMADRES,LE|
00002160: 4E 47 54 45 00 70 29 5C 7B 20 D5 42 45 47 49 4E |NGTE.p)\{ .BEGIN|
00002170: 00 90 29 70 7B 4E 41 41 4D 20 A8 22 53 30 3A 20 |..)p{NAAM ."S0: |
00002180: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
00002190: 00 9F 29 84 7B 42 45 47 49 4E 20 C2 23 30 30 00 |..).{BEGIN .#00.|
000021A0: B7 29 98 7B 54 45 58 32 30 30 20 CA 4E 41 41 4D |.).{TEX200 .NAAM|
000021B0: 41 44 52 45 53 2C 58 00 C8 29 AC 7B 20 D2 4E 41 |ADRES,X..).{ .NA|
000021C0: 41 4D 2B 24 30 33 2C 58 00 CF 29 C0 7B 20 EF 00 |AM+$03,X..).{ ..|
000021D0: DD 29 D4 7B 20 C0 23 4C 45 4E 47 54 45 00 EA 29 |.).{ .#LENGTE..)|
000021E0: E8 7B 20 F6 54 45 58 32 30 30 00 FA 29 FC 7B 20 |.{ .TEX200..).{ |
000021F0: CA 23 4C 45 4E 47 54 45 2B 33 00 09 2A 10 7C 20 |.#LENGTE+3..*.| |
00002200: C3 23 3E 28 4E 41 41 4D 29 00 18 2A 24 7C 20 C2 |.#>(NAAM)..*$| .|
00002210: 23 3C 28 4E 41 41 4D 29 00 24 2A 38 7C 20 D6 24 |#<(NAAM).$*8| .$|
00002220: 46 46 42 44 00 2E 2A 4C 7C 20 CA 23 31 35 00 37 |FFBD..*L| .#15.7|
00002230: 2A 60 7C 20 C2 23 38 00 41 2A 74 7C 20 C3 23 31 |*`| .#8.A*t| .#1|
00002240: 35 00 4D 2A 88 7C 20 D6 24 46 46 42 41 00 59 2A |5.M*.| .$FFBA.Y*|
00002250: 9C 7C 20 D6 24 46 46 43 30 00 63 2A B0 7C 20 CA |.| .$FFC0.c*.| .|
00002260: 23 31 35 00 6F 2A C4 7C 20 D6 24 46 46 43 33 00 |#15.o*.| .$FFC3.|
00002270: 7B 2A D8 7C 20 D6 24 46 46 45 37 00 81 2A EC 7C |{*.| .$FFE7..*.||
00002280: A2 00 A7 2A 00 7D 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A |...*.};*********|
00002290: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000022A0: 2A 2A 2A 2A 2A 2A 2A 00 CA 2A 14 7D 3B 4D 41 43 |*******..*.};MAC|
000022B0: 52 4F 20 49 4E 50 55 54 A0 41 44 52 2C 4D 41 58 |RO INPUT.ADR,MAX|
000022C0: 2C 58 2C 59 2C 43 4F 4C 4F 52 00 F0 2A 28 7D 3B |,X,Y,COLOR..*(};|
000022D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000022E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000022F0: 00 15 2B 3C 7D 3B 53 45 54 20 47 4C 4F 42 41 4C |..+<};SET GLOBAL|
00002300: 20 49 4E 50 55 54 42 41 53 45 20 54 4F 20 49 4E | INPUTBASE TO IN|
00002310: 50 42 41 53 45 00 35 2B 50 7D 3B 28 49 4E 50 42 |PBASE.5+P};(INPB|
00002320: 41 53 45 3D 53 54 41 52 54 20 53 55 42 52 4F 55 |ASE=START SUBROU|
00002330: 54 49 4E 45 29 00 57 2B 64 7D 3B 52 45 4D 20 20 |TINE).W+d};REM |
00002340: 20 20 20 20 49 4E 49 54 49 4E 50 55 54 A0 30 2C | INITINPUT.0,|
00002350: 30 2C 30 2C 30 2C 30 00 69 2B 78 7D 3B 52 45 4D |0,0,0,0.i+x};REM|
00002360: 20 20 20 20 20 20 52 54 53 00 8C 2B 8C 7D 3B 28 | RTS..+.};(|
00002370: 43 41 4C 4C 20 49 4E 49 54 49 4E 50 55 54 20 54 |CALL INITINPUT T|
00002380: 4F 20 49 4E 54 49 41 4C 49 53 45 29 00 92 2B A0 |O INTIALISE)..+.|
00002390: 7D 3B 00 B7 2B B4 7D 3B 2A 20 49 4E 50 55 54 20 |};..+.};* INPUT |
000023A0: 57 4F 52 44 54 20 56 41 4E 41 46 20 41 44 52 45 |WORDT VANAF ADRE|
000023B0: 53 20 28 41 44 52 29 00 D3 2B C8 7D 3B 2A 20 4E |S (ADR)..+.};* N|
000023C0: 45 45 52 47 45 5A 45 54 20 49 4E 20 46 4F 52 4D |EERGEZET IN FORM|
000023D0: 41 54 3A 00 EE 2B DC 7D 3B 2A 20 4C 45 4E 47 54 |AT:..+.};* LENGT|
000023E0: 45 49 4E 50 55 54 2C 49 4E 50 55 54 2C 30 00 F4 |EINPUT,INPUT,0..|
000023F0: 2B F0 7D 3B 00 1A 2C 04 7E 3B 2A 2A 2A 2A 2A 2A |+.};..,.~;******|
00002400: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002410: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3B 2C 18 7E A1 |**********.;,.~.|
00002420: 49 4E 49 54 49 4E 50 55 54 A0 41 44 52 2C 4D 41 |INITINPUT.ADR,MA|
00002430: 58 2C 58 2C 59 2C 43 4F 4C 4F 52 00 4E 2C 2C 7E |X,X,Y,COLOR.N,,~|
00002440: 49 4E 50 42 41 53 45 20 D5 54 45 58 35 38 00 60 |INPBASE .TEX58.`|
00002450: 2C 40 7E 54 45 58 35 31 20 A5 3E 28 41 44 52 29 |,@~TEX51 .>(ADR)|
00002460: 00 72 2C 54 7E 54 45 58 35 32 20 A5 3C 28 41 44 |.r,T~TEX52 .<(AD|
00002470: 52 29 00 81 2C 68 7E 54 45 58 35 33 20 A5 4D 41 |R)..,h~TEX53 .MA|
00002480: 58 00 8E 2C 7C 7E 54 45 58 35 34 20 A5 58 00 9B |X..,|~TEX54 .X..|
00002490: 2C 90 7E 54 45 58 35 35 20 A5 59 00 AC 2C A4 7E |,.~TEX55 .Y..,.~|
000024A0: 54 45 58 35 30 20 A5 43 4F 4C 4F 52 00 BD 2C B8 |TEX50 .COLOR..,.|
000024B0: 7E 54 45 58 35 38 20 C2 54 45 58 35 30 00 C9 2C |~TEX58 .TEX50..,|
000024C0: CC 7E 20 D3 24 30 32 38 36 00 D5 2C E0 7E 20 C2 |.~ .$0286..,.~ .|
000024D0: 54 45 58 35 31 00 DF 2C F4 7E 20 D3 24 30 33 00 |TEX51..,.~ .$03.|
000024E0: EB 2C 08 7F 20 C2 54 45 58 35 32 00 F5 2C 1C 7F |.,.. .TEX52..,..|
000024F0: 20 D3 24 30 32 00 01 2D 30 7F 20 C2 54 45 58 35 | .$02..-0. .TEX5|
00002500: 34 00 0D 2D 44 7F 20 C3 54 45 58 35 35 00 14 2D |4..-D. .TEX55..-|
00002510: 58 7F 20 E5 00 20 2D 6C 7F 20 D6 24 46 46 46 30 |X. .. -l. .$FFF0|
00002520: 00 30 2D 80 7F 54 45 58 32 33 20 C2 23 24 30 30 |.0-..TEX23 .#$00|
00002530: 00 3C 2D 94 7F 20 D3 54 45 58 32 32 00 48 2D A8 |.<-.. .TEX22.H-.|
00002540: 7F 20 D5 54 45 58 32 30 00 56 2D BC 7F 54 45 58 |. .TEX20.V-..TEX|
00002550: 32 32 20 A5 30 30 00 66 2D D0 7F 54 45 58 32 30 |22 .00.f-..TEX20|
00002560: 20 CA 23 31 38 35 00 72 2D E4 7F 20 D6 24 46 46 | .#185.r-.. .$FF|
00002570: 44 32 00 83 2D F8 7F 54 45 58 32 31 20 D6 24 46 |D2..-..TEX21 .$F|
00002580: 46 45 34 00 8F 2D 0C 80 20 C9 54 45 58 32 32 00 |FE4..-.. .TEX22.|
00002590: 9B 2D 20 80 20 C3 54 45 58 32 32 00 A7 2D 34 80 |.- . .TEX22..-4.|
000025A0: 20 C1 54 45 58 35 33 00 B3 2D 48 80 20 F7 54 45 | .TEX53..-H. .TE|
000025B0: 58 32 39 00 BE 2D 5C 80 20 C4 23 24 30 30 00 CA |X29..-\. .#$00..|
000025C0: 2D 70 80 20 F6 54 45 58 32 34 00 D6 2D 84 80 20 |-p. .TEX24..-.. |
000025D0: C7 54 45 58 32 32 00 E2 2D 98 80 20 D5 54 45 58 |.TEX22..-.. .TEX|
000025E0: 32 31 00 F1 2D AC 80 54 45 58 32 34 20 C4 23 31 |21..-..TEX24 .#1|
000025F0: 33 00 FD 2D C0 80 20 F7 54 45 58 32 38 00 08 2E |3..-.. .TEX28...|
00002600: D4 80 20 C4 23 31 34 38 00 14 2E E8 80 20 F7 54 |.. .#148..... .T|
00002610: 45 58 32 31 00 1F 2E FC 80 20 C4 23 31 35 37 00 |EX21..... .#157.|
00002620: 2B 2E 10 81 20 F7 54 45 58 32 31 00 35 2E 24 81 |+... .TEX21.5.$.|
00002630: 20 C4 23 32 39 00 41 2E 38 81 20 F7 54 45 58 32 | .#29.A.8. .TEX2|
00002640: 31 00 4B 2E 4C 81 20 C4 23 31 37 00 57 2E 60 81 |1.K.L. .#17.W.`.|
00002650: 20 F7 54 45 58 32 31 00 62 2E 74 81 20 C4 23 31 | .TEX21.b.t. .#1|
00002660: 34 35 00 6E 2E 88 81 20 F7 54 45 58 32 31 00 78 |45.n... .TEX21.x|
00002670: 2E 9C 81 20 C4 23 32 30 00 84 2E B0 81 20 F6 54 |... .#20..... .T|
00002680: 45 58 32 36 00 8F 2E C4 81 20 C1 23 24 30 31 00 |EX26..... .#$01.|
00002690: 9B 2E D8 81 20 F6 54 45 58 32 35 00 A6 2E EC 81 |.... .TEX25.....|
000026A0: 20 C3 23 24 30 30 00 B2 2E 00 82 20 D4 54 45 58 | .#$00..... .TEX|
000026B0: 32 32 00 BE 2E 14 82 20 D5 54 45 58 32 31 00 CF |22..... .TEX21..|
000026C0: 2E 28 82 54 45 58 32 35 20 C7 54 45 58 32 32 00 |.(.TEX25 .TEX22.|
000026D0: DB 2E 3C 82 20 C7 54 45 58 32 32 00 E7 2E 50 82 |..<. .TEX22...P.|
000026E0: 20 D5 54 45 58 32 37 00 FA 2E 64 82 54 45 58 32 | .TEX27...d.TEX2|
000026F0: 36 20 D2 28 24 30 32 29 2C 59 00 06 2F 78 82 54 |6 .($02),Y../x.T|
00002700: 45 58 32 37 20 D8 00 11 2F 8C 82 20 CA 23 31 35 |EX27 .../.. .#15|
00002710: 37 00 1D 2F A0 82 20 D6 24 46 46 44 32 00 24 2F |7../.. .$FFD2.$/|
00002720: B4 82 20 D7 00 30 2F C8 82 20 D6 24 46 46 44 32 |.. ..0/.. .$FFD2|
00002730: 00 3C 2F DC 82 20 D5 54 45 58 32 30 00 4B 2F F0 |.</.. .TEX20.K/.|
00002740: 82 54 45 58 32 38 20 CA 23 32 30 00 57 2F 04 83 |.TEX28 .#20.W/..|
00002750: 20 D6 24 46 46 44 32 00 63 2F 18 83 20 C3 54 45 | .$FFD2.c/.. .TE|
00002760: 58 32 32 00 6D 2F 2C 83 20 CA 23 30 30 00 7B 2F |X22.m/,. .#00.{/|
00002770: 40 83 20 D2 28 24 30 32 29 2C 59 00 87 2F 54 83 |@. .($02),Y../T.|
00002780: 20 C7 54 45 58 32 32 00 93 2F 68 83 20 CA 54 45 | .TEX22../h. .TE|
00002790: 58 32 32 00 9E 2F 7C 83 20 C3 23 24 30 30 00 AC |X22../|. .#$00..|
000027A0: 2F 90 83 20 D2 28 24 30 32 29 2C 59 00 B3 2F A4 |/.. .($02),Y../.|
000027B0: 83 20 E3 00 C2 2F B8 83 54 45 58 32 39 20 CA 23 |. .../..TEX29 .#|
000027C0: 32 30 00 D3 2F CC 83 54 45 58 33 30 20 D6 24 46 |20../..TEX30 .$F|
000027D0: 46 44 32 00 DA 2F E0 83 20 EC 00 E6 2F F4 83 20 |FD2../.. .../.. |
000027E0: F6 54 45 58 33 30 00 F2 2F 08 84 20 D5 54 45 58 |.TEX30../.. .TEX|
000027F0: 32 33 00 F8 2F 1C 84 A2 00 1E 30 30 84 3B 2A 2A |23../.....00.;**|
00002800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3B |**************.;|
00002820: 30 44 84 A1 49 4E 50 55 54 A0 41 44 52 2C 4D 41 |0D..INPUT.ADR,MA|
00002830: 58 2C 58 2C 59 2C 43 4F 4C 4F 52 00 47 30 58 84 |X,X,Y,COLOR.G0X.|
00002840: 20 D5 54 45 58 35 38 00 59 30 6C 84 54 45 58 35 | .TEX58.Y0l.TEX5|
00002850: 36 20 A5 3E 28 41 44 52 29 00 66 30 80 84 20 A5 |6 .>(ADR).f0.. .|
00002860: 3C 28 41 44 52 29 00 72 30 94 84 20 A5 4D 41 58 |<(ADR).r0.. .MAX|
00002870: 2B 32 00 7A 30 A8 84 20 A5 59 00 82 30 BC 84 20 |+2.z0.. .Y..0.. |
00002880: A5 58 00 8E 30 D0 84 20 A5 43 4F 4C 4F 52 00 9E |.X..0.. .COLOR..|
00002890: 30 E4 84 54 45 58 35 38 20 C2 23 24 30 30 00 B1 |0..TEX58 .#$00..|
000028A0: 30 F8 84 54 45 58 35 37 20 CA 54 45 58 35 36 2C |0..TEX57 .TEX56,|
000028B0: 58 00 C7 30 0C 85 20 D2 49 4E 50 55 54 42 41 53 |X..0.. .INPUTBAS|
000028C0: 45 2B 24 30 33 2C 58 00 CE 30 20 85 20 EF 00 D7 |E+$03,X..0 . ...|
000028D0: 30 34 85 20 C0 23 36 00 E3 30 48 85 20 F6 54 45 |04. .#6..0H. .TE|
000028E0: 58 35 37 00 F3 30 5C 85 20 D6 49 4E 50 55 54 42 |X57..0\. .INPUTB|
000028F0: 41 53 45 00 F9 30 70 85 A2 00 00 00 |ASE..0p..... |
..$. N;MACRO INPUT ADR,MAX,X,Y,COLOR.H.4
N;* MACRO TEXT ADRES,X,Y,KLEUR *.S.HN.$4
000.H.\N.INPUTBASE=$4000.S.PN.BEGIN....N
INITINPUT 0,0,0,0,0....N .. ..NJOEP B#0
....NTER W....N RI12,X....N ..F..N .#9.P
..N .TER....N TEXT TEKST14,0,10,1....N I
NPUT I10,1,21,10,1....N INPUT I13,9,23,1
0,1.$..N B#1.-..N C#0.=..NTER2 JI13,X.I.
.N RI12,Y.P..N ..W..N ..B..N D#$00.M. N
.TER2.V..N B#0...N J#0....N C#1....N JI
10,Y....N RI11+$5....N SAVE I11,16,$0800
,$0900.S..N DISKERROR 0,1,1....N CLRHOME
....N .....NTEKST14 ."SAVE KOALAFILE: .A
.PIC ."....NI10 ." ".=..NI11 .129,80,7
3,67,32,32,32.R..NI12 ." ".J..NI
13 ." ".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 DISKERROR 0,1,1...
LO CLRHOME...`O UBEGIN...TOSC CLRHOME.6.
.O TEXT TEKST11,0,10,1.N..O INPUT I4,1,2
4,10,1.W..O C#1.B.DO JI4,Y.N.XO RI5+$5..
..O SCRATCH I5,7....P DISKERROR 0,1,1...
.P CLRHOME....P UBEGIN...(PI4 ." ".N.<
PI5 ."?PIC *"...PPTEKST11 ."SCRATCH KOA
LAFILE: .A.PIC ."...DPI3 ." "...XPI0 .
"?PIC *".(..PDI CLRHOME.1. P DIR.F..P D
ISKERROR 0,1,1.R..P UBEGIN.^.HPREN UQQ.I
..PSA UQQ.X..QVA DISKVAL....Q CLRHOME...
,Q DISKSTATUS 1,1,1...@Q UBEGIN...TQEXIT
UQQ.O.HQIN WINDOW 14,6,12,18,1...|QWIN
TEXT TEKST1,15,7,1....Q TEXT TEKST2,15,9
,1....Q TEXT TEKST3,15,11,1.4..Q TEXT TE
KST4,15,13,1.M.LQ TEXT TEKST5,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 INKEY....R D#01.
"..R .INJ1.+.PR UDI.9..RINJ1 D#64.C..R .
IN0.M..S VWIN.^. S CURSOR 9,15.I.4S J#25
0.U.HS V$FFD2...\S PAUSE 100...PSIN1 INK
EY....S D#01....S .INJ2....S ULO....SINJ
2 D#64.H.TS .IN1.R..S VWIN....S CURSOR 1
1,15....T J#250...$T V$FFD2...8T PAUSE 1
00...LTIN2 INKEY.".`T D#01.-.TT .INJ3.6.
.T USA.D..TINJ3 D#64.N..T .IN2.X.DT VWIN
.J.XT CURSOR 13,15.U..T J#250....U V$FFD
2....U PAUSE 100...(UIN3 INKEY...<U D#01
...PU .INJ4...DU USC.J.XUINJ4 D#64.T..U
.IN3... U VWIN....U CURSOR 15,15...HU J#
250....U V$FFD2....U PAUSE 100.$..VIN4 I
NKEY....V D#01.9.,V .INJ5.B.@V UVA.P.TVI
NJ5 D#64.Z.HV .IN4.D.|V VWIN.V..V CURSOR
17,15....V J#250....V V$FFD2...LV PAUSE
100....VIN5 INKEY....V D#01....W .INJ6.
I..W UREN.W.0WINJ6 D#64...DW .IN5...XW V
WIN...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 ."....XTEKST
4 .". .SCRATCH ."....XTEKST5 .". .VALID
ATE ."."..XTEKST6 .". .EXIT .".>.TXT
EKST7 .". .RENAME .".F..XTEKST10 ."LOA
D KOALAFILE: .A.PIC ."....X.WINDOW X,Y,X
1,Y1,COLVAL....Y B#X...$Y ST9...8Y B#Y..
.LY ST8...`Y UBEGIN...TYT1 .".".K..YT2 .
".".W..YT3 ."."....YT7 ."."...DYT4 .".".
..XYT5 ."."....YT6 ." "....ZT8 .00....ZT
9 .00...(ZSET J#COLVAL.:.<Z R$0286.H.PZP
OINT 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$F
FD2....[DRIE IT8....[ VSET....[ JT4...L[
V$FFD2....[ B#00."..[ JT6.2..\EENN V$FF
D2.9..\ ..E.0\ .#X1-2.P.D\ .EENN.Y.X\ JT
4.E.L\ V$FFD2.N..\ JT8.Z..\ D#Y1+1....\
.DRIE....\ IT8...P\ VSET....\ JT3....\ V
$FFD2....] B#00... ] JT5.Q.4]EENNN V$FFD
2.X.H] ....\] .#X1-2...P] .EENNN....] JT
7....] V$FFD2....]../..];***************
***************.F.T].SCREENCOLOR COLOR.S
..] C#COLOR._..] T53281.E..^....$^;*****
*************************. .8^.BORDERCOL
OR COLOR...L^ C#COLOR...`^ T53280...T^..
...^;******************************....^
.FILLCOLOR COLOR....^ J#COLOR...D^ B#$00
.".X^TEX1 R$D800,X.0..^ R$D900,X.>.._ R$
DA00,X.E.._ ..P.(_ .TEX1.B.<_TEX2 R$DB00
,X.I.P_ ..T.D_ .#$E8..X_ .TEX2...._....
_;******************************...._.C
OLORINC.B.H_ B#$00.T.._TEX1 I$D800,X....
_ I$D900,X....` I$DA00,X....` ....,` .TE
X1...@`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,KL
EUR *...0A;*****************************
*...DA.TEXT TADR,XVAL,YVAL,COLVAL...XA J
#COLVAL.+.LA R$0286.7..A B#YVAL.C..A C#X
VAL.J..A ..V..A V$FFF0.A.PA B#$00.R..ATE
X1 JTADR,X.}..A D#$FF....B .TEX2... B V$
FFD2...4B ....HB UTEX1...\BTEX2 ....PB..
Y..B;****************************....B;*
MACRO PRINT ADRES *....B;*******
*********************.-..B.PRINT 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$FFD2....C..G.
.C;****************************...DC;* M
ACRO KEY WAIT *...XC;*********
*******************....C.KEY WAIT.(..DTE
X1 B#$00.4..D S$00C6.@.(D J$00C5.L.<D D#
WAIT.W.PD .TEX1.].DD..M.XD.CURSOR 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 MACRO'S 1.1 *.
..XF;********************************...
LF;MACRO DIR....F;MACRO LOAD NAAMADRES,L
ENGTENAAM....F;MACRO SAVE NAMADR,L,ADR1,
ADR2.(..F;MACRO SCRATCH NAAMADRES,LENGTE
.H..F;MACRO DISKSTATUS X,Y,COLOR.G.PF;MA
CRO DISKERROR X,Y,COLOR.{..F;MACRO DISKI
NIT....F;MACRO DISKVAL....G;************
********************... G.DIR.H.4G J#$24
.T.HG R$0100...\G V$AAD7...PG J#$01....G
Z....G B#$00....G V$FFBD....G B#$08...T
G C#$60.+..G V$FFBA.7..G V$F3D5.A..H J$B
A.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$F
F....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..TJTEX2 V$AAD7.
..HJ J#$00...|J R$C6....J J$C5....J D#60
....J .TEX7...LJ D#63.H..J .TEX4.W..JTEX
3 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...4L V$FFC9...H
L .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#COLOR.. XM R$
0286.. .M B#Y.F .N C#X.M .N ..Y (N V$FFF
0.. <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..!.OTEX98 V$FFCF..
!.O D#$0D..!LO .TEX99.A!.O V$FFD2.M!.O U
TEX98..!.PTEX99 J#15..!.P V$FFC3..!0P V$
FFE7..!DP J#0.."XP R$C6.."LP..3".P;*****
***************************.L".P.DISKERR
OR 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$FFBD.."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..#.RTEX
98 V$FFCF..#$R A#0.R .TEX97.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 MESSAGE:".S$HT .
$0D..$|TTEX101 .$0D,$0D..$.T ."-HIY KEY
TO CONTINUE-"..$.TTEX103 .00.G$.TTEX102
BTEX103.T$LT .TEX104..$.T B#$00..$.T JTE
X101,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.DIS
KINIT..%.V UTWEE..% VNAAM ."I/0"..%4VTWE
E 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$FF
C3.6&.W V$FFE7.<&$W..B&8W;**************
******************.O&LW.DISKVAL.Z&`W UDR
IE..&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$FFC3..'DX V$FFE
7..'XX..F'.X;***************************
******.E' X.LOAD NAAMADRES,LENGTENAAM.P'
.X J#$04.{'HX B#$08..'.X C#$01..'.X V$FF
BA..'.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,ADR2.Z(.Y J#$
04.E(.Y B#$08.P(.Z C#$01.|(.Z V$FFBA..(0
Z 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: "..).{BEG
IN B#00..).{TEX200 JNAAMADRES,X.H).{ RNA
AM+$03,X.O).{ ...)T{ .#LENGTE..).{ .TEX2
00..).{ 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*.};MAC
RO INPUT ADR,MAX,X,Y,COLOR..*(};********
************************..+<};SET GLOBAL
INPUTBASE TO INPBASE.5+P};(INPBASE=STAR
T SUBROUTINE).W+D};REM INITINPUT 0,
0,0,0,0.I+X};REM RTS..+.};(CALL INI
TINPUT TO INTIALISE)..+ };..+.};* INPUT
WORDT VANAF ADRES (ADR).S+H};* NEERGEZET
IN FORMAT:..+.};* LENGTEINPUT,INPUT,0..
+.};..,.~;******************************
**.;,.~.INITINPUT ADR,MAX,X,Y,COLOR.N,,~
INPBASE UTEX58.`,@~TEX51 .>(ADR).R,T~TEX
52 .<(ADR)..,H~TEX53 .MAX..,|~TEX54 .X..
,.~TEX55 .Y..,.~TEX50 .COLOR..,.~TEX58 B
TEX50.I,L~ S$0286.U,.~ BTEX51..,.~ S$03.
.,. BTEX52..,. S$02..-0 BTEX54..-D C
TEX55..-X .. -L V$FFF0.0-.TEX23 B#$00
.<-. STEX22.H-. UTEX20.V-.TEX22 .00.F
-PTEX20 J#185.R-. V$FFD2..-.TEX21 V$F
FE4..-.. 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. .TE
X25..... C#$00..... TTEX22..... UTEX21.O
.(.TEX25 GTEX22...<. GTEX22...P. UTEX27.
..D.TEX26 R($02),Y../X.TEX27 X../.. J#15
7../ . V$FFD2.$/.. W.0/H. V$FFD2.</.. UT
EX20.K/..TEX28 J#20.W/.. V$FFD2.C/.. CTE
X22.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..INPU
T ADR,MAX,X,Y,COLOR.G0X. UTEX58.Y0L.TEX5
6 .>(ADR).F0.. .<(ADR).R0.. .MAX+2.Z0..
.Y..0.. .X..0P. .COLOR..0..TEX58 B#$00..
0..TEX57 JTEX56,X.G0.. RINPUTBASE+$03,X.
N0 . ..W04. .#6..0H. .TEX57..0\. VINPUTB
ASE..0P.....
> CLICK IMAGE PREVIEW FOR FULL MODAL