WERT7
FILE INFORMATION
FILENAME(S): WERT7
FILE TYPE(S): PRG
FILE SIZE: 4.2K
FIRST SEEN: 2025-11-30 21:09:55
APPEARS ON: 1 disk(s)
FILE HASH
0c1c79c5226f018189dfb31244fc103001b390e035697f29f480e574a5a73f26
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| ASSEM | WERT7 | PRG | DuncanTwain | 12 | 9 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 0D 08 E8 03 20 AA 24 43 30 30 30 00 14 08 |...... .$C000...| 00000010: 1A 04 20 E8 00 25 08 4C 04 20 CA 23 3C 28 49 52 |.. ..%.L. .#<(IR| 00000020: 51 4E 45 57 29 00 36 08 7E 04 20 C2 23 3E 28 49 |QNEW).6.~. .#>(I| 00000030: 52 51 4E 45 57 29 00 42 08 B0 04 20 D2 24 30 33 |RQNEW).B... .$03| 00000040: 31 34 00 4E 08 E2 04 20 D3 24 30 33 31 35 00 55 |14.N... .$0315.U| 00000050: 08 14 05 20 E7 00 5C 08 46 05 20 E3 00 6B 08 78 |... ..\.F. ..k.x| 00000060: 05 49 52 51 4E 45 57 20 CA 23 30 00 75 08 AA 05 |.IRQNEW .#0.u...| 00000070: 20 D2 24 43 36 00 7F 08 DC 05 20 CA 24 43 35 00 | .$C6..... .$C5.| 00000080: 89 08 0E 06 20 C4 23 30 33 00 93 08 40 06 20 F7 |.... .#03...@. .| 00000090: 56 45 52 00 9F 08 72 06 20 D5 24 45 41 33 31 00 |VER...r. .$EA31.| 000000A0: BE 08 3A 07 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |..:.;***********| 000000B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 DB |**************..| 000000C0: 08 3B 07 4E 41 41 4D 20 A8 22 31 32 33 34 35 36 |.;.NAAM ."123456| 000000D0: 31 32 33 34 35 36 37 38 39 30 22 00 F0 08 6C 07 |1234567890"...l.| 000000E0: 56 45 52 20 4C 4F 41 44 A0 4E 41 41 4D 2C 31 36 |VER LOAD.NAAM,16| 000000F0: 00 05 09 D0 07 20 44 49 53 4B 45 52 52 4F 52 A0 |..... DISKERROR.| 00000100: 30 2C 30 2C 31 00 24 09 66 08 3B 2A 2A 2A 2A 2A |0,0,1.$.f.;*****| 00000110: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000120: 2A 2A 2A 2A 00 30 09 98 08 4E 45 52 20 CA 23 30 |****.0...NER .#0| 00000130: 00 3A 09 99 08 20 D2 24 43 36 00 44 09 9A 08 20 |.:... .$C6.D... | 00000140: CA 24 43 35 00 4E 09 9B 08 20 C4 23 30 33 00 58 |.$C5.N... .#03.X| 00000150: 09 9C 08 20 F7 4E 45 52 00 64 09 9D 08 20 D5 24 |... .NER.d... .$| 00000160: 45 41 33 31 00 8A 09 60 09 3B 2A 2A 2A 2A 2A 2A |EA31...`.;******| 00000170: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000180: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 B0 09 92 09 3B |**********.....;| 00000190: 2A 20 20 48 45 52 42 49 45 27 53 20 44 49 53 4B |* HERBIE'S DISK| 000001A0: 20 4D 41 43 52 4F 27 53 20 20 31 2E 31 20 20 2A | MACRO'S 1.1 *| 000001B0: 00 D6 09 C4 09 3B 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |.....;**********| 000001C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000001D0: 2A 2A 2A 2A 2A 2A 00 E5 09 F6 09 3B 4D 41 43 52 |******.....;MACR| 000001E0: 4F 20 44 49 52 00 0A 0A 28 0A 3B 4D 41 43 52 4F |O DIR...(.;MACRO| 000001F0: 20 4C 4F 41 44 A0 4E 41 41 4D 41 44 52 45 53 2C | LOAD.NAAMADRES,| 00000200: 4C 45 4E 47 54 45 4E 41 41 4D 00 2D 0A 5A 0A 3B |LENGTENAAM.-.Z.;| 00000210: 4D 41 43 52 4F 20 53 41 56 45 A0 4E 41 4D 41 44 |MACRO SAVE.NAMAD| 00000220: 52 2C 4C 2C 41 44 52 31 2C 41 44 52 32 00 51 0A |R,L,ADR1,ADR2.Q.| 00000230: 8C 0A 3B 4D 41 43 52 4F 20 53 43 52 41 54 43 48 |..;MACRO SCRATCH| 00000240: A0 4E 41 41 4D 41 44 52 45 53 2C 4C 45 4E 47 54 |.NAAMADRES,LENGT| 00000250: 45 00 71 0A BE 0A 3B 4D 41 43 52 4F 20 44 49 53 |E.q...;MACRO DIS| 00000260: 4B 53 54 41 54 55 53 A0 58 2C 59 2C 43 4F 4C 4F |KSTATUS.X,Y,COLO| 00000270: 52 00 90 0A F0 0A 3B 4D 41 43 52 4F 20 44 49 53 |R.....;MACRO DIS| 00000280: 4B 45 52 52 4F 52 A0 58 2C 59 2C 43 4F 4C 4F 52 |KERROR.X,Y,COLOR| 00000290: 00 A4 0A 22 0B 3B 4D 41 43 52 4F 20 44 49 53 4B |...".;MACRO DISK| 000002A0: 49 4E 49 54 00 B7 0A 54 0B 3B 4D 41 43 52 4F 20 |INIT...T.;MACRO | 000002B0: 44 49 53 4B 56 41 4C 00 DD 0A 86 0B 3B 2A 2A 2A |DISKVAL.....;***| 000002C0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000002D0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 E6 0A |*************...| 000002E0: B8 0B A1 44 49 52 00 F1 0A EA 0B 20 CA 23 24 32 |...DIR..... .#$2| 000002F0: 34 00 FD 0A 1C 0C 20 D2 24 30 31 30 30 00 09 0B |4..... .$0100...| 00000300: 4E 0C 20 D6 24 41 41 44 37 00 14 0B 80 0C 20 CA |N. .$AAD7..... .| 00000310: 23 24 30 31 00 1B 0B B2 0C 20 DA 00 26 0B E4 0C |#$01..... ..&...| 00000320: 20 C2 23 24 30 30 00 32 0B 16 0D 20 D6 24 46 46 | .#$00.2... .$FF| 00000330: 42 44 00 3D 0B 48 0D 20 C2 23 24 30 38 00 48 0B |BD.=.H. .#$08.H.| 00000340: 7A 0D 20 C3 23 24 36 30 00 54 0B AC 0D 20 D6 24 |z. .#$60.T... .$| 00000350: 46 46 42 41 00 60 0B DE 0D 20 D6 24 46 33 44 35 |FFBA.`... .$F3D5| 00000360: 00 6A 0B 10 0E 20 CA 24 42 41 00 76 0B 42 0E 20 |.j... .$BA.v.B. | 00000370: D6 24 46 46 42 34 00 80 0B 74 0E 20 CA 24 42 39 |.$FFB4...t. .$B9| 00000380: 00 8C 0B A6 0E 20 D6 24 46 46 39 36 00 97 0B D8 |..... .$FF96....| 00000390: 0E 20 CA 23 24 30 30 00 A1 0B 0A 0F 20 D2 24 39 |. .#$00..... .$9| 000003A0: 30 00 AC 0B 3C 0F 20 C3 23 24 30 33 00 BA 0B 6E |0...<. .#$03...n| 000003B0: 0F 54 45 58 30 20 D4 24 46 46 00 C6 0B A0 0F 20 |.TEX0 .$FF..... | 000003C0: D6 24 46 46 41 35 00 D0 0B D2 0F 20 D2 24 46 45 |.$FFA5..... .$FE| 000003D0: 00 DA 0B 04 10 20 C3 24 39 30 00 E5 0B 36 10 20 |..... .$90...6. | 000003E0: F6 54 45 58 34 00 F1 0B 68 10 20 D6 24 46 46 41 |.TEX4...h. .$FFA| 000003F0: 35 00 FB 0B 9A 10 20 C3 24 39 30 00 06 0C CC 10 |5..... .$90.....| 00000400: 20 F6 54 45 58 34 00 10 0C FE 10 20 C3 24 46 46 | .TEX4..... .$FF| 00000410: 00 17 0C 30 11 20 EC 00 22 0C 62 11 20 F6 54 45 |...0. ..".b. .TE| 00000420: 58 30 00 2C 0C 94 11 20 C2 24 46 45 00 38 0C C6 |X0.,... .$FE.8..| 00000430: 11 20 D6 24 42 44 43 44 00 43 0C F8 11 20 D6 54 |. .$BDCD.C... .T| 00000440: 45 58 35 00 53 0C 2A 12 54 45 58 31 20 D6 24 46 |EX5.S.*.TEX1 .$F| 00000450: 46 41 35 00 5D 0C 5C 12 20 C2 24 39 30 00 68 0C |FA5.].\. .$90.h.| 00000460: 8E 12 20 F6 54 45 58 34 00 6F 0C C0 12 20 DA 00 |.. .TEX4.o... ..| 00000470: 76 0C F2 12 20 D8 00 81 0C 24 13 20 F7 54 45 58 |v... ....$. .TEX| 00000480: 32 00 8D 0C 56 13 20 D6 24 46 46 44 32 00 98 0C |2...V. .$FFD2...| 00000490: 88 13 20 D5 54 45 58 31 00 A8 0C BA 13 54 45 58 |.. .TEX1.....TEX| 000004A0: 32 20 D6 24 41 41 44 37 00 B3 0C EC 13 20 CA 23 |2 .$AAD7..... .#| 000004B0: 24 30 30 00 BD 0C 1E 14 20 D2 24 43 36 00 C7 0C |$00..... .$C6...| 000004C0: 50 14 20 CA 24 43 35 00 D1 0C 82 14 20 C4 23 36 |P. .$C5..... .#6| 000004D0: 30 00 DC 0C B4 14 20 F7 54 45 58 37 00 E6 0C E6 |0..... .TEX7....| 000004E0: 14 20 C4 23 36 33 00 F1 0C 18 15 20 F7 54 45 58 |. .#63..... .TEX| 000004F0: 34 00 00 0D 4A 15 54 45 58 33 20 C3 23 24 30 32 |4...J.TEX3 .#$02| 00000500: 00 0B 0D 7C 15 20 D5 54 45 58 30 00 1B 0D AE 15 |...|. .TEX0.....| 00000510: 54 45 58 34 20 D6 24 46 36 34 32 00 26 0D E0 15 |TEX4 .$F642.&...| 00000520: 20 CA 23 24 30 38 00 30 0D 12 16 20 D2 24 42 41 | .#$08.0... .$BA| 00000530: 00 3C 0D 44 16 20 D6 24 46 46 42 34 00 47 0D 76 |.<.D. .$FFB4.G.v| 00000540: 16 20 CA 23 24 36 46 00 51 0D A8 16 20 D2 24 42 |. .#$6F.Q... .$B| 00000550: 39 00 5D 0D DA 16 20 D6 24 46 46 39 36 00 69 0D |9.]... .$FF96.i.| 00000560: 0C 17 20 D6 24 46 46 41 42 00 74 0D 3E 17 20 CA |.. .$FFAB.t.>. .| 00000570: 23 24 30 30 00 7E 0D 70 17 20 D2 24 43 36 00 8A |#$00.~.p. .$C6..| 00000580: 0D A2 17 20 D5 54 45 58 31 30 00 99 0D D4 17 54 |... .TEX10.....T| 00000590: 45 58 35 20 CA 23 24 32 30 00 A5 0D 06 18 20 D5 |EX5 .#$20..... .| 000005A0: 24 46 46 44 32 00 B1 0D 38 18 20 C2 24 30 32 46 |$FFD2...8. .$02F| 000005B0: 37 00 BD 0D 6A 18 20 D6 24 46 46 43 39 00 C8 0D |7...j. .$FFC9...| 000005C0: 9C 18 20 F4 54 45 58 36 00 D4 0D CE 18 20 D5 24 |.. .TEX6..... .$| 000005D0: 45 30 46 39 00 DF 0D 00 19 54 45 58 36 20 E3 00 |E0F9.....TEX6 ..| 000005E0: EE 0D 32 19 54 45 58 37 20 C2 23 24 30 30 00 FE |..2.TEX7 .#$00..| 000005F0: 0D 64 19 54 45 58 38 20 D6 24 45 45 42 33 00 05 |.d.TEX8 .$EEB3..| 00000600: 0E 96 19 20 EF 00 10 0E C8 19 20 F6 54 45 58 38 |... ...... .TEX8| 00000610: 00 1F 0E FA 19 54 45 58 39 20 CA 23 24 30 30 00 |.....TEX9 .#$00.| 00000620: 29 0E 2C 1A 20 D2 24 43 36 00 33 0E 5E 1A 20 CA |).,. .$C6.3.^. .| 00000630: 24 43 35 00 3D 0E 90 1A 20 C4 23 36 30 00 48 0E |$C5.=... .#60.H.| 00000640: C2 1A 20 F6 54 45 58 39 00 53 0E F4 1A 20 D5 54 |.. .TEX9.S... .T| 00000650: 45 58 33 00 5F 0E 26 1B 54 45 58 31 30 20 E4 00 |EX3._.&.TEX10 ..| 00000660: 65 0E 58 1B A2 00 8A 0E 8A 1B 3B 2A 2A 2A 2A 2A |e.X.......;*****| 00000670: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000680: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 A4 0E BC 1B A1 |**********......| 00000690: 44 49 53 4B 53 54 41 54 55 53 A0 58 2C 59 2C 43 |DISKSTATUS.X,Y,C| 000006A0: 4F 4C 4F 52 00 AE 0E EE 1B 20 D5 45 45 4E 00 C1 |OLOR..... .EEN..| 000006B0: 0E 20 1C 54 45 58 31 30 30 20 A8 22 44 4F 53 3A |. .TEX100 ."DOS:| 000006C0: 22 00 D1 0E 52 1C 45 45 4E 20 CA 23 43 4F 4C 4F |"...R.EEN .#COLO| 000006D0: 52 00 DD 0E 84 1C 20 D2 24 30 32 38 36 00 E6 0E |R..... .$0286...| 000006E0: B6 1C 20 C2 23 59 00 EF 0E E8 1C 20 C3 23 58 00 |.. .#Y..... .#X.| 000006F0: F6 0E 1A 1D 20 E5 00 02 0F 4C 1D 20 D6 24 46 46 |.... ....L. .$FF| 00000700: 46 30 00 0B 0F 7E 1D 20 C2 23 30 00 1A 0F B0 1D |F0...~. .#0.....| 00000710: 20 CA 54 45 58 31 30 30 2C 58 00 26 0F E2 1D 20 | .TEX100,X.&... | 00000720: D6 24 46 46 44 32 00 2D 0F 14 1E 20 EF 00 36 0F |.$FFD2.-... ..6.| 00000730: 46 1E 20 C0 23 34 00 40 0F 78 1E 20 F6 2A 2D 39 |F. .#4.@.x. .*-9| 00000740: 00 49 0F AA 1E 20 CA 23 30 00 50 0F DC 1E 20 DA |.I... .#0.P... .| 00000750: 00 57 0F 0E 1F 20 D8 00 63 0F 40 1F 20 D6 24 46 |.W... ..c.@. .$F| 00000760: 46 42 44 00 6D 0F 72 1F 20 CA 23 31 35 00 76 0F |FBD.m.r. .#15.v.| 00000770: A4 1F 20 C2 23 38 00 7D 0F D6 1F 20 DA 00 89 0F |.. .#8.}... ....| 00000780: 08 20 20 D6 24 46 46 42 41 00 95 0F 3A 20 20 D6 |. .$FFBA...: .| 00000790: 24 46 46 43 30 00 9F 0F 6C 20 20 C2 23 31 35 00 |$FFC0...l .#15.| 000007A0: AB 0F 9E 20 20 D6 24 46 46 43 36 00 B6 0F D0 20 |... .$FFC6.... | 000007B0: 20 C3 23 24 30 30 00 C7 0F 02 21 54 45 58 39 38 | .#$00....!TEX98| 000007C0: 20 D6 24 46 46 43 46 00 D2 0F 34 21 20 C4 23 24 | .$FFCF...4! .#$| 000007D0: 30 44 00 DE 0F 66 21 20 F7 54 45 58 39 39 00 EA |0D...f! .TEX99..| 000007E0: 0F 98 21 20 D6 24 46 46 44 32 00 F6 0F CA 21 20 |..! .$FFD2....! | 000007F0: D5 54 45 58 39 38 00 05 10 FC 21 54 45 58 39 39 |.TEX98....!TEX99| 00000800: 20 CA 23 31 35 00 11 10 2E 22 20 D6 24 46 46 43 | .#15...." .$FFC| 00000810: 33 00 1D 10 60 22 20 D6 24 46 46 45 37 00 26 10 |3...`" .$FFE7.&.| 00000820: 92 22 20 CA 23 30 00 30 10 C4 22 20 D2 24 43 36 |." .#0.0.." .$C6| 00000830: 00 36 10 F6 22 A2 00 5C 10 28 23 3B 2A 2A 2A 2A |.6.."..\.(#;****| 00000840: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000850: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 75 10 5A |************.u.Z| 00000860: 23 A1 44 49 53 4B 45 52 52 4F 52 A0 58 2C 59 2C |#.DISKERROR.X,Y,| 00000870: 43 4F 4C 4F 52 00 82 10 8C 23 20 CA 23 43 4F 4C |COLOR....# .#COL| 00000880: 4F 52 00 8E 10 BE 23 20 D2 24 30 32 38 36 00 97 |OR....# .$0286..| 00000890: 10 F0 23 20 C2 23 59 00 A0 10 22 24 20 C3 23 58 |..# .#Y..."$ .#X| 000008A0: 00 A7 10 54 24 20 E5 00 B3 10 86 24 20 D6 24 46 |...T$ .....$ .$F| 000008B0: 46 46 30 00 BC 10 B8 24 20 CA 23 30 00 C3 10 EA |FF0....$ .#0....| 000008C0: 24 20 DA 00 CA 10 1C 25 20 D8 00 D6 10 4E 25 20 |$ .....% ....N% | 000008D0: D6 24 46 46 42 44 00 E0 10 80 25 20 CA 23 31 35 |.$FFBD....% .#15| 000008E0: 00 E9 10 B2 25 20 C2 23 38 00 F0 10 E4 25 20 DA |....% .#8....% .| 000008F0: 00 FC 10 16 26 20 D6 24 46 46 42 41 00 08 11 48 |....& .$FFBA...H| 00000900: 26 20 D6 24 46 46 43 30 00 12 11 7A 26 20 C2 23 |& .$FFC0...z& .#| 00000910: 31 35 00 1E 11 AC 26 20 D6 24 46 46 43 36 00 29 |15....& .$FFC6.)| 00000920: 11 DE 26 20 C3 23 24 30 30 00 3A 11 10 27 54 45 |..& .#$00.:..'TE| 00000930: 58 39 38 20 D6 24 46 46 43 46 00 43 11 42 27 20 |X98 .$FFCF.C.B' | 00000940: C1 23 30 00 4F 11 74 27 20 F7 54 45 58 39 37 00 |.#0.O.t' .TEX97.| 00000950: 5B 11 A6 27 54 45 58 39 36 20 ED 00 66 11 D8 27 |[..'TEX96 ..f..'| 00000960: 20 C4 23 24 30 44 00 72 11 0A 28 20 F7 54 45 58 | .#$0D.r..( .TEX| 00000970: 39 39 00 7E 11 3C 28 20 D6 24 46 46 44 32 00 8A |99.~.<( .$FFD2..| 00000980: 11 6E 28 20 D5 54 45 58 39 38 00 9C 11 A0 28 54 |.n( .TEX98....(T| 00000990: 45 58 39 39 20 D4 54 45 58 31 30 33 00 A6 11 D2 |EX99 .TEX103....| 000009A0: 28 20 CA 23 31 35 00 B2 11 04 29 20 D6 24 46 46 |( .#15....) .$FF| 000009B0: 43 33 00 BE 11 36 29 20 D6 24 46 46 45 37 00 C7 |C3...6) .$FFE7..| 000009C0: 11 68 29 20 CA 23 30 00 D1 11 9A 29 20 D2 24 43 |.h) .#0....) .$C| 000009D0: 36 00 DE 11 CC 29 20 D5 54 45 58 31 30 32 00 ED |6....) .TEX102..| 000009E0: 11 FE 29 54 45 58 39 37 20 C4 23 34 38 00 F9 11 |..)TEX97 .#48...| 000009F0: 30 2A 20 F7 54 45 58 39 39 00 03 12 62 2A 20 C4 |0* .TEX99...b* .| 00000A00: 23 34 39 00 0F 12 94 2A 20 F7 54 45 58 39 39 00 |#49....* .TEX99.| 00000A10: 16 12 C6 2A 20 DA 00 1F 12 F8 2A 20 C2 23 30 00 |...* .....* .#0.| 00000A20: 2E 12 2A 2B 20 CA 54 45 58 31 30 30 2C 58 00 3A |..*+ .TEX100,X.:| 00000A30: 12 5C 2B 20 D6 24 46 46 44 32 00 41 12 8E 2B 20 |.\+ .$FFD2.A..+ | 00000A40: EF 00 4B 12 C0 2B 20 C0 23 32 30 00 55 12 F2 2B |..K..+ .#20.U..+| 00000A50: 20 F6 2A 2D 39 00 5C 12 24 2C 20 D9 00 65 12 56 | .*-9.\.$, ..e.V| 00000A60: 2C 20 C3 23 30 00 71 12 88 2C 20 D5 54 45 58 39 |, .#0.q.., .TEX9| 00000A70: 36 00 92 12 BA 2C 54 45 58 31 30 30 20 A8 22 44 |6....,TEX100 ."D| 00000A80: 4F 53 20 45 52 52 4F 52 20 4D 45 53 53 41 47 45 |OS ERROR MESSAGE| 00000A90: 3A 22 00 9C 12 EC 2C 20 A5 24 30 44 00 B0 12 1E |:"...., .$0D....| 00000AA0: 2D 54 45 58 31 30 31 20 A5 24 30 44 2C 24 30 44 |-TEX101 .$0D,$0D| 00000AB0: 00 CE 12 50 2D 20 A8 22 2D 48 49 59 20 4B 45 59 |...P- ."-HIY KEY| 00000AC0: 20 54 4F 20 43 4F 4E 54 49 4E 55 45 2D 22 00 DD | TO CONTINUE-"..| 00000AD0: 12 82 2D 54 45 58 31 30 33 20 A5 30 30 00 F0 12 |..-TEX103 .00...| 00000AE0: B4 2D 54 45 58 31 30 32 20 C2 54 45 58 31 30 33 |.-TEX102 .TEX103| 00000AF0: 00 FD 12 E6 2D 20 F7 54 45 58 31 30 34 00 08 13 |....- .TEX104...| 00000B00: 18 2E 20 C2 23 24 30 30 00 17 13 4A 2E 20 CA 54 |.. .#$00...J. .T| 00000B10: 45 58 31 30 31 2C 58 00 23 13 7C 2E 20 D6 24 46 |EX101,X.#.|. .$F| 00000B20: 46 44 32 00 2A 13 AE 2E 20 EF 00 34 13 E0 2E 20 |FD2.*... ..4... | 00000B30: C0 23 32 33 00 3E 13 12 2F 20 F6 2A 2D 39 00 47 |.#23.>../ .*-9.G| 00000B40: 13 44 2F 20 C2 23 30 00 51 13 76 2F 20 D3 24 43 |.D/ .#0.Q.v/ .$C| 00000B50: 36 00 5B 13 A8 2F 20 C2 24 43 35 00 65 13 DA 2F |6.[../ .$C5.e../| 00000B60: 20 C0 23 36 34 00 6F 13 0C 30 20 F7 2A 2D 38 00 | .#64.o..0 .*-8.| 00000B70: 7C 13 3E 30 54 45 58 31 30 34 20 E4 00 82 13 70 ||.>0TEX104 ....p| 00000B80: 30 A2 00 A8 13 A2 30 3B 2A 2A 2A 2A 2A 2A 2A 2A |0.....0;********| 00000B90: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000BA0: 2A 2A 2A 2A 2A 2A 2A 2A 00 B6 13 D4 30 A1 44 49 |********....0.DI| 00000BB0: 53 4B 49 4E 49 54 00 C1 13 06 31 20 D5 54 57 45 |SKINIT....1 .TWE| 00000BC0: 45 00 D1 13 38 31 4E 41 41 4D 20 A8 22 49 2F 30 |E...81NAAM ."I/0| 00000BD0: 22 00 DE 13 6A 31 54 57 45 45 20 CA 23 33 00 ED |"...j1TWEE .#3..| 00000BE0: 13 9C 31 20 C3 23 3E 28 4E 41 41 4D 29 00 FC 13 |..1 .#>(NAAM)...| 00000BF0: CE 31 20 C2 23 3C 28 4E 41 41 4D 29 00 08 14 00 |.1 .#<(NAAM)....| 00000C00: 32 20 D6 24 46 46 42 44 00 12 14 32 32 20 CA 23 |2 .$FFBD...22 .#| 00000C10: 31 35 00 1B 14 64 32 20 C2 23 38 00 25 14 96 32 |15...d2 .#8.%..2| 00000C20: 20 C3 23 31 35 00 31 14 C8 32 20 D6 24 46 46 42 | .#15.1..2 .$FFB| 00000C30: 41 00 3D 14 FA 32 20 D6 24 46 46 43 30 00 47 14 |A.=..2 .$FFC0.G.| 00000C40: 2C 33 20 CA 23 31 35 00 53 14 5E 33 20 D6 24 46 |,3 .#15.S.^3 .$F| 00000C50: 46 43 33 00 5F 14 90 33 20 D6 24 46 46 45 37 00 |FC3._..3 .$FFE7.| 00000C60: 65 14 C2 33 A2 00 8B 14 F4 33 3B 2A 2A 2A 2A 2A |e..3.....3;*****| 00000C70: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000C80: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 98 14 26 34 |***********...&4| 00000C90: A1 44 49 53 4B 56 41 4C 00 A3 14 58 34 20 D5 44 |.DISKVAL...X4 .D| 00000CA0: 52 49 45 00 B2 14 8A 34 4E 41 41 4D 33 20 A8 22 |RIE....4NAAM3 ."| 00000CB0: 56 22 00 BF 14 BC 34 44 52 49 45 20 CA 23 31 00 |V"....4DRIE .#1.| 00000CC0: CF 14 EE 34 20 C3 23 3E 28 4E 41 41 4D 33 29 00 |...4 .#>(NAAM3).| 00000CD0: DF 14 20 35 20 C2 23 3C 28 4E 41 41 4D 33 29 00 |.. 5 .#<(NAAM3).| 00000CE0: EB 14 52 35 20 D6 24 46 46 42 44 00 F5 14 84 35 |..R5 .$FFBD....5| 00000CF0: 20 CA 23 31 35 00 FE 14 B6 35 20 C2 23 38 00 08 | .#15....5 .#8..| 00000D00: 15 E8 35 20 C3 23 31 35 00 14 15 1A 36 20 D6 24 |..5 .#15....6 .$| 00000D10: 46 46 42 41 00 20 15 4C 36 20 D6 24 46 46 43 30 |FFBA. .L6 .$FFC0| 00000D20: 00 2A 15 7E 36 20 CA 23 31 35 00 36 15 B0 36 20 |.*.~6 .#15.6..6 | 00000D30: D6 24 46 46 43 33 00 42 15 E2 36 20 D6 24 46 46 |.$FFC3.B..6 .$FF| 00000D40: 45 37 00 48 15 14 37 A2 00 6F 15 46 37 3B 2A 2A |E7.H..7..o.F7;**| 00000D50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000D60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 00000D70: 8E 15 78 37 A1 4C 4F 41 44 A0 4E 41 41 4D 41 44 |..x7.LOAD.NAAMAD| 00000D80: 52 45 53 2C 4C 45 4E 47 54 45 4E 41 41 4D 00 99 |RES,LENGTENAAM..| 00000D90: 15 AA 37 20 CA 23 24 30 34 00 A4 15 DC 37 20 C2 |..7 .#$04....7 .| 00000DA0: 23 24 30 38 00 AF 15 0E 38 20 C3 23 24 30 31 00 |#$08....8 .#$01.| 00000DB0: BB 15 40 38 20 D6 24 46 46 42 41 00 CD 15 72 38 |..@8 .$FFBA...r8| 00000DC0: 20 CA 23 4C 45 4E 47 54 45 4E 41 41 4D 00 E1 15 | .#LENGTENAAM...| 00000DD0: A4 38 20 C2 23 3C 28 4E 41 41 4D 41 44 52 45 53 |.8 .#<(NAAMADRES| 00000DE0: 29 00 F5 15 D6 38 20 C3 23 3E 28 4E 41 41 4D 41 |)....8 .#>(NAAMA| 00000DF0: 44 52 45 53 29 00 01 16 08 39 20 D6 24 46 46 42 |DRES)....9 .$FFB| 00000E00: 44 00 0C 16 3A 39 20 CA 23 24 30 30 00 17 16 6C |D...:9 .#$00...l| 00000E10: 39 20 C2 23 24 46 46 00 22 16 9E 39 20 C3 23 24 |9 .#$FF."..9 .#$| 00000E20: 46 46 00 2E 16 D0 39 20 D6 24 46 46 44 35 00 34 |FF....9 .$FFD5.4| 00000E30: 16 02 3A A2 00 5B 16 34 3A 3B 2A 2A 2A 2A 2A 2A |..:..[.4:;******| 00000E40: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000E50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 78 16 66 3A |***********.x.f:| 00000E60: A1 53 41 56 45 A0 4E 41 4D 41 44 52 2C 4C 2C 41 |.SAVE.NAMADR,L,A| 00000E70: 44 52 31 2C 41 44 52 32 00 83 16 98 3A 20 CA 23 |DR1,ADR2....: .#| 00000E80: 24 30 34 00 8E 16 CA 3A 20 C2 23 24 30 38 00 99 |$04....: .#$08..| 00000E90: 16 FC 3A 20 C3 23 24 30 31 00 A5 16 2E 3B 20 D6 |..: .#$01....; .| 00000EA0: 24 46 46 42 41 00 AE 16 60 3B 20 CA 23 4C 00 BF |$FFBA...`; .#L..| 00000EB0: 16 92 3B 20 C2 23 3C 28 4E 41 4D 41 44 52 29 00 |..; .#<(NAMADR).| 00000EC0: D0 16 C4 3B 20 C3 23 3E 28 4E 41 4D 41 44 52 29 |...; .#>(NAMADR)| 00000ED0: 00 DC 16 F6 3B 20 D6 24 46 46 42 44 00 EB 16 28 |....; .$FFBD...(| 00000EE0: 3C 20 CA 23 3C 28 41 44 52 31 29 00 F5 16 5A 3C |< .#<(ADR1)...Z<| 00000EF0: 20 D2 24 30 32 00 04 17 8C 3C 20 CA 23 3E 28 41 | .$02....< .#>(A| 00000F00: 44 52 31 29 00 0E 17 BE 3C 20 D2 24 30 33 00 1D |DR1)....< .$03..| 00000F10: 17 F0 3C 20 C2 23 3C 28 41 44 52 32 29 00 2C 17 |..< .#<(ADR2).,.| 00000F20: 22 3D 20 C3 23 3E 28 41 44 52 32 29 00 37 17 54 |"= .#>(ADR2).7.T| 00000F30: 3D 20 CA 23 24 30 32 00 43 17 86 3D 20 D6 24 46 |= .#$02.C..= .$F| 00000F40: 46 44 38 00 49 17 B8 3D A2 00 6F 17 EA 3D 3B 2A |FD8.I..=..o..=;*| 00000F50: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000F60: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 |***************.| 00000F70: 8D 17 1C 3E A1 53 43 52 41 54 43 48 A0 4E 41 41 |...>.SCRATCH.NAA| 00000F80: 4D 41 44 52 45 53 2C 4C 45 4E 47 54 45 00 99 17 |MADRES,LENGTE...| 00000F90: 4E 3E 20 D5 42 45 47 49 4E 00 B9 17 80 3E 4E 41 |N> .BEGIN....>NA| 00000FA0: 41 4D 20 A8 22 53 30 3A 20 20 20 20 20 20 20 20 |AM ."S0: | 00000FB0: 20 20 20 20 20 20 20 20 22 00 C8 17 B2 3E 42 45 | "....>BE| 00000FC0: 47 49 4E 20 C2 23 30 30 00 E0 17 E4 3E 54 45 58 |GIN .#00....>TEX| 00000FD0: 32 30 30 20 CA 4E 41 41 4D 41 44 52 45 53 2C 58 |200 .NAAMADRES,X| 00000FE0: 00 F1 17 16 3F 20 D2 4E 41 41 4D 2B 24 30 33 2C |....? .NAAM+$03,| 00000FF0: 58 00 F8 17 48 3F 20 EF 00 06 18 7A 3F 20 C0 23 |X...H? ....z? .#| 00001000: 4C 45 4E 47 54 45 00 13 18 AC 3F 20 F6 54 45 58 |LENGTE....? .TEX| 00001010: 32 30 30 00 23 18 DE 3F 20 CA 23 4C 45 4E 47 54 |200.#..? .#LENGT| 00001020: 45 2B 33 00 32 18 10 40 20 C3 23 3E 28 4E 41 41 |E+3.2..@ .#>(NAA| 00001030: 4D 29 00 41 18 42 40 20 C2 23 3C 28 4E 41 41 4D |M).A.B@ .#<(NAAM| 00001040: 29 00 4D 18 74 40 20 D6 24 46 46 42 44 00 57 18 |).M.t@ .$FFBD.W.| 00001050: A6 40 20 CA 23 31 35 00 60 18 D8 40 20 C2 23 38 |.@ .#15.`..@ .#8| 00001060: 00 6A 18 0A 41 20 C3 23 31 35 00 76 18 3C 41 20 |.j..A .#15.v.<A | 00001070: D6 24 46 46 42 41 00 82 18 6E 41 20 D6 24 46 46 |.$FFBA...nA .$FF| 00001080: 43 30 00 8C 18 A0 41 20 CA 23 31 35 00 98 18 D2 |C0....A .#15....| 00001090: 41 20 D6 24 46 46 43 33 00 A4 18 04 42 20 D6 24 |A .$FFC3....B .$| 000010A0: 46 46 45 37 00 AA 18 36 42 A2 00 00 00 |FFE7...6B.... |
...... .$C000..... ..%.L. J#<(IRQNEW).6. ~. B#>(IRQNEW).B... R$0314.N... S$0315.U ... ..\.F. ..K.X.IRQNEW J#0.U... R$C6.. .. J$C5..... D#03...@. .VER...R. U$EA31. ..:.;*************************...;.NAAM ."1234561234567890"...L.VER LOAD NAAM,16 ...P. DISKERROR 0,0,1.$.F.;************* ************.0...NER J#0.:... R$C6.D... J$C5.N... D#03.X... .NER.D... U$EA31...` .;********************************.....; * HERBIE'S DISK MACRO'S 1.1 *.V.D.;** ******************************.....;MACR O DIR...(.;MACRO LOAD NAAMADRES,LENGTENA AM.-.Z.;MACRO SAVE NAMADR,L,ADR1,ADR2.Q. ..;MACRO SCRATCH NAAMADRES,LENGTE.Q...;M ACRO DISKSTATUS X,Y,COLOR.....;MACRO DIS KERROR X,Y,COLOR...".;MACRO DISKINIT...T .;MACRO DISKVAL.....;******************* *************......DIR..... J#$24..... R $0100...N. V$AAD7..... J#$01..... Z.&... B#$00.2... V$FFBD.=.H. B#$08.H.Z. C#$60 .T... V$FFBA.`... V$F3D5.J... J$BA.V.B. V$FFB4...T. J$B9..... V$FF96...X. J#$00. .... R$90...<. C#$03...N.TEX0 T$FF.F. . V$FFA5.P.R. R$FE.Z... C$90...6. .TEX4... H. V$FFA5..... C$90...L. .TEX4..... C$FF ...0. ..".B. .TEX0.,... B$FE.8.F. V$BDCD .C... VTEX5.S.*.TEX1 V$FFA5.].\. B$90.H. .. .TEX4.O... Z.V... X...$. .TEX2...V. V $FFD2..... UTEX1.....TEX2 V$AAD7..... J# $00..... R$C6.G.P. J$C5.Q... D#60..... . TEX7..... D#63..... .TEX4...J.TEX3 C#$02 ...|. UTEX0.....TEX4 V$F642.&... J#$08.0 ... R$BA.<.D. V$FFB4.G.V. J#$6F.Q... R$B 9.].Z. V$FF96.I... V$FFAB.T.>. J#$00.~.P . R$C6..... UTEX10...T.TEX5 J#$20..... U $FFD2...8. B$02F7...J. V$FFC9.H... .TEX6 .T.N. U$E0F9.....TEX6 ....2.TEX7 B#$00.. .D.TEX8 V$EEB3..... ....H. .TEX8.....TEX 9 J#$00.).,. R$C6.3.^. J$C5.=... D#60.H. B. .TEX9.S... UTEX3._.&.TEX10 ..E.X..... ..;*******************************...... DISKSTATUS X,Y,COLOR..... UEEN.A. .TEX10 0 ."DOS:".Q.R.EEN J#COLOR..... R$0286... .. B#Y..... C#X..... ....L. V$FFF0...~. B#0..... JTEX100,X.&... V$FFD2.-... ..6. F. .#4.@.X. .*-9.I... J#0.P... Z.W... X. C.@. V$FFBD.M.R. J#15.V... B#8.}.V. Z... . V$FFBA...: V$FFC0...L B#15.... V$F FC6...P C#$00.G..!TEX98 V$FFCF.R.4! D#$ 0D...F! .TEX99....! V$FFD2...J! UTEX98.. ..!TEX99 J#15...." V$FFC3...`" V$FFE7.&. ." J#0.0.D" R$C6.6.."..\.(#;************ ********************.U.Z#.DISKERROR X,Y, COLOR....# J#COLOR....# R$0286....# B#Y. ."$ C#X...T$ .....$ V$FFF0....$ J#0.C.. $ Z.J..% X.V.N% V$FFBD....% J#15....% B# 8....% Z....& V$FFBA...H& V$FFC0...Z& B# 15....& V$FFC6.)..& C#$00.:..'TEX98 V$FF CF.C.B' A#0.O.T' .TEX97.[..'TEX96 ..F.X' D#$0D.R..( .TEX99.~.<( V$FFD2...N( UTEX 98... (TEX99 TTEX103...R( J#15....) V$FF C3...6) V$FFE7.G.H) J#0.Q..) R$C6...L) U TEX102....)TEX97 D#48...0* .TEX99...B* D #49....* .TEX99...F* Z....* B#0...*+ JTE X100,X.:.\+ V$FFD2.A..+ ..K..+ .#20.U..+ .*-9.\.$, Y.E.V, C#0.Q.., UTEX96....,TE X100 ."DOS ERROR MESSAGE:"...., .$0D.... -TEX101 .$0D,$0D.N.P- ."-HIY KEY TO CONT INUE-"....-TEX103 .00....-TEX102 BTEX103 ....- .TEX104..... B#$00...J. JTEX101,X. #.|. V$FFD2.*... ..4... .#23.>../ .*-9.G .D/ B#0.Q.V/ S$C6.[../ B$C5.E.Z/ .#64.O. .0 .*-8.|.>0TEX104 ....P0.....0;******** ************************...T0.DISKINIT.A ..1 UTWEE.Q.81NAAM ."I/0"...J1TWEE J#3.. ..1 C#>(NAAM)...N1 B#<(NAAM)....2 V$FFBD ...22 J#15...D2 B#8.%..2 C#15.1.H2 V$FFB A.=..2 V$FFC0.G.,3 J#15.S.^3 V$FFC3._..3 V$FFE7.E.B3.....3;********************* ***********...&4.DISKVAL...X4 UDRIE....4 NAAM3 ."V"....4DRIE J#1.O..4 C#>(NAAM3). .. 5 B#<(NAAM3)...R5 V$FFBD....5 J#15... .5 B#8....5 C#15....6 V$FFBA. .L6 V$FFC0 .*.~6 J#15.6..6 V$FFC3.B..6 V$FFE7.H..7. .O.F7;*********************************. ..X7.LOAD NAAMADRES,LENGTENAAM....7 J#$0 4....7 B#$08....8 C#$01...@8 V$FFBA.M.R8 J#LENGTENAAM....8 B#<(NAAMADRES)...V8 C #>(NAAMADRES)....9 V$FFBD...:9 J#$00...L 9 B#$FF."..9 C#$FF...P9 V$FFD5.4..:..[.4 :;*********************************.X.F: .SAVE NAMADR,L,ADR1,ADR2....: J#$04...J: B#$08....: C#$01....; V$FFBA...`; J#L.. ..; B#<(NAMADR).P.D; C#>(NAMADR)....; V$ FFBD...(< J#<(ADR1)...Z< R$02....< J#>(A DR1)....< R$03....< B#<(ADR2).,."= C#>(A DR2).7.T= J#$02.C..= V$FFD8.I..=..O..=;* *******************************....>.SCR ATCH NAAMADRES,LENGTE...N> UBEGIN....>NA AM ."S0: ".H..>BEGIN B#00 ....>TEX200 JNAAMADRES,X....? RNAAM+$03, X...H? ....Z? .#LENGTE....? .TEX200.#..? J#LENGTE+3.2..@ C#>(NAAM).A.B@ B#<(NAAM ).M.T@ V$FFBD.W..@ J#15.`.X@ B#8.J..A C# 15.V.<A V$FFBA...NA V$FFC0... A J#15...R A V$FFC3....B V$FFE7...6B....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL