QWEST
FILE INFORMATION
FILENAME(S): QWEST
FILE TYPE(S): PRG
FILE SIZE: 2.7K
FIRST SEEN: 2025-11-30 21:09:59
APPEARS ON: 1 disk(s)
FILE HASH
1e7b7afb1691ee6709e5e42c27157cfd80be17c75eb6576c8b127baee3fca889
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| GIGA ASSEMBLER | QWEST | PRG | DuncanTwain | 25 | 2 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 88 13 44 00 2B 08 BA 13 3B 2A 20 4D |......D.+...;* M| 00000010: 41 43 52 4F 20 54 45 58 54 20 41 44 52 45 53 2C |ACRO TEXT ADRES,| 00000020: 58 2C 59 2C 4B 4C 45 55 52 20 2A 00 36 08 EC 13 |X,Y,KLEUR *.6...| 00000030: AA 24 43 30 30 30 00 41 08 1E 14 B7 24 43 30 30 |.$C000.A....$C00| 00000040: 30 00 5A 08 50 14 20 57 49 4E 44 4F 57 A0 31 34 |0.Z.P. WINDOW.14| 00000050: 2C 36 2C 31 32 2C 31 36 2C 31 00 72 08 82 14 20 |,6,12,16,1.r... | 00000060: 54 45 58 54 A0 54 45 4B 53 54 31 2C 31 35 2C 37 |TEXT.TEKST1,15,7| 00000070: 2C 31 00 8A 08 B4 14 20 54 45 58 54 A0 54 45 4B |,1..... TEXT.TEK| 00000080: 53 54 32 2C 31 35 2C 39 2C 31 00 A3 08 E6 14 20 |ST2,15,9,1..... | 00000090: 54 45 58 54 A0 54 45 4B 53 54 33 2C 31 35 2C 31 |TEXT.TEKST3,15,1| 000000A0: 31 2C 31 00 BC 08 18 15 20 54 45 58 54 A0 54 45 |1,1..... TEXT.TE| 000000B0: 4B 53 54 34 2C 31 35 2C 31 33 2C 31 00 D5 08 4A |KST4,15,13,1...J| 000000C0: 15 20 54 45 58 54 A0 54 45 4B 53 54 35 2C 31 35 |. TEXT.TEKST5,15| 000000D0: 2C 31 35 2C 31 00 EE 08 7C 15 20 54 45 58 54 A0 |,15,1...|. TEXT.| 000000E0: 54 45 4B 53 54 36 2C 31 35 2C 31 37 2C 31 00 FA |TEKST6,15,17,1..| 000000F0: 08 AE 15 20 4B 45 59 A0 36 30 00 01 09 E0 15 20 |... KEY.60..... | 00000100: E3 00 1D 09 12 16 54 45 4B 53 54 31 20 A8 22 12 |......TEKST1 .".| 00000110: 20 92 44 49 52 45 43 54 4F 52 59 FF 22 00 39 09 | .DIRECTORY.".9.| 00000120: 44 16 54 45 4B 53 54 32 20 A8 22 12 20 92 4C 4F |D.TEKST2 .". .LO| 00000130: 41 44 20 20 20 20 20 FF 22 00 55 09 76 16 54 45 |AD .".U.v.TE| 00000140: 4B 53 54 33 20 A8 22 12 20 92 53 41 56 45 20 20 |KST3 .". .SAVE | 00000150: 20 20 20 FF 22 00 71 09 A8 16 54 45 4B 53 54 34 | .".q...TEKST4| 00000160: 20 A8 22 12 20 92 53 43 52 41 54 43 48 20 20 FF | .". .SCRATCH .| 00000170: 22 00 8D 09 DA 16 54 45 4B 53 54 35 20 A8 22 12 |".....TEKST5 .".| 00000180: 20 92 56 41 4C 49 44 41 54 45 20 FF 22 00 A9 09 | .VALIDATE ."...| 00000190: 0C 17 54 45 4B 53 54 36 20 A8 22 12 20 92 45 58 |..TEKST6 .". .EX| 000001A0: 49 54 20 20 20 20 20 FF 22 00 C6 09 3E 17 A1 57 |IT ."...>..W| 000001B0: 49 4E 44 4F 57 A0 58 2C 59 2C 58 31 2C 59 31 2C |INDOW.X,Y,X1,Y1,| 000001C0: 43 4F 4C 56 41 4C 00 CF 09 70 17 20 C2 23 58 00 |COLVAL...p. .#X.| 000001D0: D8 09 A2 17 20 D3 54 39 00 E1 09 D4 17 20 C2 23 |.... .T9..... .#| 000001E0: 59 00 EA 09 06 18 20 D3 54 38 00 F6 09 38 18 20 |Y..... .T8...8. | 000001F0: D5 42 45 47 49 4E 00 02 0A 6A 18 54 31 20 A8 22 |.BEGIN...j.T1 ."| 00000200: B0 22 00 0E 0A 9C 18 54 32 20 A8 22 AE 22 00 1A |.".....T2 ."."..| 00000210: 0A CE 18 54 33 20 A8 22 AD 22 00 26 0A 00 19 54 |...T3 .".".&...T| 00000220: 37 20 A8 22 BD 22 00 32 0A 32 19 54 34 20 A8 22 |7 .".".2.2.T4 ."| 00000230: DD 22 00 3E 0A 64 19 54 35 20 A8 22 C0 22 00 4A |.".>.d.T5 .".".J| 00000240: 0A 96 19 54 36 20 A8 22 20 22 00 55 0A C8 19 54 |...T6 ." ".U...T| 00000250: 38 20 A5 30 30 00 60 0A FA 19 54 39 20 A5 30 30 |8 .00.`...T9 .00| 00000260: 00 71 0A 2C 1A 53 45 54 20 CA 23 43 4F 4C 56 41 |.q.,.SET .#COLVA| 00000270: 4C 00 7D 0A 5E 1A 20 D2 24 30 32 38 36 00 8B 0A |L.}.^. .$0286...| 00000280: 90 1A 50 4F 49 4E 54 20 C2 54 38 00 94 0A C2 1A |..POINT .T8.....| 00000290: 20 C3 54 39 00 9B 0A F4 1A 20 E5 00 A7 0A 26 1B | .T9..... ....&.| 000002A0: 20 D6 24 46 46 46 30 00 AE 0A 58 1B 20 E3 00 BD | .$FFF0...X. ...| 000002B0: 0A 8A 1B 42 45 47 49 4E 20 D6 53 45 54 00 C6 0A |...BEGIN .SET...| 000002C0: BC 1B 20 CA 54 31 00 D2 0A EE 1B 20 D6 24 46 46 |.. .T1..... .$FF| 000002D0: 44 32 00 DC 0A 20 1C 20 C2 23 30 30 00 E5 0A 52 |D2... . .#00...R| 000002E0: 1C 20 CA 54 35 00 F4 0A 84 1C 45 45 4E 20 D6 24 |. .T5.....EEN .$| 000002F0: 46 46 44 32 00 FB 0A B6 1C 20 EF 00 07 0B E8 1C |FFD2..... ......| 00000300: 20 C0 23 58 31 2D 32 00 11 0B 1A 1D 20 F6 45 45 | .#X1-2..... .EE| 00000310: 4E 00 1A 0B 4C 1D 20 CA 54 32 00 26 0B 7E 1D 20 |N...L. .T2.&.~. | 00000320: D6 24 46 46 44 32 00 33 0B B0 1D 44 52 49 45 20 |.$FFD2.3...DRIE | 00000330: C9 54 38 00 3D 0B E2 1D 20 D6 53 45 54 00 46 0B |.T8.=... .SET.F.| 00000340: 14 1E 20 CA 54 34 00 52 0B 46 1E 20 D6 24 46 46 |.. .T4.R.F. .$FF| 00000350: 44 32 00 5C 0B 78 1E 20 C2 23 30 30 00 65 0B AA |D2.\.x. .#00.e..| 00000360: 1E 20 CA 54 36 00 75 0B DC 1E 45 45 4E 4E 20 D6 |. .T6.u...EENN .| 00000370: 24 46 46 44 32 00 7C 0B 0E 1F 20 EF 00 88 0B 40 |$FFD2.|... ....@| 00000380: 1F 20 C0 23 58 31 2D 32 00 93 0B 72 1F 20 F6 45 |. .#X1-2...r. .E| 00000390: 45 4E 4E 00 9C 0B A4 1F 20 CA 54 34 00 A8 0B D6 |ENN..... .T4....| 000003A0: 1F 20 D6 24 46 46 44 32 00 B1 0B 08 20 20 CA 54 |. .$FFD2.... .T| 000003B0: 38 00 BD 0B 3A 20 20 C4 23 59 31 2B 31 00 C8 0B |8...: .#Y1+1...| 000003C0: 6C 20 20 F6 44 52 49 45 00 D1 0B 9E 20 20 C9 54 |l .DRIE.... .T| 000003D0: 38 00 DB 0B D0 20 20 D6 53 45 54 00 E4 0B 02 21 |8.... .SET....!| 000003E0: 20 CA 54 33 00 F0 0B 34 21 20 D6 24 46 46 44 32 | .T3...4! .$FFD2| 000003F0: 00 FA 0B 66 21 20 C2 23 30 30 00 03 0C 98 21 20 |...f! .#00....! | 00000400: CA 54 35 00 14 0C CA 21 45 45 4E 4E 4E 20 D6 24 |.T5....!EENNN .$| 00000410: 46 46 44 32 00 1B 0C FC 21 20 EF 00 27 0C 2E 22 |FFD2....! ..'.."| 00000420: 20 C0 23 58 31 2D 32 00 33 0C 60 22 20 F6 45 45 | .#X1-2.3.`" .EE| 00000430: 4E 4E 4E 00 3C 0C 92 22 20 CA 54 37 00 48 0C C4 |NNN.<.." .T7.H..| 00000440: 22 20 D6 24 46 46 44 32 00 4E 0C F6 22 A2 00 72 |" .$FFD2.N.."..r| 00000450: 0C 28 23 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.(#;************| 00000460: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000470: 2A 2A 00 89 0C 5A 23 A1 53 43 52 45 45 4E 43 4F |**...Z#.SCREENCO| 00000480: 4C 4F 52 A0 43 4F 4C 4F 52 00 96 0C 8C 23 20 C3 |LOR.COLOR....# .| 00000490: 23 43 4F 4C 4F 52 00 A2 0C BE 23 20 D4 35 33 32 |#COLOR....# .532| 000004A0: 38 31 00 A8 0C F0 23 A2 00 CC 0C 22 24 3B 2A 2A |81....#...."$;**| 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 2A 00 E3 0C 54 |************...T| 000004D0: 24 A1 42 4F 52 44 45 52 43 4F 4C 4F 52 A0 43 4F |$.BORDERCOLOR.CO| 000004E0: 4C 4F 52 00 F0 0C 86 24 20 C3 23 43 4F 4C 4F 52 |LOR....$ .#COLOR| 000004F0: 00 FC 0C B8 24 20 D4 35 33 32 38 30 00 02 0D EA |....$ .53280....| 00000500: 24 A2 00 26 0D 1C 25 3B 2A 2A 2A 2A 2A 2A 2A 2A |$..&..%;********| 00000510: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000520: 2A 2A 2A 2A 2A 2A 00 3B 0D 4E 25 A1 46 49 4C 4C |******.;.N%.FILL| 00000530: 43 4F 4C 4F 52 A0 43 4F 4C 4F 52 00 48 0D 80 25 |COLOR.COLOR.H..%| 00000540: 20 CA 23 43 4F 4C 4F 52 00 53 0D B2 25 20 C2 23 | .#COLOR.S..% .#| 00000550: 24 30 30 00 65 0D E4 25 54 45 58 31 20 D2 24 44 |$00.e..%TEX1 .$D| 00000560: 38 30 30 2C 58 00 73 0D 16 26 20 D2 24 44 39 30 |800,X.s..& .$D90| 00000570: 30 2C 58 00 81 0D 48 26 20 D2 24 44 41 30 30 2C |0,X...H& .$DA00,| 00000580: 58 00 88 0D 7A 26 20 EF 00 93 0D AC 26 20 F6 54 |X...z& .....& .T| 00000590: 45 58 31 00 A5 0D DE 26 54 45 58 32 20 D2 24 44 |EX1....&TEX2 .$D| 000005A0: 42 30 30 2C 58 00 AC 0D 10 27 20 EF 00 B7 0D 42 |B00,X....' ....B| 000005B0: 27 20 C0 23 24 45 38 00 C2 0D 74 27 20 F6 54 45 |' .#$E8...t' .TE| 000005C0: 58 32 00 C8 0D A6 27 A2 00 EC 0D D8 27 3B 2A 2A |X2....'.....';**| 000005D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000005E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 FA 0D 0A |************....| 000005F0: 28 A1 43 4F 4C 4F 52 49 4E 43 00 05 0E 3C 28 20 |(.COLORINC...<( | 00000600: C2 23 24 30 30 00 17 0E 6E 28 54 45 58 31 20 C9 |.#$00...n(TEX1 .| 00000610: 24 44 38 30 30 2C 58 00 25 0E A0 28 20 C9 24 44 |$D800,X.%..( .$D| 00000620: 39 30 30 2C 58 00 33 0E D2 28 20 C9 24 44 41 30 |900,X.3..( .$DA0| 00000630: 30 2C 58 00 3A 0E 04 29 20 EF 00 45 0E 36 29 20 |0,X.:..) ..E.6) | 00000640: F6 54 45 58 31 00 57 0E 68 29 54 45 58 32 20 C9 |.TEX1.W.h)TEX2 .| 00000650: 24 44 42 30 30 2C 58 00 5E 0E 9A 29 20 EF 00 69 |$DB00,X.^..) ..i| 00000660: 0E CC 29 20 C0 23 24 45 38 00 74 0E FE 29 20 F6 |..) .#$E8.t..) .| 00000670: 54 45 58 32 00 7A 0E 30 2A A2 00 9E 0E 62 2A 3B |TEX2.z.0*....b*;| 00000680: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000690: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 AB |**************..| 000006A0: 0E 94 2A A1 43 4C 52 48 4F 4D 45 00 B5 0E C6 2A |..*.CLRHOME....*| 000006B0: 20 CA 31 34 37 00 C1 0E F8 2A 20 D6 24 46 46 44 | .147....* .$FFD| 000006C0: 32 00 C7 0E 2A 2B A2 00 EB 0E 5C 2B 3B 2A 2A 2A |2...*+....\+;***| 000006D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000006E0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 0F 0F 8E 2B |***********....+| 000006F0: 3B 2A 20 4D 41 43 52 4F 20 54 45 58 54 20 41 44 |;* MACRO TEXT AD| 00000700: 52 45 53 2C 58 2C 59 2C 4B 4C 45 55 52 20 2A 00 |RES,X,Y,KLEUR *.| 00000710: 33 0F C0 2B 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |3..+;***********| 00000720: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000730: 2A 2A 2A 00 53 0F F2 2B A1 54 45 58 54 A0 54 41 |***.S..+.TEXT.TA| 00000740: 44 52 2C 58 56 41 4C 2C 59 56 41 4C 2C 43 4F 4C |DR,XVAL,YVAL,COL| 00000750: 56 41 4C 00 61 0F 24 2C 20 CA 23 43 4F 4C 56 41 |VAL.a.$, .#COLVA| 00000760: 4C 00 6D 0F 56 2C 20 D2 24 30 32 38 36 00 79 0F |L.m.V, .$0286.y.| 00000770: 88 2C 20 C2 23 59 56 41 4C 00 85 0F BA 2C 20 C3 |., .#YVAL...., .| 00000780: 23 58 56 41 4C 00 8C 0F EC 2C 20 E5 00 98 0F 1E |#XVAL...., .....| 00000790: 2D 20 D6 24 46 46 46 30 00 A3 0F 50 2D 20 C2 23 |- .$FFF0...P- .#| 000007A0: 24 30 30 00 B4 0F 82 2D 54 45 58 31 20 CA 54 41 |$00....-TEX1 .TA| 000007B0: 44 52 2C 58 00 BF 0F B4 2D 20 C4 23 24 46 46 00 |DR,X....- .#$FF.| 000007C0: CA 0F E6 2D 20 F7 54 45 58 32 00 D6 0F 18 2E 20 |...- .TEX2..... | 000007D0: D6 24 46 46 44 32 00 DD 0F 4A 2E 20 EF 00 E8 0F |.$FFD2...J. ....| 000007E0: 7C 2E 20 D5 54 45 58 31 00 F3 0F AE 2E 54 45 58 ||. .TEX1.....TEX| 000007F0: 32 20 E4 00 F9 0F E0 2E A2 00 1B 10 12 2F 3B 2A |2 .........../;*| 00000800: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000810: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 3D 10 44 2F |***********.=.D/| 00000820: 3B 2A 20 4D 41 43 52 4F 20 50 52 49 4E 54 20 41 |;* MACRO PRINT A| 00000830: 44 52 45 53 20 20 20 20 20 20 20 20 2A 00 5F 10 |DRES *._.| 00000840: 76 2F 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |v/;*************| 00000850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 00000860: 6F 10 A8 2F A1 50 52 49 4E 54 A0 54 41 44 52 00 |o../.PRINT.TADR.| 00000870: 7A 10 DA 2F 20 C2 23 24 30 30 00 8B 10 0C 30 54 |z../ .#$00....0T| 00000880: 45 58 31 20 CA 54 41 44 52 2C 58 00 96 10 3E 30 |EX1 .TADR,X...>0| 00000890: 20 C4 23 24 46 46 00 A1 10 70 30 20 F7 54 45 58 | .#$FF...p0 .TEX| 000008A0: 32 00 AD 10 A2 30 20 D6 24 46 46 44 32 00 B4 10 |2....0 .$FFD2...| 000008B0: D4 30 20 EF 00 BF 10 06 31 20 D5 54 45 58 31 00 |.0 .....1 .TEX1.| 000008C0: CA 10 38 31 54 45 58 32 20 E4 00 D5 10 6A 31 20 |..81TEX2 ....j1 | 000008D0: CA 23 24 30 44 00 E1 10 9C 31 20 D6 24 46 46 44 |.#$0D....1 .$FFD| 000008E0: 32 00 E7 10 CE 31 A2 00 09 11 00 32 3B 2A 2A 2A |2....1.....2;***| 000008F0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000900: 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2B 11 32 32 3B 2A |*********.+.22;*| 00000910: 20 4D 41 43 52 4F 20 4B 45 59 20 57 41 49 54 20 | MACRO KEY WAIT | 00000920: 20 20 20 20 20 20 20 20 20 20 2A 00 4D 11 64 32 | *.M.d2| 00000930: 3B 2A 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 00 5B 11 |*************.[.| 00000950: 96 32 A1 4B 45 59 A0 57 41 49 54 00 6A 11 C8 32 |.2.KEY.WAIT.j..2| 00000960: 54 45 58 31 20 C2 23 24 30 30 00 76 11 FA 32 20 |TEX1 .#$00.v..2 | 00000970: D3 24 30 30 43 36 00 82 11 2C 33 20 CA 24 30 30 |.$00C6...,3 .$00| 00000980: 43 35 00 8E 11 5E 33 20 C4 23 57 41 49 54 00 99 |C5...^3 .#WAIT..| 00000990: 11 90 33 20 F6 54 45 58 31 00 9F 11 C2 33 A2 00 |..3 .TEX1....3..| 000009A0: C6 11 F4 33 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |...3;***********| 000009B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000009C0: 2A 2A 2A 2A 2A 2A 00 ED 11 26 34 3B 2A 20 4D 41 |******...&4;* MA| 000009D0: 43 52 4F 20 4C 4F 41 44 20 4E 41 41 4D 41 44 52 |CRO LOAD NAAMADR| 000009E0: 45 53 2C 4C 45 2E 4E 41 41 4D 20 20 2A 00 14 12 |ES,LE.NAAM *...| 000009F0: 58 34 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |X4;*************| 00000A00: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000A10: 2A 2A 2A 2A 00 33 12 8A 34 A1 4C 4F 41 44 A0 4E |****.3..4.LOAD.N| 00000A20: 41 41 4D 41 44 52 45 53 2C 4C 45 4E 47 54 45 4E |AAMADRES,LENGTEN| 00000A30: 41 41 4D 00 3E 12 BC 34 20 CA 23 24 30 34 00 49 |AAM.>..4 .#$04.I| 00000A40: 12 EE 34 20 C2 23 24 30 38 00 54 12 20 35 20 C3 |..4 .#$08.T. 5 .| 00000A50: 23 24 30 31 00 60 12 52 35 20 D6 24 46 46 42 41 |#$01.`.R5 .$FFBA| 00000A60: 00 72 12 84 35 20 CA 23 4C 45 4E 47 54 45 4E 41 |.r..5 .#LENGTENA| 00000A70: 41 4D 00 86 12 B6 35 20 C2 23 3C 28 4E 41 41 4D |AM....5 .#<(NAAM| 00000A80: 41 44 52 45 53 29 00 9A 12 E8 35 20 C3 23 3E 28 |ADRES)....5 .#>(| 00000A90: 4E 41 41 4D 41 44 52 45 53 29 00 A6 12 1A 36 20 |NAAMADRES)....6 | 00000AA0: D6 24 46 46 42 44 00 B1 12 4C 36 20 CA 23 24 30 |.$FFBD...L6 .#$0| 00000AB0: 30 00 BC 12 7E 36 20 C2 23 24 46 46 00 C7 12 B0 |0...~6 .#$FF....| 00000AC0: 36 20 C3 23 24 46 46 00 D3 12 E2 36 20 D6 24 46 |6 .#$FF....6 .$F| 00000AD0: 46 44 35 00 D9 12 14 37 A2 00 00 00 |FD5....7.... |
......D.+...;* MACRO TEXT ADRES,X,Y,KLEU R *.6....$C000.A....$C000.Z.P. WINDOW 14 ,6,12,16,1.R... TEXT TEKST1,15,7,1..... TEXT TEKST2,15,9,1..... TEXT TEKST3,15,1 1,1..... TEXT TEKST4,15,13,1.U.J. TEXT T EKST5,15,15,1...|. TEXT TEKST6,15,17,1.. ... KEY 60..... ......TEKST1 .". .DIRECT ORY.".9.D.TEKST2 .". .LOAD .".U.V.TE KST3 .". .SAVE .".Q...TEKST4 .". .SC RATCH ."...Z.TEKST5 .". .VALIDATE ."... ..TEKST6 .". .EXIT .".F.>..WINDOW X, Y,X1,Y1,COLVAL.O.P. B#X.X... ST9...T. B# Y..... ST8...8. UBEGIN...J.T1 .".".....T 2 ."."...N.T3 .".".&...T7 .".".2.2.T4 ." .".>.D.T5 .".".J...T6 ." ".U.H.T8 .00.`. ..T9 .00.Q.,.SET J#COLVAL.}.^. R$0286... ..POINT BT8...B. CT9..... ....&. V$FFF0. ..X. ......BEGIN VSET.F... JT1.R... V$FF D2... . B#00...R. JT5.....EEN V$FFD2.... . ...... .#X1-2..... .EEN...L. JT2.&.~. V$FFD2.3...DRIE IT8.=... VSET.F... JT4.R .F. V$FFD2.\.X. B#00.E... JT6.U...EENN V $FFD2.|... ....@. .#X1-2...R. .EENN..... JT4...V. V$FFD2.... JT8...: D#Y1+1.H. L .DRIE.Q.. IT8...P VSET....! JT3...4 ! V$FFD2...F! B#00....! JT5...J!EENNN V$ FFD2....! ..'.." .#X1-2.3.`" .EENNN.<.." JT7.H.D" V$FFD2.N.."..R.(#;************ ******************...Z#.SCREENCOLOR COLO R....# C#COLOR....# T53281....#..L."$;** ****************************...T$.BORDER COLOR COLOR....$ C#COLOR....$ T53280.... $..&..%;******************************.; .N%.FILLCOLOR COLOR.H..% J#COLOR.S..% B# $00.E..%TEX1 R$D800,X.S..& R$D900,X...H& R$DA00,X...Z& .....& .TEX1....&TEX2 R$D B00,X....' ....B' .#$E8.B.T' .TEX2.H..'. ...X';******************************.... (.COLORINC...<( B#$00...N(TEX1 I$D800,X. %. ( I$D900,X.3.R( I$DA00,X.:..) ..E.6) .TEX1.W.H)TEX2 I$DB00,X.^..) ..I.L) .#$E 8.T..) .TEX2.Z.0*....B*;**************** **************....*.CLRHOME...F* J147.A. .* V$FFD2.G.*+....\+;******************* ***********....+;* MACRO TEXT ADRES,X,Y, KLEUR *.3..+;*************************** ***.S..+.TEXT TADR,XVAL,YVAL,COLVAL.A.$, J#COLVAL.M.V, R$0286.Y.., B#YVAL...., C #XVAL...., .....- V$FFF0...P- B#$00....- TEX1 JTADR,X....- D#$FF.J..- .TEX2.V... V$FFD2...J. ....|. UTEX1.....TEX2 ...... ...../;****************************.=.D/ ;* MACRO PRINT ADRES *._.V/;***** ***********************.O../.PRINT TADR. Z.Z/ B#$00....0TEX1 JTADR,X...>0 D#$FF.. .P0 .TEX2....0 V$FFD2...T0 .....1 UTEX1. J.81TEX2 ..U.J1 J#$0D....1 V$FFD2...N1.. ...2;****************************.+.22;* MACRO KEY WAIT *.M.D2;******* *********************.[..2.KEY WAIT.J.H2 TEX1 B#$00.V..2 S$00C6...,3 J$00C5...^3 D#WAIT....3 .TEX1...B3..F..3;*********** **********************...&4;* MACRO LOAD NAAMADRES,LE.NAAM *...X4;************* ********************.3..4.LOAD NAAMADRES ,LENGTENAAM.>..4 J#$04.I..4 B#$08.T. 5 C #$01.`.R5 V$FFBA.R..5 J#LENGTENAAM....5 B#<(NAAMADRES)....5 C#>(NAAMADRES)....6 V$FFBD...L6 J#$00...~6 B#$FF.G..6 C#$FF. S..6 V$FFD5.Y..7....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL