Multiple names: ASM.MEN,
FILE INFORMATION
FILENAME(S):
• ASM.MEN<br>•
FILE TYPE(S): PRG
FILE SIZE: 8.9K
FIRST SEEN: 2025-11-30 21:09:57
APPEARS ON: 2 disk(s)
FILE HASH
271d43a5914cd324d2e24080ec2cd140f85851cebba5ffe6673cd8786e314ee0
FOUND ON DISKS (2 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| SCREENSET | ASM.MEN | PRG | DuncanTwain | 21 | 7 | DOWNLOAD FILE |
| SCREENSET | | PRG | DuncanTwain | 21 | 7 | 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 55 09 F0 55 4C 4F 20 43 4C |.BEGIN.U..ULO CL|
00000150: 52 48 4F 4D 45 00 6A 09 4E 57 20 44 49 53 4B 45 |RHOME.j.NW DISKE|
00000160: 52 52 4F 52 A0 30 2C 31 2C 31 00 77 09 80 57 20 |RROR.0,1,1.w..W |
00000170: 43 4C 52 48 4F 4D 45 00 83 09 B2 57 20 D5 42 45 |CLRHOME....W .BE|
00000180: 47 49 4E 00 92 09 C6 5C 49 4E 20 43 4C 52 48 4F |GIN....\IN CLRHO|
00000190: 4D 45 00 A9 09 C7 5C 20 57 49 4E 44 4F 57 A0 34 |ME....\ WINDOW.4|
000001A0: 2C 33 2C 32 39 2C 39 2C 31 00 C3 09 F8 5C 57 49 |,3,29,9,1....\WI|
000001B0: 4E 20 54 45 58 54 A0 54 45 4B 53 54 31 2C 35 2C |N TEXT.TEKST1,5,|
000001C0: 34 2C 31 00 DA 09 2A 5D 20 54 45 58 54 A0 54 45 |4,1...*] TEXT.TE|
000001D0: 4B 53 54 32 2C 35 2C 36 2C 31 00 F1 09 5C 5D 20 |KST2,5,6,1...\] |
000001E0: 54 45 58 54 A0 54 45 4B 53 54 33 2C 35 2C 38 2C |TEXT.TEKST3,5,8,|
000001F0: 31 00 09 0A 8E 5D 20 54 45 58 54 A0 54 45 4B 53 |1....] TEXT.TEKS|
00000200: 54 34 2C 35 2C 31 30 2C 31 00 12 0A 56 5E 51 51 |T4,5,10,1...V^QQ|
00000210: 20 E3 00 1F 0A 88 5E 54 54 20 A5 31 34 2C 38 00 | .....^TT .14,8.|
00000220: 29 0A BA 5E 20 A8 22 FF 22 00 3C 0A EC 5E 42 45 |)..^ .".".<..^BE|
00000230: 47 49 4E 20 50 52 49 4E 54 A0 54 54 00 45 0A 1E |GIN PRINT.TT.E..|
00000240: 5F 20 D6 49 4E 00 52 0A 50 5F 45 45 4E 20 D6 57 |_ .IN.R.P_EEN .W|
00000250: 49 4E 00 62 0A 82 5F 20 43 55 52 53 4F 52 A0 34 |IN.b.._ CURSOR.4|
00000260: 2C 35 00 6D 0A B4 5F 20 CA 23 32 35 30 00 79 0A |,5.m.._ .#250.y.|
00000270: E6 5F 20 D6 24 46 46 44 32 00 88 0A 18 60 20 50 |._ .$FFD2....` P|
00000280: 41 55 53 45 A0 31 30 30 00 96 0A 4A 60 49 4E 30 |AUSE.100...J`IN0|
00000290: 20 49 4E 4B 45 59 00 A0 0A 7C 60 20 C4 23 30 31 | INKEY...|` .#01|
000002A0: 00 AB 0A AE 60 20 F6 49 4E 4A 31 00 B4 0A E0 60 |....` .INJ1....`|
000002B0: 20 D5 51 51 00 C2 0A 12 61 49 4E 4A 31 20 C4 23 | .QQ....aINJ1 .#|
000002C0: 36 34 00 CC 0A 44 61 20 F7 49 4E 30 00 D6 0A 76 |64...Da .IN0...v|
000002D0: 61 20 D6 57 49 4E 00 E6 0A A8 61 20 43 55 52 53 |a .WIN....a CURS|
000002E0: 4F 52 A0 36 2C 35 00 F1 0A DA 61 20 CA 23 32 35 |OR.6,5....a .#25|
000002F0: 30 00 FD 0A 0C 62 20 D6 24 46 46 44 32 00 0C 0B |0....b .$FFD2...|
00000300: 3E 62 20 50 41 55 53 45 A0 31 30 30 00 1A 0B 70 |>b PAUSE.100...p|
00000310: 62 49 4E 31 20 49 4E 4B 45 59 00 24 0B A2 62 20 |bIN1 INKEY.$..b |
00000320: C4 23 30 31 00 2F 0B D4 62 20 F6 49 4E 4A 32 00 |.#01./..b .INJ2.|
00000330: 38 0B 06 63 20 D5 51 51 00 46 0B 38 63 49 4E 4A |8..c .QQ.F.8cINJ|
00000340: 32 20 C4 23 36 34 00 50 0B 6A 63 20 F7 49 4E 31 |2 .#64.P.jc .IN1|
00000350: 00 5A 0B 9C 63 20 D6 57 49 4E 00 6A 0B CE 63 20 |.Z..c .WIN.j..c |
00000360: 43 55 52 53 4F 52 A0 38 2C 35 00 75 0B 00 64 20 |CURSOR.8,5.u..d |
00000370: CA 23 32 35 30 00 81 0B 32 64 20 D6 24 46 46 44 |.#250...2d .$FFD|
00000380: 32 00 90 0B 64 64 20 50 41 55 53 45 A0 31 30 30 |2...dd PAUSE.100|
00000390: 00 9E 0B 96 64 49 4E 32 20 49 4E 4B 45 59 00 A8 |....dIN2 INKEY..|
000003A0: 0B C8 64 20 C4 23 30 31 00 B3 0B FA 64 20 F6 49 |..d .#01....d .I|
000003B0: 4E 4A 33 00 BC 0B 2C 65 20 D5 51 51 00 CA 0B 5E |NJ3...,e .QQ...^|
000003C0: 65 49 4E 4A 33 20 C4 23 36 34 00 D4 0B 90 65 20 |eINJ3 .#64....e |
000003D0: F7 49 4E 32 00 DE 0B C2 65 20 D6 57 49 4E 00 EF |.IN2....e .WIN..|
000003E0: 0B F4 65 20 43 55 52 53 4F 52 A0 31 30 2C 35 00 |..e CURSOR.10,5.|
000003F0: FA 0B 26 66 20 CA 23 32 35 30 00 06 0C 58 66 20 |..&f .#250...Xf |
00000400: D6 24 46 46 44 32 00 15 0C 8A 66 20 50 41 55 53 |.$FFD2....f PAUS|
00000410: 45 A0 31 30 30 00 23 0C BC 66 49 4E 33 20 49 4E |E.100.#..fIN3 IN|
00000420: 4B 45 59 00 2D 0C EE 66 20 C4 23 30 31 00 38 0C |KEY.-..f .#01.8.|
00000430: 20 67 20 F6 49 4E 4A 34 00 41 0C 52 67 20 D5 51 | g .INJ4.A.Rg .Q|
00000440: 51 00 4F 0C 84 67 49 4E 4A 34 20 C4 23 36 34 00 |Q.O..gINJ4 .#64.|
00000450: 59 0C B6 67 20 F7 49 4E 33 00 63 0C B7 67 20 D5 |Y..g .IN3.c..g .|
00000460: 45 45 4E 00 6A 0C 8C 6E 20 E3 00 86 0C BE 6E 54 |EEN.j..n .....nT|
00000470: 45 4B 53 54 31 20 A8 22 12 20 92 44 49 53 50 4C |EKST1 .". .DISPL|
00000480: 41 59 20 20 FF 22 00 B3 0C F0 6E 54 45 4B 53 54 |AY ."....nTEKST|
00000490: 32 20 A8 22 12 20 92 44 49 53 50 4C 41 59 20 41 |2 .". .DISPLAY A|
000004A0: 4C 4C 20 50 49 43 27 53 20 4F 4E 20 44 49 53 4B |LL PIC'S ON DISK|
000004B0: 20 FF 22 00 E0 0C 22 6F 54 45 4B 53 54 33 20 A8 | ."..."oTEKST3 .|
000004C0: 22 12 20 92 4D 49 52 52 4F 52 20 20 20 20 20 20 |". .MIRROR |
000004D0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 FF 22 | ."|
000004E0: 00 0D 0D B8 6F 54 45 4B 53 54 34 20 A8 22 12 20 |....oTEKST4 .". |
000004F0: 92 45 58 49 54 20 20 20 20 20 20 20 20 20 20 20 |.EXIT |
00000500: 20 20 20 20 20 20 20 20 20 20 20 FF 22 00 2A 0D | .".*.|
00000510: 4E 70 A1 57 49 4E 44 4F 57 A0 58 2C 59 2C 58 31 |Np.WINDOW.X,Y,X1|
00000520: 2C 59 31 2C 43 4F 4C 56 41 4C 00 33 0D 80 70 20 |,Y1,COLVAL.3..p |
00000530: C2 23 58 00 3C 0D B2 70 20 D3 54 39 00 45 0D E4 |.#X.<..p .T9.E..|
00000540: 70 20 C2 23 59 00 4E 0D 16 71 20 D3 54 38 00 5A |p .#Y.N..q .T8.Z|
00000550: 0D 48 71 20 D5 42 45 47 49 4E 00 66 0D 7A 71 54 |.Hq .BEGIN.f.zqT|
00000560: 31 20 A8 22 B0 22 00 72 0D AC 71 54 32 20 A8 22 |1 .".".r..qT2 ."|
00000570: AE 22 00 7E 0D DE 71 54 33 20 A8 22 AD 22 00 8A |.".~..qT3 ."."..|
00000580: 0D 10 72 54 37 20 A8 22 BD 22 00 96 0D 42 72 54 |..rT7 ."."...BrT|
00000590: 34 20 A8 22 DD 22 00 A2 0D 74 72 54 35 20 A8 22 |4 ."."...trT5 ."|
000005A0: C0 22 00 AE 0D A6 72 54 36 20 A8 22 20 22 00 B9 |."....rT6 ." "..|
000005B0: 0D D8 72 54 38 20 A5 30 30 00 C4 0D 0A 73 54 39 |..rT8 .00....sT9|
000005C0: 20 A5 30 30 00 D5 0D 3C 73 53 45 54 20 CA 23 43 | .00...<sSET .#C|
000005D0: 4F 4C 56 41 4C 00 E1 0D 6E 73 20 D2 24 30 32 38 |OLVAL...ns .$028|
000005E0: 36 00 EF 0D A0 73 50 4F 49 4E 54 20 C2 54 38 00 |6....sPOINT .T8.|
000005F0: F8 0D D2 73 20 C3 54 39 00 FF 0D 04 74 20 E5 00 |...s .T9....t ..|
00000600: 0B 0E 36 74 20 D6 24 46 46 46 30 00 12 0E 68 74 |..6t .$FFF0...ht|
00000610: 20 E3 00 21 0E 9A 74 42 45 47 49 4E 20 D6 53 45 | ..!..tBEGIN .SE|
00000620: 54 00 2A 0E CC 74 20 CA 54 31 00 36 0E FE 74 20 |T.*..t .T1.6..t |
00000630: D6 24 46 46 44 32 00 40 0E 30 75 20 C2 23 30 30 |.$FFD2.@.0u .#00|
00000640: 00 49 0E 62 75 20 CA 54 35 00 58 0E 94 75 45 45 |.I.bu .T5.X..uEE|
00000650: 4E 20 D6 24 46 46 44 32 00 5F 0E C6 75 20 EF 00 |N .$FFD2._..u ..|
00000660: 6B 0E F8 75 20 C0 23 58 31 2D 32 00 75 0E 2A 76 |k..u .#X1-2.u.*v|
00000670: 20 F6 45 45 4E 00 7E 0E 5C 76 20 CA 54 32 00 8A | .EEN.~.\v .T2..|
00000680: 0E 8E 76 20 D6 24 46 46 44 32 00 97 0E C0 76 44 |..v .$FFD2....vD|
00000690: 52 49 45 20 C9 54 38 00 A1 0E F2 76 20 D6 53 45 |RIE .T8....v .SE|
000006A0: 54 00 AA 0E 24 77 20 CA 54 34 00 B6 0E 56 77 20 |T...$w .T4...Vw |
000006B0: D6 24 46 46 44 32 00 C0 0E 88 77 20 C2 23 30 30 |.$FFD2....w .#00|
000006C0: 00 C9 0E BA 77 20 CA 54 36 00 D9 0E EC 77 45 45 |....w .T6....wEE|
000006D0: 4E 4E 20 D6 24 46 46 44 32 00 E0 0E 1E 78 20 EF |NN .$FFD2....x .|
000006E0: 00 EC 0E 50 78 20 C0 23 58 31 2D 32 00 F7 0E 82 |...Px .#X1-2....|
000006F0: 78 20 F6 45 45 4E 4E 00 00 0F B4 78 20 CA 54 34 |x .EENN....x .T4|
00000700: 00 0C 0F E6 78 20 D6 24 46 46 44 32 00 15 0F 18 |....x .$FFD2....|
00000710: 79 20 CA 54 38 00 21 0F 4A 79 20 C4 23 59 31 2B |y .T8.!.Jy .#Y1+|
00000720: 31 00 2C 0F 7C 79 20 F6 44 52 49 45 00 35 0F AE |1.,.|y .DRIE.5..|
00000730: 79 20 C9 54 38 00 3F 0F E0 79 20 D6 53 45 54 00 |y .T8.?..y .SET.|
00000740: 48 0F 12 7A 20 CA 54 33 00 54 0F 44 7A 20 D6 24 |H..z .T3.T.Dz .$|
00000750: 46 46 44 32 00 5E 0F 76 7A 20 C2 23 30 30 00 67 |FFD2.^.vz .#00.g|
00000760: 0F A8 7A 20 CA 54 35 00 78 0F DA 7A 45 45 4E 4E |..z .T5.x..zEENN|
00000770: 4E 20 D6 24 46 46 44 32 00 7F 0F 0C 7B 20 EF 00 |N .$FFD2....{ ..|
00000780: 8B 0F 3E 7B 20 C0 23 58 31 2D 32 00 97 0F 70 7B |..>{ .#X1-2...p{|
00000790: 20 F6 45 45 4E 4E 4E 00 A0 0F A2 7B 20 CA 54 37 | .EENNN....{ .T7|
000007A0: 00 AC 0F D4 7B 20 D6 24 46 46 44 32 00 B2 0F 06 |....{ .$FFD2....|
000007B0: 7C A2 00 D6 0F 38 7C 3B 2A 2A 2A 2A 2A 2A 2A 2A ||....8|;********|
000007C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000007D0: 2A 2A 2A 2A 2A 2A 00 ED 0F 6A 7C A1 53 43 52 45 |******...j|.SCRE|
000007E0: 45 4E 43 4F 4C 4F 52 A0 43 4F 4C 4F 52 00 FA 0F |ENCOLOR.COLOR...|
000007F0: 9C 7C 20 C3 23 43 4F 4C 4F 52 00 06 10 CE 7C 20 |.| .#COLOR....| |
00000800: D4 35 33 32 38 31 00 0C 10 00 7D A2 00 30 10 32 |.53281....}..0.2|
00000810: 7D 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |};**************|
00000820: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000830: 00 47 10 64 7D A1 42 4F 52 44 45 52 43 4F 4C 4F |.G.d}.BORDERCOLO|
00000840: 52 A0 43 4F 4C 4F 52 00 54 10 96 7D 20 C3 23 43 |R.COLOR.T..} .#C|
00000850: 4F 4C 4F 52 00 60 10 C8 7D 20 D4 35 33 32 38 30 |OLOR.`..} .53280|
00000860: 00 66 10 FA 7D A2 00 8A 10 2C 7E 3B 2A 2A 2A 2A |.f..}....,~;****|
00000870: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000880: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 9F 10 5E 7E A1 |**********...^~.|
00000890: 46 49 4C 4C 43 4F 4C 4F 52 A0 43 4F 4C 4F 52 00 |FILLCOLOR.COLOR.|
000008A0: AC 10 90 7E 20 CA 23 43 4F 4C 4F 52 00 B7 10 C2 |...~ .#COLOR....|
000008B0: 7E 20 C2 23 24 30 30 00 C9 10 F4 7E 54 45 58 31 |~ .#$00....~TEX1|
000008C0: 20 D2 24 44 38 30 30 2C 58 00 D7 10 26 7F 20 D2 | .$D800,X...&. .|
000008D0: 24 44 39 30 30 2C 58 00 E5 10 58 7F 20 D2 24 44 |$D900,X...X. .$D|
000008E0: 41 30 30 2C 58 00 EC 10 8A 7F 20 EF 00 F7 10 BC |A00,X..... .....|
000008F0: 7F 20 F6 54 45 58 31 00 09 11 EE 7F 54 45 58 32 |. .TEX1.....TEX2|
00000900: 20 D2 24 44 42 30 30 2C 58 00 10 11 20 80 20 EF | .$DB00,X... . .|
00000910: 00 1B 11 52 80 20 C0 23 24 45 38 00 26 11 84 80 |...R. .#$E8.&...|
00000920: 20 F6 54 45 58 32 00 2C 11 B6 80 A2 00 50 11 E8 | .TEX2.,.....P..|
00000930: 80 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.;**************|
00000940: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000950: 00 5E 11 1A 81 A1 43 4F 4C 4F 52 49 4E 43 00 69 |.^....COLORINC.i|
00000960: 11 4C 81 20 C2 23 24 30 30 00 7B 11 7E 81 54 45 |.L. .#$00.{.~.TE|
00000970: 58 31 20 C9 24 44 38 30 30 2C 58 00 89 11 B0 81 |X1 .$D800,X.....|
00000980: 20 C9 24 44 39 30 30 2C 58 00 97 11 E2 81 20 C9 | .$D900,X..... .|
00000990: 24 44 41 30 30 2C 58 00 9E 11 14 82 20 EF 00 A9 |$DA00,X..... ...|
000009A0: 11 46 82 20 F6 54 45 58 31 00 BB 11 78 82 54 45 |.F. .TEX1...x.TE|
000009B0: 58 32 20 C9 24 44 42 30 30 2C 58 00 C2 11 AA 82 |X2 .$DB00,X.....|
000009C0: 20 EF 00 CD 11 DC 82 20 C0 23 24 45 38 00 D8 11 | ...... .#$E8...|
000009D0: 0E 83 20 F6 54 45 58 32 00 DE 11 40 83 A2 00 02 |.. .TEX2...@....|
000009E0: 12 72 83 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.r.;************|
000009F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A00: 2A 2A 00 0F 12 A4 83 A1 43 4C 52 48 4F 4D 45 00 |**......CLRHOME.|
00000A10: 1A 12 D6 83 20 CA 23 31 34 37 00 26 12 08 84 20 |.... .#147.&... |
00000A20: D6 24 46 46 44 32 00 2C 12 3A 84 A2 00 50 12 6C |.$FFD2.,.:...P.l|
00000A30: 84 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.;**************|
00000A40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000A50: 00 74 12 9E 84 3B 2A 20 4D 41 43 52 4F 20 54 45 |.t...;* MACRO TE|
00000A60: 58 54 20 41 44 52 45 53 2C 58 2C 59 2C 4B 4C 45 |XT ADRES,X,Y,KLE|
00000A70: 55 52 20 2A 00 98 12 D0 84 3B 2A 2A 2A 2A 2A 2A |UR *.....;******|
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 00 B8 12 02 85 A1 54 45 |********......TE|
00000AA0: 58 54 A0 54 41 44 52 2C 58 56 41 4C 2C 59 56 41 |XT.TADR,XVAL,YVA|
00000AB0: 4C 2C 43 4F 4C 56 41 4C 00 C6 12 34 85 20 CA 23 |L,COLVAL...4. .#|
00000AC0: 43 4F 4C 56 41 4C 00 D2 12 66 85 20 D2 24 30 32 |COLVAL...f. .$02|
00000AD0: 38 36 00 DE 12 98 85 20 C2 23 59 56 41 4C 00 EA |86..... .#YVAL..|
00000AE0: 12 CA 85 20 C3 23 58 56 41 4C 00 F1 12 FC 85 20 |... .#XVAL..... |
00000AF0: E5 00 FD 12 2E 86 20 D6 24 46 46 46 30 00 08 13 |...... .$FFF0...|
00000B00: 60 86 20 C2 23 24 30 30 00 19 13 92 86 54 45 58 |`. .#$00.....TEX|
00000B10: 31 20 CA 54 41 44 52 2C 58 00 24 13 C4 86 20 C4 |1 .TADR,X.$... .|
00000B20: 23 24 46 46 00 2F 13 F6 86 20 F7 54 45 58 32 00 |#$FF./... .TEX2.|
00000B30: 3B 13 28 87 20 D6 24 46 46 44 32 00 42 13 5A 87 |;.(. .$FFD2.B.Z.|
00000B40: 20 EF 00 4D 13 8C 87 20 D5 54 45 58 31 00 58 13 | ..M... .TEX1.X.|
00000B50: BE 87 54 45 58 32 20 E4 00 5E 13 F0 87 A2 00 80 |..TEX2 ..^......|
00000B60: 13 22 88 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.".;************|
00000B70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000B80: 00 A2 13 54 88 3B 2A 20 4D 41 43 52 4F 20 50 52 |...T.;* MACRO PR|
00000B90: 49 4E 54 20 41 44 52 45 53 20 20 20 20 20 20 20 |INT ADRES |
00000BA0: 20 2A 00 C4 13 86 88 3B 2A 2A 2A 2A 2A 2A 2A 2A | *.....;********|
00000BB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000BC0: 2A 2A 2A 2A 00 D4 13 B8 88 A1 50 52 49 4E 54 A0 |****......PRINT.|
00000BD0: 54 41 44 52 00 DF 13 EA 88 20 C2 23 24 30 30 00 |TADR..... .#$00.|
00000BE0: F0 13 1C 89 54 45 58 31 20 CA 54 41 44 52 2C 58 |....TEX1 .TADR,X|
00000BF0: 00 FB 13 4E 89 20 C4 23 24 46 46 00 06 14 80 89 |...N. .#$FF.....|
00000C00: 20 F7 54 45 58 32 00 12 14 B2 89 20 D6 24 46 46 | .TEX2..... .$FF|
00000C10: 44 32 00 19 14 E4 89 20 EF 00 24 14 16 8A 20 D5 |D2..... ..$... .|
00000C20: 54 45 58 31 00 2F 14 48 8A 54 45 58 32 20 E4 00 |TEX1./.H.TEX2 ..|
00000C30: 3A 14 7A 8A 20 CA 23 24 30 44 00 46 14 AC 8A 20 |:.z. .#$0D.F... |
00000C40: D6 24 46 46 44 32 00 4C 14 DE 8A A2 00 6E 14 10 |.$FFD2.L.....n..|
00000C50: 8B 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.;**************|
00000C60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 90 |**************..|
00000C70: 14 42 8B 3B 2A 20 4D 41 43 52 4F 20 4B 45 59 20 |.B.;* MACRO KEY |
00000C80: 57 41 49 54 20 20 20 20 20 20 20 20 20 20 20 2A |WAIT *|
00000C90: 00 B2 14 74 8B 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...t.;**********|
00000CA0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000CB0: 2A 2A 00 C0 14 A6 8B A1 4B 45 59 A0 57 41 49 54 |**......KEY.WAIT|
00000CC0: 00 CF 14 D8 8B 54 45 58 31 20 C2 23 24 30 30 00 |.....TEX1 .#$00.|
00000CD0: DB 14 0A 8C 20 D3 24 30 30 43 36 00 E7 14 3C 8C |.... .$00C6...<.|
00000CE0: 20 CA 24 30 30 43 35 00 F3 14 6E 8C 20 C4 23 57 | .$00C5...n. .#W|
00000CF0: 41 49 54 00 FE 14 A0 8C 20 F6 54 45 58 31 00 04 |AIT..... .TEX1..|
00000D00: 15 D2 8C A2 00 14 15 04 8D A1 43 55 52 53 4F 52 |..........CURSOR|
00000D10: A0 58 2C 59 00 1D 15 36 8D 20 C2 23 58 00 26 15 |.X,Y...6. .#X.&.|
00000D20: 68 8D 20 C3 23 59 00 2D 15 9A 8D 20 E5 00 39 15 |h. .#Y.-... ..9.|
00000D30: CC 8D 20 D6 24 46 46 46 30 00 3F 15 FE 8D A2 00 |.. .$FFF0.?.....|
00000D40: 4A 15 30 8E A1 49 4E 4B 45 59 00 55 15 62 8E 20 |J.0..INKEY.U.b. |
00000D50: C2 23 24 30 30 00 61 15 94 8E 20 D3 24 30 30 43 |.#$00.a... .$00C|
00000D60: 36 00 6D 15 C6 8E 20 CA 24 30 30 43 35 00 73 15 |6.m... .$00C5.s.|
00000D70: F8 8E A2 00 80 15 2A 8F A1 50 41 55 53 45 A0 50 |......*..PAUSE.P|
00000D80: 00 8A 15 5C 8F 20 C2 23 30 30 00 95 15 8E 8F 20 |...\. .#00..... |
00000D90: C3 23 24 46 46 00 A1 15 C0 8F 20 D6 24 45 45 42 |.#$FF..... .$EEB|
00000DA0: 33 00 A8 15 F2 8F 20 EF 00 B4 15 24 90 20 C0 23 |3..... ....$. .#|
00000DB0: 3C 28 50 29 00 BE 15 56 90 20 F6 2A 2D 36 00 C5 |<(P)...V. .*-6..|
00000DC0: 15 88 90 20 ED 00 D1 15 BA 90 20 C1 23 3E 28 50 |... ...... .#>(P|
00000DD0: 29 00 DC 15 EC 90 20 F6 2A 2D 31 31 00 E2 15 1E |)..... .*-11....|
00000DE0: 91 A2 00 08 16 50 91 3B 2A 2A 2A 2A 2A 2A 2A 2A |.....P.;********|
00000DF0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E00: 2A 2A 2A 2A 2A 2A 2A 2A 00 2E 16 82 91 3B 2A 20 |********.....;* |
00000E10: 20 48 45 52 42 49 45 27 53 20 44 49 53 4B 20 4D | HERBIE'S DISK M|
00000E20: 41 43 52 4F 27 53 20 20 31 2E 31 20 20 2A 00 54 |ACRO'S 1.1 *.T|
00000E30: 16 B4 91 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...;************|
00000E40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000E50: 2A 2A 2A 2A 00 63 16 E6 91 3B 4D 41 43 52 4F 20 |****.c...;MACRO |
00000E60: 44 49 52 00 88 16 18 92 3B 4D 41 43 52 4F 20 4C |DIR.....;MACRO L|
00000E70: 4F 41 44 A0 4E 41 41 4D 41 44 52 45 53 2C 4C 45 |OAD.NAAMADRES,LE|
00000E80: 4E 47 54 45 4E 41 41 4D 00 AB 16 4A 92 3B 4D 41 |NGTENAAM...J.;MA|
00000E90: 43 52 4F 20 53 41 56 45 A0 4E 41 4D 41 44 52 2C |CRO SAVE.NAMADR,|
00000EA0: 4C 2C 41 44 52 31 2C 41 44 52 32 00 CF 16 7C 92 |L,ADR1,ADR2...|.|
00000EB0: 3B 4D 41 43 52 4F 20 53 43 52 41 54 43 48 A0 4E |;MACRO SCRATCH.N|
00000EC0: 41 41 4D 41 44 52 45 53 2C 4C 45 4E 47 54 45 00 |AAMADRES,LENGTE.|
00000ED0: EF 16 AE 92 3B 4D 41 43 52 4F 20 44 49 53 4B 53 |....;MACRO DISKS|
00000EE0: 54 41 54 55 53 A0 58 2C 59 2C 43 4F 4C 4F 52 00 |TATUS.X,Y,COLOR.|
00000EF0: 0E 17 E0 92 3B 4D 41 43 52 4F 20 44 49 53 4B 45 |....;MACRO DISKE|
00000F00: 52 52 4F 52 A0 58 2C 59 2C 43 4F 4C 4F 52 00 22 |RROR.X,Y,COLOR."|
00000F10: 17 12 93 3B 4D 41 43 52 4F 20 44 49 53 4B 49 4E |...;MACRO DISKIN|
00000F20: 49 54 00 35 17 44 93 3B 4D 41 43 52 4F 20 44 49 |IT.5.D.;MACRO DI|
00000F30: 53 4B 56 41 4C 00 5B 17 76 93 3B 2A 2A 2A 2A 2A |SKVAL.[.v.;*****|
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 64 17 A8 93 |***********.d...|
00000F60: A1 44 49 52 00 6F 17 DA 93 20 CA 23 24 32 34 00 |.DIR.o... .#$24.|
00000F70: 7B 17 0C 94 20 D2 24 30 31 30 30 00 87 17 3E 94 |{... .$0100...>.|
00000F80: 20 D6 24 41 41 44 37 00 92 17 70 94 20 CA 23 24 | .$AAD7...p. .#$|
00000F90: 30 31 00 99 17 A2 94 20 DA 00 A4 17 D4 94 20 C2 |01..... ...... .|
00000FA0: 23 24 30 30 00 B0 17 06 95 20 D6 24 46 46 42 44 |#$00..... .$FFBD|
00000FB0: 00 BB 17 38 95 20 C2 23 24 30 38 00 C6 17 6A 95 |...8. .#$08...j.|
00000FC0: 20 C3 23 24 36 30 00 D2 17 9C 95 20 D6 24 46 46 | .#$60..... .$FF|
00000FD0: 42 41 00 DE 17 CE 95 20 D6 24 46 33 44 35 00 E8 |BA..... .$F3D5..|
00000FE0: 17 00 96 20 CA 24 42 41 00 F4 17 32 96 20 D6 24 |... .$BA...2. .$|
00000FF0: 46 46 42 34 00 FE 17 64 96 20 CA 24 42 39 00 0A |FFB4...d. .$B9..|
00001000: 18 96 96 20 D6 24 46 46 39 36 00 15 18 C8 96 20 |... .$FF96..... |
00001010: CA 23 24 30 30 00 1F 18 FA 96 20 D2 24 39 30 00 |.#$00..... .$90.|
00001020: 2A 18 2C 97 20 C3 23 24 30 33 00 38 18 5E 97 54 |*.,. .#$03.8.^.T|
00001030: 45 58 30 20 D4 24 46 46 00 44 18 90 97 20 D6 24 |EX0 .$FF.D... .$|
00001040: 46 46 41 35 00 4E 18 C2 97 20 D2 24 46 45 00 58 |FFA5.N... .$FE.X|
00001050: 18 F4 97 20 C3 24 39 30 00 63 18 26 98 20 F6 54 |... .$90.c.&. .T|
00001060: 45 58 34 00 6F 18 58 98 20 D6 24 46 46 41 35 00 |EX4.o.X. .$FFA5.|
00001070: 79 18 8A 98 20 C3 24 39 30 00 84 18 BC 98 20 F6 |y... .$90..... .|
00001080: 54 45 58 34 00 8E 18 EE 98 20 C3 24 46 46 00 95 |TEX4..... .$FF..|
00001090: 18 20 99 20 EC 00 A0 18 52 99 20 F6 54 45 58 30 |. . ....R. .TEX0|
000010A0: 00 AA 18 84 99 20 C2 24 46 45 00 B6 18 B6 99 20 |..... .$FE..... |
000010B0: D6 24 42 44 43 44 00 C1 18 E8 99 20 D6 54 45 58 |.$BDCD..... .TEX|
000010C0: 35 00 D1 18 1A 9A 54 45 58 31 20 D6 24 46 46 41 |5.....TEX1 .$FFA|
000010D0: 35 00 DB 18 4C 9A 20 C2 24 39 30 00 E6 18 7E 9A |5...L. .$90...~.|
000010E0: 20 F6 54 45 58 34 00 ED 18 B0 9A 20 DA 00 F4 18 | .TEX4..... ....|
000010F0: E2 9A 20 D8 00 FF 18 14 9B 20 F7 54 45 58 32 00 |.. ...... .TEX2.|
00001100: 0B 19 46 9B 20 D6 24 46 46 44 32 00 16 19 78 9B |..F. .$FFD2...x.|
00001110: 20 D5 54 45 58 31 00 26 19 AA 9B 54 45 58 32 20 | .TEX1.&...TEX2 |
00001120: D6 24 41 41 44 37 00 31 19 DC 9B 20 CA 23 24 30 |.$AAD7.1... .#$0|
00001130: 30 00 3B 19 0E 9C 20 D2 24 43 36 00 45 19 40 9C |0.;... .$C6.E.@.|
00001140: 20 CA 24 43 35 00 4F 19 72 9C 20 C4 23 36 30 00 | .$C5.O.r. .#60.|
00001150: 5A 19 A4 9C 20 F7 54 45 58 37 00 64 19 D6 9C 20 |Z... .TEX7.d... |
00001160: C4 23 36 33 00 6F 19 08 9D 20 F7 54 45 58 34 00 |.#63.o... .TEX4.|
00001170: 7E 19 3A 9D 54 45 58 33 20 C3 23 24 30 32 00 89 |~.:.TEX3 .#$02..|
00001180: 19 6C 9D 20 D5 54 45 58 30 00 99 19 9E 9D 54 45 |.l. .TEX0.....TE|
00001190: 58 34 20 D6 24 46 36 34 32 00 A4 19 D0 9D 20 CA |X4 .$F642..... .|
000011A0: 23 24 30 38 00 AE 19 02 9E 20 D2 24 42 41 00 BA |#$08..... .$BA..|
000011B0: 19 34 9E 20 D6 24 46 46 42 34 00 C5 19 66 9E 20 |.4. .$FFB4...f. |
000011C0: CA 23 24 36 46 00 CF 19 98 9E 20 D2 24 42 39 00 |.#$6F..... .$B9.|
000011D0: DB 19 CA 9E 20 D6 24 46 46 39 36 00 E7 19 FC 9E |.... .$FF96.....|
000011E0: 20 D6 24 46 46 41 42 00 F2 19 2E 9F 20 CA 23 24 | .$FFAB..... .#$|
000011F0: 30 30 00 FC 19 60 9F 20 D2 24 43 36 00 08 1A 92 |00...`. .$C6....|
00001200: 9F 20 D5 54 45 58 31 30 00 17 1A C4 9F 54 45 58 |. .TEX10.....TEX|
00001210: 35 20 CA 23 24 32 30 00 23 1A F6 9F 20 D5 24 46 |5 .#$20.#... .$F|
00001220: 46 44 32 00 2F 1A 28 A0 20 C2 24 30 32 46 37 00 |FD2./.(. .$02F7.|
00001230: 3B 1A 5A A0 20 D6 24 46 46 43 39 00 46 1A 8C A0 |;.Z. .$FFC9.F...|
00001240: 20 F4 54 45 58 36 00 52 1A BE A0 20 D5 24 45 30 | .TEX6.R... .$E0|
00001250: 46 39 00 5D 1A F0 A0 54 45 58 36 20 E3 00 6C 1A |F9.]...TEX6 ..l.|
00001260: 22 A1 54 45 58 37 20 C2 23 24 30 30 00 7C 1A 54 |".TEX7 .#$00.|.T|
00001270: A1 54 45 58 38 20 D6 24 45 45 42 33 00 83 1A 86 |.TEX8 .$EEB3....|
00001280: A1 20 EF 00 8E 1A B8 A1 20 F6 54 45 58 38 00 9D |. ...... .TEX8..|
00001290: 1A EA A1 54 45 58 39 20 CA 23 24 30 30 00 A7 1A |...TEX9 .#$00...|
000012A0: 1C A2 20 D2 24 43 36 00 B1 1A 4E A2 20 CA 24 43 |.. .$C6...N. .$C|
000012B0: 35 00 BB 1A 80 A2 20 C4 23 36 30 00 C6 1A B2 A2 |5..... .#60.....|
000012C0: 20 F6 54 45 58 39 00 D1 1A E4 A2 20 D5 54 45 58 | .TEX9..... .TEX|
000012D0: 33 00 DD 1A 16 A3 54 45 58 31 30 20 E4 00 E3 1A |3.....TEX10 ....|
000012E0: 48 A3 A2 00 08 1B 7A A3 3B 2A 2A 2A 2A 2A 2A 2A |H.....z.;*******|
000012F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001300: 2A 2A 2A 2A 2A 2A 2A 2A 00 22 1B AC A3 A1 44 49 |********."....DI|
00001310: 53 4B 53 54 41 54 55 53 A0 58 2C 59 2C 43 4F 4C |SKSTATUS.X,Y,COL|
00001320: 4F 52 00 2C 1B DE A3 20 D5 45 45 4E 00 3F 1B 10 |OR.,... .EEN.?..|
00001330: A4 54 45 58 31 30 30 20 A8 22 44 4F 53 3A 22 00 |.TEX100 ."DOS:".|
00001340: 4F 1B 42 A4 45 45 4E 20 CA 23 43 4F 4C 4F 52 00 |O.B.EEN .#COLOR.|
00001350: 5B 1B 74 A4 20 D2 24 30 32 38 36 00 64 1B A6 A4 |[.t. .$0286.d...|
00001360: 20 C2 23 59 00 6D 1B D8 A4 20 C3 23 58 00 74 1B | .#Y.m... .#X.t.|
00001370: 0A A5 20 E5 00 80 1B 3C A5 20 D6 24 46 46 46 30 |.. ....<. .$FFF0|
00001380: 00 89 1B 6E A5 20 C2 23 30 00 98 1B A0 A5 20 CA |...n. .#0..... .|
00001390: 54 45 58 31 30 30 2C 58 00 A4 1B D2 A5 20 D6 24 |TEX100,X..... .$|
000013A0: 46 46 44 32 00 AB 1B 04 A6 20 EF 00 B4 1B 36 A6 |FFD2..... ....6.|
000013B0: 20 C0 23 34 00 BE 1B 68 A6 20 F6 2A 2D 39 00 C7 | .#4...h. .*-9..|
000013C0: 1B 9A A6 20 CA 23 30 00 CE 1B CC A6 20 DA 00 D5 |... .#0..... ...|
000013D0: 1B FE A6 20 D8 00 E1 1B 30 A7 20 D6 24 46 46 42 |... ....0. .$FFB|
000013E0: 44 00 EB 1B 62 A7 20 CA 23 31 35 00 F4 1B 94 A7 |D...b. .#15.....|
000013F0: 20 C2 23 38 00 FB 1B C6 A7 20 DA 00 07 1C F8 A7 | .#8..... ......|
00001400: 20 D6 24 46 46 42 41 00 13 1C 2A A8 20 D6 24 46 | .$FFBA...*. .$F|
00001410: 46 43 30 00 1D 1C 5C A8 20 C2 23 31 35 00 29 1C |FC0...\. .#15.).|
00001420: 8E A8 20 D6 24 46 46 43 36 00 34 1C C0 A8 20 C3 |.. .$FFC6.4... .|
00001430: 23 24 30 30 00 45 1C F2 A8 54 45 58 39 38 20 D6 |#$00.E...TEX98 .|
00001440: 24 46 46 43 46 00 50 1C 24 A9 20 C4 23 24 30 44 |$FFCF.P.$. .#$0D|
00001450: 00 5C 1C 56 A9 20 F7 54 45 58 39 39 00 68 1C 88 |.\.V. .TEX99.h..|
00001460: A9 20 D6 24 46 46 44 32 00 74 1C BA A9 20 D5 54 |. .$FFD2.t... .T|
00001470: 45 58 39 38 00 83 1C EC A9 54 45 58 39 39 20 CA |EX98.....TEX99 .|
00001480: 23 31 35 00 8F 1C 1E AA 20 D6 24 46 46 43 33 00 |#15..... .$FFC3.|
00001490: 9B 1C 50 AA 20 D6 24 46 46 45 37 00 A4 1C 82 AA |..P. .$FFE7.....|
000014A0: 20 CA 23 30 00 AE 1C B4 AA 20 D2 24 43 36 00 B4 | .#0..... .$C6..|
000014B0: 1C E6 AA A2 00 DA 1C 18 AB 3B 2A 2A 2A 2A 2A 2A |.........;******|
000014C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000014D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F3 1C 4A AB A1 |**********...J..|
000014E0: 44 49 53 4B 45 52 52 4F 52 A0 58 2C 59 2C 43 4F |DISKERROR.X,Y,CO|
000014F0: 4C 4F 52 00 00 1D 7C AB 20 CA 23 43 4F 4C 4F 52 |LOR...|. .#COLOR|
00001500: 00 0C 1D AE AB 20 D2 24 30 32 38 36 00 15 1D E0 |..... .$0286....|
00001510: AB 20 C2 23 59 00 1E 1D 12 AC 20 C3 23 58 00 25 |. .#Y..... .#X.%|
00001520: 1D 44 AC 20 E5 00 31 1D 76 AC 20 D6 24 46 46 46 |.D. ..1.v. .$FFF|
00001530: 30 00 3A 1D A8 AC 20 CA 23 30 00 41 1D DA AC 20 |0.:... .#0.A... |
00001540: DA 00 48 1D 0C AD 20 D8 00 54 1D 3E AD 20 D6 24 |..H... ..T.>. .$|
00001550: 46 46 42 44 00 5E 1D 70 AD 20 CA 23 31 35 00 67 |FFBD.^.p. .#15.g|
00001560: 1D A2 AD 20 C2 23 38 00 6E 1D D4 AD 20 DA 00 7A |... .#8.n... ..z|
00001570: 1D 06 AE 20 D6 24 46 46 42 41 00 86 1D 38 AE 20 |... .$FFBA...8. |
00001580: D6 24 46 46 43 30 00 90 1D 6A AE 20 C2 23 31 35 |.$FFC0...j. .#15|
00001590: 00 9C 1D 9C AE 20 D6 24 46 46 43 36 00 A7 1D CE |..... .$FFC6....|
000015A0: AE 20 C3 23 24 30 30 00 B8 1D 00 AF 54 45 58 39 |. .#$00.....TEX9|
000015B0: 38 20 D6 24 46 46 43 46 00 C1 1D 32 AF 20 C1 23 |8 .$FFCF...2. .#|
000015C0: 30 00 CD 1D 64 AF 20 F7 54 45 58 39 37 00 D9 1D |0...d. .TEX97...|
000015D0: 96 AF 54 45 58 39 36 20 ED 00 E4 1D C8 AF 20 C4 |..TEX96 ...... .|
000015E0: 23 24 30 44 00 F0 1D FA AF 20 F7 54 45 58 39 39 |#$0D..... .TEX99|
000015F0: 00 FC 1D 2C B0 20 D6 24 46 46 44 32 00 08 1E 5E |...,. .$FFD2...^|
00001600: B0 20 D5 54 45 58 39 38 00 1A 1E 90 B0 54 45 58 |. .TEX98.....TEX|
00001610: 39 39 20 D4 54 45 58 31 30 33 00 24 1E C2 B0 20 |99 .TEX103.$... |
00001620: CA 23 31 35 00 30 1E F4 B0 20 D6 24 46 46 43 33 |.#15.0... .$FFC3|
00001630: 00 3C 1E 26 B1 20 D6 24 46 46 45 37 00 45 1E 58 |.<.&. .$FFE7.E.X|
00001640: B1 20 CA 23 30 00 4F 1E 8A B1 20 D2 24 43 36 00 |. .#0.O... .$C6.|
00001650: 5C 1E BC B1 20 D5 54 45 58 31 30 32 00 6B 1E EE |\... .TEX102.k..|
00001660: B1 54 45 58 39 37 20 C4 23 34 38 00 77 1E 20 B2 |.TEX97 .#48.w. .|
00001670: 20 F7 54 45 58 39 39 00 81 1E 52 B2 20 C4 23 34 | .TEX99...R. .#4|
00001680: 39 00 8D 1E 84 B2 20 F7 54 45 58 39 39 00 94 1E |9..... .TEX99...|
00001690: B6 B2 20 DA 00 9D 1E E8 B2 20 C2 23 30 00 AC 1E |.. ...... .#0...|
000016A0: 1A B3 20 CA 54 45 58 31 30 30 2C 58 00 B8 1E 4C |.. .TEX100,X...L|
000016B0: B3 20 D6 24 46 46 44 32 00 BF 1E 7E B3 20 EF 00 |. .$FFD2...~. ..|
000016C0: C9 1E B0 B3 20 C0 23 32 30 00 D3 1E E2 B3 20 F6 |.... .#20..... .|
000016D0: 2A 2D 39 00 DA 1E 14 B4 20 D9 00 E3 1E 46 B4 20 |*-9..... ....F. |
000016E0: C3 23 30 00 EF 1E 78 B4 20 D5 54 45 58 39 36 00 |.#0...x. .TEX96.|
000016F0: 10 1F AA B4 54 45 58 31 30 30 20 A8 22 44 4F 53 |....TEX100 ."DOS|
00001700: 20 45 52 52 4F 52 20 4D 45 53 53 41 47 45 3A 22 | ERROR MESSAGE:"|
00001710: 00 1A 1F DC B4 20 A5 24 30 44 00 2E 1F 0E B5 54 |..... .$0D.....T|
00001720: 45 58 31 30 31 20 A5 24 30 44 2C 24 30 44 00 4C |EX101 .$0D,$0D.L|
00001730: 1F 40 B5 20 A8 22 2D 48 49 59 20 4B 45 59 20 54 |.@. ."-HIY KEY T|
00001740: 4F 20 43 4F 4E 54 49 4E 55 45 2D 22 00 5B 1F 72 |O CONTINUE-".[.r|
00001750: B5 54 45 58 31 30 33 20 A5 30 30 00 6E 1F A4 B5 |.TEX103 .00.n...|
00001760: 54 45 58 31 30 32 20 C2 54 45 58 31 30 33 00 7B |TEX102 .TEX103.{|
00001770: 1F D6 B5 20 F7 54 45 58 31 30 34 00 86 1F 08 B6 |... .TEX104.....|
00001780: 20 C2 23 24 30 30 00 95 1F 3A B6 20 CA 54 45 58 | .#$00...:. .TEX|
00001790: 31 30 31 2C 58 00 A1 1F 6C B6 20 D6 24 46 46 44 |101,X...l. .$FFD|
000017A0: 32 00 A8 1F 9E B6 20 EF 00 B2 1F D0 B6 20 C0 23 |2..... ...... .#|
000017B0: 32 33 00 BC 1F 02 B7 20 F6 2A 2D 39 00 C5 1F 34 |23..... .*-9...4|
000017C0: B7 20 C2 23 30 00 CF 1F 66 B7 20 D3 24 43 36 00 |. .#0...f. .$C6.|
000017D0: D9 1F 98 B7 20 C2 24 43 35 00 E3 1F CA B7 20 C0 |.... .$C5..... .|
000017E0: 23 36 34 00 ED 1F FC B7 20 F7 2A 2D 38 00 FA 1F |#64..... .*-8...|
000017F0: 2E B8 54 45 58 31 30 34 20 E4 00 00 20 60 B8 A2 |..TEX104 ... `..|
00001800: 00 26 20 92 B8 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.& ..;**********|
00001810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001820: 2A 2A 2A 2A 2A 2A 00 34 20 C4 B8 A1 44 49 53 4B |******.4 ...DISK|
00001830: 49 4E 49 54 00 3F 20 F6 B8 20 D5 54 57 45 45 00 |INIT.? .. .TWEE.|
00001840: 4F 20 28 B9 4E 41 41 4D 20 A8 22 49 2F 30 22 00 |O (.NAAM ."I/0".|
00001850: 5C 20 5A B9 54 57 45 45 20 CA 23 33 00 6B 20 8C |\ Z.TWEE .#3.k .|
00001860: B9 20 C3 23 3E 28 4E 41 41 4D 29 00 7A 20 BE B9 |. .#>(NAAM).z ..|
00001870: 20 C2 23 3C 28 4E 41 41 4D 29 00 86 20 F0 B9 20 | .#<(NAAM).. .. |
00001880: D6 24 46 46 42 44 00 90 20 22 BA 20 CA 23 31 35 |.$FFBD.. ". .#15|
00001890: 00 99 20 54 BA 20 C2 23 38 00 A3 20 86 BA 20 C3 |.. T. .#8.. .. .|
000018A0: 23 31 35 00 AF 20 B8 BA 20 D6 24 46 46 42 41 00 |#15.. .. .$FFBA.|
000018B0: BB 20 EA BA 20 D6 24 46 46 43 30 00 C5 20 1C BB |. .. .$FFC0.. ..|
000018C0: 20 CA 23 31 35 00 D1 20 4E BB 20 D6 24 46 46 43 | .#15.. N. .$FFC|
000018D0: 33 00 DD 20 80 BB 20 D6 24 46 46 45 37 00 E3 20 |3.. .. .$FFE7.. |
000018E0: B2 BB A2 00 09 21 E4 BB 3B 2A 2A 2A 2A 2A 2A 2A |.....!..;*******|
000018F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001900: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 16 21 16 BC A1 44 |*********..!...D|
00001910: 49 53 4B 56 41 4C 00 21 21 48 BC 20 D5 44 52 49 |ISKVAL.!!H. .DRI|
00001920: 45 00 30 21 7A BC 4E 41 41 4D 33 20 A8 22 56 22 |E.0!z.NAAM3 ."V"|
00001930: 00 3D 21 AC BC 44 52 49 45 20 CA 23 31 00 4D 21 |.=!..DRIE .#1.M!|
00001940: DE BC 20 C3 23 3E 28 4E 41 41 4D 33 29 00 5D 21 |.. .#>(NAAM3).]!|
00001950: 10 BD 20 C2 23 3C 28 4E 41 41 4D 33 29 00 69 21 |.. .#<(NAAM3).i!|
00001960: 42 BD 20 D6 24 46 46 42 44 00 73 21 74 BD 20 CA |B. .$FFBD.s!t. .|
00001970: 23 31 35 00 7C 21 A6 BD 20 C2 23 38 00 86 21 D8 |#15.|!.. .#8..!.|
00001980: BD 20 C3 23 31 35 00 92 21 0A BE 20 D6 24 46 46 |. .#15..!.. .$FF|
00001990: 42 41 00 9E 21 3C BE 20 D6 24 46 46 43 30 00 A8 |BA..!<. .$FFC0..|
000019A0: 21 6E BE 20 CA 23 31 35 00 B4 21 A0 BE 20 D6 24 |!n. .#15..!.. .$|
000019B0: 46 46 43 33 00 C0 21 D2 BE 20 D6 24 46 46 45 37 |FFC3..!.. .$FFE7|
000019C0: 00 C6 21 04 BF A2 00 ED 21 36 BF 3B 2A 2A 2A 2A |..!.....!6.;****|
000019D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000019E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0C 22 |*************.."|
000019F0: 68 BF A1 4C 4F 41 44 A0 4E 41 41 4D 41 44 52 45 |h..LOAD.NAAMADRE|
00001A00: 53 2C 4C 45 4E 47 54 45 4E 41 41 4D 00 17 22 9A |S,LENGTENAAM..".|
00001A10: BF 20 CA 23 24 30 34 00 22 22 CC BF 20 C2 23 24 |. .#$04."".. .#$|
00001A20: 30 38 00 2D 22 FE BF 20 C3 23 24 30 31 00 39 22 |08.-".. .#$01.9"|
00001A30: 30 C0 20 D6 24 46 46 42 41 00 4B 22 62 C0 20 CA |0. .$FFBA.K"b. .|
00001A40: 23 4C 45 4E 47 54 45 4E 41 41 4D 00 5F 22 94 C0 |#LENGTENAAM._"..|
00001A50: 20 C2 23 3C 28 4E 41 41 4D 41 44 52 45 53 29 00 | .#<(NAAMADRES).|
00001A60: 73 22 C6 C0 20 C3 23 3E 28 4E 41 41 4D 41 44 52 |s".. .#>(NAAMADR|
00001A70: 45 53 29 00 7F 22 F8 C0 20 D6 24 46 46 42 44 00 |ES)..".. .$FFBD.|
00001A80: 8A 22 2A C1 20 CA 23 24 30 30 00 95 22 5C C1 20 |."*. .#$00.."\. |
00001A90: C2 23 24 46 46 00 A0 22 8E C1 20 C3 23 24 46 46 |.#$FF..".. .#$FF|
00001AA0: 00 AC 22 C0 C1 20 D6 24 46 46 44 35 00 B2 22 F2 |..".. .$FFD5..".|
00001AB0: C1 A2 00 D9 22 24 C2 3B 2A 2A 2A 2A 2A 2A 2A 2A |...."$.;********|
00001AC0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001AD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 F6 22 56 C2 A1 53 |*********.."V..S|
00001AE0: 41 56 45 A0 4E 41 4D 41 44 52 2C 4C 2C 41 44 52 |AVE.NAMADR,L,ADR|
00001AF0: 31 2C 41 44 52 32 00 01 23 88 C2 20 CA 23 24 30 |1,ADR2..#.. .#$0|
00001B00: 34 00 0C 23 BA C2 20 C2 23 24 30 38 00 17 23 EC |4..#.. .#$08..#.|
00001B10: C2 20 C3 23 24 30 31 00 23 23 1E C3 20 D6 24 46 |. .#$01.##.. .$F|
00001B20: 46 42 41 00 2C 23 50 C3 20 CA 23 4C 00 3D 23 82 |FBA.,#P. .#L.=#.|
00001B30: C3 20 C2 23 3C 28 4E 41 4D 41 44 52 29 00 4E 23 |. .#<(NAMADR).N#|
00001B40: B4 C3 20 C3 23 3E 28 4E 41 4D 41 44 52 29 00 5A |.. .#>(NAMADR).Z|
00001B50: 23 E6 C3 20 D6 24 46 46 42 44 00 69 23 18 C4 20 |#.. .$FFBD.i#.. |
00001B60: CA 23 3C 28 41 44 52 31 29 00 73 23 4A C4 20 D2 |.#<(ADR1).s#J. .|
00001B70: 24 30 32 00 82 23 7C C4 20 CA 23 3E 28 41 44 52 |$02..#|. .#>(ADR|
00001B80: 31 29 00 8C 23 AE C4 20 D2 24 30 33 00 9B 23 E0 |1)..#.. .$03..#.|
00001B90: C4 20 C2 23 3C 28 41 44 52 32 29 00 AA 23 12 C5 |. .#<(ADR2)..#..|
00001BA0: 20 C3 23 3E 28 41 44 52 32 29 00 B5 23 44 C5 20 | .#>(ADR2)..#D. |
00001BB0: CA 23 24 30 32 00 C1 23 76 C5 20 D6 24 46 46 44 |.#$02..#v. .$FFD|
00001BC0: 38 00 C7 23 A8 C5 A2 00 ED 23 DA C5 3B 2A 2A 2A |8..#.....#..;***|
00001BD0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001BE0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0B 24 |*************..$|
00001BF0: 0C C6 A1 53 43 52 41 54 43 48 A0 4E 41 41 4D 41 |...SCRATCH.NAAMA|
00001C00: 44 52 45 53 2C 4C 45 4E 47 54 45 00 17 24 3E C6 |DRES,LENGTE..$>.|
00001C10: 20 D5 42 45 47 49 4E 00 37 24 70 C6 4E 41 41 4D | .BEGIN.7$p.NAAM|
00001C20: 20 A8 22 53 30 3A 20 20 20 20 20 20 20 20 20 20 | ."S0: |
00001C30: 20 20 20 20 20 20 22 00 46 24 A2 C6 42 45 47 49 | ".F$..BEGI|
00001C40: 4E 20 C2 23 30 30 00 5E 24 D4 C6 54 45 58 32 30 |N .#00.^$..TEX20|
00001C50: 30 20 CA 4E 41 41 4D 41 44 52 45 53 2C 58 00 6F |0 .NAAMADRES,X.o|
00001C60: 24 06 C7 20 D2 4E 41 41 4D 2B 24 30 33 2C 58 00 |$.. .NAAM+$03,X.|
00001C70: 76 24 38 C7 20 EF 00 84 24 6A C7 20 C0 23 4C 45 |v$8. ...$j. .#LE|
00001C80: 4E 47 54 45 00 91 24 9C C7 20 F6 54 45 58 32 30 |NGTE..$.. .TEX20|
00001C90: 30 00 A1 24 CE C7 20 CA 23 4C 45 4E 47 54 45 2B |0..$.. .#LENGTE+|
00001CA0: 33 00 B0 24 00 C8 20 C3 23 3E 28 4E 41 41 4D 29 |3..$.. .#>(NAAM)|
00001CB0: 00 BF 24 32 C8 20 C2 23 3C 28 4E 41 41 4D 29 00 |..$2. .#<(NAAM).|
00001CC0: CB 24 64 C8 20 D6 24 46 46 42 44 00 D5 24 96 C8 |.$d. .$FFBD..$..|
00001CD0: 20 CA 23 31 35 00 DE 24 C8 C8 20 C2 23 38 00 E8 | .#15..$.. .#8..|
00001CE0: 24 FA C8 20 C3 23 31 35 00 F4 24 2C C9 20 D6 24 |$.. .#15..$,. .$|
00001CF0: 46 46 42 41 00 00 25 5E C9 20 D6 24 46 46 43 30 |FFBA..%^. .$FFC0|
00001D00: 00 0A 25 90 C9 20 CA 23 31 35 00 16 25 C2 C9 20 |..%.. .#15..%.. |
00001D10: D6 24 46 46 43 33 00 22 25 F4 C9 20 D6 24 46 46 |.$FFC3."%.. .$FF|
00001D20: 45 37 00 28 25 26 CA A2 00 4E 25 58 CA 3B 2A 2A |E7.(%&...N%X.;**|
00001D30: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 71 |**************.q|
00001D50: 25 8A CA 3B 4D 41 43 52 4F 20 49 4E 50 55 54 A0 |%..;MACRO INPUT.|
00001D60: 41 44 52 2C 4D 41 58 2C 58 2C 59 2C 43 4F 4C 4F |ADR,MAX,X,Y,COLO|
00001D70: 52 00 97 25 BC CA 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A |R..%..;*********|
00001D80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001D90: 2A 2A 2A 2A 2A 2A 2A 00 BC 25 EE CA 3B 53 45 54 |*******..%..;SET|
00001DA0: 20 47 4C 4F 42 41 4C 20 49 4E 50 55 54 42 41 53 | GLOBAL INPUTBAS|
00001DB0: 45 20 54 4F 20 49 4E 50 42 41 53 45 00 DC 25 20 |E TO INPBASE..% |
00001DC0: CB 3B 28 49 4E 50 42 41 53 45 3D 53 54 41 52 54 |.;(INPBASE=START|
00001DD0: 20 53 55 42 52 4F 55 54 49 4E 45 29 00 FE 25 52 | SUBROUTINE)..%R|
00001DE0: CB 3B 52 45 4D 20 20 20 20 20 20 49 4E 49 54 49 |.;REM INITI|
00001DF0: 4E 50 55 54 A0 30 2C 30 2C 30 2C 30 2C 30 00 10 |NPUT.0,0,0,0,0..|
00001E00: 26 84 CB 3B 52 45 4D 20 20 20 20 20 20 52 54 53 |&..;REM RTS|
00001E10: 00 33 26 B6 CB 3B 28 43 41 4C 4C 20 49 4E 49 54 |.3&..;(CALL INIT|
00001E20: 49 4E 50 55 54 20 54 4F 20 49 4E 54 49 41 4C 49 |INPUT TO INTIALI|
00001E30: 53 45 29 00 39 26 E8 CB 3B 00 5E 26 1A CC 3B 2A |SE).9&..;.^&..;*|
00001E40: 20 49 4E 50 55 54 20 57 4F 52 44 54 20 56 41 4E | INPUT WORDT VAN|
00001E50: 41 46 20 41 44 52 45 53 20 28 41 44 52 29 00 7A |AF ADRES (ADR).z|
00001E60: 26 4C CC 3B 2A 20 4E 45 45 52 47 45 5A 45 54 20 |&L.;* NEERGEZET |
00001E70: 49 4E 20 46 4F 52 4D 41 54 3A 00 95 26 7E CC 3B |IN FORMAT:..&~.;|
00001E80: 2A 20 4C 45 4E 47 54 45 49 4E 50 55 54 2C 49 4E |* LENGTEINPUT,IN|
00001E90: 50 55 54 2C 30 00 9B 26 B0 CC 3B 00 C1 26 E2 CC |PUT,0..&..;..&..|
00001EA0: 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |;***************|
00001EB0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00001EC0: 2A 00 E2 26 14 CD A1 49 4E 49 54 49 4E 50 55 54 |*..&...INITINPUT|
00001ED0: A0 41 44 52 2C 4D 41 58 2C 58 2C 59 2C 43 4F 4C |.ADR,MAX,X,Y,COL|
00001EE0: 4F 52 00 F5 26 46 CD 49 4E 50 42 41 53 45 20 D5 |OR..&F.INPBASE .|
00001EF0: 54 45 58 35 38 00 07 27 78 CD 54 45 58 35 31 20 |TEX58..'x.TEX51 |
00001F00: A5 3E 28 41 44 52 29 00 19 27 AA CD 54 45 58 35 |.>(ADR)..'..TEX5|
00001F10: 32 20 A5 3C 28 41 44 52 29 00 28 27 DC CD 54 45 |2 .<(ADR).('..TE|
00001F20: 58 35 33 20 A5 4D 41 58 00 35 27 0E CE 54 45 58 |X53 .MAX.5'..TEX|
00001F30: 35 34 20 A5 58 00 42 27 40 CE 54 45 58 35 35 20 |54 .X.B'@.TEX55 |
00001F40: A5 59 00 53 27 72 CE 54 45 58 35 30 20 A5 43 4F |.Y.S'r.TEX50 .CO|
00001F50: 4C 4F 52 00 64 27 A4 CE 54 45 58 35 38 20 C2 54 |LOR.d'..TEX58 .T|
00001F60: 45 58 35 30 00 70 27 D6 CE 20 D3 24 30 32 38 36 |EX50.p'.. .$0286|
00001F70: 00 7C 27 08 CF 20 C2 54 45 58 35 31 00 86 27 3A |.|'.. .TEX51..':|
00001F80: CF 20 D3 24 30 33 00 92 27 6C CF 20 C2 54 45 58 |. .$03..'l. .TEX|
00001F90: 35 32 00 9C 27 9E CF 20 D3 24 30 32 00 A8 27 D0 |52..'.. .$02..'.|
00001FA0: CF 20 C2 54 45 58 35 34 00 B4 27 02 D0 20 C3 54 |. .TEX54..'.. .T|
00001FB0: 45 58 35 35 00 BB 27 34 D0 20 E5 00 C7 27 66 D0 |EX55..'4. ...'f.|
00001FC0: 20 D6 24 46 46 46 30 00 D7 27 98 D0 54 45 58 32 | .$FFF0..'..TEX2|
00001FD0: 33 20 C2 23 24 30 30 00 E3 27 CA D0 20 D3 54 45 |3 .#$00..'.. .TE|
00001FE0: 58 32 32 00 EF 27 FC D0 20 D5 54 45 58 32 30 00 |X22..'.. .TEX20.|
00001FF0: FD 27 2E D1 54 45 58 32 32 20 A5 30 30 00 0D 28 |.'..TEX22 .00..(|
00002000: 60 D1 54 45 58 32 30 20 CA 23 31 38 35 00 19 28 |`.TEX20 .#185..(|
00002010: 92 D1 20 D6 24 46 46 44 32 00 2A 28 C4 D1 54 45 |.. .$FFD2.*(..TE|
00002020: 58 32 31 20 D6 24 46 46 45 34 00 36 28 F6 D1 20 |X21 .$FFE4.6(.. |
00002030: C9 54 45 58 32 32 00 42 28 28 D2 20 C3 54 45 58 |.TEX22.B((. .TEX|
00002040: 32 32 00 4E 28 5A D2 20 C1 54 45 58 35 33 00 5A |22.N(Z. .TEX53.Z|
00002050: 28 8C D2 20 F7 54 45 58 32 39 00 65 28 BE D2 20 |(.. .TEX29.e(.. |
00002060: C4 23 24 30 30 00 71 28 F0 D2 20 F6 54 45 58 32 |.#$00.q(.. .TEX2|
00002070: 34 00 7D 28 22 D3 20 C7 54 45 58 32 32 00 89 28 |4.}(". .TEX22..(|
00002080: 54 D3 20 D5 54 45 58 32 31 00 98 28 86 D3 54 45 |T. .TEX21..(..TE|
00002090: 58 32 34 20 C4 23 31 33 00 A4 28 B8 D3 20 F7 54 |X24 .#13..(.. .T|
000020A0: 45 58 32 38 00 AF 28 EA D3 20 C4 23 31 34 38 00 |EX28..(.. .#148.|
000020B0: BB 28 1C D4 20 F7 54 45 58 32 31 00 C6 28 4E D4 |.(.. .TEX21..(N.|
000020C0: 20 C4 23 31 35 37 00 D2 28 80 D4 20 F7 54 45 58 | .#157..(.. .TEX|
000020D0: 32 31 00 DC 28 B2 D4 20 C4 23 32 39 00 E8 28 E4 |21..(.. .#29..(.|
000020E0: D4 20 F7 54 45 58 32 31 00 F2 28 16 D5 20 C4 23 |. .TEX21..(.. .#|
000020F0: 31 37 00 FE 28 48 D5 20 F7 54 45 58 32 31 00 09 |17..(H. .TEX21..|
00002100: 29 7A D5 20 C4 23 31 34 35 00 15 29 AC D5 20 F7 |)z. .#145..).. .|
00002110: 54 45 58 32 31 00 1F 29 DE D5 20 C4 23 32 30 00 |TEX21..).. .#20.|
00002120: 2B 29 10 D6 20 F6 54 45 58 32 36 00 36 29 42 D6 |+).. .TEX26.6)B.|
00002130: 20 C1 23 24 30 31 00 42 29 74 D6 20 F6 54 45 58 | .#$01.B)t. .TEX|
00002140: 32 35 00 4D 29 A6 D6 20 C3 23 24 30 30 00 59 29 |25.M).. .#$00.Y)|
00002150: D8 D6 20 D4 54 45 58 32 32 00 65 29 0A D7 20 D5 |.. .TEX22.e).. .|
00002160: 54 45 58 32 31 00 76 29 3C D7 54 45 58 32 35 20 |TEX21.v)<.TEX25 |
00002170: C7 54 45 58 32 32 00 82 29 6E D7 20 C7 54 45 58 |.TEX22..)n. .TEX|
00002180: 32 32 00 8E 29 A0 D7 20 D5 54 45 58 32 37 00 A1 |22..).. .TEX27..|
00002190: 29 D2 D7 54 45 58 32 36 20 D2 28 24 30 32 29 2C |)..TEX26 .($02),|
000021A0: 59 00 AD 29 04 D8 54 45 58 32 37 20 D8 00 B8 29 |Y..)..TEX27 ...)|
000021B0: 36 D8 20 CA 23 31 35 37 00 C4 29 68 D8 20 D6 24 |6. .#157..)h. .$|
000021C0: 46 46 44 32 00 CB 29 9A D8 20 D7 00 D7 29 CC D8 |FFD2..).. ...)..|
000021D0: 20 D6 24 46 46 44 32 00 E3 29 FE D8 20 D5 54 45 | .$FFD2..).. .TE|
000021E0: 58 32 30 00 F2 29 30 D9 54 45 58 32 38 20 CA 23 |X20..)0.TEX28 .#|
000021F0: 32 30 00 FE 29 62 D9 20 D6 24 46 46 44 32 00 0A |20..)b. .$FFD2..|
00002200: 2A 94 D9 20 C3 54 45 58 32 32 00 14 2A C6 D9 20 |*.. .TEX22..*.. |
00002210: CA 23 30 30 00 22 2A F8 D9 20 D2 28 24 30 32 29 |.#00."*.. .($02)|
00002220: 2C 59 00 2E 2A 2A DA 20 C7 54 45 58 32 32 00 3A |,Y..**. .TEX22.:|
00002230: 2A 5C DA 20 CA 54 45 58 32 32 00 45 2A 8E DA 20 |*\. .TEX22.E*.. |
00002240: C3 23 24 30 30 00 53 2A C0 DA 20 D2 28 24 30 32 |.#$00.S*.. .($02|
00002250: 29 2C 59 00 5A 2A F2 DA 20 E3 00 69 2A 24 DB 54 |),Y.Z*.. ..i*$.T|
00002260: 45 58 32 39 20 CA 23 32 30 00 7A 2A 56 DB 54 45 |EX29 .#20.z*V.TE|
00002270: 58 33 30 20 D6 24 46 46 44 32 00 81 2A 88 DB 20 |X30 .$FFD2..*.. |
00002280: EC 00 8D 2A BA DB 20 F6 54 45 58 33 30 00 99 2A |...*.. .TEX30..*|
00002290: EC DB 20 D5 54 45 58 32 33 00 9F 2A 1E DC A2 00 |.. .TEX23..*....|
000022A0: C5 2A 50 DC 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.*P.;***********|
000022B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000022C0: 2A 2A 2A 2A 2A 00 E2 2A 82 DC A1 49 4E 50 55 54 |*****..*...INPUT|
000022D0: A0 41 44 52 2C 4D 41 58 2C 58 2C 59 2C 43 4F 4C |.ADR,MAX,X,Y,COL|
000022E0: 4F 52 00 EE 2A B4 DC 20 D5 54 45 58 35 38 00 00 |OR..*.. .TEX58..|
000022F0: 2B E6 DC 54 45 58 35 36 20 A5 3E 28 41 44 52 29 |+..TEX56 .>(ADR)|
00002300: 00 0D 2B 18 DD 20 A5 3C 28 41 44 52 29 00 19 2B |..+.. .<(ADR)..+|
00002310: 4A DD 20 A5 4D 41 58 2B 32 00 21 2B 7C DD 20 A5 |J. .MAX+2.!+|. .|
00002320: 59 00 29 2B AE DD 20 A5 58 00 35 2B E0 DD 20 A5 |Y.)+.. .X.5+.. .|
00002330: 43 4F 4C 4F 52 00 45 2B 12 DE 54 45 58 35 38 20 |COLOR.E+..TEX58 |
00002340: C2 23 24 30 30 00 58 2B 44 DE 54 45 58 35 37 20 |.#$00.X+D.TEX57 |
00002350: CA 54 45 58 35 36 2C 58 00 6E 2B 76 DE 20 D2 49 |.TEX56,X.n+v. .I|
00002360: 4E 50 55 54 42 41 53 45 2B 24 30 33 2C 58 00 75 |NPUTBASE+$03,X.u|
00002370: 2B A8 DE 20 EF 00 7E 2B DA DE 20 C0 23 36 00 8A |+.. ..~+.. .#6..|
00002380: 2B 0C DF 20 F6 54 45 58 35 37 00 9A 2B 3E DF 20 |+.. .TEX57..+>. |
00002390: D6 49 4E 50 55 54 42 41 53 45 00 A0 2B 70 DF A2 |.INPUTBASE..+p..|
000023A0: 00 00 00 |... |
..$. 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.U..ULO CLRHOME.J.NW DISKERROR 0,1
,1.W..W CLRHOME....W UBEGIN...F\IN CLRHO
ME...G\ WINDOW 4,3,29,9,1.C..\WIN TEXT T
EKST1,5,4,1.Z.*] TEXT TEKST2,5,6,1...\]
TEXT TEKST3,5,8,1....] TEXT TEKST4,5,10,
1...V^QQ .....^TT .14,8.)..^ .".".<..^BE
GIN PRINT TT.E.._ VIN.R.P_EEN VWIN.B.._
CURSOR 4,5.M.._ J#250.Y.._ V$FFD2....` P
AUSE 100...J`IN0 INKEY. .|` D#01....` .I
NJ1....` UQQ.B..AINJ1 D#64.L.DA .IN0.V.V
A VWIN....A CURSOR 6,5...ZA J#250....B V
$FFD2...>B PAUSE 100...PBIN1 INKEY.$..B
D#01./.TB .INJ2.8..C UQQ.F.8CINJ2 D#64.P
.JC .IN1.Z..C VWIN.J.NC CURSOR 8,5.U..D
J#250...2D V$FFD2...DD PAUSE 100....DIN2
INKEY...HD D#01....D .INJ3...,E UQQ.J.^
EINJ3 D#64.T..E .IN2...BE VWIN....E CURS
OR 10,5...&F J#250...XF V$FFD2....F PAUS
E 100.#..FIN3 INKEY.-..F D#01.8. G .INJ4
.A.RG UQQ.O..GINJ4 D#64.Y..G .IN3.C..G U
EEN.J..N .....NTEKST1 .". .DISPLAY ."..
..NTEKST2 .". .DISPLAY ALL PIC'S ON DISK
."..."OTEKST3 .". .MIRROR
."....OTEKST4 .". .EXIT
.".*.NP.WINDOW X,Y,X1,Y1,COLV
AL.3..P B#X.<..P ST9.E..P B#Y.N..Q ST8.Z
.HQ UBEGIN.F.ZQT1 .".".R..QT2 .".".~..QT
3 ."."....RT7 ."."...BRT4 ."."...TRT5 ."
."....RT6 ." "...XRT8 .00.D..ST9 .00.U.<
SSET J#COLVAL...NS R$0286... SPOINT BT8.
..RS CT9....T ....6T V$FFF0...HT ..!..TB
EGIN VSET.*.LT JT1.6..T V$FFD2.@.0U B#00
.I.BU JT5.X..UEEN V$FFD2._.FU ..K..U .#X
1-2.U.*V .EEN.~.\V JT2....V V$FFD2....VD
RIE IT8....V VSET...$W JT4...VW V$FFD2..
..W B#00.I..W JT6.Y..WEENN V$FFD2....X .
...PX .#X1-2....X .EENN....X JT4....X V$
FFD2....Y JT8.!.JY D#Y1+1.,.|Y .DRIE.5..
Y IT8.?..Y VSET.H..Z JT3.T.DZ V$FFD2.^.V
Z B#00.G..Z JT5.X.ZZEENNN V$FFD2...{ ..
..>{ .#X1-2...P{ .EENNN. ..{ JT7...T{ V$
FFD2....|..V.8|;************************
******...J|.SCREENCOLOR COLOR....| C#COL
OR...N| T53281....}..0.2};**************
****************.G.D}.BORDERCOLOR COLOR.
T..} C#COLOR.`.H} T53280.F..}....,~;****
**************************...^~.FILLCOLO
R COLOR....~ J#COLOR...B~ B#$00.I..~TEX1
R$D800,X.W.& R$D900,X...X R$DA00,X...
. ..... .TEX1....TEX2 R$DB00,X... . .
...R. .#$E8.&... .TEX2.,.....P...;******
************************.^....COLORINC.I
.L. B#$00.{.~.TEX1 I$D800,X..... I$D900,
X..... I$DA00,X..... ....F. .TEX1...X.TE
X2 I$DB00,X.B... ..M... .#$E8.X... .TEX2
...@.....R.;****************************
**......CLRHOME...V. J#147.&... V$FFD2.,
.:...P.L.;******************************
.T...;* MACRO TEXT ADRES,X,Y,KLEUR *...P
.;******************************......TE
XT TADR,XVAL,YVAL,COLVAL.F.4. J#COLVAL.R
.F. R$0286..... B#YVAL...J. C#XVAL.....
...... V$FFF0...`. B#$00.....TEX1 JTADR,
X.$.D. D#$FF./... .TEX2.;.(. V$FFD2.B.Z.
..M... UTEX1.X...TEX2 ..^.......".;****
************************...T.;* MACRO PR
INT ADRES *.D...;****************
************.T....PRINT TADR..... B#$00.
....TEX1 JTADR,X...N. D#$FF..... .TEX2..
... V$FFD2..... ..$... UTEX1./.H.TEX2 ..
:.Z. J#$0D.F... V$FFD2.L.....N...;******
**********************...B.;* MACRO KEY
WAIT *...T.;******************
**********......KEY WAIT.O.X.TEX1 B#$00.
.... S$00C6...<. J$00C5...N. D#WAIT... .
.TEX1...R........CURSOR X,Y...6. B#X.&.
H. C#Y.-... ..9.L. V$FFF0.?.....J.0..INK
EY.U.B. B#$00.A... S$00C6.M.F. J$00C5.S.
......*..PAUSE P...\. B#00..... C#$FF...
.. V$EEB3..... ....$. .#<(P)...V. .*-6.E
... ..Q... A#>(P)..... .*-11.........P.;
********************************.....;*
HERBIE'S DISK MACRO'S 1.1 *.T...;****
****************************.C...;MACRO
DIR.....;MACRO LOAD NAAMADRES,LENGTENAAM
...J.;MACRO SAVE NAMADR,L,ADR1,ADR2.O.|.
;MACRO SCRATCH NAAMADRES,LENGTE.....;MAC
RO DISKSTATUS X,Y,COLOR.....;MACRO DISKE
RROR X,Y,COLOR."...;MACRO DISKINIT.5.D.;
MACRO DISKVAL.[.V.;*********************
***********.D....DIR.O.Z. J#$24.{... R$0
100...>. V$AAD7...P. J#$01..... Z...T. B
#$00..... V$FFBD...8. B#$08.F.J. C#$60.R
... V$FFBA...N. V$F3D5..... J$BA...2. V$
FFB4...D. J$B9..... V$FF96...H. J#$00...
.. R$90.*.,. C#$03.8.^.TEX0 T$FF.D... V$
FFA5.N.B. R$FE.X... C$90.C.&. .TEX4.O.X.
V$FFA5.Y... C$90..... .TEX4..... C$FF..
. . .. .R. .TEX0..... B$FE..... V$BDCD.A
... VTEX5.Q...TEX1 V$FFA5...L. B$90...~.
.TEX4..... Z..... X..... .TEX2...F. V$F
FD2...X. UTEX1.&...TEX2 V$AAD7.1... J#$0
0.;... R$C6.E.@. J$C5.O.R. D#60.Z... .TE
X7.D.V. D#63.O... .TEX4.~.:.TEX3 C#$02..
.L. UTEX0.....TEX4 V$F642...P. J#$08....
. R$BA...4. V$FFB4.E.F. J#$6F.O... R$B9.
..J. V$FF96..... V$FFAB..... J#$00...`.
R$C6..... UTEX10...D.TEX5 J#$20.#... U$F
FD2./.( B$02F7.;.Z V$FFC9.F.. .TEX6.R
.. U$E0F9.].. TEX6 ..L.".TEX7 B#$00.|.T
.TEX8 V$EEB3..... ...... .TEX8.....TEX9
J#$00..... R$C6...N. J$C5..... D#60.F...
.TEX9.Q... UTEX3.....TEX10 ....H.....Z.
;*******************************."....DI
SKSTATUS X,Y,COLOR.,... UEEN.?...TEX100
."DOS:".O.B.EEN J#COLOR.[.T. R$0286.D...
B#Y.M.X. C#X.T... ....<. V$FFF0...N. B#
0... . JTEX100,X...R. V$FFD2..... ....6.
.#4...H. .*-9.G... J#0.N.L. Z.U... X...
0. V$FFBD...B. J#15..... B#8...F. Z.....
V$FFBA...*. V$FFC0...\. B#15.)... V$FFC
6.4... C#$00.E...TEX98 V$FFCF.P.$. D#$0D
.\.V. .TEX99.H... V$FFD2.T... UTEX98....
.TEX99 J#15..... V$FFC3...P. V$FFE7.....
J#0..... R$C6.......Z...;**************
******************...J..DISKERROR X,Y,CO
LOR...|. J#COLOR..... R$0286..... B#Y...
.. C#X.%.D. ..1.V. V$FFF0.:... J#0.A.Z.
Z.H... X.T.>. V$FFBD.^.P. J#15.G... B#8.
N.T. Z.Z... V$FFBA...8. V$FFC0...J. B#15
..... V$FFC6...N. C#$00.....TEX98 V$FFCF
.A.2. A#0.M.D. .TEX97.Y...TEX96 ....H. D
#$0D..... .TEX99...,. V$FFD2...^. UTEX98
.....TEX99 TTEX103.$.B. J#15.0... V$FFC3
.<.&. V$FFE7.E.X. J#0.O... R$C6.\... UTE
X102.K...TEX97 D#48.W. . .TEX99...R. D#4
9..... .TEX99..... Z..... B#0..... JTEX1
00,X...L. V$FFD2...~. ..I... .#20.S... .
*-9.Z... Y...F. C#0...X. UTEX96.....TEX1
00 ."DOS ERROR MESSAGE:"..... .$0D.....T
EX101 .$0D,$0D.L.@. ."-HIY KEY TO CONTIN
UE-".[.R.TEX103 .00.N...TEX102 BTEX103.{
.V. .TEX104..... B#$00...:. JTEX101,X...
L. V$FFD2..... ....P. .#23..... .*-9.E.4
. B#0.O.F. S$C6.Y... B$C5...J. .#64.....
.*-8.....TEX104 ... `...& ..;**********
**********************.4 D..DISKINIT.? .
. UTWEE.O (.NAAM ."I/0".\ Z.TWEE J#3.K .
. C#>(NAAM).Z .. B#<(NAAM).. .. V$FFBD..
". J#15.. T. B#8.. .. C#15.. .. V$FFBA.
. .. V$FFC0.E .. J#15.Q N. V$FFC3.. .. V
$FFE7.. .....!..;***********************
*********..!...DISKVAL.!!H. UDRIE.0!Z.NA
AM3 ."V".=!..DRIE J#1.M!.. C#>(NAAM3).]!
.. B#<(NAAM3).I!B. V$FFBD.S!T. J#15.|!..
B#8..!X. C#15..!.. V$FFBA..!<. V$FFC0..
!N. J#15..! . V$FFC3..!R. V$FFE7.F!.....
!6.;*********************************.."
H..LOAD NAAMADRES,LENGTENAAM..".. J#$04.
""L. B#$08.-".. C#$01.9"0. V$FFBA.K"B. J
#LENGTENAAM._".. B#<(NAAMADRES).S"F. C#>
(NAAMADRES).".. V$FFBD.."*A J#$00.."\A
B#$FF. ".A C#$FF..".A V$FFD5..".A..Y"$B;
*********************************.."VB.S
AVE NAMADR,L,ADR1,ADR2..#.B J#$04..#.B B
#$08..#.B C#$01.##.C V$FFBA.,#PC J#L.=#.
C B#<(NAMADR).N#.C C#>(NAMADR).Z#.C V$FF
BD.I#.D J#<(ADR1).S#JD R$02..#|D J#>(ADR
1)..#.D R$03..#.D B#<(ADR2)..#.E C#>(ADR
2)..#DE J#$02.A#VE V$FFD8.G#.E...#ZE;***
*****************************..$.F.SCRAT
CH NAAMADRES,LENGTE..$>F UBEGIN.7$PFNAAM
."S0: ".F$.FBEGIN B#00.^
$TFTEX200 JNAAMADRES,X.O$.G RNAAM+$03,X.
V$8G ...$JG .#LENGTE..$.G .TEX200..$NG J
#LENGTE+3..$.H C#>(NAAM)..$2H B#<(NAAM).
K$DH V$FFBD.U$.H J#15..$HH B#8..$.H C#15
..$,I V$FFBA..%^I V$FFC0..%.I J#15..%BI
V$FFC3."%.I V$FFE7.(%&J..N%XJ;**********
**********************.Q%.J;MACRO INPUT
ADR,MAX,X,Y,COLOR..%.J;*****************
***************..%.J;SET GLOBAL INPUTBAS
E TO INPBASE..% K;(INPBASE=START SUBROUT
INE)..%RK;REM INITINPUT 0,0,0,0,0..
&.K;REM RTS.3&.K;(CALL INITINPUT TO
INTIALISE).9&.K;.^&.L;* INPUT WORDT VAN
AF ADRES (ADR).Z&LL;* NEERGEZET IN FORMA
T:..&~L;* LENGTEINPUT,INPUT,0..&.L;.A&.L
;********************************..&.M.I
NITINPUT ADR,MAX,X,Y,COLOR..&FMINPBASE U
TEX58..'XMTEX51 .>(ADR)..'.MTEX52 .<(ADR
).('.MTEX53 .MAX.5'.NTEX54 .X.B'@NTEX55
.Y.S'RNTEX50 .COLOR.D'.NTEX58 BTEX50.P'V
N S$0286.|'.O BTEX51..':O S$03..'LO BTEX
52..'.O S$02..'PO BTEX54..'.P CTEX55..'4
P ..G'FP V$FFF0.W'.PTEX23 B#$00..'JP STE
X22..'.P UTEX20..'.QTEX22 .00..(`QTEX20
J#185..(.Q V$FFD2.*(DQTEX21 V$FFE4.6(.Q
ITEX22.B((R CTEX22.N(ZR ATEX53.Z(.R .TEX
29.E(.R D#$00.Q(.R .TEX24.}("S GTEX22..(
TS UTEX21..(.STEX24 D#13..(.S .TEX28..(.
S D#148..(.T .TEX21.F(NT D#157.R(.T .TEX
21..(.T D#29..(.T .TEX21..(.U D#17..(HU
.TEX21..)ZU D#145..).U .TEX21..).U D#20.
+).V .TEX26.6)BV A#$01.B)TV .TEX25.M).V
C#$00.Y)XV TTEX22.E).W UTEX21.V)<WTEX25
GTEX22..)NW GTEX22..) W UTEX27..)RWTEX26
R($02),Y..).XTEX27 X..)6X J#157.D)HX V$
FFD2.K).X W.W)LX V$FFD2..).X UTEX20..)0Y
TEX28 J#20..)BY V$FFD2..*.Y CTEX22..*FY
J#00."*.Y R($02),Y..**Z GTEX22.:*\Z JTEX
22.E*.Z C#$00.S*.Z R($02),Y.Z*.Z ..I*$.T
EX29 J#20.Z*V.TEX30 V$FFD2..*.. ...*.. .
TEX30..*.. UTEX23..*....E*P.;***********
*********************..*...INPUT ADR,MAX
,X,Y,COLOR..*.. UTEX58..+..TEX56 .>(ADR)
..+.. .<(ADR)..+J. .MAX+2.!+|. .Y.)+.. .
X.5+.. .COLOR.E+..TEX58 B#$00.X+D.TEX57
JTEX56,X.N+V. RINPUTBASE+$03,X.U+.. ..~+
Z. .#6..+.. .TEX57..+>. VINPUTBASE. +P..
...
> CLICK IMAGE PREVIEW FOR FULL MODAL