TEST
FILE INFORMATION
FILENAME(S): TEST
FILE TYPE(S): PRG
FILE SIZE: 8.8K
FIRST SEEN: 2025-11-30 21:09:57
APPEARS ON: 1 disk(s)
FILE HASH
4fe4a543563fd9e69ade689c7bbc5f2b183523a9449b069e5918be59e47e0efd
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SCREENSET | TEST | PRG | DuncanTwain | 13 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
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 52 4E 3B 2A 20 4D 41 43 52 |OLOR.H.RN;* 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 84 4E AA 24 34 |,KLEUR *.S..N.$4|
00000050: 30 30 30 00 5E 08 E8 4E B7 42 45 47 49 4E 00 6F |000.^..N.BEGIN.o|
00000060: 08 E9 4E 44 49 53 50 4C 20 D6 33 34 35 38 39 00 |..NDISPL .34589.|
00000070: 7C 08 EA 4E 41 53 20 49 4E 4B 45 59 00 86 08 EB ||..NAS INKEY....|
00000080: 4E 20 C4 23 36 34 00 8F 08 EC 4E 20 F7 41 53 00 |N .#64....N .AS.|
00000090: 9B 08 ED 4E 20 D6 33 34 35 39 32 00 A8 08 EE 4E |...N .34592....N|
000000A0: 20 43 4C 52 48 4F 4D 45 00 B4 08 EF 4E 20 D5 42 | CLRHOME....N .B|
000000B0: 45 47 49 4E 00 C5 08 F3 4E 4D 49 52 52 4F 20 D6 |EGIN....NMIRRO .|
000000C0: 33 34 35 38 39 00 D3 08 F4 4E 41 53 33 20 49 4E |34589....NAS3 IN|
000000D0: 4B 45 59 00 DD 08 F5 4E 20 C4 23 36 34 00 E7 08 |KEY....N .#64...|
000000E0: F6 4E 20 F7 41 53 33 00 F3 08 D1 52 20 D6 24 38 |.N .AS3....R .$8|
000000F0: 46 32 35 00 FF 08 D2 52 20 D6 24 43 42 30 30 00 |F25....R .$CB00.|
00000100: 0D 09 D3 52 41 53 32 20 49 4E 4B 45 59 00 17 09 |...RAS2 INKEY...|
00000110: D4 52 20 C4 23 36 34 00 21 09 D5 52 20 F7 41 53 |.R .#64.!..R .AS|
00000120: 32 00 2D 09 D6 52 20 D6 33 34 35 39 32 00 3A 09 |2.-..R .34592.:.|
00000130: D7 52 20 43 4C 52 48 4F 4D 45 00 46 09 D8 52 20 |.R CLRHOME.F..R |
00000140: D5 42 45 47 49 4E 00 63 09 D9 52 3B 2A 2A 2A 2A |.BEGIN.c..R;****|
00000150: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000160: 2A 2A 2A 00 6C 09 F0 55 20 D5 4C 4F 00 7F 09 F1 |***.l..U .LO....|
00000170: 55 57 45 31 20 A8 22 3F 50 49 43 20 41 2A 22 00 |UWE1 ."?PIC A*".|
00000180: 91 09 FB 55 4C 4F 20 4C 4F 41 44 A0 57 45 31 2C |...ULO LOAD.WE1,|
00000190: 37 00 A6 09 4E 57 20 44 49 53 4B 45 52 52 4F 52 |7...NW DISKERROR|
000001A0: A0 30 2C 30 2C 30 00 AF 09 81 57 20 C1 23 30 00 |.0,0,0....W .#0.|
000001B0: BA 09 82 57 20 F6 54 57 45 45 00 C6 09 83 57 20 |...W .TWEE....W |
000001C0: D6 33 34 35 38 39 00 D8 09 B3 57 54 57 45 45 20 |.34589....WTWEE |
000001D0: C9 57 45 31 2B 24 30 35 00 E6 09 B4 57 20 CA 57 |.WE1+$05....W .W|
000001E0: 45 31 2B 24 30 35 00 F0 09 B5 57 20 C4 23 38 31 |E1+$05....W .#81|
000001F0: 00 F9 09 B6 57 20 F6 4C 4F 00 08 0A C6 5C 49 4E |....W .LO....\IN|
00000200: 20 43 4C 52 48 4F 4D 45 00 1F 0A C7 5C 20 57 49 | CLRHOME....\ WI|
00000210: 4E 44 4F 57 A0 34 2C 33 2C 32 39 2C 39 2C 31 00 |NDOW.4,3,29,9,1.|
00000220: 39 0A F8 5C 57 49 4E 20 54 45 58 54 A0 54 45 4B |9..\WIN TEXT.TEK|
00000230: 53 54 31 2C 35 2C 34 2C 31 00 50 0A 2A 5D 20 54 |ST1,5,4,1.P.*] T|
00000240: 45 58 54 A0 54 45 4B 53 54 32 2C 35 2C 36 2C 31 |EXT.TEKST2,5,6,1|
00000250: 00 67 0A 5C 5D 20 54 45 58 54 A0 54 45 4B 53 54 |.g.\] TEXT.TEKST|
00000260: 33 2C 35 2C 38 2C 31 00 7F 0A 8E 5D 20 54 45 58 |3,5,8,1....] TEX|
00000270: 54 A0 54 45 4B 53 54 34 2C 35 2C 31 30 2C 31 00 |T.TEKST4,5,10,1.|
00000280: 88 0A 56 5E 51 51 20 E3 00 95 0A 88 5E 54 54 20 |..V^QQ .....^TT |
00000290: A5 31 34 2C 38 00 9F 0A BA 5E 20 A8 22 FF 22 00 |.14,8....^ .".".|
000002A0: B2 0A EC 5E 42 45 47 49 4E 20 50 52 49 4E 54 A0 |...^BEGIN PRINT.|
000002B0: 54 54 00 C5 0A ED 5E 20 53 43 52 45 45 4E 43 4F |TT....^ SCREENCO|
000002C0: 4C 4F 52 A0 30 00 D8 0A EE 5E 20 42 4F 52 44 45 |LOR.0....^ BORDE|
000002D0: 52 43 4F 4C 4F 52 A0 30 00 E1 0A 1E 5F 20 D6 49 |RCOLOR.0...._ .I|
000002E0: 4E 00 EE 0A 50 5F 45 45 4E 20 D6 57 49 4E 00 FE |N...P_EEN .WIN..|
000002F0: 0A 82 5F 20 43 55 52 53 4F 52 A0 34 2C 35 00 09 |.._ CURSOR.4,5..|
00000300: 0B B4 5F 20 CA 23 32 35 30 00 15 0B E6 5F 20 D6 |.._ .#250...._ .|
00000310: 24 46 46 44 32 00 24 0B 18 60 20 50 41 55 53 45 |$FFD2.$..` PAUSE|
00000320: A0 31 30 30 00 32 0B 4A 60 49 4E 30 20 49 4E 4B |.100.2.J`IN0 INK|
00000330: 45 59 00 3C 0B 7C 60 20 C4 23 30 31 00 47 0B AE |EY.<.|` .#01.G..|
00000340: 60 20 F6 49 4E 4A 31 00 50 0B E0 60 20 D5 51 51 |` .INJ1.P..` .QQ|
00000350: 00 5E 0B 12 61 49 4E 4A 31 20 C4 23 36 34 00 68 |.^..aINJ1 .#64.h|
00000360: 0B 44 61 20 F7 49 4E 30 00 72 0B 76 61 20 D6 57 |.Da .IN0.r.va .W|
00000370: 49 4E 00 82 0B A8 61 20 43 55 52 53 4F 52 A0 36 |IN....a CURSOR.6|
00000380: 2C 35 00 8D 0B DA 61 20 CA 23 32 35 30 00 99 0B |,5....a .#250...|
00000390: 0C 62 20 D6 24 46 46 44 32 00 A8 0B 3E 62 20 50 |.b .$FFD2...>b P|
000003A0: 41 55 53 45 A0 31 30 30 00 B6 0B 70 62 49 4E 31 |AUSE.100...pbIN1|
000003B0: 20 49 4E 4B 45 59 00 C0 0B A2 62 20 C4 23 30 31 | INKEY....b .#01|
000003C0: 00 CB 0B D4 62 20 F6 49 4E 4A 32 00 D4 0B 06 63 |....b .INJ2....c|
000003D0: 20 D5 51 51 00 E2 0B 38 63 49 4E 4A 32 20 C4 23 | .QQ...8cINJ2 .#|
000003E0: 36 34 00 EC 0B 6A 63 20 F7 49 4E 31 00 F6 0B 9C |64...jc .IN1....|
000003F0: 63 20 D6 57 49 4E 00 06 0C CE 63 20 43 55 52 53 |c .WIN....c CURS|
00000400: 4F 52 A0 38 2C 35 00 11 0C 00 64 20 CA 23 32 35 |OR.8,5....d .#25|
00000410: 30 00 1D 0C 32 64 20 D6 24 46 46 44 32 00 2C 0C |0...2d .$FFD2.,.|
00000420: 64 64 20 50 41 55 53 45 A0 31 30 30 00 3A 0C 96 |dd PAUSE.100.:..|
00000430: 64 49 4E 32 20 49 4E 4B 45 59 00 44 0C C8 64 20 |dIN2 INKEY.D..d |
00000440: C4 23 30 31 00 4F 0C FA 64 20 F6 49 4E 4A 33 00 |.#01.O..d .INJ3.|
00000450: 58 0C 2C 65 20 D5 51 51 00 66 0C 5E 65 49 4E 4A |X.,e .QQ.f.^eINJ|
00000460: 33 20 C4 23 36 34 00 70 0C 90 65 20 F7 49 4E 32 |3 .#64.p..e .IN2|
00000470: 00 7A 0C C2 65 20 D6 57 49 4E 00 8B 0C F4 65 20 |.z..e .WIN....e |
00000480: 43 55 52 53 4F 52 A0 31 30 2C 35 00 96 0C 26 66 |CURSOR.10,5...&f|
00000490: 20 CA 23 32 35 30 00 A2 0C 58 66 20 D6 24 46 46 | .#250...Xf .$FF|
000004A0: 44 32 00 B1 0C 8A 66 20 50 41 55 53 45 A0 31 30 |D2....f PAUSE.10|
000004B0: 30 00 BF 0C BC 66 49 4E 33 20 49 4E 4B 45 59 00 |0....fIN3 INKEY.|
000004C0: C9 0C EE 66 20 C4 23 30 31 00 D4 0C 20 67 20 F6 |...f .#01... g .|
000004D0: 49 4E 4A 34 00 DD 0C 52 67 20 D5 51 51 00 EB 0C |INJ4...Rg .QQ...|
000004E0: 84 67 49 4E 4A 34 20 C4 23 36 34 00 F5 0C B6 67 |.gINJ4 .#64....g|
000004F0: 20 F7 49 4E 33 00 FF 0C B7 67 20 D5 45 45 4E 00 | .IN3....g .EEN.|
00000500: 06 0D 8C 6E 20 E3 00 22 0D BE 6E 54 45 4B 53 54 |...n .."..nTEKST|
00000510: 31 20 A8 22 12 20 92 44 49 53 50 4C 41 59 20 20 |1 .". .DISPLAY |
00000520: FF 22 00 4F 0D F0 6E 54 45 4B 53 54 32 20 A8 22 |.".O..nTEKST2 ."|
00000530: 12 20 92 44 49 53 50 4C 41 59 20 41 4C 4C 20 50 |. .DISPLAY ALL P|
00000540: 49 43 27 53 20 4F 4E 20 44 49 53 4B 20 FF 22 00 |IC'S ON DISK .".|
00000550: 7C 0D 22 6F 54 45 4B 53 54 33 20 A8 22 12 20 92 ||."oTEKST3 .". .|
00000560: 4D 49 52 52 4F 52 20 20 20 20 20 20 20 20 20 20 |MIRROR |
00000570: 20 20 20 20 20 20 20 20 20 20 FF 22 00 A9 0D B8 | ."....|
00000580: 6F 54 45 4B 53 54 34 20 A8 22 12 20 92 45 58 49 |oTEKST4 .". .EXI|
00000590: 54 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |T |
000005A0: 20 20 20 20 20 20 20 FF 22 00 C6 0D 4E 70 A1 57 | ."...Np.W|
000005B0: 49 4E 44 4F 57 A0 58 2C 59 2C 58 31 2C 59 31 2C |INDOW.X,Y,X1,Y1,|
000005C0: 43 4F 4C 56 41 4C 00 CF 0D 80 70 20 C2 23 58 00 |COLVAL....p .#X.|
000005D0: D8 0D B2 70 20 D3 54 39 00 E1 0D E4 70 20 C2 23 |...p .T9....p .#|
000005E0: 59 00 EA 0D 16 71 20 D3 54 38 00 F6 0D 48 71 20 |Y....q .T8...Hq |
000005F0: D5 42 45 47 49 4E 00 02 0E 7A 71 54 31 20 A8 22 |.BEGIN...zqT1 ."|
00000600: B0 22 00 0E 0E AC 71 54 32 20 A8 22 AE 22 00 1A |."....qT2 ."."..|
00000610: 0E DE 71 54 33 20 A8 22 AD 22 00 26 0E 10 72 54 |..qT3 .".".&..rT|
00000620: 37 20 A8 22 BD 22 00 32 0E 42 72 54 34 20 A8 22 |7 .".".2.BrT4 ."|
00000630: DD 22 00 3E 0E 74 72 54 35 20 A8 22 C0 22 00 4A |.".>.trT5 .".".J|
00000640: 0E A6 72 54 36 20 A8 22 20 22 00 55 0E D8 72 54 |..rT6 ." ".U..rT|
00000650: 38 20 A5 30 30 00 60 0E 0A 73 54 39 20 A5 30 30 |8 .00.`..sT9 .00|
00000660: 00 71 0E 3C 73 53 45 54 20 CA 23 43 4F 4C 56 41 |.q.<sSET .#COLVA|
00000670: 4C 00 7D 0E 6E 73 20 D2 24 30 32 38 36 00 8B 0E |L.}.ns .$0286...|
00000680: A0 73 50 4F 49 4E 54 20 C2 54 38 00 94 0E D2 73 |.sPOINT .T8....s|
00000690: 20 C3 54 39 00 9B 0E 04 74 20 E5 00 A7 0E 36 74 | .T9....t ....6t|
000006A0: 20 D6 24 46 46 46 30 00 AE 0E 68 74 20 E3 00 BD | .$FFF0...ht ...|
000006B0: 0E 9A 74 42 45 47 49 4E 20 D6 53 45 54 00 C6 0E |..tBEGIN .SET...|
000006C0: CC 74 20 CA 54 31 00 D2 0E FE 74 20 D6 24 46 46 |.t .T1....t .$FF|
000006D0: 44 32 00 DC 0E 30 75 20 C2 23 30 30 00 E5 0E 62 |D2...0u .#00...b|
000006E0: 75 20 CA 54 35 00 F4 0E 94 75 45 45 4E 20 D6 24 |u .T5....uEEN .$|
000006F0: 46 46 44 32 00 FB 0E C6 75 20 EF 00 07 0F F8 75 |FFD2....u .....u|
00000700: 20 C0 23 58 31 2D 32 00 11 0F 2A 76 20 F6 45 45 | .#X1-2...*v .EE|
00000710: 4E 00 1A 0F 5C 76 20 CA 54 32 00 26 0F 8E 76 20 |N...\v .T2.&..v |
00000720: D6 24 46 46 44 32 00 33 0F C0 76 44 52 49 45 20 |.$FFD2.3..vDRIE |
00000730: C9 54 38 00 3D 0F F2 76 20 D6 53 45 54 00 46 0F |.T8.=..v .SET.F.|
00000740: 24 77 20 CA 54 34 00 52 0F 56 77 20 D6 24 46 46 |$w .T4.R.Vw .$FF|
00000750: 44 32 00 5C 0F 88 77 20 C2 23 30 30 00 65 0F BA |D2.\..w .#00.e..|
00000760: 77 20 CA 54 36 00 75 0F EC 77 45 45 4E 4E 20 D6 |w .T6.u..wEENN .|
00000770: 24 46 46 44 32 00 7C 0F 1E 78 20 EF 00 88 0F 50 |$FFD2.|..x ....P|
00000780: 78 20 C0 23 58 31 2D 32 00 93 0F 82 78 20 F6 45 |x .#X1-2....x .E|
00000790: 45 4E 4E 00 9C 0F B4 78 20 CA 54 34 00 A8 0F E6 |ENN....x .T4....|
000007A0: 78 20 D6 24 46 46 44 32 00 B1 0F 18 79 20 CA 54 |x .$FFD2....y .T|
000007B0: 38 00 BD 0F 4A 79 20 C4 23 59 31 2B 31 00 C8 0F |8...Jy .#Y1+1...|
000007C0: 7C 79 20 F6 44 52 49 45 00 D1 0F AE 79 20 C9 54 ||y .DRIE....y .T|
000007D0: 38 00 DB 0F E0 79 20 D6 53 45 54 00 E4 0F 12 7A |8....y .SET....z|
000007E0: 20 CA 54 33 00 F0 0F 44 7A 20 D6 24 46 46 44 32 | .T3...Dz .$FFD2|
000007F0: 00 FA 0F 76 7A 20 C2 23 30 30 00 03 10 A8 7A 20 |...vz .#00....z |
00000800: CA 54 35 00 14 10 DA 7A 45 45 4E 4E 4E 20 D6 24 |.T5....zEENNN .$|
00000810: 46 46 44 32 00 1B 10 0C 7B 20 EF 00 27 10 3E 7B |FFD2....{ ..'.>{|
00000820: 20 C0 23 58 31 2D 32 00 33 10 70 7B 20 F6 45 45 | .#X1-2.3.p{ .EE|
00000830: 4E 4E 4E 00 3C 10 A2 7B 20 CA 54 37 00 48 10 D4 |NNN.<..{ .T7.H..|
00000840: 7B 20 D6 24 46 46 44 32 00 4E 10 06 7C A2 00 72 |{ .$FFD2.N..|..r|
00000850: 10 38 7C 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.8|;************|
00000860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000870: 2A 2A 00 89 10 6A 7C A1 53 43 52 45 45 4E 43 4F |**...j|.SCREENCO|
00000880: 4C 4F 52 A0 43 4F 4C 4F 52 00 96 10 9C 7C 20 C3 |LOR.COLOR....| .|
00000890: 23 43 4F 4C 4F 52 00 A2 10 FF 16 FF 47 81 FF FF |#COLOR......G...|
000008A0: FF FF A2 62 0A 22 FF FF 22 31 0A FF FF FF FF FF |...b.".."1......|
000008B0: FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF FF |................|
000008C0: FF FF FF FF FF FF FF FF FF FF FF FF 22 FF AA F3 |............"...|
000008D0: FF 42 FF 3F FF 33 33 FF FF BF 13 1F FF 62 FF BF |.B.?.33......b..|
000008E0: 13 1F FF 22 F0 2A 6C FF FF FF FF FF BF 13 4F 52 |...".*l.......OR|
000008F0: 00 FC 10 C8 7D 20 D4 35 33 32 38 30 00 02 11 FA |....} .53280....|
00000900: 7D A2 00 26 11 2C 7E 3B 2A 2A 2A 2A 2A 2A 2A 2A |}..&.,~;********|
00000910: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000920: 2A 2A 2A 2A 2A 2A 00 3B 11 5E 7E A1 46 49 4C 4C |******.;.^~.FILL|
00000930: 43 4F 4C 4F 52 A0 43 4F 4C 4F 52 00 48 11 90 7E |COLOR.COLOR.H..~|
00000940: 20 CA 23 43 4F 4C 4F 52 00 53 11 C2 7E 20 C2 23 | .#COLOR.S..~ .#|
00000950: 24 30 30 00 65 11 F4 7E 54 45 58 31 20 D2 24 44 |$00.e..~TEX1 .$D|
00000960: 38 30 30 2C 58 00 73 11 26 7F 20 D2 24 44 39 30 |800,X.s.&. .$D90|
00000970: 30 2C 58 00 81 11 58 7F 20 D2 24 44 41 30 30 2C |0,X...X. .$DA00,|
00000980: 58 00 88 11 8A 7F 20 EF 00 93 11 BC 7F 20 F6 54 |X..... ...... .T|
00000990: 45 58 31 00 A5 11 EE 7F 54 45 58 32 20 D2 24 44 |EX1.....TEX2 .$D|
000009A0: 42 30 30 2C 58 00 AC 11 20 80 20 EF 00 B7 11 52 |B00,X... . ....R|
000009B0: 80 20 C0 23 24 45 38 00 C2 11 84 80 20 F6 54 45 |. .#$E8..... .TE|
000009C0: 58 32 00 C8 11 B6 80 A2 00 EC 11 E8 80 3B 2A 2A |X2...........;**|
000009D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000009E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FA 11 1A |************....|
000009F0: 81 A1 43 4F 4C 4F 52 49 4E 43 00 05 12 4C 81 20 |..COLORINC...L. |
00000A00: C2 23 24 30 30 00 17 12 7E 81 54 45 58 31 20 C9 |.#$00...~.TEX1 .|
00000A10: 24 44 38 30 30 2C 58 00 25 12 B0 81 20 CA 24 FF |$D800,X.%... .$.|
00000A20: FF C0 0F FF 58 00 33 12 E2 81 20 C9 24 44 41 30 |....X.3... .$DA0|
00000A30: 30 2C 58 00 3A 12 14 82 20 EF 00 45 12 46 82 20 |0,X.:... ..E.F. |
00000A40: F6 54 45 58 31 00 57 12 78 82 54 45 58 32 20 C9 |.TEX1.W.x.TEX2 .|
00000A50: 24 44 42 30 30 2C 58 00 5E 12 AA 82 20 EF 00 69 |$DB00,X.^... ..i|
00000A60: 12 DC 82 20 C0 23 24 45 38 00 74 12 0E 83 20 F6 |... .#$E8.t... .|
00000A70: 54 45 58 32 00 7A 12 40 83 A2 00 9E 12 72 83 3B |TEX2.z.@.....r.;|
00000A80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 AB |**************..|
00000AA0: 12 A4 83 A1 43 4C 52 48 4F 4D 45 00 B6 12 D6 83 |....CLRHOME.....|
00000AB0: 20 CA 23 31 34 37 00 C2 12 08 84 20 D6 24 46 46 | .#147..... .$FF|
00000AC0: 44 32 00 C8 12 3A 84 A2 00 EC 12 6C 84 3B 2A 2A |D2...:.....l.;**|
00000AD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000AE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 10 13 9E |************....|
00000AF0: 84 3B 2A 20 4D 41 43 52 4F 20 54 45 58 54 20 41 |.;* MACRO TEXT A|
00000B00: 44 52 45 53 2C 58 2C 59 2C 4B 4C 45 55 52 20 2A |DRES,X,Y,KLEUR *|
00000B10: 00 34 13 D0 84 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.4...;**********|
00000B20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B30: 2A 2A 2A 2A 00 54 13 02 85 A1 54 45 58 54 A0 54 |****.T....TEXT.T|
00000B40: 41 44 52 2C 58 56 41 4C 2C 59 56 41 4C 2C 43 4F |ADR,XVAL,YVAL,CO|
00000B50: 4C 56 41 4C 00 62 13 34 85 20 CA 23 43 4F 4C 56 |LVAL.b.4. .#COLV|
00000B60: 41 4C 00 6E 13 66 85 20 D2 24 30 32 38 36 00 7A |AL.n.f. .$0286.z|
00000B70: 13 98 85 20 C2 23 59 56 41 4C 00 86 13 CA 85 20 |... .#YVAL..... |
00000B80: C3 23 58 56 41 4C 00 8D 13 FC 85 20 E5 00 99 13 |.#XVAL..... ....|
00000B90: 2E 86 20 D6 24 46 46 46 30 00 A4 13 60 86 20 C2 |.. .$FFF0...`. .|
00000BA0: 23 24 30 30 00 B5 13 92 86 54 45 58 31 20 CA 54 |#$00.....TEX1 .T|
00000BB0: 41 44 52 2C 58 00 C0 13 C4 86 20 C4 23 24 46 46 |ADR,X..... .#$FF|
00000BC0: 00 CB 13 F6 86 20 F7 54 45 58 32 00 D7 13 28 87 |..... .TEX2...(.|
00000BD0: 20 D6 24 46 46 44 32 00 DE 13 5A 87 20 EF 00 E9 | .$FFD2...Z. ...|
00000BE0: 13 8C 87 20 D5 54 45 58 31 00 F4 13 BE 87 54 45 |... .TEX1.....TE|
00000BF0: 58 32 20 E4 00 FA 13 F0 87 A2 00 1C 14 22 88 3B |X2 ..........".;|
00000C00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000C10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3E 14 54 |************.>.T|
00000C20: 88 3B 2A 20 4D 41 43 52 4F 20 50 52 49 4E 54 20 |.;* MACRO PRINT |
00000C30: 41 44 52 45 53 20 20 20 20 20 20 20 20 2A 00 60 |ADRES *.`|
00000C40: 14 86 88 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...;************|
00000C50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000C60: 00 70 14 B8 88 A1 50 52 49 4E 54 A0 54 41 44 52 |.p....PRINT.TADR|
00000C70: 00 7B 14 EA 88 20 C2 23 24 30 30 00 8C 14 1C 89 |.{... .#$00.....|
00000C80: 54 45 58 31 20 CA 54 41 44 52 2C 58 00 97 14 4E |TEX1 .TADR,X...N|
00000C90: 89 20 C4 23 24 46 46 00 A2 14 80 89 20 F7 54 45 |. .#$FF..... .TE|
00000CA0: 58 32 00 AE 14 B2 89 20 D6 24 46 46 44 32 00 B5 |X2..... .$FFD2..|
00000CB0: 14 E4 89 20 EF 00 C0 14 16 8A 20 D5 54 45 58 31 |... ...... .TEX1|
00000CC0: 00 CB 14 48 8A 54 45 58 32 20 E4 00 D6 14 7A 8A |...H.TEX2 ....z.|
00000CD0: 20 CA 23 24 30 44 00 E2 14 AC 8A 20 D6 24 46 46 | .#$0D..... .$FF|
00000CE0: 44 32 00 E8 14 DE 8A A2 00 0A 15 10 8B 3B 2A 2A |D2...........;**|
00000CF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000D00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2C 15 42 8B 3B |**********.,.B.;|
00000D10: 2A 20 4D 41 43 52 4F 20 4B 45 59 20 57 41 49 54 |* MACRO KEY WAIT|
00000D20: 20 20 20 20 20 20 20 20 20 20 20 2A 00 4E 15 74 | *.N.t|
00000D30: 8B 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.;**************|
00000D40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 5C |**************.\|
00000D50: 15 A6 8B A1 4B 45 59 A0 57 41 49 54 00 6B 15 D8 |....KEY.WAIT.k..|
00000D60: 8B 54 45 58 31 20 C2 23 24 30 30 00 77 15 0A 8C |.TEX1 .#$00.w...|
00000D70: 20 D3 24 30 30 43 36 00 83 15 3C 8C 20 CA 24 30 | .$00C6...<. .$0|
00000D80: 30 43 35 00 8F 15 6E 8C 20 C4 23 57 41 49 54 00 |0C5...n. .#WAIT.|
00000D90: 9A 15 A0 8C 20 F6 54 45 58 31 00 A0 15 D2 8C A2 |.... .TEX1......|
00000DA0: 00 B0 15 04 8D A1 43 55 52 53 4F 52 A0 58 2C 59 |......CURSOR.X,Y|
00000DB0: 00 B9 15 36 8D 20 C2 23 58 00 C2 15 68 8D 20 C3 |...6. .#X...h. .|
00000DC0: 23 59 00 C9 15 9A 8D 20 E5 00 D5 15 CC 8D 20 D6 |#Y..... ...... .|
00000DD0: 24 46 46 46 30 00 DB 15 FE 8D A2 00 E6 15 30 8E |$FFF0.........0.|
00000DE0: A1 49 4E 4B 45 59 00 F1 15 62 8E 20 C2 23 24 30 |.INKEY...b. .#$0|
00000DF0: 30 00 FD 15 94 8E 20 D3 24 30 30 43 36 00 09 16 |0..... .$00C6...|
00000E00: C6 8E 20 CA 24 30 30 43 35 00 0F 16 F8 8E A2 00 |.. .$00C5.......|
00000E10: 1C 16 2A 8F A1 50 41 55 53 45 A0 50 00 26 16 5C |..*..PAUSE.P.&.\|
00000E20: 8F 20 C2 23 30 30 00 31 16 8E 8F 20 C3 23 24 46 |. .#00.1... .#$F|
00000E30: 46 00 3D 16 C0 8F 20 D6 24 45 45 42 33 00 44 16 |F.=... .$EEB3.D.|
00000E40: F2 8F 20 EF 00 50 16 24 90 20 C0 23 3C 28 50 29 |.. ..P.$. .#<(P)|
00000E50: 00 5A 16 56 90 20 F6 2A 2D 36 00 61 16 88 90 20 |.Z.V. .*-6.a... |
00000E60: ED 00 6D 16 BA 90 20 C1 23 3E 28 50 29 00 78 16 |..m... .#>(P).x.|
00000E70: EC 90 20 F6 2A 2D 31 31 00 7E 16 1E 91 A2 00 A4 |.. .*-11.~......|
00000E80: 16 50 91 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.P.;************|
00000E90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EA0: 2A 2A 2A 2A 00 CA 16 82 91 3B 2A 20 20 48 45 52 |****.....;* HER|
00000EB0: 42 49 45 27 53 20 44 49 53 4B 20 4D 41 43 52 4F |BIE'S DISK MACRO|
00000EC0: 27 53 20 20 31 2E 31 20 20 2A 00 F0 16 B4 91 3B |'S 1.1 *.....;|
00000ED0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000EF0: 00 FF 16 E6 91 3B 4D 41 43 52 4F 20 44 49 52 00 |.....;MACRO DIR.|
00000F00: 24 17 18 92 3B 4D 41 43 52 4F 20 4C 4F 41 44 A0 |$...;MACRO LOAD.|
00000F10: 4E 41 41 4D 41 44 52 45 53 2C 4C 45 4E 47 54 45 |NAAMADRES,LENGTE|
00000F20: 4E 41 41 4D 00 47 17 4A 92 3B 4D 41 43 52 4F 20 |NAAM.G.J.;MACRO |
00000F30: 53 41 56 45 A0 4E 41 4D 41 44 52 2C 4C 2C 41 44 |SAVE.NAMADR,L,AD|
00000F40: 52 31 2C 41 44 52 32 00 6B 17 7C 92 3B 4D 41 43 |R1,ADR2.k.|.;MAC|
00000F50: 52 4F 20 53 43 52 41 54 43 48 A0 4E 41 41 4D 41 |RO SCRATCH.NAAMA|
00000F60: 44 52 45 53 2C 4C 45 4E 47 54 45 00 8B 17 AE 92 |DRES,LENGTE.....|
00000F70: 3B 4D 41 43 52 4F 20 44 49 53 4B 53 54 41 54 55 |;MACRO DISKSTATU|
00000F80: 53 A0 58 2C 59 2C 43 4F 4C 4F 52 00 AA 17 E0 92 |S.X,Y,COLOR.....|
00000F90: 3B 4D 41 43 52 4F 20 44 49 53 4B 45 52 52 4F 52 |;MACRO DISKERROR|
00000FA0: A0 58 2C 59 2C 43 4F 4C 4F 52 00 BE 17 12 93 3B |.X,Y,COLOR.....;|
00000FB0: 4D 41 43 52 4F 20 44 49 53 4B 49 4E 49 54 00 D1 |MACRO DISKINIT..|
00000FC0: 17 44 93 3B 4D 41 43 52 4F 20 44 49 53 4B 56 41 |.D.;MACRO DISKVA|
00000FD0: 4C 00 F7 17 76 93 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A |L...v.;*********|
00000FE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000FF0: 2A 2A 2A 2A 2A 2A 2A 00 00 18 A8 93 A1 44 49 52 |*******......DIR|
00001000: 00 0B 18 DA 93 20 CA 23 24 32 34 00 17 18 0C 94 |..... .#$24.....|
00001010: 20 D2 24 30 31 30 30 00 23 18 3E 94 20 D6 24 41 | .$0100.#.>. .$A|
00001020: 41 44 37 00 2E 18 70 94 20 CA 23 24 30 31 00 35 |AD7...p. .#$01.5|
00001030: 18 A2 94 20 DA 00 40 18 D4 94 20 C2 23 24 30 30 |... ..@... .#$00|
00001040: 00 4C 18 06 95 20 D6 24 46 46 42 44 00 57 18 38 |.L... .$FFBD.W.8|
00001050: 95 20 C2 23 24 30 38 00 62 18 6A 95 20 C3 23 24 |. .#$08.b.j. .#$|
00001060: 36 30 00 6E 18 9C 95 20 D6 24 46 46 42 41 00 7A |60.n... .$FFBA.z|
00001070: 18 CE 95 20 D6 24 46 33 44 35 00 84 18 00 96 20 |... .$F3D5..... |
00001080: CA 24 42 41 00 90 18 32 96 20 D6 24 46 46 42 34 |.$BA...2. .$FFB4|
00001090: 00 9A 18 64 96 20 CA 24 42 39 00 A6 18 96 96 20 |...d. .$B9..... |
000010A0: D6 24 46 46 39 36 00 B1 18 C8 96 20 CA 23 24 30 |.$FF96..... .#$0|
000010B0: 30 00 BB 18 FA 96 20 D2 24 39 30 00 C6 18 2C 97 |0..... .$90...,.|
000010C0: 20 C3 23 24 30 33 00 D4 18 5E 97 54 45 58 30 20 | .#$03...^.TEX0 |
000010D0: D4 24 46 46 00 E0 18 90 97 20 D6 24 46 46 41 35 |.$FF..... .$FFA5|
000010E0: 00 EA 18 C2 97 20 D2 24 46 45 00 F4 18 F4 97 20 |..... .$FE..... |
000010F0: C3 24 39 30 00 FF 18 26 98 20 F6 54 45 58 34 00 |.$90...&. .TEX4.|
00001100: 0B 19 58 98 20 D6 24 46 46 41 35 00 15 19 8A 98 |..X. .$FFA5.....|
00001110: 20 C3 24 39 30 00 20 19 BC 98 20 F6 54 45 58 34 | .$90. ... .TEX4|
00001120: 00 2A 19 EE 98 20 C3 24 46 46 00 31 19 20 99 20 |.*... .$FF.1. . |
00001130: EC 00 3C 19 52 99 20 F6 54 45 58 30 00 46 19 84 |..<.R. .TEX0.F..|
00001140: 99 20 C2 24 46 45 00 52 19 B6 99 20 D6 24 42 44 |. .$FE.R... .$BD|
00001150: 43 44 00 5D 19 E8 99 20 D6 54 45 58 35 00 6D 19 |CD.]... .TEX5.m.|
00001160: 1A 9A 54 45 58 31 20 D6 24 46 46 41 35 00 77 19 |..TEX1 .$FFA5.w.|
00001170: 4C 9A 20 C2 24 39 30 00 82 19 7E 9A 20 F6 54 45 |L. .$90...~. .TE|
00001180: 58 34 00 89 19 B0 9A 20 DA 00 90 19 E2 9A 20 D8 |X4..... ...... .|
00001190: 00 9B 19 14 9B 20 F7 54 45 58 32 00 A7 19 46 9B |..... .TEX2...F.|
000011A0: 20 D6 24 46 46 44 32 00 B2 19 78 9B 20 D5 54 45 | .$FFD2...x. .TE|
000011B0: 58 31 00 C2 19 AA 9B 54 45 58 32 20 D6 24 41 41 |X1.....TEX2 .$AA|
000011C0: 44 37 00 CD 19 DC 9B 20 CA 23 24 30 30 00 D7 19 |D7..... .#$00...|
000011D0: 0E 9C 20 D2 24 43 36 00 E1 19 40 9C 20 CA 24 43 |.. .$C6...@. .$C|
000011E0: 35 00 EB 19 72 9C 20 C4 23 36 30 00 F6 19 A4 9C |5...r. .#60.....|
000011F0: 20 F7 54 45 58 37 00 00 1A D6 9C 20 C4 23 36 33 | .TEX7..... .#63|
00001200: 00 0B 1A 08 9D 20 F7 54 45 58 34 00 1A 1A 3A 9D |..... .TEX4...:.|
00001210: 54 45 58 33 20 C3 23 24 30 32 00 25 1A 6C 9D 20 |TEX3 .#$02.%.l. |
00001220: D5 54 45 58 30 00 35 1A 9E 9D 54 45 58 34 20 D6 |.TEX0.5...TEX4 .|
00001230: 24 46 36 34 32 00 40 1A D0 9D 20 CA 23 24 30 38 |$F642.@... .#$08|
00001240: 00 4A 1A 02 9E 20 D2 24 42 41 00 56 1A 34 9E 20 |.J... .$BA.V.4. |
00001250: D6 24 46 46 42 34 00 61 1A 66 9E 20 CA 23 24 36 |.$FFB4.a.f. .#$6|
00001260: 46 00 6B 1A 98 9E 20 D2 24 42 39 00 77 1A CA 9E |F.k... .$B9.w...|
00001270: 20 D6 24 46 46 39 36 00 83 1A FC 9E 20 D6 24 46 | .$FF96..... .$F|
00001280: 46 41 42 00 8E 1A 2E 9F 20 CA 23 24 30 30 00 98 |FAB..... .#$00..|
00001290: 1A 60 9F 20 D2 24 43 36 00 A4 1A 92 9F 20 D5 54 |.`. .$C6..... .T|
000012A0: 45 58 31 30 00 B3 1A C4 9F 54 45 58 35 20 CA 23 |EX10.....TEX5 .#|
000012B0: 24 32 30 00 BF 1A F6 9F 20 D5 24 46 46 44 32 00 |$20..... .$FFD2.|
000012C0: CB 1A 28 A0 20 C2 24 30 32 46 37 00 D7 1A 5A A0 |..(. .$02F7...Z.|
000012D0: 20 D6 24 46 46 43 39 00 E2 1A 8C A0 20 F4 54 45 | .$FFC9..... .TE|
000012E0: 58 36 00 EE 1A BE A0 20 D5 24 45 30 46 39 00 F9 |X6..... .$E0F9..|
000012F0: 1A F0 A0 54 45 58 36 20 E3 00 08 1B 22 A1 54 45 |...TEX6 ....".TE|
00001300: 58 37 20 C2 23 24 30 30 00 18 1B 54 A1 54 45 58 |X7 .#$00...T.TEX|
00001310: 38 20 D6 24 45 45 42 33 00 1F 1B 86 A1 20 EF 00 |8 .$EEB3..... ..|
00001320: 2A 1B B8 A1 20 F6 54 45 58 38 00 39 1B EA A1 54 |*... .TEX8.9...T|
00001330: 45 58 39 20 CA 23 24 30 30 00 43 1B 1C A2 20 D2 |EX9 .#$00.C... .|
00001340: 24 43 36 00 4D 1B 4E A2 20 CA 24 43 35 00 57 1B |$C6.M.N. .$C5.W.|
00001350: 80 A2 20 C4 23 36 30 00 62 1B B2 A2 20 F6 54 45 |.. .#60.b... .TE|
00001360: 58 39 00 6D 1B E4 A2 20 D5 54 45 58 33 00 79 1B |X9.m... .TEX3.y.|
00001370: 16 A3 54 45 58 31 30 20 E4 00 7F 1B 48 A3 A2 00 |..TEX10 ....H...|
00001380: A4 1B 7A A3 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..z.;***********|
00001390: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000013A0: 2A 2A 2A 2A 00 BE 1B AC A3 A1 44 49 53 4B 53 54 |****......DISKST|
000013B0: 41 54 55 53 A0 58 2C 59 2C 43 4F 4C 4F 52 00 C8 |ATUS.X,Y,COLOR..|
000013C0: 1B DE A3 20 D5 45 45 4E 00 DB 1B 10 A4 54 45 58 |... .EEN.....TEX|
000013D0: 31 30 30 20 A8 22 44 4F 53 3A 22 00 EB 1B 42 A4 |100 ."DOS:"...B.|
000013E0: 45 45 4E 20 CA 23 43 4F 4C 4F 52 00 F7 1B 74 A4 |EEN .#COLOR...t.|
000013F0: 20 D2 24 30 32 38 36 00 00 1C A6 A4 20 C2 23 59 | .$0286..... .#Y|
00001400: 00 09 1C D8 A4 20 C3 23 58 00 10 1C 0A A5 20 E5 |..... .#X..... .|
00001410: 00 1C 1C 3C A5 20 D6 24 46 46 46 30 00 25 1C 6E |...<. .$FFF0.%.n|
00001420: A5 20 C2 23 30 00 34 1C A0 A5 20 CA 54 45 58 31 |. .#0.4... .TEX1|
00001430: 30 30 2C 58 00 40 1C D2 A5 20 D6 24 46 46 44 32 |00,X.@... .$FFD2|
00001440: 00 47 1C 04 A6 20 EF 00 50 1C 36 A6 20 C0 23 34 |.G... ..P.6. .#4|
00001450: 00 5A 1C 68 A6 20 F6 2A 2D 39 00 63 1C 9A A6 20 |.Z.h. .*-9.c... |
00001460: CA 23 30 00 6A 1C CC A6 20 DA 00 71 1C FE A6 20 |.#0.j... ..q... |
00001470: D8 00 7D 1C 30 A7 20 D6 24 46 46 42 44 00 87 1C |..}.0. .$FFBD...|
00001480: 62 A7 20 CA 23 31 35 00 90 1C 94 A7 20 C2 23 38 |b. .#15..... .#8|
00001490: 00 97 1C C6 A7 20 DA 00 A3 1C F8 A7 20 D6 24 46 |..... ...... .$F|
000014A0: 46 42 41 00 AF 1C 2A A8 20 D6 24 46 46 43 30 00 |FBA...*. .$FFC0.|
000014B0: B9 1C 5C A8 20 C2 23 31 35 00 C5 1C 8E A8 20 D6 |..\. .#15..... .|
000014C0: 24 46 46 43 36 00 D0 1C C0 A8 20 C3 23 24 30 30 |$FFC6..... .#$00|
000014D0: 00 E1 1C F2 A8 54 45 58 39 38 20 D6 24 46 46 43 |.....TEX98 .$FFC|
000014E0: 46 00 EC 1C 24 A9 20 C4 23 24 30 44 00 F8 1C 56 |F...$. .#$0D...V|
000014F0: A9 20 F7 54 45 58 39 39 00 04 1D 88 A9 20 D6 24 |. .TEX99..... .$|
00001500: 46 46 44 32 00 10 1D BA A9 20 D5 54 45 58 39 38 |FFD2..... .TEX98|
00001510: 00 1F 1D EC A9 54 45 58 39 39 20 CA 23 31 35 00 |.....TEX99 .#15.|
00001520: 2B 1D 1E AA 20 D6 24 46 46 43 33 00 37 1D 50 AA |+... .$FFC3.7.P.|
00001530: 20 D6 24 46 46 45 37 00 40 1D 82 AA 20 CA 23 30 | .$FFE7.@... .#0|
00001540: 00 4A 1D B4 AA 20 D2 24 43 36 00 50 1D E6 AA A2 |.J... .$C6.P....|
00001550: 00 76 1D 18 AB 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.v...;**********|
00001560: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001570: 2A 2A 2A 2A 2A 2A 00 8F 1D 4A AB A1 44 49 53 4B |******...J..DISK|
00001580: 45 52 52 4F 52 A0 58 2C 59 2C 43 4F 4C 4F 52 00 |ERROR.X,Y,COLOR.|
00001590: 9C 1D 7C AB 20 CA 23 43 4F 4C 4F 52 00 A8 1D AE |..|. .#COLOR....|
000015A0: AB 20 D2 24 30 32 38 36 00 B1 1D E0 AB 20 C2 23 |. .$0286..... .#|
000015B0: 59 00 BA 1D 12 AC 20 C3 23 58 00 C1 1D 44 AC 20 |Y..... .#X...D. |
000015C0: E5 00 CD 1D 76 AC 20 D6 24 46 46 46 30 00 D6 1D |....v. .$FFF0...|
000015D0: A8 AC 20 CA 23 30 00 DD 1D DA AC 20 DA 00 E4 1D |.. .#0..... ....|
000015E0: 0C AD 20 D8 00 F0 1D 3E AD 20 D6 24 46 46 42 44 |.. ....>. .$FFBD|
000015F0: 00 FA 1D 70 AD 20 CA 23 31 35 00 03 1E A2 AD 20 |...p. .#15..... |
00001600: C2 23 38 00 0A 1E D4 AD 20 DA 00 16 1E 06 AE 20 |.#8..... ...... |
00001610: D6 24 46 46 42 41 00 22 1E 38 AE 20 D6 24 46 46 |.$FFBA.".8. .$FF|
00001620: 43 30 00 2C 1E 6A AE 20 C2 23 31 35 00 38 1E 9C |C0.,.j. .#15.8..|
00001630: AE 20 D6 24 46 46 43 36 00 43 1E CE AE 20 C3 23 |. .$FFC6.C... .#|
00001640: 24 30 30 00 54 1E 00 AF 54 45 58 39 38 20 D6 24 |$00.T...TEX98 .$|
00001650: 46 46 43 46 00 5D 1E 32 AF 20 C1 23 30 00 69 1E |FFCF.].2. .#0.i.|
00001660: 64 AF 20 F7 54 45 58 39 37 00 75 1E 96 AF 54 45 |d. .TEX97.u...TE|
00001670: 58 39 36 20 ED 00 80 1E C8 AF 20 C4 23 24 30 44 |X96 ...... .#$0D|
00001680: 00 8C 1E FA AF 20 F7 54 45 58 39 39 00 98 1E 2C |..... .TEX99...,|
00001690: B0 20 D6 24 46 46 44 32 00 A4 1E 5E B0 20 D5 54 |. .$FFD2...^. .T|
000016A0: 45 58 39 38 00 B0 1E 90 B0 54 45 58 39 39 20 E4 |EX98.....TEX99 .|
000016B0: 00 BA 1E C2 B0 20 CA 23 31 35 00 C6 1E F4 B0 20 |..... .#15..... |
000016C0: D6 24 46 46 43 33 00 D2 1E 26 B1 20 D6 24 46 46 |.$FFC3...&. .$FF|
000016D0: 45 37 00 DB 1E 58 B1 20 CA 23 30 00 E5 1E 8A B1 |E7...X. .#0.....|
000016E0: 20 D2 24 43 36 00 F2 1E BC B1 20 D5 54 45 58 31 | .$C6..... .TEX1|
000016F0: 30 34 00 01 1F EE B1 54 45 58 39 37 20 C4 23 34 |04.....TEX97 .#4|
00001700: 38 00 0E 1F 20 B2 20 F7 54 45 58 31 30 30 00 18 |8... . .TEX100..|
00001710: 1F 52 B2 20 C4 23 34 39 00 25 1F 84 B2 20 F7 54 |.R. .#49.%... .T|
00001720: 45 58 31 30 30 00 2C 1F B6 B2 20 DA 00 38 1F E8 |EX100.,... ..8..|
00001730: B2 20 D5 54 45 58 39 39 00 49 1F 1A B3 54 45 58 |. .TEX99.I...TEX|
00001740: 31 30 30 20 C3 23 24 30 30 00 55 1F 1B B3 20 D5 |100 .#$00.U... .|
00001750: 54 45 58 39 39 00 62 1F 2E B8 54 45 58 31 30 34 |TEX99.b...TEX104|
00001760: 20 E4 00 68 1F 60 B8 A2 00 8E 1F 92 B8 3B 2A 2A | ..h.`.......;**|
00001770: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001780: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9C |**************..|
00001790: 1F C4 B8 A1 44 49 53 4B 49 4E 49 54 00 A7 1F F6 |....DISKINIT....|
000017A0: B8 20 D5 54 57 45 45 00 B7 1F 28 B9 4E 41 41 4D |. .TWEE...(.NAAM|
000017B0: 20 A8 22 49 2F 30 22 00 C4 1F 5A B9 54 57 45 45 | ."I/0"...Z.TWEE|
000017C0: 20 CA 23 33 00 D3 1F 8C B9 20 C3 23 3E 28 4E 41 | .#3..... .#>(NA|
000017D0: 41 4D 29 00 E2 1F BE B9 20 C2 23 3C 28 4E 41 41 |AM)..... .#<(NAA|
000017E0: 4D 29 00 EE 1F F0 B9 20 D6 24 46 46 42 44 00 F8 |M)..... .$FFBD..|
000017F0: 1F 22 BA 20 CA 23 31 35 00 01 20 54 BA 20 C2 23 |.". .#15.. T. .#|
00001800: 38 00 0B 20 86 BA 20 C3 23 31 35 00 17 20 B8 BA |8.. .. .#15.. ..|
00001810: 20 D6 24 46 46 42 41 00 23 20 EA BA 20 D6 24 46 | .$FFBA.# .. .$F|
00001820: 46 43 30 00 2D 20 1C BB 20 CA 23 31 35 00 39 20 |FC0.- .. .#15.9 |
00001830: 4E BB 20 D6 24 46 46 43 33 00 45 20 80 BB 20 D6 |N. .$FFC3.E .. .|
00001840: 24 46 46 45 37 00 4B 20 B2 BB A2 00 71 20 E4 BB |$FFE7.K ....q ..|
00001850: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************|
00001860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001870: 2A 00 7E 20 16 BC A1 44 49 53 4B 56 41 4C 00 89 |*.~ ...DISKVAL..|
00001880: 20 48 BC 20 D5 44 52 49 45 00 98 20 7A BC 4E 41 | H. .DRIE.. z.NA|
00001890: 41 4D 33 20 A8 22 56 22 00 A5 20 AC BC 44 52 49 |AM3 ."V".. ..DRI|
000018A0: 45 20 CA 23 31 00 B5 20 DE BC 20 C3 23 3E 28 4E |E .#1.. .. .#>(N|
000018B0: 41 41 4D 33 29 00 C5 20 10 BD 20 C2 23 3C 28 4E |AAM3).. .. .#<(N|
000018C0: 41 41 4D 33 29 00 D1 20 42 BD 20 D6 24 46 46 42 |AAM3).. B. .$FFB|
000018D0: 44 00 DB 20 74 BD 20 CA 23 31 35 00 E4 20 A6 BD |D.. t. .#15.. ..|
000018E0: 20 C2 23 38 00 EE 20 D8 BD 20 C3 23 31 35 00 FA | .#8.. .. .#15..|
000018F0: 20 0A BE 20 D6 24 46 46 42 41 00 06 21 3C BE 20 | .. .$FFBA..!<. |
00001900: D6 24 46 46 43 30 00 10 21 6E BE 20 CA 23 31 35 |.$FFC0..!n. .#15|
00001910: 00 1C 21 A0 BE 20 D6 24 46 46 43 33 00 28 21 D2 |..!.. .$FFC3.(!.|
00001920: BE 20 D6 24 46 46 45 37 00 2E 21 04 BF A2 00 55 |. .$FFE7..!....U|
00001930: 21 36 BF 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |!6.;************|
00001940: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001950: 2A 2A 2A 2A 2A 00 74 21 68 BF A1 4C 4F 41 44 A0 |*****.t!h..LOAD.|
00001960: 4E 41 41 4D 41 44 52 45 53 2C 4C 45 4E 47 54 45 |NAAMADRES,LENGTE|
00001970: 4E 41 41 4D 00 7F 21 9A BF 20 CA 23 24 30 34 00 |NAAM..!.. .#$04.|
00001980: 8A 21 CC BF 20 C2 23 24 30 38 00 95 21 FE BF 20 |.!.. .#$08..!.. |
00001990: C3 23 24 30 31 00 A1 21 30 C0 20 D6 24 46 46 42 |.#$01..!0. .$FFB|
000019A0: 41 00 B3 21 62 C0 20 CA 23 4C 45 4E 47 54 45 4E |A..!b. .#LENGTEN|
000019B0: 41 41 4D 00 C7 21 94 C0 20 C2 23 3C 28 4E 41 41 |AAM..!.. .#<(NAA|
000019C0: 4D 41 44 52 45 53 29 00 DB 21 C6 C0 20 C3 23 3E |MADRES)..!.. .#>|
000019D0: 28 4E 41 41 4D 41 44 52 45 53 29 00 E7 21 F8 C0 |(NAAMADRES)..!..|
000019E0: 20 D6 24 46 46 42 44 00 F2 21 2A C1 20 CA 23 24 | .$FFBD..!*. .#$|
000019F0: 30 30 00 FD 21 5C C1 20 C2 23 24 46 46 00 08 22 |00..!\. .#$FF.."|
00001A00: 8E C1 20 C3 23 24 46 46 00 14 22 C0 C1 20 D6 24 |.. .#$FF..".. .$|
00001A10: 46 46 44 35 00 1A 22 F2 C1 A2 00 41 22 24 C2 3B |FFD5.."....A"$.;|
00001A20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001A30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001A40: 2A 00 5E 22 56 C2 A1 53 41 56 45 A0 4E 41 4D 41 |*.^"V..SAVE.NAMA|
00001A50: 44 52 2C 4C 2C 41 44 52 31 2C 41 44 52 32 00 69 |DR,L,ADR1,ADR2.i|
00001A60: 22 88 C2 20 CA 23 24 30 34 00 74 22 BA C2 20 C2 |".. .#$04.t".. .|
00001A70: 23 24 30 38 00 7F 22 EC C2 20 C3 23 24 30 31 00 |#$08..".. .#$01.|
00001A80: 8B 22 1E C3 20 D6 24 46 46 42 41 00 94 22 50 C3 |.".. .$FFBA.."P.|
00001A90: 20 CA 23 4C 00 A5 22 82 C3 20 C2 23 3C 28 4E 41 | .#L..".. .#<(NA|
00001AA0: 4D 41 44 52 29 00 B6 22 B4 C3 20 C3 23 3E 28 4E |MADR)..".. .#>(N|
00001AB0: 41 4D 41 44 52 29 00 C2 22 E6 C3 20 D6 24 46 46 |AMADR)..".. .$FF|
00001AC0: 42 44 00 D1 22 18 C4 20 CA 23 3C 28 41 44 52 31 |BD..".. .#<(ADR1|
00001AD0: 29 00 DB 22 4A C4 20 D2 24 30 32 00 EA 22 7C C4 |).."J. .$02.."|.|
00001AE0: 20 CA 23 3E 28 41 44 52 31 29 00 F4 22 AE C4 20 | .#>(ADR1)..".. |
00001AF0: D2 24 30 33 00 03 23 E0 C4 20 C2 23 3C 28 41 44 |.$03..#.. .#<(AD|
00001B00: 52 32 29 00 12 23 12 C5 20 C3 23 3E 28 41 44 52 |R2)..#.. .#>(ADR|
00001B10: 32 29 00 1D 23 44 C5 20 CA 23 24 30 32 00 29 23 |2)..#D. .#$02.)#|
00001B20: 76 C5 20 D6 24 46 46 44 38 00 2F 23 A8 C5 A2 00 |v. .$FFD8./#....|
00001B30: 55 23 DA C5 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |U#..;***********|
00001B40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001B50: 2A 2A 2A 2A 2A 00 73 23 0C C6 A1 53 43 52 41 54 |*****.s#...SCRAT|
00001B60: 43 48 A0 4E 41 41 4D 41 44 52 45 53 2C 4C 45 4E |CH.NAAMADRES,LEN|
00001B70: 47 54 45 00 7F 23 3E C6 20 D5 42 45 47 49 4E 00 |GTE..#>. .BEGIN.|
00001B80: 9F 23 70 C6 4E 41 41 4D 20 A8 22 53 30 3A 20 20 |.#p.NAAM ."S0: |
00001B90: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 00 | ".|
00001BA0: AE 23 A2 C6 42 45 47 49 4E 20 C2 23 30 30 00 C6 |.#..BEGIN .#00..|
00001BB0: 23 D4 C6 54 45 58 32 30 30 20 CA 4E 41 41 4D 41 |#..TEX200 .NAAMA|
00001BC0: 44 52 45 53 2C 58 00 D7 23 06 C7 20 D2 4E 41 41 |DRES,X..#.. .NAA|
00001BD0: 4D 2B 24 30 33 2C 58 00 DE 23 38 C7 20 EF 00 EC |M+$03,X..#8. ...|
00001BE0: 23 6A C7 20 C0 23 4C 45 4E 47 54 45 00 F9 23 9C |#j. .#LENGTE..#.|
00001BF0: C7 20 F6 54 45 58 32 30 30 00 09 24 CE C7 20 CA |. .TEX200..$.. .|
00001C00: 23 4C 45 4E 47 54 45 2B 33 00 18 24 00 C8 20 C3 |#LENGTE+3..$.. .|
00001C10: 23 3E 28 4E 41 41 4D 29 00 27 24 32 C8 20 C2 23 |#>(NAAM).'$2. .#|
00001C20: 3C 28 4E 41 41 4D 29 00 33 24 64 C8 20 D6 24 46 |<(NAAM).3$d. .$F|
00001C30: 46 42 44 00 3D 24 96 C8 20 CA 23 31 35 00 46 24 |FBD.=$.. .#15.F$|
00001C40: C8 C8 20 C2 23 38 00 50 24 FA C8 20 C3 23 31 35 |.. .#8.P$.. .#15|
00001C50: 00 5C 24 2C C9 20 D6 24 46 46 42 41 00 68 24 5E |.\$,. .$FFBA.h$^|
00001C60: C9 20 D6 24 46 46 43 30 00 72 24 90 C9 20 CA 23 |. .$FFC0.r$.. .#|
00001C70: 31 35 00 7E 24 C2 C9 20 D6 24 46 46 43 33 00 8A |15.~$.. .$FFC3..|
00001C80: 24 F4 C9 20 D6 24 46 46 45 37 00 90 24 26 CA A2 |$.. .$FFE7..$&..|
00001C90: 00 B6 24 58 CA 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..$X.;**********|
00001CA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001CB0: 2A 2A 2A 2A 2A 2A 00 D9 24 8A CA 3B 4D 41 43 52 |******..$..;MACR|
00001CC0: 4F 20 49 4E 50 55 54 A0 41 44 52 2C 4D 41 58 2C |O INPUT.ADR,MAX,|
00001CD0: 58 2C 59 2C 43 4F 4C 4F 52 00 FF 24 BC CA 3B 2A |X,Y,COLOR..$..;*|
00001CE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001CF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
00001D00: 24 25 EE CA 3B 53 45 54 20 47 4C 4F 42 41 4C 20 |$%..;SET GLOBAL |
00001D10: 49 4E 50 55 54 42 41 53 45 20 54 4F 20 49 4E 50 |INPUTBASE TO INP|
00001D20: 42 41 53 45 00 44 25 20 CB 3B 28 49 4E 50 42 41 |BASE.D% .;(INPBA|
00001D30: 53 45 3D 53 54 41 52 54 20 53 55 42 52 4F 55 54 |SE=START SUBROUT|
00001D40: 49 4E 45 29 00 66 25 52 CB 3B 52 45 4D 20 20 20 |INE).f%R.;REM |
00001D50: 20 20 20 49 4E 49 54 49 4E 50 55 54 A0 30 2C 30 | INITINPUT.0,0|
00001D60: 2C 30 2C 30 2C 30 00 78 25 84 CB 3B 52 45 4D 20 |,0,0,0.x%..;REM |
00001D70: 20 20 20 20 20 52 54 53 00 9B 25 B6 CB 3B 28 43 | RTS..%..;(C|
00001D80: 41 4C 4C 20 49 4E 49 54 49 4E 50 55 54 20 54 4F |ALL INITINPUT TO|
00001D90: 20 49 4E 54 49 41 4C 49 53 45 29 00 A1 25 E8 CB | INTIALISE)..%..|
00001DA0: 3B 00 C6 25 1A CC 3B 2A 20 49 4E 50 55 54 20 57 |;..%..;* INPUT W|
00001DB0: 4F 52 44 54 20 56 41 4E 41 46 20 41 44 52 45 53 |ORDT VANAF ADRES|
00001DC0: 20 28 41 44 52 29 00 E2 25 4C CC 3B 2A 20 4E 45 | (ADR)..%L.;* NE|
00001DD0: 45 52 47 45 5A 45 54 20 49 4E 20 46 4F 52 4D 41 |ERGEZET IN FORMA|
00001DE0: 54 3A 00 FD 25 7E CC 3B 2A 20 4C 45 4E 47 54 45 |T:..%~.;* LENGTE|
00001DF0: 49 4E 50 55 54 2C 49 4E 50 55 54 2C 30 00 03 26 |INPUT,INPUT,0..&|
00001E00: B0 CC 3B 00 29 26 E2 CC 3B 2A 2A 2A 2A 2A 2A 2A |..;.)&..;*******|
00001E10: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001E20: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 4A 26 14 CD A1 49 |*********.J&...I|
00001E30: 4E 49 54 49 4E 50 55 54 A0 41 44 52 2C 4D 41 58 |NITINPUT.ADR,MAX|
00001E40: 2C 58 2C 59 2C 43 4F 4C 4F 52 00 5D 26 46 CD 49 |,X,Y,COLOR.]&F.I|
00001E50: 4E 50 42 41 53 45 20 D5 54 45 58 35 38 00 6F 26 |NPBASE .TEX58.o&|
00001E60: 78 CD 54 45 58 35 31 20 A5 3E 28 41 44 52 29 00 |x.TEX51 .>(ADR).|
00001E70: 81 26 AA CD 54 45 58 35 32 20 A5 3C 28 41 44 52 |.&..TEX52 .<(ADR|
00001E80: 29 00 90 26 DC CD 54 45 58 35 33 20 A5 4D 41 58 |)..&..TEX53 .MAX|
00001E90: 00 9D 26 0E CE 54 45 58 35 34 20 A5 58 00 AA 26 |..&..TEX54 .X..&|
00001EA0: 40 CE 54 45 58 35 35 20 A5 59 00 BB 26 72 CE 54 |@.TEX55 .Y..&r.T|
00001EB0: 45 58 35 30 20 A5 43 4F 4C 4F 52 00 CC 26 A4 CE |EX50 .COLOR..&..|
00001EC0: 54 45 58 35 38 20 C2 54 45 58 35 30 00 D8 26 D6 |TEX58 .TEX50..&.|
00001ED0: CE 20 D3 24 30 32 38 36 00 E4 26 08 CF 20 C2 54 |. .$0286..&.. .T|
00001EE0: 45 58 35 31 00 EE 26 3A CF 20 D3 24 30 33 00 FA |EX51..&:. .$03..|
00001EF0: 26 6C CF 20 C2 54 45 58 35 32 00 04 27 9E CF 20 |&l. .TEX52..'.. |
00001F00: D3 24 30 32 00 10 27 D0 CF 20 C2 54 45 58 35 34 |.$02..'.. .TEX54|
00001F10: 00 1C 27 02 D0 20 C3 54 45 58 35 35 00 23 27 34 |..'.. .TEX55.#'4|
00001F20: D0 20 E5 00 2F 27 66 D0 20 D6 24 46 46 46 30 00 |. ../'f. .$FFF0.|
00001F30: 3F 27 98 D0 54 45 58 32 33 20 C2 23 24 30 30 00 |?'..TEX23 .#$00.|
00001F40: 4B 27 CA D0 20 D3 54 45 58 32 32 00 57 27 FC D0 |K'.. .TEX22.W'..|
00001F50: 20 D5 54 45 58 32 30 00 65 27 2E D1 54 45 58 32 | .TEX20.e'..TEX2|
00001F60: 32 20 A5 30 30 00 75 27 60 D1 54 45 58 32 30 20 |2 .00.u'`.TEX20 |
00001F70: CA 23 31 38 35 00 81 27 92 D1 20 D6 24 46 46 44 |.#185..'.. .$FFD|
00001F80: 32 00 92 27 C4 D1 54 45 58 32 31 20 D6 24 46 46 |2..'..TEX21 .$FF|
00001F90: 45 34 00 9E 27 F6 D1 20 C9 54 45 58 32 32 00 AA |E4..'.. .TEX22..|
00001FA0: 27 28 D2 20 C3 54 45 58 32 32 00 B6 27 5A D2 20 |'(. .TEX22..'Z. |
00001FB0: C1 54 45 58 35 33 00 C2 27 8C D2 20 F7 54 45 58 |.TEX53..'.. .TEX|
00001FC0: 32 39 00 CD 27 BE D2 20 C4 23 24 30 30 00 D9 27 |29..'.. .#$00..'|
00001FD0: F0 D2 20 F6 54 45 58 32 34 00 E5 27 22 D3 20 C7 |.. .TEX24..'". .|
00001FE0: 54 45 58 32 32 00 F1 27 54 D3 20 D5 54 45 58 32 |TEX22..'T. .TEX2|
00001FF0: 31 00 00 28 86 D3 54 45 58 32 34 20 C4 23 31 33 |1..(..TEX24 .#13|
00002000: 00 0C 28 B8 D3 20 F7 54 45 58 32 38 00 17 28 EA |..(.. .TEX28..(.|
00002010: D3 20 C4 23 31 34 38 00 23 28 1C D4 20 F7 54 45 |. .#148.#(.. .TE|
00002020: 58 32 31 00 2E 28 4E D4 20 C4 23 31 35 37 00 3A |X21..(N. .#157.:|
00002030: 28 80 D4 20 F7 54 45 58 32 31 00 44 28 B2 D4 20 |(.. .TEX21.D(.. |
00002040: C4 23 32 39 00 50 28 E4 D4 20 F7 54 45 58 32 31 |.#29.P(.. .TEX21|
00002050: 00 5A 28 16 D5 20 C4 23 31 37 00 66 28 48 D5 20 |.Z(.. .#17.f(H. |
00002060: F7 54 45 58 32 31 00 71 28 7A D5 20 C4 23 31 34 |.TEX21.q(z. .#14|
00002070: 35 00 7D 28 AC D5 20 F7 54 45 58 32 31 00 87 28 |5.}(.. .TEX21..(|
00002080: DE D5 20 C4 23 32 30 00 93 28 10 D6 20 F6 54 45 |.. .#20..(.. .TE|
00002090: 58 32 36 00 9E 28 42 D6 20 C1 23 24 30 31 00 AA |X26..(B. .#$01..|
000020A0: 28 74 D6 20 F6 54 45 58 32 35 00 B5 28 A6 D6 20 |(t. .TEX25..(.. |
000020B0: C3 23 24 30 30 00 C1 28 D8 D6 20 D4 54 45 58 32 |.#$00..(.. .TEX2|
000020C0: 32 00 CD 28 0A D7 20 D5 54 45 58 32 31 00 DE 28 |2..(.. .TEX21..(|
000020D0: 3C D7 54 45 58 32 35 20 C7 54 45 58 32 32 00 EA |<.TEX25 .TEX22..|
000020E0: 28 6E D7 20 C7 54 45 58 32 32 00 F6 28 A0 D7 20 |(n. .TEX22..(.. |
000020F0: D5 54 45 58 32 37 00 09 29 D2 D7 54 45 58 32 36 |.TEX27..)..TEX26|
00002100: 20 D2 28 24 30 32 29 2C 59 00 15 29 04 D8 54 45 | .($02),Y..)..TE|
00002110: 58 32 37 20 D8 00 20 29 36 D8 20 CA 23 31 35 37 |X27 .. )6. .#157|
00002120: 00 2C 29 68 D8 20 D6 24 46 46 44 32 00 33 29 9A |.,)h. .$FFD2.3).|
00002130: D8 20 D7 00 3F 29 CC D8 20 D6 24 46 46 44 32 00 |. ..?).. .$FFD2.|
00002140: 4B 29 FE D8 20 D5 54 45 58 32 30 00 5A 29 30 D9 |K).. .TEX20.Z)0.|
00002150: 54 45 58 32 38 20 CA 23 32 30 00 66 29 62 D9 20 |TEX28 .#20.f)b. |
00002160: D6 24 46 46 44 32 00 72 29 94 D9 20 C3 54 45 58 |.$FFD2.r).. .TEX|
00002170: 32 32 00 7C 29 C6 D9 20 CA 23 30 30 00 8A 29 F8 |22.|).. .#00..).|
00002180: D9 20 D2 28 24 30 32 29 2C 59 00 96 29 2A DA 20 |. .($02),Y..)*. |
00002190: C7 54 45 58 32 32 00 A2 29 5C DA 20 CA 54 45 58 |.TEX22..)\. .TEX|
000021A0: 32 32 00 AD 29 8E DA 20 C3 23 24 30 30 00 BB 29 |22..).. .#$00..)|
000021B0: C0 DA 20 D2 28 24 30 32 29 2C 59 00 C2 29 F2 DA |.. .($02),Y..)..|
000021C0: 20 E3 00 D1 29 24 DB 54 45 58 32 39 20 CA 23 32 | ...)$.TEX29 .#2|
000021D0: 30 00 E2 29 56 DB 54 45 58 33 30 20 D6 24 46 46 |0..)V.TEX30 .$FF|
000021E0: 44 32 00 E9 29 88 DB 20 EC 00 F5 29 BA DB 20 F6 |D2..).. ...).. .|
000021F0: 54 45 58 33 30 00 01 2A EC DB 20 D5 54 45 58 32 |TEX30..*.. .TEX2|
00002200: 33 00 07 2A 1E DC A2 00 2D 2A 50 DC 3B 2A 2A 2A |3..*....-*P.;***|
00002210: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00002220: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 4A 2A |*************.J*|
00002230: 82 DC A1 49 4E 50 55 54 A0 41 44 52 2C 4D 41 58 |...INPUT.ADR,MAX|
00002240: 2C 58 2C 59 2C 43 4F 4C 4F 52 00 56 2A B4 DC 20 |,X,Y,COLOR.V*.. |
00002250: D5 54 45 58 35 38 00 68 2A E6 DC 54 45 58 35 36 |.TEX58.h*..TEX56|
00002260: 20 A5 3E 28 41 44 52 29 00 75 2A 18 DD 20 A5 3C | .>(ADR).u*.. .<|
00002270: 28 41 44 52 29 00 81 2A 4A DD 20 A5 4D 41 58 2B |(ADR)..*J. .MAX+|
00002280: 32 00 89 2A 7C DD 20 A5 59 00 91 2A AE DD 20 A5 |2..*|. .Y..*.. .|
00002290: 58 00 9D 2A E0 DD 20 A5 43 4F 4C 4F 52 00 AD 2A |X..*.. .COLOR..*|
000022A0: 12 DE 54 45 58 35 38 20 C2 23 24 30 30 00 C0 2A |..TEX58 .#$00..*|
000022B0: 44 DE 54 45 58 35 37 20 CA 54 45 58 35 36 2C 58 |D.TEX57 .TEX56,X|
000022C0: 00 D6 2A 76 DE 20 D2 49 4E 50 55 54 42 41 53 45 |..*v. .INPUTBASE|
000022D0: 2B 24 30 33 2C 58 00 DD 2A A8 DE 20 EF 00 E6 2A |+$03,X..*.. ...*|
000022E0: DA DE 20 C0 23 36 00 F2 2A 0C DF 20 F6 54 45 58 |.. .#6..*.. .TEX|
000022F0: 35 37 00 02 2B 3E DF 20 D6 49 4E 50 55 54 42 41 |57..+>. .INPUTBA|
00002300: 53 45 00 08 2B 70 DF A2 00 00 00 |SE..+p..... |
..$. N;MACRO INPUT ADR,MAX,X,Y,COLOR.H.R
N;* MACRO TEXT ADRES,X,Y,KLEUR *.S..N.$4
000.^..N.BEGIN.O..NDISPL V34589.|..NAS I
NKEY....N D#64....N .AS....N V34592....N
CLRHOME....N UBEGIN.E..NMIRRO V34589.S.
.NAS3 INKEY....N D#64....N .AS3...QR V$8
F25...RR V$CB00...SRAS2 INKEY...TR D#64.
!.UR .AS2.-.VR V34592.:.WR CLRHOME.F.XR
UBEGIN.C.YR;***********************.L..U
ULO...UWE1 ."?PIC A*"....ULO LOAD WE1,
7...NW DISKERROR 0,0,0....W A#0....W .TW
EE.F..W V34589.X..WTWEE IWE1+$05....W JW
E1+$05....W D#81....W .LO...F\IN CLRHOME
...G\ WINDOW 4,3,29,9,1.9..\WIN TEXT TEK
ST1,5,4,1.P.*] TEXT TEKST2,5,6,1.G.\] TE
XT TEKST3,5,8,1...] TEXT TEKST4,5,10,1.
..V^QQ .....^TT .14,8....^ ."."....^BEGI
N PRINT TT.E..^ SCREENCOLOR 0.X..^ BORDE
RCOLOR 0...._ VIN...P_EEN VWIN...._ CURS
OR 4,5...._ J#250...._ V$FFD2.$..` PAUSE
100.2.J`IN0 INKEY.<.|` D#01.G..` .INJ1.
P..` UQQ.^..AINJ1 D#64.H.DA .IN0.R.VA VW
IN....A CURSOR 6,5...ZA J#250....B V$FFD
2...>B PAUSE 100...PBIN1 INKEY....B D#01
.K.TB .INJ2.T..C UQQ...8CINJ2 D#64...JC
.IN1....C VWIN...NC CURSOR 8,5....D J#25
0...2D V$FFD2.,.DD PAUSE 100.:..DIN2 INK
EY.D.HD D#01.O..D .INJ3.X.,E UQQ.F.^EINJ
3 D#64.P..E .IN2.Z.BE VWIN....E CURSOR 1
0,5...&F J#250...XF V$FFD2....F PAUSE 10
0....FIN3 INKEY.I..F D#01.T. G .INJ4...R
G UQQ....GINJ4 D#64....G .IN3....G UEEN.
...N .."..NTEKST1 .". .DISPLAY .".O..NT
EKST2 .". .DISPLAY ALL PIC'S ON DISK .".
|."OTEKST3 .". .MIRROR
."....OTEKST4 .". .EXIT
.".F.NP.WINDOW X,Y,X1,Y1,COLVAL.O
..P B#X.X..P ST9....P B#Y....Q ST8...HQ
UBEGIN...ZQT1 ."."....QT2 ."."....QT3 ."
.".&..RT7 .".".2.BRT4 .".".>.TRT5 .".".J
..RT6 ." ".U.XRT8 .00.`..ST9 .00.Q.<SSET
J#COLVAL.}.NS R$0286... SPOINT BT8...RS
CT9....T ....6T V$FFF0...HT .....TBEGIN
VSET.F.LT JT1.R..T V$FFD2...0U B#00...B
U JT5....UEEN V$FFD2...FU .....U .#X1-2.
..*V .EEN...\V JT2.&..V V$FFD2.3..VDRIE
IT8.=..V VSET.F.$W JT4.R.VW V$FFD2.\..W
B#00.E..W JT6.U..WEENN V$FFD2.|..X ....P
X .#X1-2....X .EENN....X JT4....X V$FFD2
....Y JT8...JY D#Y1+1.H.|Y .DRIE.Q..Y IT
8....Y VSET....Z JT3...DZ V$FFD2...VZ B#
00....Z JT5...ZZEENNN V$FFD2....{ ..'.>{
.#X1-2.3.P{ .EENNN.<..{ JT7.H.T{ V$FFD2
.N..|..R.8|;****************************
**...J|.SCREENCOLOR COLOR....| C#COLOR..
....G......B.".."1......................
............"....B.?.33......B.....".*L.
......OR...H} T53280....}..&.,~;********
**********************.;.^~.FILLCOLOR CO
LOR.H..~ J#COLOR.S.B~ B#$00.E..~TEX1 R$D
800,X.S.& R$D900,X...X R$DA00,X.... .
.... .TEX1....TEX2 R$DB00,X... . ....R
. .#$E8.B... .TEX2.H.........;**********
********************......COLORINC...L.
B#$00...~.TEX1 I$D800,X.%... J$.....X.3.
.. I$DA00,X.:... ..E.F. .TEX1.W.X.TEX2 I
$DB00,X.^... ..I... .#$E8.T... .TEX2.Z.@
.....R.;******************************..
....CLRHOME...V. J#147.B... V$FFD2.H.:..
...L.;******************************....
.;* MACRO TEXT ADRES,X,Y,KLEUR *.4.P.;**
****************************.T....TEXT T
ADR,XVAL,YVAL,COLVAL.B.4. J#COLVAL.N.F.
R$0286.Z... B#YVAL...J. C#XVAL..... ....
.. V$FFF0...`. B#$00.....TEX1 JTADR,X...
D. D#$FF.K... .TEX2.W.(. V$FFD2...Z. ...
... UTEX1.....TEX2 ..........".;********
********************.>.T.;* MACRO PRINT
ADRES *.`...;********************
********.P....PRINT TADR.{... B#$00.....
TEX1 JTADR,X...N. D#$FF..... .TEX2.....
V$FFD2..... ...... UTEX1.K.H.TEX2 ..V.Z.
J#$0D..... V$FFD2...........;**********
******************.,.B.;* MACRO KEY WAIT
*.N.T.;**********************
******.\....KEY WAIT.K.X.TEX1 B#$00.W...
S$00C6...<. J$00C5...N. D#WAIT... . .TE
X1. .R........CURSOR X,Y...6. B#X.B.H. C
#Y.I... ..U.L. V$FFF0.........0..INKEY..
.B. B#$00..... S$00C6...F. J$00C5.......
..*..PAUSE P.&.\. B#00.1... C#$FF.=... V
$EEB3.D... ..P.$. .#<(P).Z.V. .*-6.A...
..M... A#>(P).X... .*-11.~.......P.;****
****************************.J...;* HER
BIE'S DISK MACRO'S 1.1 *.....;********
************************.....;MACRO DIR.
$...;MACRO LOAD NAAMADRES,LENGTENAAM.G.J
.;MACRO SAVE NAMADR,L,ADR1,ADR2.K.|.;MAC
RO SCRATCH NAAMADRES,LENGTE.....;MACRO D
ISKSTATUS X,Y,COLOR.....;MACRO DISKERROR
X,Y,COLOR.....;MACRO DISKINIT.Q.D.;MACR
O DISKVAL...V.;*************************
*******......DIR...Z. J#$24..... R$0100.
#.>. V$AAD7...P. J#$01.5... Z.@.T. B#$00
.L... V$FFBD.W.8. B#$08.B.J. C#$60.N...
V$FFBA.Z.N. V$F3D5..... J$BA...2. V$FFB4
...D. J$B9..... V$FF96...H. J#$00..... R
$90.F.,. C#$03.T.^.TEX0 T$FF..... V$FFA5
...B. R$FE..... C$90...&. .TEX4...X. V$F
FA5..... C$90. ... .TEX4.*... C$FF.1. .
..<.R. .TEX0.F... B$FE.R... V$BDCD.]...
VTEX5.M...TEX1 V$FFA5.W.L. B$90...~. .TE
X4..... Z..... X..... .TEX2...F. V$FFD2.
..X. UTEX1.B...TEX2 V$AAD7.M... J#$00.W.
.. R$C6...@. J$C5...R. D#60..... .TEX7..
.V. D#63..... .TEX4...:.TEX3 C#$02.%.L.
UTEX0.5...TEX4 V$F642.@.P. J#$08.J... R$
BA.V.4. V$FFB4.A.F. J#$6F.K... R$B9.W.J.
V$FF96..... V$FFAB..... J#$00...`. R$C6
..... UTEX10...D.TEX5 J#$20..... U$FFD2.
K.( B$02F7.W.Z V$FFC9.... .TEX6....
U$E0F9.... TEX6 ....".TEX7 B#$00...T.TEX
8 V$EEB3..... ..*... .TEX8.9...TEX9 J#$0
0.C... R$C6.M.N. J$C5.W... D#60.B... .TE
X9.M... UTEX3.Y...TEX10 ...H.....Z.;***
****************************......DISKST
ATUS X,Y,COLOR.H... UEEN.....TEX100 ."DO
S:"...B.EEN J#COLOR...T. R$0286..... B#Y
...X. C#X..... ....<. V$FFF0.%.N. B#0.4.
. JTEX100,X.@.R. V$FFD2.G... ..P.6. .#4
.Z.H. .*-9.C... J#0.J.L. Z.Q... X.}.0. V
$FFBD...B. J#15..... B#8...F. Z..... V$F
FBA...*. V$FFC0...\. B#15.E... V$FFC6.P.
.. C#$00.....TEX98 V$FFCF...$. D#$0D...V
. .TEX99..... V$FFD2..... UTEX98.....TEX
99 J#15.+... V$FFC3.7.P. V$FFE7.@... J#0
.J... R$C6.P.....V...;******************
**************...J..DISKERROR X,Y,COLOR.
..|. J#COLOR..... R$0286..... B#Y..... C
#X.A.D. ..M.V. V$FFF0.V... J#0...Z. Z...
.. X...>. V$FFBD...P. J#15..... B#8...T.
Z..... V$FFBA.".8. V$FFC0.,.J. B#15.8..
. V$FFC6.C.N. C#$00.T...TEX98 V$FFCF.].2
. A#0.I.D. .TEX97.U...TEX96 ....H. D#$0D
..... .TEX99...,. V$FFD2...^. UTEX98....
.TEX99 ....B. J#15.F... V$FFC3.R.&. V$FF
E7...X. J#0..... R$C6..... UTEX104.....T
EX97 D#48... . .TEX100...R. D#49.%... .T
EX100.,... Z.8... UTEX99.I...TEX100 C#$0
0.U... UTEX99.B...TEX104 ..H.`.......;**
******************************...D..DISK
INIT..... UTWEE...(.NAAM ."I/0".D.Z.TWEE
J#3.S... C#>(NAAM)..... B#<(NAAM).....
V$FFBD...". J#15.. T. B#8.. .. C#15.. ..
V$FFBA.# .. V$FFC0.- .. J#15.9 N. V$FFC
3.E .. V$FFE7.K ....Q ..;***************
*****************.~ ...DISKVAL.. H. UDRI
E.. Z.NAAM3 ."V".. ..DRIE J#1.. .. C#>(N
AAM3).E .. B#<(NAAM3).Q B. V$FFBD.. T. J
#15.. .. B#8.. X. C#15.. .. V$FFBA..!<.
V$FFC0..!N. J#15..! . V$FFC3.(!R. V$FFE7
..!....U!6.;****************************
*****.T!H..LOAD NAAMADRES,LENGTENAAM.!.
. J#$04..!L. B#$08..!.. C#$01..!0. V$FFB
A..!B. J#LENGTENAAM.G!.. B#<(NAAMADRES).
.!F. C#>(NAAMADRES)..!.. V$FFBD..!*A J#$
00..!\A B#$FF..".A C#$FF..".A V$FFD5..".
A..A"$B;********************************
*.^"VB.SAVE NAMADR,L,ADR1,ADR2.I".B J#$0
4.T".B B#$08.".B C#$01..".C V$FFBA.."PC
J#L..".C B#<(NAMADR)..".C C#>(NAMADR).B
".C V$FFBD.Q".D J#<(ADR1).."JD R$02.."|D
J#>(ADR1)..".D R$03..#.D B#<(ADR2)..#.E
C#>(ADR2)..#DE J#$02.)#VE V$FFD8./#.E..
U#ZE;********************************.S#
.F.SCRATCH NAAMADRES,LENGTE.#>F UBEGIN.
.#PFNAAM ."S0: "..#.FBEGI
N B#00.F#TFTEX200 JNAAMADRES,X.W#.G RNAA
M+$03,X..#8G ...#JG .#LENGTE..#.G .TEX20
0..$NG J#LENGTE+3..$.H C#>(NAAM).'$2H B#
<(NAAM).3$DH V$FFBD.=$.H J#15.F$HH B#8.P
$.H C#15.\$,I V$FFBA.H$^I V$FFC0.R$.I J#
15.~$BI V$FFC3..$.I V$FFE7..$&J...$XJ;**
******************************.Y$.J;MACR
O INPUT ADR,MAX,X,Y,COLOR..$.J;*********
***********************.$%.J;SET GLOBAL
INPUTBASE TO INPBASE.D% K;(INPBASE=START
SUBROUTINE).F%RK;REM INITINPUT 0,0
,0,0,0.X%.K;REM RTS..%.K;(CALL INIT
INPUT TO INTIALISE)..%.K;.F%.L;* INPUT W
ORDT VANAF ADRES (ADR)..%LL;* NEERGEZET
IN FORMAT:..%~L;* LENGTEINPUT,INPUT,0..&
.L;.)&.L;*******************************
*.J&.M.INITINPUT ADR,MAX,X,Y,COLOR.]&FMI
NPBASE UTEX58.O&XMTEX51 .>(ADR)..&.MTEX5
2 .<(ADR)..&.MTEX53 .MAX..&.NTEX54 .X..&
@NTEX55 .Y..&RNTEX50 .COLOR.L&.NTEX58 BT
EX50.X&VN S$0286..&.O BTEX51..&:O S$03..
&LO BTEX52..'.O S$02..'PO BTEX54..'.P CT
EX55.#'4P ../'FP V$FFF0.?'.PTEX23 B#$00.
K'JP STEX22.W'.P UTEX20.E'.QTEX22 .00.U'
`QTEX20 J#185..'.Q V$FFD2..'DQTEX21 V$FF
E4..'.Q ITEX22..'(R CTEX22..'ZR ATEX53.B
'.R .TEX29.M'.R D#$00.Y'.R .TEX24..'"S G
TEX22..'TS UTEX21..(.STEX24 D#13..(.S .T
EX28..(.S D#148.#(.T .TEX21..(NT D#157.:
(.T .TEX21.D(.T D#29.P(.T .TEX21.Z(.U D#
17.F(HU .TEX21.Q(ZU D#145.}(.U .TEX21..(
.U D#20..(.V .TEX26..(BV A#$01..(TV .TEX
25..(.V C#$00.A(XV TTEX22.M(.W UTEX21..(
<WTEX25 GTEX22..(NW GTEX22..( W UTEX27..
)RWTEX26 R($02),Y..).XTEX27 X. )6X J#157
.,)HX V$FFD2.3).X W.?)LX V$FFD2.K).X UTE
X20.Z)0YTEX28 J#20.F)BY V$FFD2.R).Y CTEX
22.|)FY J#00..).Y R($02),Y..)*Z GTEX22..
)\Z JTEX22..).Z C#$00..).Z R($02),Y.B).Z
..Q)$.TEX29 J#20..)V.TEX30 V$FFD2..)..
...).. .TEX30..*.. UTEX23..*....-*P.;***
*****************************.J*...INPUT
ADR,MAX,X,Y,COLOR.V*.. UTEX58.H*..TEX56
.>(ADR).U*.. .<(ADR)..*J. .MAX+2..*|. .
Y..*.. .X..*.. .COLOR..*..TEX58 B#$00..*
D.TEX57 JTEX56,X.V*V. RINPUTBASE+$03,X..
*.. ...*Z. .#6..*.. .TEX57..+>. VINPUTBA
SE..+P.....
> CLICK IMAGE PREVIEW FOR FULL MODAL