MACROOO
FILE INFORMATION
FILENAME(S): MACROOO
FILE TYPE(S): DEL
FILE SIZE: 3.6K
FIRST SEEN: 2025-11-30 21:09:59
APPEARS ON: 1 disk(s)
FILE HASH
4e2ffb58b9a143b9c33701fa5a03671f8f2fdd8fd6c4e59fb88e4e1f5deb9b0f
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GIGA ASSEMBLER | MACROOO | DEL | DuncanTwain | 26 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: AC 20 E5 00 DB 21 76 AC 20 D6 24 46 46 46 30 00 |. ...!v. .$FFF0.|
00000010: E4 21 A8 AC 20 CA 23 30 00 EB 21 DA AC 20 DA 00 |.!.. .#0..!.. ..|
00000020: F2 21 0C AD 20 D8 00 FE 21 3E AD 20 D6 24 46 46 |.!.. ...!>. .$FF|
00000030: 42 44 00 08 22 70 AD 20 CA 23 31 35 00 11 22 A2 |BD.."p. .#15..".|
00000040: AD 20 C2 23 38 00 18 22 D4 AD 20 DA 00 24 22 06 |. .#8..".. ..$".|
00000050: AE 20 D6 24 46 46 42 41 00 30 22 38 AE 20 D6 24 |. .$FFBA.0"8. .$|
00000060: 46 46 43 30 00 3A 22 6A AE 20 C2 23 31 35 00 46 |FFC0.:"j. .#15.F|
00000070: 22 9C AE 20 D6 24 46 46 43 36 00 51 22 CE AE 20 |".. .$FFC6.Q".. |
00000080: C3 23 24 30 30 00 62 22 00 AF 54 45 58 39 38 20 |.#$00.b"..TEX98 |
00000090: D6 24 46 46 43 46 00 6B 22 32 AF 20 C1 23 30 00 |.$FFCF.k"2. .#0.|
000000A0: 77 22 64 AF 20 F7 54 45 58 39 37 00 83 22 96 AF |w"d. .TEX97.."..|
000000B0: 54 45 58 39 36 20 ED 00 8E 22 C8 AF 20 C4 23 24 |TEX96 ...".. .#$|
000000C0: 30 44 00 9A 22 FA AF 20 F7 54 45 58 39 39 00 A6 |0D..".. .TEX99..|
000000D0: 22 2C B0 20 D6 24 46 46 44 32 00 B2 22 5E B0 20 |",. .$FFD2.."^. |
000000E0: D5 54 45 58 39 38 00 C4 22 90 B0 54 45 58 39 39 |.TEX98.."..TEX99|
000000F0: 20 D4 54 45 58 31 30 33 00 CE 22 C2 B0 20 CA 23 | .TEX103..".. .#|
00000100: 31 35 00 DA 22 F4 B0 20 D6 24 46 46 43 33 00 E6 |15..".. .$FFC3..|
00000110: 22 26 B1 20 D6 24 46 46 45 37 00 EF 22 58 B1 20 |"&. .$FFE7.."X. |
00000120: CA 23 30 00 F9 22 8A B1 20 D2 24 43 36 00 06 23 |.#0..".. .$C6..#|
00000130: BC B1 20 D5 54 45 58 31 30 32 00 15 23 EE B1 54 |.. .TEX102..#..T|
00000140: 45 58 39 37 20 C4 23 34 38 00 21 23 20 B2 20 F7 |EX97 .#48.!# . .|
00000150: 54 45 58 39 39 00 2B 23 52 B2 20 C4 23 34 39 00 |TEX99.+#R. .#49.|
00000160: 37 23 84 B2 20 F7 54 45 58 39 39 00 3E 23 B6 B2 |7#.. .TEX99.>#..|
00000170: 20 DA 00 47 23 E8 B2 20 C2 23 30 00 56 23 1A B3 | ..G#.. .#0.V#..|
00000180: 20 CA 54 45 58 31 30 30 2C 58 00 62 23 4C B3 20 | .TEX100,X.b#L. |
00000190: D6 24 46 46 44 32 00 69 23 7E B3 20 EF 00 73 23 |.$FFD2.i#~. ..s#|
000001A0: B0 B3 20 C0 23 32 30 00 7D 23 E2 B3 20 F6 2A 2D |.. .#20.}#.. .*-|
000001B0: 39 00 84 23 14 B4 20 D9 00 8D 23 46 B4 20 C3 23 |9..#.. ...#F. .#|
000001C0: 30 00 99 23 78 B4 20 D5 54 45 58 39 36 00 BA 23 |0..#x. .TEX96..#|
000001D0: AA B4 54 45 58 31 30 30 20 A8 22 44 4F 53 20 45 |..TEX100 ."DOS E|
000001E0: 52 52 4F 52 20 4D 45 53 53 41 47 45 3A 22 00 C4 |RROR MESSAGE:"..|
000001F0: 23 DC B4 20 A5 24 30 44 00 D8 23 0E B5 54 45 58 |#.. .$0D..#..TEX|
00000200: 31 30 31 20 A5 24 30 44 2C 24 30 44 00 F6 23 40 |101 .$0D,$0D..#@|
00000210: B5 20 A8 22 2D 48 49 59 20 4B 45 59 20 54 4F 20 |. ."-HIY KEY TO |
00000220: 43 4F 4E 54 49 4E 55 45 2D 22 00 05 24 72 B5 54 |CONTINUE-"..$r.T|
00000230: 45 58 31 30 33 20 A5 30 30 00 18 24 A4 B5 54 45 |EX103 .00..$..TE|
00000240: 58 31 30 32 20 C2 54 45 58 31 30 33 00 25 24 D6 |X102 .TEX103.%$.|
00000250: B5 20 F7 54 45 58 31 30 34 00 30 24 08 B6 20 C2 |. .TEX104.0$.. .|
00000260: 23 24 30 30 00 3F 24 3A B6 20 CA 54 45 58 31 30 |#$00.?$:. .TEX10|
00000270: 31 2C 58 00 4B 24 6C B6 20 D6 24 46 46 44 32 00 |1,X.K$l. .$FFD2.|
00000280: 52 24 9E B6 20 EF 00 5C 24 D0 B6 20 C0 23 32 33 |R$.. ..\$.. .#23|
00000290: 00 66 24 02 B7 20 F6 2A 2D 39 00 6F 24 34 B7 20 |.f$.. .*-9.o$4. |
000002A0: C2 23 30 00 79 24 66 B7 20 D3 24 43 36 00 83 24 |.#0.y$f. .$C6..$|
000002B0: 98 B7 20 C2 24 43 35 00 8D 24 CA B7 20 C0 23 36 |.. .$C5..$.. .#6|
000002C0: 34 00 97 24 FC B7 20 F7 2A 2D 38 00 A4 24 2E B8 |4..$.. .*-8..$..|
000002D0: 54 45 58 31 30 34 20 E4 00 AA 24 60 B8 A2 00 D0 |TEX104 ...$`....|
000002E0: 24 92 B8 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |$..;************|
000002F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000300: 2A 2A 2A 2A 00 DE 24 C4 B8 A1 44 49 53 4B 49 4E |****..$...DISKIN|
00000310: 49 54 00 E9 24 F6 B8 20 D5 54 57 45 45 00 F9 24 |IT..$.. .TWEE..$|
00000320: 28 B9 4E 41 41 4D 20 A8 22 49 2F 30 22 00 06 25 |(.NAAM ."I/0"..%|
00000330: 5A B9 54 57 45 45 20 CA 23 33 00 15 25 8C B9 20 |Z.TWEE .#3..%.. |
00000340: C3 23 3E 28 4E 41 41 4D 29 00 24 25 BE B9 20 C2 |.#>(NAAM).$%.. .|
00000350: 23 3C 28 4E 41 41 4D 29 00 30 25 F0 B9 20 D6 24 |#<(NAAM).0%.. .$|
00000360: 46 46 42 44 00 3A 25 22 BA 20 CA 23 31 35 00 43 |FFBD.:%". .#15.C|
00000370: 25 54 BA 20 C2 23 38 00 4D 25 86 BA 20 C3 23 31 |%T. .#8.M%.. .#1|
00000380: 35 00 59 25 B8 BA 20 D6 24 46 46 42 41 00 65 25 |5.Y%.. .$FFBA.e%|
00000390: EA BA 20 D6 24 46 46 43 30 00 6F 25 1C BB 20 CA |.. .$FFC0.o%.. .|
000003A0: 23 31 35 00 7B 25 4E BB 20 D6 24 46 46 43 33 00 |#15.{%N. .$FFC3.|
000003B0: 87 25 80 BB 20 D6 24 46 46 45 37 00 8D 25 B2 BB |.%.. .$FFE7..%..|
000003C0: A2 00 B3 25 E4 BB 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A |...%..;*********|
000003D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000003E0: 2A 2A 2A 2A 2A 2A 2A 00 C0 25 16 BC A1 44 49 53 |*******..%...DIS|
000003F0: 4B 56 41 4C 00 CB 25 48 BC 20 D5 44 52 49 45 00 |KVAL..%H. .DRIE.|
00000400: DA 25 7A BC 4E 41 41 4D 33 20 A8 22 56 22 00 E7 |.%z.NAAM3 ."V"..|
00000410: 25 AC BC 44 52 49 45 20 CA 23 31 00 F7 25 DE BC |%..DRIE .#1..%..|
00000420: 20 C3 23 3E 28 4E 41 41 4D 33 29 00 07 26 10 BD | .#>(NAAM3)..&..|
00000430: 20 C2 23 3C 28 4E 41 41 4D 33 29 00 13 26 42 BD | .#<(NAAM3)..&B.|
00000440: 20 D6 24 46 46 42 44 00 1D 26 74 BD 20 CA 23 31 | .$FFBD..&t. .#1|
00000450: 35 00 26 26 A6 BD 20 C2 23 38 00 30 26 D8 BD 20 |5.&&.. .#8.0&.. |
00000460: C3 23 31 35 00 3C 26 0A BE 20 D6 24 46 46 42 41 |.#15.<&.. .$FFBA|
00000470: 00 48 26 3C BE 20 D6 24 46 46 43 30 00 52 26 6E |.H&<. .$FFC0.R&n|
00000480: BE 20 CA 23 31 35 00 5E 26 A0 BE 20 D6 24 46 46 |. .#15.^&.. .$FF|
00000490: 43 33 00 6A 26 D2 BE 20 D6 24 46 46 45 37 00 70 |C3.j&.. .$FFE7.p|
000004A0: 26 04 BF A2 00 97 26 36 BF 3B 2A 2A 2A 2A 2A 2A |&.....&6.;******|
000004B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000004C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B6 26 68 BF |***********..&h.|
000004D0: A1 4C 4F 41 44 A0 4E 41 41 4D 41 44 52 45 53 2C |.LOAD.NAAMADRES,|
000004E0: 4C 45 4E 47 54 45 4E 41 41 4D 00 C1 26 9A BF 20 |LENGTENAAM..&.. |
000004F0: CA 23 24 30 34 00 CC 26 CC BF 20 C2 23 24 30 38 |.#$04..&.. .#$08|
00000500: 00 D7 26 FE BF 20 C3 23 24 30 31 00 E3 26 30 C0 |..&.. .#$01..&0.|
00000510: 20 D6 24 46 46 42 41 00 F5 26 62 C0 20 CA 23 4C | .$FFBA..&b. .#L|
00000520: 45 4E 47 54 45 4E 41 41 4D 00 09 27 94 C0 20 C2 |ENGTENAAM..'.. .|
00000530: 23 3C 28 4E 41 41 4D 41 44 52 45 53 29 00 1D 27 |#<(NAAMADRES)..'|
00000540: C6 C0 20 C3 23 3E 28 4E 41 41 4D 41 44 52 45 53 |.. .#>(NAAMADRES|
00000550: 29 00 29 27 F8 C0 20 D6 24 46 46 42 44 00 34 27 |).)'.. .$FFBD.4'|
00000560: 2A C1 20 CA 23 24 30 30 00 3F 27 5C C1 20 C2 23 |*. .#$00.?'\. .#|
00000570: 24 46 46 00 4A 27 8E C1 20 C3 23 24 46 46 00 56 |$FF.J'.. .#$FF.V|
00000580: 27 C0 C1 20 D6 24 46 46 44 35 00 5C 27 F2 C1 A2 |'.. .$FFD5.\'...|
00000590: 00 83 27 24 C2 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..'$.;**********|
000005A0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000005B0: 2A 2A 2A 2A 2A 2A 2A 00 A0 27 56 C2 A1 53 41 56 |*******..'V..SAV|
000005C0: 45 A0 4E 41 4D 41 44 52 2C 4C 2C 41 44 52 31 2C |E.NAMADR,L,ADR1,|
000005D0: 41 44 52 32 00 AB 27 88 C2 20 CA 23 24 30 34 00 |ADR2..'.. .#$04.|
000005E0: B6 27 BA C2 20 C2 23 24 30 38 00 C1 27 EC C2 20 |.'.. .#$08..'.. |
000005F0: C3 23 24 30 31 00 CD 27 1E C3 20 D6 24 46 46 42 |.#$01..'.. .$FFB|
00000600: 41 00 D6 27 50 C3 20 CA 23 4C 00 E7 27 82 C3 20 |A..'P. .#L..'.. |
00000610: C2 23 3C 28 4E 41 4D 41 44 52 29 00 F8 27 B4 C3 |.#<(NAMADR)..'..|
00000620: 20 C3 23 3E 28 4E 41 4D 41 44 52 29 00 04 28 E6 | .#>(NAMADR)..(.|
00000630: C3 20 D6 24 46 46 42 44 00 13 28 18 C4 20 CA 23 |. .$FFBD..(.. .#|
00000640: 3C 28 41 44 52 31 29 00 1D 28 4A C4 20 D2 24 30 |<(ADR1)..(J. .$0|
00000650: 32 00 2C 28 7C C4 20 CA 23 3E 28 41 44 52 31 29 |2.,(|. .#>(ADR1)|
00000660: 00 36 28 AE C4 20 D2 24 30 33 00 45 28 E0 C4 20 |.6(.. .$03.E(.. |
00000670: C2 23 3C 28 41 44 52 32 29 00 54 28 12 C5 20 C3 |.#<(ADR2).T(.. .|
00000680: 23 3E 28 41 44 52 32 29 00 5F 28 44 C5 20 CA 23 |#>(ADR2)._(D. .#|
00000690: 24 30 32 00 6B 28 76 C5 20 D6 24 46 46 44 38 00 |$02.k(v. .$FFD8.|
000006A0: 71 28 A8 C5 A2 00 97 28 DA C5 3B 2A 2A 2A 2A 2A |q(.....(..;*****|
000006B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
000006C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B5 28 0C C6 |***********..(..|
000006D0: A1 53 43 52 41 54 43 48 A0 4E 41 41 4D 41 44 52 |.SCRATCH.NAAMADR|
000006E0: 45 53 2C 4C 45 4E 47 54 45 00 C1 28 3E C6 20 D5 |ES,LENGTE..(>. .|
000006F0: 42 45 47 49 4E 00 E1 28 70 C6 4E 41 41 4D 20 A8 |BEGIN..(p.NAAM .|
00000700: 22 53 30 3A 20 20 20 20 20 20 20 20 20 20 20 20 |"S0: |
00000710: 20 20 20 20 22 00 F0 28 A2 C6 42 45 47 49 4E 20 | "..(..BEGIN |
00000720: C2 23 30 30 00 08 29 D4 C6 54 45 58 32 30 30 20 |.#00..)..TEX200 |
00000730: CA 4E 41 41 4D 41 44 52 45 53 2C 58 00 19 29 06 |.NAAMADRES,X..).|
00000740: C7 20 D2 4E 41 41 4D 2B 24 30 33 2C 58 00 20 29 |. .NAAM+$03,X. )|
00000750: 38 C7 20 EF 00 2E 29 6A C7 20 C0 23 4C 45 4E 47 |8. ...)j. .#LENG|
00000760: 54 45 00 3B 29 9C C7 20 F6 54 45 58 32 30 30 00 |TE.;).. .TEX200.|
00000770: 4B 29 CE C7 20 CA 23 4C 45 4E 47 54 45 2B 33 00 |K).. .#LENGTE+3.|
00000780: 5A 29 00 C8 20 C3 23 3E 28 4E 41 41 4D 29 00 69 |Z).. .#>(NAAM).i|
00000790: 29 32 C8 20 C2 23 3C 28 4E 41 41 4D 29 00 75 29 |)2. .#<(NAAM).u)|
000007A0: 64 C8 20 D6 24 46 46 42 44 00 7F 29 96 C8 20 CA |d. .$FFBD..).. .|
000007B0: 23 31 35 00 88 29 C8 C8 20 C2 23 38 00 92 29 FA |#15..).. .#8..).|
000007C0: C8 20 C3 23 31 35 00 9E 29 2C C9 20 D6 24 46 46 |. .#15..),. .$FF|
000007D0: 42 41 00 AA 29 5E C9 20 D6 24 46 46 43 30 00 B4 |BA..)^. .$FFC0..|
000007E0: 29 90 C9 20 CA 23 31 35 00 C0 29 C2 C9 20 D6 24 |).. .#15..).. .$|
000007F0: 46 46 43 33 00 CC 29 F4 C9 20 D6 24 46 46 45 37 |FFC3..).. .$FFE7|
00000800: 00 D2 29 26 CA A2 00 F8 29 58 CA 3B 2A 2A 2A 2A |..)&....)X.;****|
00000810: 2A 2A 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 00 1B 2A 8A |************..*.|
00000830: CA 3B 4D 41 43 52 4F 20 49 4E 50 55 54 A0 41 44 |.;MACRO INPUT.AD|
00000840: 52 2C 4D 41 58 2C 58 2C 59 2C 43 4F 4C 4F 52 00 |R,MAX,X,Y,COLOR.|
00000850: 41 2A BC CA 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |A*..;***********|
00000860: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000870: 2A 2A 2A 2A 2A 00 66 2A EE CA 3B 53 45 54 20 47 |*****.f*..;SET G|
00000880: 4C 4F 42 41 4C 20 49 4E 50 55 54 42 41 53 45 20 |LOBAL INPUTBASE |
00000890: 54 4F 20 49 4E 50 42 41 53 45 00 86 2A 20 CB 3B |TO INPBASE..* .;|
000008A0: 28 49 4E 50 42 41 53 45 3D 53 54 41 52 54 20 53 |(INPBASE=START S|
000008B0: 55 42 52 4F 55 54 49 4E 45 29 00 A8 2A 52 CB 3B |UBROUTINE)..*R.;|
000008C0: 52 45 4D 20 20 20 20 20 20 49 4E 49 54 49 4E 50 |REM INITINP|
000008D0: 55 54 A0 30 2C 30 2C 30 2C 30 2C 30 00 BA 2A 84 |UT.0,0,0,0,0..*.|
000008E0: CB 3B 52 45 4D 20 20 20 20 20 20 52 54 53 00 DD |.;REM RTS..|
000008F0: 2A B6 CB 3B 28 43 41 4C 4C 20 49 4E 49 54 49 4E |*..;(CALL INITIN|
00000900: 50 55 54 20 54 4F 20 49 4E 54 49 41 4C 49 53 45 |PUT TO INTIALISE|
00000910: 29 00 E3 2A E8 CB 3B 00 08 2B 1A CC 3B 2A 20 49 |)..*..;..+..;* I|
00000920: 4E 50 55 54 20 57 4F 52 44 54 20 56 41 4E 41 46 |NPUT WORDT VANAF|
00000930: 20 41 44 52 45 53 20 28 41 44 52 29 00 24 2B 4C | ADRES (ADR).$+L|
00000940: CC 3B 2A 20 4E 45 45 52 47 45 5A 45 54 20 49 4E |.;* NEERGEZET IN|
00000950: 20 46 4F 52 4D 41 54 3A 00 3F 2B 7E CC 3B 2A 20 | FORMAT:.?+~.;* |
00000960: 4C 45 4E 47 54 45 49 4E 50 55 54 2C 49 4E 50 55 |LENGTEINPUT,INPU|
00000970: 54 2C 30 00 45 2B B0 CC 3B 00 6B 2B E2 CC 3B 2A |T,0.E+..;.k+..;*|
00000980: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000990: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.|
000009A0: 8C 2B 14 CD A1 49 4E 49 54 49 4E 50 55 54 A0 41 |.+...INITINPUT.A|
000009B0: 44 52 2C 4D 41 58 2C 58 2C 59 2C 43 4F 4C 4F 52 |DR,MAX,X,Y,COLOR|
000009C0: 00 9F 2B 46 CD 49 4E 50 42 41 53 45 20 D5 54 45 |..+F.INPBASE .TE|
000009D0: 58 35 38 00 B1 2B 78 CD 54 45 58 35 31 20 A5 3E |X58..+x.TEX51 .>|
000009E0: 28 41 44 52 29 00 C3 2B AA CD 54 45 58 35 32 20 |(ADR)..+..TEX52 |
000009F0: A5 3C 28 41 44 52 29 00 D2 2B DC CD 54 45 58 35 |.<(ADR)..+..TEX5|
00000A00: 33 20 A5 4D 41 58 00 DF 2B 0E CE 54 45 58 35 34 |3 .MAX..+..TEX54|
00000A10: 20 A5 58 00 EC 2B 40 CE 54 45 58 35 35 20 A5 59 | .X..+@.TEX55 .Y|
00000A20: 00 FD 2B 72 CE 54 45 58 35 30 20 A5 43 4F 4C 4F |..+r.TEX50 .COLO|
00000A30: 52 00 0E 2C A4 CE 54 45 58 35 38 20 C2 54 45 58 |R..,..TEX58 .TEX|
00000A40: 35 30 00 1A 2C D6 CE 20 D3 24 30 32 38 36 00 26 |50..,.. .$0286.&|
00000A50: 2C 08 CF 20 C2 54 45 58 35 31 00 30 2C 3A CF 20 |,.. .TEX51.0,:. |
00000A60: D3 24 30 33 00 3C 2C 6C CF 20 C2 54 45 58 35 32 |.$03.<,l. .TEX52|
00000A70: 00 46 2C 9E CF 20 D3 24 30 32 00 52 2C D0 CF 20 |.F,.. .$02.R,.. |
00000A80: C2 54 45 58 35 34 00 5E 2C 02 D0 20 C3 54 45 58 |.TEX54.^,.. .TEX|
00000A90: 35 35 00 65 2C 34 D0 20 E5 00 71 2C 66 D0 20 D6 |55.e,4. ..q,f. .|
00000AA0: 24 46 46 46 30 00 81 2C 98 D0 54 45 58 32 33 20 |$FFF0..,..TEX23 |
00000AB0: C2 23 24 30 30 00 8D 2C CA D0 20 D3 54 45 58 32 |.#$00..,.. .TEX2|
00000AC0: 32 00 99 2C FC D0 20 D5 54 45 58 32 30 00 A7 2C |2..,.. .TEX20..,|
00000AD0: 2E D1 54 45 58 32 32 20 A5 30 30 00 B7 2C 60 D1 |..TEX22 .00..,`.|
00000AE0: 54 45 58 32 30 20 CA 23 31 38 35 00 C3 2C 92 D1 |TEX20 .#185..,..|
00000AF0: 20 D6 24 46 46 44 32 00 D4 2C C4 D1 54 45 58 32 | .$FFD2..,..TEX2|
00000B00: 31 20 D6 24 46 46 45 34 00 E0 2C F6 D1 20 C9 54 |1 .$FFE4..,.. .T|
00000B10: 45 58 32 32 00 EC 2C 28 D2 20 C3 54 45 58 32 32 |EX22..,(. .TEX22|
00000B20: 00 F8 2C 5A D2 20 C1 54 45 58 35 33 00 04 2D 8C |..,Z. .TEX53..-.|
00000B30: D2 20 F7 54 45 58 32 39 00 0F 2D BE D2 20 C4 23 |. .TEX29..-.. .#|
00000B40: 24 30 30 00 1B 2D F0 D2 20 F6 54 45 58 32 34 00 |$00..-.. .TEX24.|
00000B50: 27 2D 22 D3 20 C7 54 45 58 32 32 00 33 2D 54 D3 |'-". .TEX22.3-T.|
00000B60: 20 D5 54 45 58 32 31 00 42 2D 86 D3 54 45 58 32 | .TEX21.B-..TEX2|
00000B70: 34 20 C4 23 31 33 00 4E 2D B8 D3 20 F7 54 45 58 |4 .#13.N-.. .TEX|
00000B80: 32 38 00 59 2D EA D3 20 C4 23 31 34 38 00 65 2D |28.Y-.. .#148.e-|
00000B90: 1C D4 20 F7 54 45 58 32 31 00 70 2D 4E D4 20 C4 |.. .TEX21.p-N. .|
00000BA0: 23 31 35 37 00 7C 2D 80 D4 20 F7 54 45 58 32 31 |#157.|-.. .TEX21|
00000BB0: 00 86 2D B2 D4 20 C4 23 32 39 00 92 2D E4 D4 20 |..-.. .#29..-.. |
00000BC0: F7 54 45 58 32 31 00 9C 2D 16 D5 20 C4 23 31 37 |.TEX21..-.. .#17|
00000BD0: 00 A8 2D 48 D5 20 F7 54 45 58 32 31 00 B3 2D 7A |..-H. .TEX21..-z|
00000BE0: D5 20 C4 23 31 34 35 00 BF 2D AC D5 20 F7 54 45 |. .#145..-.. .TE|
00000BF0: 58 32 31 00 C9 2D DE D5 20 C4 23 32 30 00 D5 2D |X21..-.. .#20..-|
00000C00: 10 D6 20 F6 54 45 58 32 36 00 E0 2D 42 D6 20 C1 |.. .TEX26..-B. .|
00000C10: 23 24 30 31 00 EC 2D 74 D6 20 F6 54 45 58 32 35 |#$01..-t. .TEX25|
00000C20: 00 F7 2D A6 D6 20 C3 23 24 30 30 00 03 2E D8 D6 |..-.. .#$00.....|
00000C30: 20 D4 54 45 58 32 32 00 0F 2E 0A D7 20 D5 54 45 | .TEX22..... .TE|
00000C40: 58 32 31 00 20 2E 3C D7 54 45 58 32 35 20 C7 54 |X21. .<.TEX25 .T|
00000C50: 45 58 32 32 00 2C 2E 6E D7 20 C7 54 45 58 32 32 |EX22.,.n. .TEX22|
00000C60: 00 38 2E A0 D7 20 D5 54 45 58 32 37 00 4B 2E D2 |.8... .TEX27.K..|
00000C70: D7 54 45 58 32 36 20 D2 28 24 30 32 29 2C 59 00 |.TEX26 .($02),Y.|
00000C80: 57 2E 04 D8 54 45 58 32 37 20 D8 00 62 2E 36 D8 |W...TEX27 ..b.6.|
00000C90: 20 CA 23 31 35 37 00 6E 2E 68 D8 20 D6 24 46 46 | .#157.n.h. .$FF|
00000CA0: 44 32 00 75 2E 9A D8 20 D7 00 81 2E CC D8 20 D6 |D2.u... ...... .|
00000CB0: 24 46 46 44 32 00 8D 2E FE D8 20 D5 54 45 58 32 |$FFD2..... .TEX2|
00000CC0: 30 00 9C 2E 30 D9 54 45 58 32 38 20 CA 23 32 30 |0...0.TEX28 .#20|
00000CD0: 00 A8 2E 62 D9 20 D6 24 46 46 44 32 00 B4 2E 94 |...b. .$FFD2....|
00000CE0: D9 20 C3 54 45 58 32 32 00 BE 2E C6 D9 20 CA 23 |. .TEX22..... .#|
00000CF0: 30 30 00 CC 2E F8 D9 20 D2 28 24 30 32 29 2C 59 |00..... .($02),Y|
00000D00: 00 D8 2E 2A DA 20 C7 54 45 58 32 32 00 E4 2E 5C |...*. .TEX22...\|
00000D10: DA 20 CA 54 45 58 32 32 00 EF 2E 8E DA 20 C3 23 |. .TEX22..... .#|
00000D20: 24 30 30 00 FD 2E C0 DA 20 D2 28 24 30 32 29 2C |$00..... .($02),|
00000D30: 59 00 04 2F F2 DA 20 E3 00 13 2F 24 DB 54 45 58 |Y../.. .../$.TEX|
00000D40: 32 39 20 CA 23 32 30 00 24 2F 56 DB 54 45 58 33 |29 .#20.$/V.TEX3|
00000D50: 30 20 D6 24 46 46 44 32 00 2B 2F 88 DB 20 EC 00 |0 .$FFD2.+/.. ..|
00000D60: 37 2F BA DB 20 F6 54 45 58 33 30 00 43 2F EC DB |7/.. .TEX30.C/..|
00000D70: 20 D5 54 45 58 32 33 00 49 2F 1E DC A2 00 6F 2F | .TEX23.I/....o/|
00000D80: 50 DC 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |P.;*************|
00000D90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************|
00000DA0: 2A 2A 2A 00 8C 2F 82 DC A1 49 4E 50 55 54 A0 41 |***../...INPUT.A|
00000DB0: 44 52 2C 4D 41 58 2C 58 2C 59 2C 43 4F 4C 4F 52 |DR,MAX,X,Y,COLOR|
00000DC0: 00 98 2F B4 DC 20 D5 54 45 58 35 38 00 AA 2F E6 |../.. .TEX58../.|
00000DD0: DC 54 45 58 35 36 20 A5 3E 28 41 44 52 29 00 B7 |.TEX56 .>(ADR)..|
00000DE0: 2F 18 DD 20 A5 3C 28 41 44 52 29 00 C3 2F 4A DD |/.. .<(ADR)../J.|
00000DF0: 20 A5 4D 41 58 2B 32 00 CB 2F 7C DD 20 A5 59 00 | .MAX+2../|. .Y.|
00000E00: D3 2F AE DD 20 A5 58 00 DF 2F E0 DD 20 A5 43 4F |./.. .X../.. .CO|
00000E10: 4C 4F 52 00 EF 2F 12 DE 54 45 58 35 38 20 C2 23 |LOR../..TEX58 .#|
00000E20: 24 30 30 00 02 30 44 DE 54 45 58 35 37 20 CA 54 |$00..0D.TEX57 .T|
00000E30: 45 58 35 36 2C 58 00 18 30 76 DE 20 D2 49 4E 50 |EX56,X..0v. .INP|
00000E40: 55 54 42 41 53 45 2B 24 30 33 2C 58 00 1F 30 A8 |UTBASE+$03,X..0.|
00000E50: DE 20 EF 00 28 30 DA DE 20 C0 23 36 00 34 30 0C |. ..(0.. .#6.40.|
00000E60: DF 20 F6 54 45 58 35 37 00 44 30 3E DF 20 D6 49 |. .TEX57.D0>. .I|
00000E70: 4E 50 55 54 42 41 53 45 00 4A 30 70 DF A2 00 00 |NPUTBASE.J0p....|
00000E80: 00 |. |
. ...!V. V$FFF0..!.. J#0..!Z. Z..!.. X..
!>. V$FFBD.."P. J#15..".. B#8.."T. Z.$".
. V$FFBA.0"8. V$FFC0.:"J. B#15.F".. V$FF
C6.Q"N. C#$00.B"..TEX98 V$FFCF.K"2. A#0.
W"D. .TEX97.."..TEX96 ..."H. D#$0D.."..
.TEX99..",. V$FFD2.."^. UTEX98.D"..TEX99
TTEX103.N"B. J#15.Z".. V$FFC3.."&. V$FF
E7.."X. J#0..".. R$C6..#.. UTEX102..#..T
EX97 D#48.!# . .TEX99.+#R. D#49.7#.. .TE
X99.>#.. Z.G#.. B#0.V#.. JTEX100,X.B#L.
V$FFD2.I#~. ..S#.. .#20.}#.. .*-9..#.. Y
..#F. C#0..#X. UTEX96..#..TEX100 ."DOS E
RROR MESSAGE:".D#.. .$0D.X#..TEX101 .$0D
,$0D..#@. ."-HIY KEY TO CONTINUE-"..$R.T
EX103 .00..$..TEX102 BTEX103.%$V. .TEX10
4.0$.. B#$00.?$:. JTEX101,X.K$L. V$FFD2.
R$.. ..\$P. .#23.F$.. .*-9.O$4. B#0.Y$F.
S$C6..$.. B$C5..$J. .#64..$.. .*-8..$..
TEX104 ...$`...P$..;********************
************..$D..DISKINIT..$.. UTWEE..$
(.NAAM ."I/0"..%Z.TWEE J#3..%.. C#>(NAAM
).$%.. B#<(NAAM).0%.. V$FFBD.:%". J#15.C
%T. B#8.M%.. C#15.Y%.. V$FFBA.E%.. V$FFC
0.O%.. J#15.{%N. V$FFC3..%.. V$FFE7..%..
...%..;********************************.
.%...DISKVAL.K%H. UDRIE.Z%Z.NAAM3 ."V"..
%..DRIE J#1..%.. C#>(NAAM3)..&.. B#<(NAA
M3)..&B. V$FFBD..&T. J#15.&&.. B#8.0&X.
C#15.<&.. V$FFBA.H&<. V$FFC0.R&N. J#15.^
& . V$FFC3.J&R. V$FFE7.P&.....&6.;******
***************************..&H..LOAD NA
AMADRES,LENGTENAAM.A&.. J#$04.L&L. B#$08
.W&.. C#$01..&0. V$FFBA..&B. J#LENGTENAA
M..'.. B#<(NAAMADRES)..'F. C#>(NAAMADRES
).)'.. V$FFBD.4'*A J#$00.?'\A B#$FF.J'.A
C#$FF.V'.A V$FFD5.\'.A...'$B;**********
***********************. 'VB.SAVE NAMADR
,L,ADR1,ADR2..'.B J#$04..'.B B#$08.A'.B
C#$01.M'.C V$FFBA.V'PC J#L..'.C B#<(NAMA
DR)..'.C C#>(NAMADR)..(.C V$FFBD..(.D J#
<(ADR1)..(JD R$02.,(|D J#>(ADR1).6(.D R$
03.E(.D B#<(ADR2).T(.E C#>(ADR2)._(DE J#
$02.K(VE V$FFD8.Q(.E...(ZE;*************
*******************..(.F.SCRATCH NAAMADR
ES,LENGTE.A(>F UBEGIN..(PFNAAM ."S0:
"..(.FBEGIN B#00..)TFTEX200
JNAAMADRES,X..).G RNAAM+$03,X. )8G ...)J
G .#LENGTE.;).G .TEX200.K)NG J#LENGTE+3.
Z).H C#>(NAAM).I)2H B#<(NAAM).U)DH V$FFB
D.).H J#15..)HH B#8..).H C#15..),I V$FF
BA..)^I V$FFC0..).I J#15..)BI V$FFC3.L).
I V$FFE7.R)&J...)XJ;********************
************..*.J;MACRO INPUT ADR,MAX,X,
Y,COLOR.A*.J;***************************
*****.F*.J;SET GLOBAL INPUTBASE TO INPBA
SE..* K;(INPBASE=START SUBROUTINE)..*RK;
REM INITINPUT 0,0,0,0,0..*.K;REM
RTS..*.K;(CALL INITINPUT TO INTIALISE
)..*.K;..+.L;* INPUT WORDT VANAF ADRES (
ADR).$+LL;* NEERGEZET IN FORMAT:.?+~L;*
LENGTEINPUT,INPUT,0.E+.L;.K+.L;*********
***********************..+.M.INITINPUT A
DR,MAX,X,Y,COLOR..+FMINPBASE UTEX58..+XM
TEX51 .>(ADR).C+.MTEX52 .<(ADR).R+.MTEX5
3 .MAX..+.NTEX54 .X..+@NTEX55 .Y..+RNTEX
50 .COLOR..,.NTEX58 BTEX50..,VN S$0286.&
,.O BTEX51.0,:O S$03.<,LO BTEX52.F,.O S$
02.R,PO BTEX54.^,.P CTEX55.E,4P ..Q,FP V
$FFF0..,.PTEX23 B#$00..,JP STEX22..,.P U
TEX20..,.QTEX22 .00..,`QTEX20 J#185.C,.Q
V$FFD2.T,DQTEX21 V$FFE4..,.Q ITEX22..,(
R CTEX22..,ZR ATEX53..-.R .TEX29..-.R D#
$00..-.R .TEX24.'-"S GTEX22.3-TS UTEX21.
B-.STEX24 D#13.N-.S .TEX28.Y-.S D#148.E-
.T .TEX21.P-NT D#157.|-.T .TEX21..-.T D#
29..-.T .TEX21..-.U D#17..-HU .TEX21..-Z
U D#145..-.U .TEX21.I-.U D#20.U-.V .TEX2
6..-BV A#$01..-TV .TEX25..-.V C#$00...XV
TTEX22....W UTEX21. .<WTEX25 GTEX22.,.N
W GTEX22.8. W UTEX27.K.RWTEX26 R($02),Y.
W..XTEX27 X.B.6X J#157.N.HX V$FFD2.U..X
W...LX V$FFD2....X UTEX20...0YTEX28 J#20
...BY V$FFD2....Y CTEX22...FY J#00.L..Y
R($02),Y.X.*Z GTEX22...\Z JTEX22....Z C#
$00....Z R($02),Y../.Z .../$.TEX29 J#20.
$/V.TEX30 V$FFD2.+/.. ..7/.. .TEX30.C/..
UTEX23.I/....O/P.;*********************
***********../...INPUT ADR,MAX,X,Y,COLOR
../.. UTEX58../..TEX56 .>(ADR)../.. .<(A
DR).C/J. .MAX+2.K/|. .Y.S/.. .X../.. .CO
LOR../..TEX58 B#$00..0D.TEX57 JTEX56,X..
0V. RINPUTBASE+$03,X..0.. ..(0Z. .#6.40.
. .TEX57.D0>. VINPUTBASE.J0P.....
> CLICK IMAGE PREVIEW FOR FULL MODAL