GENERATOR .TEXT

FILE INFORMATION

FILENAME(S): GENERATOR .TEXT

FILE TYPE(S): PRG

FILE SIZE: 5.6K

FIRST SEEN: 2025-11-02 16:39:22

APPEARS ON: 3 disk(s)

FILE HASH

4589f3e977350a61ab33e57d75cc571d7e6bea9902de99d7c0642e2b78bd8524

FOUND ON DISKS (3 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
D M PD SERVICE	GENERATOR .TEXT	PRG	Treasure Chest - Plattfuss	29	5	DOWNLOAD FILE
MAKER23	GENERATOR .TEXT	PRG	Treasure Chest - Spook	2	5	DOWNLOAD FILE
MAKER33	GENERATOR .TEXT	PRG	Treasure Chest - Spook	21	9	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: D8 1F E6 1F E8 03 2E 42  41 20 24 39 30 30 30 00  |.......BA $9000.|
00000010: EC 1F F2 03 3B 00 03 20  FC 03 2E 45 51 20 4F 55  |....;.. ...EQ OU|
00000020: 54 50 55 54 20 3D 20 24  41 42 31 45 00 1A 20 06  |TPUT = $AB1E.. .|
00000030: 04 2E 45 51 20 50 41 52  41 4D 45 20 3D 20 24 46  |..EQ PARAME = $F|
00000040: 46 42 41 00 31 20 10 04  2E 45 51 20 46 49 4C 45  |FBA.1 ...EQ FILE|
00000050: 4E 41 20 3D 20 24 46 46  42 44 00 48 20 1A 04 2E  |NA = $FFBD.H ...|
00000060: 45 51 20 4C 4F 41 44 20  20 20 3D 20 24 46 46 44  |EQ LOAD   = $FFD|
00000070: 35 00 5F 20 24 04 2E 45  51 20 53 41 56 45 20 20  |5._ $..EQ SAVE  |
00000080: 20 3D 20 24 46 46 44 38  00 72 20 2E 04 2E 45 51  | = $FFD8.r ...EQ|
00000090: 20 43 4F 4C 42 4F 52 20  3D 20 35 00 86 20 38 04  | COLBOR = 5.. 8.|
000000A0: 2E 45 51 20 43 4F 4C 42  41 43 20 3D 20 31 31 00  |.EQ COLBAC = 11.|
000000B0: 9A 20 42 04 2E 45 51 20  53 49 47 4E 31 20 20 3D  |. B..EQ SIGN1  =|
000000C0: 20 36 35 00 AE 20 4C 04  2E 45 51 20 4C 45 4E 47  | 65.. L..EQ LENG|
000000D0: 48 54 20 3D 20 31 36 00  C5 20 56 04 2E 45 51 20  |HT = 16.. V..EQ |
000000E0: 51 55 49 54 20 20 20 3D  20 24 46 43 45 32 00 DC  |QUIT   = $FCE2..|
000000F0: 20 60 04 2E 45 51 20 4E  41 43 48 4C 31 20 3D 20  | `..EQ NACHL1 = |
00000100: 24 43 30 32 31 00 F3 20  6A 04 2E 45 51 20 4E 41  |$C021.. j..EQ NA|
00000110: 43 48 4C 32 20 3D 20 24  30 38 42 44 00 0A 21 74  |CHL2 = $08BD..!t|
00000120: 04 2E 45 51 20 4C 41 45  4E 47 31 20 3D 20 24 43  |..EQ LAENG1 = $C|
00000130: 30 33 31 00 21 21 7E 04  2E 45 51 20 4C 41 45 4E  |031.!!~..EQ LAEN|
00000140: 47 32 20 3D 20 24 30 38  39 38 00 38 21 88 04 2E  |G2 = $0898.8!...|
00000150: 45 51 20 53 54 41 52 54  31 20 3D 20 24 43 30 33  |EQ START1 = $C03|
00000160: 33 00 4F 21 92 04 2E 45  51 20 53 54 41 52 54 32  |3.O!...EQ START2|
00000170: 20 3D 20 24 30 38 42 34  00 66 21 9C 04 2E 45 51  | = $08B4.f!...EQ|
00000180: 20 4D 55 4C 54 49 31 20  3D 20 24 43 30 33 32 00  | MULTI1 = $C032.|
00000190: 7D 21 A6 04 2E 45 51 20  4D 55 4C 54 49 32 20 3D  |}!...EQ MULTI2 =|
000001A0: 20 24 30 44 31 44 00 94  21 B0 04 2E 45 51 20 43  | $0D1D..!...EQ C|
000001B0: 4F 4C 4F 52 31 20 3D 20  24 43 30 31 30 00 AB 21  |OLOR1 = $C010..!|
000001C0: BA 04 2E 45 51 20 43 4F  4C 4F 52 32 20 3D 20 24  |...EQ COLOR2 = $|
000001D0: 30 44 30 46 00 BF 21 C4  04 2E 45 51 20 44 49 52  |0D0F..!...EQ DIR|
000001E0: 42 45 46 20 3D 20 36 38  00 D3 21 CE 04 2E 45 51  |BEF = 68..!...EQ|
000001F0: 20 52 45 20 20 20 20 20  3D 20 38 32 00 E7 21 D8  | RE     = 82..!.|
00000200: 04 2E 45 51 20 54 52 59  41 47 20 20 3D 20 38 34  |..EQ TRYAG  = 84|
00000210: 00 FE 21 E2 04 2E 45 51  20 5A 49 46 46 4C 31 20  |..!...EQ ZIFFL1 |
00000220: 3D 20 24 43 30 33 36 00  15 22 EC 04 2E 45 51 20  |= $C036.."...EQ |
00000230: 5A 49 46 46 4C 32 20 3D  20 24 30 43 32 39 00 2C  |ZIFFL2 = $0C29.,|
00000240: 22 F6 04 2E 45 51 20 43  4F 4C 54 58 31 20 3D 20  |"...EQ COLTX1 = |
00000250: 24 43 30 33 35 00 43 22  00 05 2E 45 51 20 43 4F  |$C035.C"...EQ CO|
00000260: 4C 54 58 32 20 3D 20 24  34 31 46 30 00 5A 22 0A  |LTX2 = $41F0.Z".|
00000270: 05 2E 45 51 20 4D 4F 44  55 53 31 20 3D 20 24 43  |..EQ MODUS1 = $C|
00000280: 30 33 37 00 71 22 14 05  2E 45 51 20 4D 4F 44 55  |037.q"...EQ MODU|
00000290: 53 32 20 3D 20 24 34 30  34 44 00 77 22 1E 05 3B  |S2 = $404D.w"..;|
000002A0: 00 88 22 28 05 20 4C 44  41 23 53 49 47 4E 31 2D  |.."(. LDA#SIGN1-|
000002B0: 31 00 97 22 32 05 20 53  54 41 42 4C 4B 4E 41 4D  |1.."2. STABLKNAM|
000002C0: 00 A4 22 3C 05 20 4C 44  41 23 24 33 37 00 AE 22  |.."<. LDA#$37.."|
000002D0: 46 05 20 53 54 41 31 00  BC 22 50 05 20 4A 53 52  |F. STA1.."P. JSR|
000002E0: 24 45 34 35 33 00 CA 22  5A 05 20 4A 53 52 24 46  |$E453.."Z. JSR$F|
000002F0: 44 31 35 00 DD 22 64 05  20 4C 44 41 23 3C 28 53  |D15.."d. LDA#<(S|
00000300: 45 53 42 45 47 29 00 F0  22 6E 05 20 4C 44 59 23  |ESBEG).."n. LDY#|
00000310: 3E 28 53 45 53 42 45 47  29 00 FF 22 78 05 20 4A  |>(SESBEG).."x. J|
00000320: 53 52 4F 55 54 50 55 54  00 0F 23 82 05 20 4C 44  |SROUTPUT..#.. LD|
00000330: 41 23 43 4F 4C 42 4F 52  00 1F 23 8C 05 20 4C 44  |A#COLBOR..#.. LD|
00000340: 58 23 43 4F 4C 42 41 43  00 2D 23 96 05 20 53 54  |X#COLBAC.-#.. ST|
00000350: 41 24 44 30 32 30 00 3B  23 A0 05 20 53 54 58 24  |A$D020.;#.. STX$|
00000360: 44 30 32 31 00 41 23 AA  05 3B 00 56 23 B4 05 4C  |D021.A#..;.V#..L|
00000370: 31 20 4C 44 41 23 3C 28  49 4E 53 47 45 4E 29 00  |1 LDA#<(INSGEN).|
00000380: 69 23 BE 05 20 4C 44 59  23 3E 28 49 4E 53 47 45  |i#.. LDY#>(INSGE|
00000390: 4E 29 00 78 23 C8 05 20  4A 53 52 53 54 52 49 4E  |N).x#.. JSRSTRIN|
000003A0: 47 00 87 23 D2 05 20 4A  53 52 41 4E 59 4B 45 59  |G..#.. JSRANYKEY|
000003B0: 00 93 23 DC 05 20 4C 44  41 23 30 38 00 9C 23 E6  |..#.. LDA#08..#.|
000003C0: 05 20 54 41 58 00 A5 23  F0 05 20 54 41 59 00 B4  |. TAX..#.. TAY..|
000003D0: 23 FA 05 20 4A 53 52 50  41 52 41 4D 45 00 C4 23  |#.. JSRPARAME..#|
000003E0: 04 06 20 4C 44 41 23 4C  45 4E 47 48 54 00 D6 23  |.. LDA#LENGHT..#|
000003F0: 0E 06 20 4C 44 58 23 3C  28 46 41 53 54 4C 29 00  |.. LDX#<(FASTL).|
00000400: E8 23 18 06 20 4C 44 59  23 3E 28 46 41 53 54 4C  |.#.. LDY#>(FASTL|
00000410: 29 00 F7 23 22 06 20 4A  53 52 46 49 4C 45 4E 41  |)..#". JSRFILENA|
00000420: 00 03 24 2C 06 20 4C 44  41 23 36 34 00 0F 24 36  |..$,. LDA#64..$6|
00000430: 06 20 53 54 41 24 39 30  00 1A 24 40 06 20 4C 44  |. STA$90..$@. LD|
00000440: 41 23 30 00 27 24 4A 06  20 4A 53 52 4C 4F 41 44  |A#0.'$J. JSRLOAD|
00000450: 00 33 24 54 06 20 53 54  58 24 41 45 00 3F 24 5E  |.3$T. STX$AE.?$^|
00000460: 06 20 53 54 59 24 41 46  00 4E 24 68 06 20 4A 53  |. STY$AF.N$h. JS|
00000470: 52 53 54 41 54 55 53 00  59 24 72 06 20 42 4D 49  |RSTATUS.Y$r. BMI|
00000480: 4C 31 00 5F 24 7C 06 3B  00 6E 24 86 06 20 4C 44  |L1._$|.;.n$.. LD|
00000490: 58 4C 41 45 4E 47 31 00  7D 24 90 06 20 53 54 58  |XLAENG1.}$.. STX|
000004A0: 4C 41 45 4E 47 32 00 92  24 9A 06 43 4F 50 59 20  |LAENG2..$..COPY |
000004B0: 4C 44 41 4E 41 43 48 4C  31 2C 58 00 A3 24 A4 06  |LDANACHL1,X..$..|
000004C0: 20 53 54 41 4E 41 43 48  4C 32 2C 58 00 AC 24 AE  | STANACHL2,X..$.|
000004D0: 06 20 44 45 58 00 B9 24  B8 06 20 42 50 4C 43 4F  |. DEX..$.. BPLCO|
000004E0: 50 59 00 C8 24 C2 06 20  4C 44 41 53 54 41 52 54  |PY..$.. LDASTART|
000004F0: 31 00 D9 24 CC 06 20 4F  52 41 53 54 41 52 54 31  |1..$.. ORASTART1|
00000500: 2B 31 00 E5 24 D6 06 20  42 45 51 52 55 4E 00 F2  |+1..$.. BEQRUN..|
00000510: 24 E0 06 20 4C 44 41 23  24 34 43 00 01 25 EA 06  |$.. LDA#$4C..%..|
00000520: 20 53 54 41 53 54 41 52  54 32 00 10 25 F4 06 20  | STASTART2..%.. |
00000530: 4C 44 41 53 54 41 52 54  31 00 21 25 FE 06 20 53  |LDASTART1.!%.. S|
00000540: 54 41 53 54 41 52 54 32  2B 31 00 32 25 08 07 20  |TASTART2+1.2%.. |
00000550: 4C 44 41 53 54 41 52 54  31 2B 31 00 43 25 12 07  |LDASTART1+1.C%..|
00000560: 20 53 54 41 53 54 41 52  54 32 2B 32 00 55 25 1C  | STASTART2+2.U%.|
00000570: 07 52 55 4E 20 4C 44 41  43 4F 4C 4F 52 31 00 64  |.RUN LDACOLOR1.d|
00000580: 25 26 07 20 53 54 41 43  4F 4C 4F 52 32 00 73 25  |%&. STACOLOR2.s%|
00000590: 30 07 20 4C 44 41 4D 55  4C 54 49 31 00 82 25 3A  |0. LDAMULTI1..%:|
000005A0: 07 20 53 54 41 4D 55 4C  54 49 32 00 91 25 44 07  |. STAMULTI2..%D.|
000005B0: 20 4C 44 41 5A 49 46 46  4C 31 00 A0 25 4E 07 20  | LDAZIFFL1..%N. |
000005C0: 53 54 41 5A 49 46 46 4C  32 00 A6 25 58 07 3B 00  |STAZIFFL2..%X.;.|
000005D0: B5 25 62 07 20 49 4E 43  42 4C 4B 4E 41 4D 00 CA  |.%b. INCBLKNAM..|
000005E0: 25 6C 07 53 31 20 4C 44  41 23 3C 28 49 4E 53 42  |%l.S1 LDA#<(INSB|
000005F0: 4C 4B 29 00 DD 25 76 07  20 4C 44 59 23 3E 28 49  |LK)..%v. LDY#>(I|
00000600: 4E 53 42 4C 4B 29 00 EC  25 80 07 20 4A 53 52 53  |NSBLK)..%.. JSRS|
00000610: 54 52 49 4E 47 00 FB 25  8A 07 20 4A 53 52 41 4E  |TRING..%.. JSRAN|
00000620: 59 4B 45 59 00 0A 26 94  07 20 4A 53 52 4E 41 4D  |YKEY..&.. JSRNAM|
00000630: 42 4C 4B 00 17 26 9E 07  20 4C 44 58 23 24 31 36  |BLK..&.. LDX#$16|
00000640: 00 22 26 A8 07 20 4C 44  59 23 38 00 2E 26 B2 07  |."&.. LDY#8..&..|
00000650: 20 53 54 58 24 46 42 00  3A 26 BC 07 20 53 54 59  | STX$FB.:&.. STY|
00000660: 24 46 43 00 47 26 C6 07  20 4C 44 41 23 24 46 42  |$FC.G&.. LDA#$FB|
00000670: 00 53 26 D0 07 20 4C 44  58 24 41 45 00 5F 26 DA  |.S&.. LDX$AE._&.|
00000680: 07 20 4C 44 59 24 41 46  00 6C 26 E4 07 20 4A 53  |. LDY$AF.l&.. JS|
00000690: 52 53 41 56 45 00 7B 26  EE 07 20 4A 53 52 53 54  |RSAVE.{&.. JSRST|
000006A0: 41 54 55 53 00 86 26 F8  07 20 42 4D 49 53 31 00  |ATUS..&.. BMIS1.|
000006B0: 8C 26 02 08 3B 00 A1 26  0C 08 4C 32 20 4C 44 41  |.&..;..&..L2 LDA|
000006C0: 23 3C 28 49 4E 53 47 45  4E 29 00 B4 26 16 08 20  |#<(INSGEN)..&.. |
000006D0: 4C 44 59 23 3E 28 49 4E  53 47 45 4E 29 00 C3 26  |LDY#>(INSGEN)..&|
000006E0: 20 08 20 4A 53 52 53 54  52 49 4E 47 00 D2 26 2A  | . JSRSTRING..&*|
000006F0: 08 20 4A 53 52 41 4E 59  4B 45 59 00 E2 26 34 08  |. JSRANYKEY..&4.|
00000700: 20 4C 44 41 23 4C 45 4E  47 48 54 00 F5 26 3E 08  | LDA#LENGHT..&>.|
00000710: 20 4C 44 58 23 3C 28 53  43 52 4F 4C 4C 29 00 08  | LDX#<(SCROLL)..|
00000720: 27 48 08 20 4C 44 59 23  3E 28 53 43 52 4F 4C 4C  |'H. LDY#>(SCROLL|
00000730: 29 00 17 27 52 08 20 4A  53 52 46 49 4C 45 4E 41  |)..'R. JSRFILENA|
00000740: 00 22 27 5C 08 20 4C 44  41 23 30 00 2F 27 66 08  |."'\. LDA#0./'f.|
00000750: 20 4A 53 52 4C 4F 41 44  00 3B 27 70 08 20 53 54  | JSRLOAD.;'p. ST|
00000760: 58 24 41 45 00 47 27 7A  08 20 53 54 59 24 41 46  |X$AE.G'z. STY$AF|
00000770: 00 56 27 84 08 20 4A 53  52 53 54 41 54 55 53 00  |.V'.. JSRSTATUS.|
00000780: 61 27 8E 08 20 42 4D 49  4C 32 00 67 27 98 08 3B  |a'.. BMIL2.g'..;|
00000790: 00 76 27 A2 08 20 4C 44  41 43 4F 4C 54 58 31 00  |.v'.. LDACOLTX1.|
000007A0: 85 27 AC 08 20 53 54 41  43 4F 4C 54 58 32 00 94  |.'.. STACOLTX2..|
000007B0: 27 B6 08 20 4C 44 41 4D  4F 44 55 53 31 00 A3 27  |'.. LDAMODUS1..'|
000007C0: C0 08 20 53 54 41 4D 4F  44 55 53 32 00 AE 27 CA  |.. STAMODUS2..'.|
000007D0: 08 20 4C 44 59 23 30 00  BB 27 D4 08 20 4C 44 41  |. LDY#0..'.. LDA|
000007E0: 23 24 31 30 00 C8 27 DE  08 20 4C 44 58 23 24 34  |#$10..'.. LDX#$4|
000007F0: 32 00 D4 27 E8 08 20 53  54 41 24 41 45 00 E0 27  |2..'.. STA$AE..'|
00000800: F2 08 20 53 54 58 24 41  46 00 F6 27 FC 08 57 45  |.. STX$AF..'..WE|
00000810: 49 54 45 52 20 4C 44 41  28 24 41 45 29 2C 59 00  |ITER LDA($AE),Y.|
00000820: 03 28 06 09 20 43 4D 50  23 24 36 30 00 10 28 10  |.(.. CMP#$60..(.|
00000830: 09 20 42 45 51 45 4E 44  45 00 1C 28 1A 09 20 49  |. BEQENDE..(.. I|
00000840: 4E 43 24 41 45 00 2B 28  24 09 20 42 4E 45 57 45  |NC$AE.+($. BNEWE|
00000850: 49 54 45 52 00 37 28 2E  09 20 49 4E 43 24 41 46  |ITER.7(.. INC$AF|
00000860: 00 46 28 38 09 20 42 4E  45 57 45 49 54 45 52 00  |.F(8. BNEWEITER.|
00000870: 56 28 42 09 45 4E 44 45  20 49 4E 43 24 41 45 00  |V(B.ENDE INC$AE.|
00000880: 64 28 4C 09 20 42 4E 45  4E 4F 49 4E 43 00 70 28  |d(L. BNENOINC.p(|
00000890: 56 09 20 49 4E 43 24 41  46 00 76 28 60 09 3B 00  |V. INC$AF.v(`.;.|
000008A0: 8A 28 6A 09 4E 4F 49 4E  43 20 49 4E 43 42 4C 4B  |.(j.NOINC INCBLK|
000008B0: 4E 41 4D 00 9F 28 74 09  53 32 20 4C 44 41 23 3C  |NAM..(t.S2 LDA#<|
000008C0: 28 49 4E 53 42 4C 4B 29  00 B2 28 7E 09 20 4C 44  |(INSBLK)..(~. LD|
000008D0: 59 23 3E 28 49 4E 53 42  4C 4B 29 00 C1 28 88 09  |Y#>(INSBLK)..(..|
000008E0: 20 4A 53 52 53 54 52 49  4E 47 00 D0 28 92 09 20  | JSRSTRING..(.. |
000008F0: 4A 53 52 41 4E 59 4B 45  59 00 DF 28 9C 09 20 4A  |JSRANYKEY..(.. J|
00000900: 53 52 4E 41 4D 42 4C 4B  00 EA 28 A6 09 20 4C 44  |SRNAMBLK..(.. LD|
00000910: 58 23 30 00 F7 28 B0 09  20 4C 44 59 23 24 34 30  |X#0..(.. LDY#$40|
00000920: 00 03 29 BA 09 20 53 54  58 24 46 42 00 0F 29 C4  |..).. STX$FB..).|
00000930: 09 20 53 54 59 24 46 43  00 1C 29 CE 09 20 4C 44  |. STY$FC..).. LD|
00000940: 41 23 24 46 42 00 28 29  D8 09 20 4C 44 58 24 41  |A#$FB.().. LDX$A|
00000950: 45 00 34 29 E2 09 20 4C  44 59 24 41 46 00 41 29  |E.4).. LDY$AF.A)|
00000960: EC 09 20 4A 53 52 53 41  56 45 00 50 29 F6 09 20  |.. JSRSAVE.P).. |
00000970: 4A 53 52 53 54 41 54 55  53 00 5B 29 00 0A 20 42  |JSRSTATUS.[).. B|
00000980: 4D 49 53 32 00 61 29 0A  0A 3B 00 6E 29 14 0A 4C  |MIS2.a)..;.n)..L|
00000990: 33 20 4C 44 58 23 38 00  79 29 1E 0A 20 4C 44 59  |3 LDX#8.y).. LDY|
000009A0: 23 30 00 88 29 28 0A 20  4A 53 52 50 41 52 41 4D  |#0..)(. JSRPARAM|
000009B0: 45 00 9A 29 32 0A 20 4C  44 41 23 3C 28 49 4E 53  |E..)2. LDA#<(INS|
000009C0: 5A 53 29 00 AC 29 3C 0A  20 4C 44 59 23 3E 28 49  |ZS)..)<. LDY#>(I|
000009D0: 4E 53 5A 53 29 00 BB 29  46 0A 20 4A 53 52 53 54  |NSZS)..)F. JSRST|
000009E0: 52 49 4E 47 00 CA 29 50  0A 20 4A 53 52 41 4E 59  |RING..)P. JSRANY|
000009F0: 4B 45 59 00 D6 29 5A 0A  20 4C 44 41 23 31 36 00  |KEY..)Z. LDA#16.|
00000A00: E3 29 64 0A 20 4C 44 58  23 24 31 31 00 F0 29 6E  |.)d. LDX#$11..)n|
00000A10: 0A 20 4C 44 59 23 24 43  30 00 FF 29 78 0A 20 4A  |. LDY#$C0..)x. J|
00000A20: 53 52 46 49 4C 45 4E 41  00 0A 2A 82 0A 20 4C 44  |SRFILENA..*.. LD|
00000A30: 41 23 30 00 15 2A 8C 0A  20 4C 44 58 23 30 00 22  |A#0..*.. LDX#0."|
00000A40: 2A 96 0A 20 4C 44 59 23  24 37 30 00 2F 2A A0 0A  |*.. LDY#$70./*..|
00000A50: 20 4A 53 52 4C 4F 41 44  00 3E 2A AA 0A 20 4A 53  | JSRLOAD.>*.. JS|
00000A60: 52 53 54 41 54 55 53 00  49 2A B4 0A 20 42 4D 49  |RSTATUS.I*.. BMI|
00000A70: 4C 33 00 4F 2A BE 0A 3B  00 5E 2A C8 0A 20 49 4E  |L3.O*..;.^*.. IN|
00000A80: 43 42 4C 4B 4E 41 4D 00  73 2A D2 0A 53 33 20 4C  |CBLKNAM.s*..S3 L|
00000A90: 44 41 23 3C 28 49 4E 53  42 4C 4B 29 00 86 2A DC  |DA#<(INSBLK)..*.|
00000AA0: 0A 20 4C 44 59 23 3E 28  49 4E 53 42 4C 4B 29 00  |. LDY#>(INSBLK).|
00000AB0: 95 2A E6 0A 20 4A 53 52  53 54 52 49 4E 47 00 A4  |.*.. JSRSTRING..|
00000AC0: 2A F0 0A 20 4A 53 52 41  4E 59 4B 45 59 00 B3 2A  |*.. JSRANYKEY..*|
00000AD0: FA 0A 20 4A 53 52 4E 41  4D 42 4C 4B 00 BE 2A 04  |.. JSRNAMBLK..*.|
00000AE0: 0B 20 4C 44 41 23 30 00  CB 2A 0E 0B 20 4C 44 58  |. LDA#0..*.. LDX|
00000AF0: 23 24 37 30 00 D7 2A 18  0B 20 53 54 41 24 46 42  |#$70..*.. STA$FB|
00000B00: 00 E3 2A 22 0B 20 53 54  58 24 46 43 00 F0 2A 2C  |..*". STX$FC..*,|
00000B10: 0B 20 4C 44 41 23 24 46  42 00 FB 2A 36 0B 20 4C  |. LDA#$FB..*6. L|
00000B20: 44 58 23 30 00 08 2B 40  0B 20 4C 44 59 23 24 37  |DX#0..+@. LDY#$7|
00000B30: 38 00 15 2B 4A 0B 20 4A  53 52 53 41 56 45 00 24  |8..+J. JSRSAVE.$|
00000B40: 2B 54 0B 20 4A 53 52 53  54 41 54 55 53 00 2F 2B  |+T. JSRSTATUS./+|
00000B50: 5E 0B 20 42 4D 49 53 33  00 35 2B 68 0B 3B 00 42  |^. BMIS3.5+h.;.B|
00000B60: 2B 72 0B 4C 34 20 4C 44  58 23 38 00 4D 2B 7C 0B  |+r.L4 LDX#8.M+|.|
00000B70: 20 4C 44 59 23 30 00 5C  2B 86 0B 20 4A 53 52 50  | LDY#0.\+.. JSRP|
00000B80: 41 52 41 4D 45 00 6F 2B  90 0B 20 4C 44 41 23 3C  |ARAME.o+.. LDA#<|
00000B90: 28 49 4E 53 47 52 41 29  00 82 2B 9A 0B 20 4C 44  |(INSGRA)..+.. LD|
00000BA0: 59 23 3E 28 49 4E 53 47  52 41 29 00 91 2B A4 0B  |Y#>(INSGRA)..+..|
00000BB0: 20 4A 53 52 53 54 52 49  4E 47 00 A0 2B AE 0B 20  | JSRSTRING..+.. |
00000BC0: 4A 53 52 41 4E 59 4B 45  59 00 AC 2B B8 0B 20 4C  |JSRANYKEY..+.. L|
00000BD0: 44 41 23 31 36 00 B7 2B  C2 0B 20 4C 44 58 23 30  |DA#16..+.. LDX#0|
00000BE0: 00 C4 2B CC 0B 20 4C 44  59 23 24 43 30 00 D3 2B  |..+.. LDY#$C0..+|
00000BF0: D6 0B 20 4A 53 52 46 49  4C 45 4E 41 00 DE 2B E0  |.. JSRFILENA..+.|
00000C00: 0B 20 4C 44 41 23 30 00  E9 2B EA 0B 20 4C 44 58  |. LDA#0..+.. LDX|
00000C10: 23 30 00 F6 2B F4 0B 20  4C 44 59 23 24 41 30 00  |#0..+.. LDY#$A0.|
00000C20: 03 2C FE 0B 20 4A 53 52  4C 4F 41 44 00 12 2C 08  |.,.. JSRLOAD..,.|
00000C30: 0C 20 4A 53 52 53 54 41  54 55 53 00 1D 2C 12 0C  |. JSRSTATUS..,..|
00000C40: 20 42 4D 49 4C 34 00 23  2C 1C 0C 3B 00 30 2C 26  | BMIL4.#,..;.0,&|
00000C50: 0C 4C 35 20 4C 44 58 23  38 00 3B 2C 30 0C 20 4C  |.L5 LDX#8.;,0. L|
00000C60: 44 59 23 30 00 4A 2C 3A  0C 20 4A 53 52 50 41 52  |DY#0.J,:. JSRPAR|
00000C70: 41 4D 45 00 5D 2C 44 0C  20 4C 44 41 23 3C 28 49  |AME.],D. LDA#<(I|
00000C80: 4E 53 47 45 4E 29 00 70  2C 4E 0C 20 4C 44 59 23  |NSGEN).p,N. LDY#|
00000C90: 3E 28 49 4E 53 47 45 4E  29 00 7F 2C 58 0C 20 4A  |>(INSGEN)..,X. J|
00000CA0: 53 52 53 54 52 49 4E 47  00 8E 2C 62 0C 20 4A 53  |SRSTRING..,b. JS|
00000CB0: 52 41 4E 59 4B 45 59 00  9E 2C 6C 0C 20 4C 44 41  |RANYKEY..,l. LDA|
00000CC0: 23 4C 45 4E 47 48 54 00  B0 2C 76 0C 20 4C 44 58  |#LENGHT..,v. LDX|
00000CD0: 23 3C 28 53 4F 55 4E 44  29 00 C2 2C 80 0C 20 4C  |#<(SOUND)..,.. L|
00000CE0: 44 59 23 3E 28 53 4F 55  4E 44 29 00 D1 2C 8A 0C  |DY#>(SOUND)..,..|
00000CF0: 20 4A 53 52 46 49 4C 45  4E 41 00 DD 2C 94 0C 20  | JSRFILENA..,.. |
00000D00: 4C 44 41 23 30 38 00 E6  2C 9E 0C 20 54 41 58 00  |LDA#08..,.. TAX.|
00000D10: EF 2C A8 0C 20 54 41 59  00 FE 2C B2 0C 20 4A 53  |.,.. TAY..,.. JS|
00000D20: 52 50 41 52 41 4D 45 00  09 2D BC 0C 20 4C 44 41  |RPARAME..-.. LDA|
00000D30: 23 30 00 16 2D C6 0C 20  4A 53 52 4C 4F 41 44 00  |#0..-.. JSRLOAD.|
00000D40: 25 2D D0 0C 20 4A 53 52  53 54 41 54 55 53 00 30  |%-.. JSRSTATUS.0|
00000D50: 2D DA 0C 20 42 4D 49 4C  35 00 36 2D E4 0C 3B 00  |-.. BMIL5.6-..;.|
00000D60: 45 2D EE 0C 20 49 4E 43  42 4C 4B 4E 41 4D 00 5A  |E-.. INCBLKNAM.Z|
00000D70: 2D F8 0C 53 34 20 4C 44  41 23 3C 28 49 4E 53 42  |-..S4 LDA#<(INSB|
00000D80: 4C 4B 29 00 6D 2D 02 0D  20 4C 44 59 23 3E 28 49  |LK).m-.. LDY#>(I|
00000D90: 4E 53 42 4C 4B 29 00 7C  2D 0C 0D 20 4A 53 52 53  |NSBLK).|-.. JSRS|
00000DA0: 54 52 49 4E 47 00 8B 2D  16 0D 20 4A 53 52 41 4E  |TRING..-.. JSRAN|
00000DB0: 59 4B 45 59 00 9A 2D 20  0D 20 4A 53 52 4E 41 4D  |YKEY..- . JSRNAM|
00000DC0: 42 4C 4B 00 A7 2D 2A 0D  20 4C 44 41 23 24 33 36  |BLK..-*. LDA#$36|
00000DD0: 00 B1 2D 34 0D 20 53 54  41 31 00 BC 2D 3E 0D 20  |..-4. STA1..->. |
00000DE0: 4C 44 41 23 30 00 C9 2D  48 0D 20 4C 44 58 23 24  |LDA#0..-H. LDX#$|
00000DF0: 41 30 00 D5 2D 52 0D 20  53 54 41 24 46 42 00 E1  |A0..-R. STA$FB..|
00000E00: 2D 5C 0D 20 53 54 58 24  46 43 00 EE 2D 66 0D 20  |-\. STX$FC..-f. |
00000E10: 4C 44 41 23 24 46 42 00  F9 2D 70 0D 20 4C 44 58  |LDA#$FB..-p. LDX|
00000E20: 23 30 00 06 2E 7A 0D 20  4C 44 59 23 24 44 30 00  |#0...z. LDY#$D0.|
00000E30: 13 2E 84 0D 20 4A 53 52  53 41 56 45 00 20 2E 8E  |.... JSRSAVE. ..|
00000E40: 0D 20 4C 44 41 23 24 33  37 00 2A 2E 98 0D 20 53  |. LDA#$37.*... S|
00000E50: 54 41 31 00 39 2E A2 0D  20 4A 53 52 53 54 41 54  |TA1.9... JSRSTAT|
00000E60: 55 53 00 44 2E AC 0D 20  42 4D 49 53 34 00 4A 2E  |US.D... BMIS4.J.|
00000E70: B6 0D 3B 00 5D 2E C0 0D  20 4C 44 41 23 3C 28 41  |..;.]... LDA#<(A|
00000E80: 55 53 4D 45 4C 29 00 70  2E CA 0D 20 4C 44 59 23  |USMEL).p... LDY#|
00000E90: 3E 28 41 55 53 4D 45 4C  29 00 7F 2E D4 0D 20 4A  |>(AUSMEL)..... J|
00000EA0: 53 52 53 54 52 49 4E 47  00 8A 2E DE 0D 20 4C 44  |SRSTRING..... LD|
00000EB0: 41 23 30 00 96 2E E8 0D  20 53 54 41 24 43 36 00  |A#0..... STA$C6.|
00000EC0: A5 2E F2 0D 41 55 53 20  4C 44 41 24 43 36 00 B1  |....AUS LDA$C6..|
00000ED0: 2E FC 0D 20 42 45 51 41  55 53 00 BF 2E 06 0E 20  |... BEQAUS..... |
00000EE0: 4A 53 52 24 45 35 31 38  00 CC 2E 10 0E 20 4A 4D  |JSR$E518..... JM|
00000EF0: 50 51 55 49 54 00 D2 2E  1A 0E 3B 00 EA 2E 24 0E  |PQUIT.....;...$.|
00000F00: 41 4E 59 4B 45 59 20 4C  44 41 23 3C 28 50 52 45  |ANYKEY LDA#<(PRE|
00000F10: 53 53 29 00 FC 2E 2E 0E  20 4C 44 59 23 3E 28 50  |SS)..... LDY#>(P|
00000F20: 52 45 53 53 29 00 0B 2F  38 0E 20 4A 53 52 4F 55  |RESS)../8. JSROU|
00000F30: 54 50 55 54 00 16 2F 42  0E 20 4C 44 41 23 30 00  |TPUT../B. LDA#0.|
00000F40: 22 2F 4C 0E 20 53 54 41  24 43 36 00 31 2F 56 0E  |"/L. STA$C6.1/V.|
00000F50: 47 45 54 20 4C 44 41 24  43 36 00 3D 2F 60 0E 20  |GET LDA$C6.=/`. |
00000F60: 42 45 51 47 45 54 00 4F  2F 6A 0E 20 4C 44 41 23  |BEQGET.O/j. LDA#|
00000F70: 3C 28 52 45 41 44 59 29  00 61 2F 74 0E 20 4C 44  |<(READY).a/t. LD|
00000F80: 59 23 3E 28 52 45 41 44  59 29 00 70 2F 7E 0E 20  |Y#>(READY).p/~. |
00000F90: 4A 53 52 4F 55 54 50 55  54 00 79 2F 88 0E 20 52  |JSROUTPUT.y/.. R|
00000FA0: 54 53 00 7F 2F 92 0E 3B  00 90 2F 9C 0E 4E 41 4D  |TS../..;../..NAM|
00000FB0: 42 4C 4B 20 4C 44 41 23  31 00 A3 2F A6 0E 20 4C  |BLK LDA#1../.. L|
00000FC0: 44 58 23 3C 28 42 4C 4B  4E 41 4D 29 00 B6 2F B0  |DX#<(BLKNAM)../.|
00000FD0: 0E 20 4C 44 59 23 3E 28  42 4C 4B 4E 41 4D 29 00  |. LDY#>(BLKNAM).|
00000FE0: C5 2F BA 0E 20 4A 53 52  46 49 4C 45 4E 41 00 CE  |./.. JSRFILENA..|
00000FF0: 2F C4 0E 20 52 54 53 00  D4 2F CE 0E 3B 00 E6 2F  |/.. RTS../..;../|
00001000: D8 0E 53 54 41 54 55 53  20 4C 44 41 24 39 30 00  |..STATUS LDA$90.|
00001010: F3 2F E2 0E 20 4F 52 41  23 24 34 30 00 FF 2F EC  |./.. ORA#$40../.|
00001020: 0E 20 43 4D 50 23 36 34  00 0E 30 F6 0E 20 42 4E  |. CMP#64..0.. BN|
00001030: 45 46 45 48 4C 45 52 00  17 30 00 0F 20 52 54 53  |EFEHLER..0.. RTS|
00001040: 00 2A 30 0A 0F 46 45 48  4C 45 52 20 4C 44 41 23  |.*0..FEHLER LDA#|
00001050: 24 39 33 00 38 30 14 0F  20 4A 53 52 24 46 46 44  |$93.80.. JSR$FFD|
00001060: 32 00 43 30 1E 0F 20 4C  44 41 23 38 00 4F 30 28  |2.C0.. LDA#8.O0(|
00001070: 0F 20 53 54 41 24 42 41  00 5D 30 32 0F 20 4A 53  |. STA$BA.]02. JS|
00001080: 52 24 46 46 42 34 00 6A  30 3C 0F 20 4C 44 41 23  |R$FFB4.j0<. LDA#|
00001090: 24 36 46 00 76 30 46 0F  20 53 54 41 24 42 39 00  |$6F.v0F. STA$B9.|
000010A0: 84 30 50 0F 20 4A 53 52  24 46 46 39 36 00 98 30  |.0P. JSR$FF96..0|
000010B0: 5A 0F 47 45 54 4B 45 59  20 4A 53 52 24 45 45 31  |Z.GETKEY JSR$EE1|
000010C0: 33 00 A6 30 64 0F 20 4A  53 52 24 46 46 44 32 00  |3..0d. JSR$FFD2.|
000010D0: B2 30 6E 0F 20 43 4D 50  23 31 33 00 C1 30 78 0F  |.0n. CMP#13..0x.|
000010E0: 20 42 4E 45 47 45 54 4B  45 59 00 CF 30 82 0F 20  | BNEGETKEY..0.. |
000010F0: 4A 53 52 24 46 46 41 42  00 D5 30 8C 0F 3B 00 ED  |JSR$FFAB..0..;..|
00001100: 30 96 0F 45 52 52 4F 52  20 4C 44 41 23 3C 28 57  |0..ERROR LDA#<(W|
00001110: 41 53 4E 55 4E 29 00 00  31 A0 0F 20 4C 44 59 23  |ASNUN)..1.. LDY#|
00001120: 3E 28 57 41 53 4E 55 4E  29 00 0F 31 AA 0F 20 4A  |>(WASNUN)..1.. J|
00001130: 53 52 4F 55 54 50 55 54  00 1A 31 B4 0F 20 4C 44  |SROUTPUT..1.. LD|
00001140: 41 23 30 00 26 31 BE 0F  20 53 54 41 24 43 36 00  |A#0.&1.. STA$C6.|
00001150: 38 31 C8 0F 57 48 41 54  20 4A 53 52 24 46 46 45  |81..WHAT JSR$FFE|
00001160: 34 00 48 31 D2 0F 20 43  4D 50 23 44 49 52 42 45  |4.H1.. CMP#DIRBE|
00001170: 46 00 58 31 DC 0F 20 42  4E 45 52 45 53 54 41 52  |F.X1.. BNERESTAR|
00001180: 54 00 64 31 E6 0F 20 4A  53 52 38 39 30 00 72 31  |T.d1.. JSR890.r1|
00001190: F0 0F 20 4A 4D 50 45 52  52 4F 52 00 85 31 FA 0F  |.. JMPERROR..1..|
000011A0: 52 45 53 54 41 52 54 20  43 4D 50 23 52 45 00 93  |RESTART CMP#RE..|
000011B0: 31 04 10 20 42 4E 45 41  47 41 49 4E 00 9C 31 0E  |1.. BNEAGAIN..1.|
000011C0: 10 20 50 4C 41 00 A5 31  18 10 20 50 4C 41 00 B2  |. PLA..1.. PLA..|
000011D0: 31 22 10 20 4C 44 41 23  32 35 32 00 BB 31 2C 10  |1". LDA#252..1,.|
000011E0: 20 50 48 41 00 C8 31 36  10 20 4C 44 41 23 32 32  | PHA..16. LDA#22|
000011F0: 35 00 D1 31 40 10 20 50  48 41 00 DA 31 4A 10 20  |5..1@. PHA..1J. |
00001200: 52 54 53 00 EE 31 54 10  41 47 41 49 4E 20 43 4D  |RTS..1T.AGAIN CM|
00001210: 50 23 54 52 59 41 47 00  FB 31 5E 10 20 42 4E 45  |P#TRYAG..1^. BNE|
00001220: 57 48 41 54 00 06 32 68  10 20 4C 44 41 23 30 00  |WHAT..2h. LDA#0.|
00001230: 12 32 72 10 20 53 54 41  24 39 30 00 1F 32 7C 10  |.2r. STA$90..2|.|
00001240: 20 4C 44 41 23 32 35 35  00 28 32 86 10 20 52 54  | LDA#255.(2.. RT|
00001250: 53 00 2E 32 90 10 3B 00  3D 32 9A 10 53 54 52 49  |S..2..;.=2..STRI|
00001260: 4E 47 20 50 48 41 00 46  32 A4 10 20 54 59 41 00  |NG PHA.F2.. TYA.|
00001270: 4F 32 AE 10 20 50 48 41  00 63 32 B8 10 20 4C 44  |O2.. PHA.c2.. LD|
00001280: 41 23 3C 28 43 4C 52 53  43 52 4E 29 00 77 32 C2  |A#<(CLRSCRN).w2.|
00001290: 10 20 4C 44 59 23 3E 28  43 4C 52 53 43 52 4E 29  |. LDY#>(CLRSCRN)|
000012A0: 00 86 32 CC 10 20 4A 53  52 4F 55 54 50 55 54 00  |..2.. JSROUTPUT.|
000012B0: 8F 32 D6 10 20 50 4C 41  00 98 32 E0 10 20 54 41  |.2.. PLA..2.. TA|
000012C0: 59 00 A1 32 EA 10 20 50  4C 41 00 B0 32 F4 10 20  |Y..2.. PLA..2.. |
000012D0: 4A 4D 50 4F 55 54 50 55  54 00 B6 32 FE 10 3B 00  |JMPOUTPUT..2..;.|
000012E0: D6 32 08 11 46 41 53 54  4C 20 2E 54 58 22 46 41  |.2..FASTL .TX"FA|
000012F0: 53 54 4C 4F 41 44 20 20  20 2E 43 4F 44 45 22 00  |STLOAD   .CODE".|
00001300: F6 32 12 11 53 4F 55 4E  44 20 2E 54 58 22 54 52  |.2..SOUND .TX"TR|
00001310: 41 50 2D 53 4F 55 4E 44  20 2E 43 4F 44 45 22 00  |AP-SOUND .CODE".|
00001320: 17 33 1C 11 53 43 52 4F  4C 4C 20 2E 54 58 22 53  |.3..SCROLL .TX"S|
00001330: 43 52 4F 4C 4C 49 4E 47  20 20 2E 43 4F 44 45 22  |CROLLING  .CODE"|
00001340: 00 29 33 26 11 42 4C 4B  4E 41 4D 20 2E 54 58 22  |.)3&.BLKNAM .TX"|
00001350: 41 22 00 2F 33 30 11 3B  00 60 33 3A 11 49 4E 53  |A"./30.;.`3:.INS|
00001360: 42 4C 4B 20 2E 54 58 22  20 20 20 20 20 20 20 20  |BLK .TX"        |
00001370: 50 4C 45 41 53 45 20 49  4E 53 45 52 54 20 42 4C  |PLEASE INSERT BL|
00001380: 41 4E 4B 20 44 49 53 4B  22 00 6D 33 44 11 2E 42  |ANK DISK".m3D..B|
00001390: 59 20 31 33 2C 30 00 73  33 4E 11 3B 00 A4 33 58  |Y 13,0.s3N.;..3X|
000013A0: 11 49 4E 53 5A 53 20 2E  54 58 22 20 20 20 20 20  |.INSZS .TX"     |
000013B0: 20 20 50 4C 45 41 53 45  20 49 4E 53 45 52 54 20  |  PLEASE INSERT |
000013C0: 43 48 41 52 53 45 54 2D  44 49 53 4B 22 00 B1 33  |CHARSET-DISK"..3|
000013D0: 62 11 2E 42 59 20 31 33  2C 30 00 B7 33 6C 11 3B  |b..BY 13,0..3l.;|
000013E0: 00 E9 33 76 11 49 4E 53  47 52 41 20 2E 54 58 22  |..3v.INSGRA .TX"|
000013F0: 20 20 20 20 20 20 20 50  4C 45 41 53 45 20 49 4E  |       PLEASE IN|
00001400: 53 45 52 54 20 47 52 41  50 48 49 43 2D 44 49 53  |SERT GRAPHIC-DIS|
00001410: 4B 22 00 F6 33 80 11 2E  42 59 20 31 33 2C 30 00  |K"..3...BY 13,0.|
00001420: FC 33 8A 11 3B 00 36 34  94 11 41 55 53 4D 45 4C  |.3..;.64..AUSMEL|
00001430: 20 2E 54 58 22 91 20 B0  C0 C0 C0 C0 C0 C0 C0 C0  | .TX". .........|
00001440: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
00001450: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 AE 20 22 00  |............. ".|
00001460: 69 34 9E 11 20 2E 54 58  22 20 DD 20 20 45 4E 44  |i4.. .TX" .  END|
00001470: 20 4F 46 20 53 45 53 53  49 4F 4E 2F 43 4F 4D 50  | OF SESSION/COMP|
00001480: 41 43 4B 20 54 48 45 20  46 49 4C 45 53 20 20 DD  |ACK THE FILES  .|
00001490: 20 22 00 9B 34 A8 11 20  2E 54 58 22 20 AD C0 C0  | "..4.. .TX" ...|
000014A0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
000014B0: C0 C0 C0 C0 C0 C0 C0 C0  C0 C0 C0 C0 C0 C0 C0 C0  |................|
000014C0: C0 C0 BD 22 00 A8 34 B2  11 2E 42 59 20 31 33 2C  |..."..4...BY 13,|
000014D0: 30 00 AE 34 BC 11 3B 00  C3 34 C6 11 53 45 53 42  |0..4..;..4..SESB|
000014E0: 45 47 20 2E 54 58 22 05  8E 08 93 22 00 D0 34 D0  |EG .TX"...."..4.|
000014F0: 11 2E 42 59 20 31 33 2C  30 00 D6 34 DA 11 3B 00  |..BY 13,0..4..;.|
00001500: 09 35 E4 11 49 4E 53 47  45 4E 20 2E 54 58 22 20  |.5..INSGEN .TX" |
00001510: 20 20 20 20 20 50 4C 45  41 53 45 20 49 4E 53 45  |     PLEASE INSE|
00001520: 52 54 20 47 45 4E 45 52  41 54 4F 52 20 44 49 53  |RT GENERATOR DIS|
00001530: 4B 22 00 16 35 EE 11 2E  42 59 20 31 33 2C 30 00  |K"..5...BY 13,0.|
00001540: 49 35 F8 11 50 52 45 53  53 20 2E 54 58 22 20 20  |I5..PRESS .TX"  |
00001550: 20 20 20 54 48 45 4E 20  50 52 45 53 53 20 41 4E  |   THEN PRESS AN|
00001560: 59 20 4B 45 59 20 54 4F  20 43 4F 4E 54 49 4E 55  |Y KEY TO CONTINU|
00001570: 45 22 00 56 35 02 12 2E  42 59 20 31 33 2C 30 00  |E".V5...BY 13,0.|
00001580: 5C 35 0C 12 3B 00 94 35  16 12 52 45 41 44 59 20  |\5..;..5..READY |
00001590: 2E 54 58 22 91 20 20 20  20 20 20 20 20 20 20 20  |.TX".           |
000015A0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
000015B0: 20 20 20 20 20 20 20 20  20 20 20 20 22 00 9F 35  |            "..5|
000015C0: 20 12 2E 42 59 20 31 33  00 D3 35 2A 12 20 2E 54  | ..BY 13..5*. .T|
000015D0: 58 22 91 91 20 20 20 20  20 20 20 20 20 20 20 20  |X"..            |
000015E0: 20 20 50 4C 45 41 53 45  20 57 41 49 54 20 20 20  |  PLEASE WAIT   |
000015F0: 20 20 20 20 20 20 20 20  20 20 20 22 00 E6 35 34  |           "..54|
00001600: 12 2E 42 59 20 31 33 2C  31 33 2C 31 33 2C 30 00  |..BY 13,13,13,0.|
00001610: EC 35 3E 12 3B 00 23 36  48 12 57 41 53 4E 55 4E  |.5>.;.#6H.WASNUN|
00001620: 20 2E 54 58 22 11 11 12  54 92 52 59 20 41 47 41  | .TX"...T.RY AGA|
00001630: 49 4E 2C 20 12 44 92 49  52 45 43 54 4F 52 59 20  |IN, .D.IRECTORY |
00001640: 4F 52 20 12 52 92 45 53  45 54 3F 22 00 33 36 52  |OR .R.ESET?".36R|
00001650: 12 2E 42 59 20 31 33 2C  31 33 2C 30 00 39 36 5C  |..BY 13,13,0.96\|
00001660: 12 3B 00 56 36 66 12 43  4C 52 53 43 52 4E 20 2E  |.;.V6f.CLRSCRN .|
00001670: 54 58 22 93 11 11 11 11  11 11 11 11 11 11 22 00  |TX"...........".|
00001680: 63 36 70 12 2E 42 59 20  31 33 2C 30 00 00 00     |c6p..BY 13,0... |

X......BA $9000.....;.. ...EQ OUTPUT = $
AB1E.. ...EQ PARAME = $FFBA.1 ...EQ FILE
NA = $FFBD.H ...EQ LOAD   = $FFD5._ $..E
Q SAVE   = $FFD8.R ...EQ COLBOR = 5.. 8.
.EQ COLBAC = 11.. B..EQ SIGN1  = 65.. L.
.EQ LENGHT = 16.E V..EQ QUIT   = $FCE2..
 `..EQ NACHL1 = $C021.. J..EQ NACHL2 = $
08BD..!T..EQ LAENG1 = $C031.!!~..EQ LAEN
G2 = $0898.8!...EQ START1 = $C033.O!...E
Q START2 = $08B4.F!...EQ MULTI1 = $C032.
}!...EQ MULTI2 = $0D1D..!...EQ COLOR1 = 
$C010..!...EQ COLOR2 = $0D0F..!D..EQ DIR
BEF = 68.S!N..EQ RE     = 82..!X..EQ TRY
AG  = 84..!...EQ ZIFFL1 = $C036.."...EQ 
ZIFFL2 = $0C29.,"...EQ COLTX1 = $C035.C"
...EQ COLTX2 = $41F0.Z"...EQ MODUS1 = $C
037.Q"...EQ MODUS2 = $404D.W"..;.."(. LD
A#SIGN1-1.."2. STABLKNAM.."<. LDA#$37.."
F. STA1.."P. JSR$E453.J"Z. JSR$FD15.."D.
 LDA#<(SESBEG).."N. LDY#>(SESBEG).."X. J
SROUTPUT..#.. LDA#COLBOR..#.. LDX#COLBAC
.-#.. STA$D020.;# . STX$D021.A#..;.V#..L
1 LDA#<(INSGEN).I#.. LDY#>(INSGEN).X#H. 
JSRSTRING..#R. JSRANYKEY..#.. LDA#08..#.
. TAX..#.. TAY..#.. JSRPARAME.D#.. LDA#L
ENGHT.V#.. LDX#<(FASTL)..#.. LDY#>(FASTL
)..#". JSRFILENA..$,. LDA#64..$6. STA$90
..$@. LDA#0.'$J. JSRLOAD.3$T. STX$AE.?$^
. STY$AF.N$H. JSRSTATUS.Y$R. BMIL1._$|.;
.N$.. LDXLAENG1.}$.. STXLAENG2..$..COPY 
LDANACHL1,X..$.. STANACHL2,X..$.. DEX..$
.. BPLCOPY.H$B. LDASTART1.Y$L. ORASTART1
+1..$V. BEQRUN..$.. LDA#$4C..%.. STASTAR
T2..%.. LDASTART1.!%.. STASTART2+1.2%.. 
LDASTART1+1.C%.. STASTART2+2.U%..RUN LDA
COLOR1.D%&. STACOLOR2.S%0. LDAMULTI1..%:
. STAMULTI2..%D. LDAZIFFL1. %N. STAZIFFL
2..%X.;..%B. INCBLKNAM.J%L.S1 LDA#<(INSB
LK)..%V. LDY#>(INSBLK)..%.. JSRSTRING..%
.. JSRANYKEY..&.. JSRNAMBLK..&.. LDX#$16
."&.. LDY#8..&.. STX$FB.:&.. STY$FC.G&F.
 LDA#$FB.S&P. LDX$AE._&Z. LDY$AF.L&.. JS
RSAVE.{&.. JSRSTATUS..&.. BMIS1..&..;..&
..L2 LDA#<(INSGEN)..&.. LDY#>(INSGEN).C&
 . JSRSTRING.R&*. JSRANYKEY..&4. LDA#LEN
GHT..&>. LDX#<(SCROLL)..'H. LDY#>(SCROLL
)..'R. JSRFILENA."'\. LDA#0./'F. JSRLOAD
.;'P. STX$AE.G'Z. STY$AF.V'.. JSRSTATUS.
A'.. BMIL2.G'..;.V'.. LDACOLTX1..'.. STA
COLTX2..'.. LDAMODUS1..'.. STAMODUS2..'J
. LDY#0..'T. LDA#$10.H'.. LDX#$42.T'.. S
TA$AE..'.. STX$AF..'..WEITER LDA($AE),Y.
.(.. CMP#$60..(.. BEQENDE..(.. INC$AE.+(
$. BNEWEITER.7(.. INC$AF.F(8. BNEWEITER.
V(B.ENDE INC$AE.D(L. BNENOINC.P(V. INC$A
F.V(`.;..(J.NOINC INCBLKNAM..(T.S2 LDA#<
(INSBLK)..(~. LDY#>(INSBLK).A(.. JSRSTRI
NG.P(.. JSRANYKEY..(.. JSRNAMBLK..(.. LD
X#0..(.. LDY#$40..).. STX$FB..)D. STY$FC
..)N. LDA#$FB.()X. LDX$AE.4).. LDY$AF.A)
.. JSRSAVE.P).. JSRSTATUS.[).. BMIS2.A).
.;.N)..L3 LDX#8.Y).. LDY#0..)(. JSRPARAM
E..)2. LDA#<(INSZS)..)<. LDY#>(INSZS)..)
F. JSRSTRING.J)P. JSRANYKEY.V)Z. LDA#16.
.)D. LDX#$11..)N. LDY#$C0..)X. JSRFILENA
..*.. LDA#0..*.. LDX#0."*.. LDY#$70./* .
 JSRLOAD.>*.. JSRSTATUS.I*.. BMIL3.O*..;
.^*H. INCBLKNAM.S*R.S3 LDA#<(INSBLK)..*.
. LDY#>(INSBLK)..*.. JSRSTRING..*.. JSRA
NYKEY..*.. JSRNAMBLK..*.. LDA#0.K*.. LDX
#$70.W*.. STA$FB..*". STX$FC..*,. LDA#$F
B..*6. LDX#0..+@. LDY#$78..+J. JSRSAVE.$
+T. JSRSTATUS./+^. BMIS3.5+H.;.B+R.L4 LD
X#8.M+|. LDY#0.\+.. JSRPARAME.O+.. LDA#<
(INSGRA)..+.. LDY#>(INSGRA)..+.. JSRSTRI
NG. +.. JSRANYKEY..+.. LDA#16..+B. LDX#0
.D+L. LDY#$C0.S+V. JSRFILENA..+.. LDA#0.
.+.. LDX#0..+.. LDY#$A0..,.. JSRLOAD..,.
. JSRSTATUS..,.. BMIL4.#,..;.0,&.L5 LDX#
8.;,0. LDY#0.J,:. JSRPARAME.],D. LDA#<(I
NSGEN).P,N. LDY#>(INSGEN).,X. JSRSTRING
..,B. JSRANYKEY..,L. LDA#LENGHT..,V. LDX
#<(SOUND).B,.. LDY#>(SOUND).Q,.. JSRFILE
NA..,.. LDA#08..,.. TAX..,.. TAY..,.. JS
RPARAME..-.. LDA#0..-F. JSRLOAD.%-P. JSR
STATUS.0-Z. BMIL5.6-..;.E-.. INCBLKNAM.Z
-..S4 LDA#<(INSBLK).M-.. LDY#>(INSBLK).|
-.. JSRSTRING..-.. JSRANYKEY..- . JSRNAM
BLK..-*. LDA#$36..-4. STA1..->. LDA#0.I-
H. LDX#$A0.U-R. STA$FB..-\. STX$FC..-F. 
LDA#$FB..-P. LDX#0...Z. LDY#$D0..... JSR
SAVE. ... LDA#$37.*... STA1.9... JSRSTAT
US.D... BMIS4.J...;.]... LDA#<(AUSMEL).P
.J. LDY#>(AUSMEL)..T. JSRSTRING..... LD
A#0..... STA$C6.....AUS LDA$C6..... BEQA
US..... JSR$E518.L... JMPQUIT.R...;...$.
ANYKEY LDA#<(PRESS)..... LDY#>(PRESS)../
8. JSROUTPUT../B. LDA#0."/L. STA$C6.1/V.
GET LDA$C6.=/`. BEQGET.O/J. LDA#<(READY)
.A/T. LDY#>(READY).P/~. JSROUTPUT.Y/.. R
TS./..;../..NAMBLK LDA#1../.. LDX#<(BLK
NAM)../.. LDY#>(BLKNAM).E/.. JSRFILENA.N
/D. RTS.T/N.;../X.STATUS LDA$90../.. ORA
#$40../.. CMP#64..0.. BNEFEHLER..0.. RTS
.*0..FEHLER LDA#$93.80.. JSR$FFD2.C0.. L
DA#8.O0(. STA$BA.]02. JSR$FFB4.J0<. LDA#
$6F.V0F. STA$B9..0P. JSR$FF96..0Z.GETKEY
 JSR$EE13..0D. JSR$FFD2..0N. CMP#13.A0X.
 BNEGETKEY.O0.. JSR$FFAB.U0..;..0..ERROR
 LDA#<(WASNUN)..1 . LDY#>(WASNUN)..1.. J
SROUTPUT..1.. LDA#0.&1.. STA$C6.81H.WHAT
 JSR$FFE4.H1R. CMP#DIRBEF.X1.. BNERESTAR
T.D1.. JSR890.R1.. JMPERROR..1..RESTART 
CMP#RE..1.. BNEAGAIN..1.. PLA..1.. PLA..
1". LDA#252..1,. PHA.H16. LDA#225.Q1@. P
HA.Z1J. RTS..1T.AGAIN CMP#TRYAG..1^. BNE
WHAT..2H. LDA#0..2R. STA$90..2|. LDA#255
.(2.. RTS..2..;.=2..STRING PHA.F2.. TYA.
O2.. PHA.C2.. LDA#<(CLRSCRN).W2B. LDY#>(
CLRSCRN)..2L. JSROUTPUT..2V. PLA..2.. TA
Y..2.. PLA..2.. JMPOUTPUT..2..;.V2..FAST
L .TX"FASTLOAD   .CODE"..2..SOUND .TX"TR
AP-SOUND .CODE"..3..SCROLL .TX"SCROLLING
  .CODE".)3&.BLKNAM .TX"A"./30.;.`3:.INS
BLK .TX"        PLEASE INSERT BLANK DISK
".M3D..BY 13,0.S3N.;..3X.INSZS .TX"     
  PLEASE INSERT CHARSET-DISK"..3B..BY 13
,0..3L.;..3V.INSGRA .TX"       PLEASE IN
SERT GRAPHIC-DISK"..3...BY 13,0..3..;.64
..AUSMEL .TX". .........................
............. ".I4.. .TX" .  END OF SESS
ION/COMPACK THE FILES  . "..4.. .TX" ...
..................................."..4.
..BY 13,0..4..;.C4F.SESBEG .TX"....".P4P
..BY 13,0.V4Z.;..5..INSGEN .TX"      PLE
ASE INSERT GENERATOR DISK"..5...BY 13,0.
I5..PRESS .TX"     THEN PRESS ANY KEY TO
 CONTINUE".V5...BY 13,0.\5..;..5..READY 
.TX".                                   
    "..5 ..BY 13.S5*. .TX"..            
  PLEASE WAIT              "..54..BY 13,
13,13,0..5>.;.#6H.WASNUN .TX"...T.RY AGA
IN, .D.IRECTORY OR .R.ESET?".36R..BY 13,
13,0.96\.;.V6F.CLRSCRN .TX"...........".
C6P..BY 13,0...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL