DIRECTORY PLUS
FILE INFORMATION
FILENAME(S): DIRECTORY PLUS
FILE TYPE(S): PRG
FILE SIZE: 2.8K
FIRST SEEN: 2025-10-19 22:48:42
APPEARS ON: 1 disk(s)
FILE HASH
cfb7cc471e362645f957af9c12efa9483433842369e98a4ab01f677dc9641b16
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C DISK SERVICE | DIRECTORY PLUS | PRG | Radd Maxx | 21 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: 01 1C 0C 1C 0A 00 4E 44 24 B2 22 22 00 4A 1C 14 |......ND$."".J..|
00000010: 00 8F 20 4E 44 24 3D 43 48 52 24 28 38 29 3A 52 |.. ND$=CHR$(8):R|
00000020: 45 4D 20 52 45 4D 4F 56 45 20 52 45 4D 20 46 4F |EM REMOVE REM FO|
00000030: 52 20 31 35 32 35 20 4F 52 20 4D 50 53 2D 38 30 |R 1525 OR MPS-80|
00000040: 31 20 50 52 49 4E 54 45 52 53 00 6F 1C 1E 00 86 |1 PRINTERS.o....|
00000050: 20 46 54 24 28 35 29 3A 81 49 B2 30 A4 35 3A 87 | FT$(5):.I.0.5:.|
00000060: 20 41 24 3A 46 54 24 28 49 29 B2 41 24 3A 82 00 | A$:FT$(I).A$:..|
00000070: 8D 1C 28 00 83 20 44 45 4C 2C 53 45 51 2C 50 52 |..(.. DEL,SEQ,PR|
00000080: 47 2C 55 53 52 2C 52 45 4C 2C 44 45 4C 00 9D 1C |G,USR,REL,DEL...|
00000090: 32 00 86 20 46 24 28 31 34 34 2C 35 29 00 A8 1C |2.. F$(144,5)...|
000000A0: 3C 00 46 45 B2 36 36 34 00 E7 1C 46 00 99 C7 28 |<.FE.664...F...(|
000000B0: 31 34 37 29 3B C7 28 31 35 38 29 3B C7 28 31 37 |147);.(158);.(17|
000000C0: 29 3B 22 4F 55 54 50 55 54 20 54 4F 20 53 43 52 |);"OUTPUT TO SCR|
000000D0: 45 45 4E 20 4F 52 20 50 52 49 4E 54 45 52 20 28 |EEN OR PRINTER (|
000000E0: 53 2F 50 29 20 3F 22 00 F9 1C 50 00 A1 41 24 3A |S/P) ?"...P..A$:|
000000F0: 8B 41 24 B2 22 22 89 38 30 00 0F 1D 5A 00 44 56 |.A$."".80...Z.DV|
00000100: B2 33 3A 8B 41 24 B2 22 50 22 A7 44 56 B2 34 00 |.3:.A$."P".DV.4.|
00000110: 20 1D 64 00 8B 41 24 B2 22 53 22 A7 89 31 34 30 | .d..A$."S"..140|
00000120: 00 4B 1D 6E 00 99 C7 28 31 37 29 22 53 49 4E 47 |.K.n...(17)"SING|
00000130: 4C 45 20 4F 52 20 44 4F 55 42 4C 45 20 57 49 44 |LE OR DOUBLE WID|
00000140: 54 48 20 28 53 2F 44 29 20 3F 22 00 5E 1D 78 00 |TH (S/D) ?".^.x.|
00000150: A1 41 24 3A 8B 41 24 B2 22 22 89 31 32 30 00 7E |.A$:.A$."".120.~|
00000160: 1D 82 00 42 47 24 B2 C7 28 31 35 29 3A 8B 41 24 |...BG$..(15):.A$|
00000170: B2 22 44 22 A7 42 47 24 B2 C7 28 31 34 29 00 A8 |."D".BG$..(14)..|
00000180: 1D 8C 00 99 C7 28 31 37 29 22 49 4E 53 45 52 54 |.....(17)"INSERT|
00000190: 20 44 49 53 4B 20 41 4E 44 20 50 52 45 53 53 20 | DISK AND PRESS |
000001A0: 41 4E 59 20 4B 45 59 22 00 BE 1D 96 00 A1 20 41 |ANY KEY"...... A|
000001B0: 24 3A 8B 20 41 24 B2 22 22 20 A7 31 35 30 00 E9 |$:. A$."" .150..|
000001C0: 1D A0 00 99 C7 28 31 34 35 29 22 50 4C 45 41 53 |.....(145)"PLEAS|
000001D0: 45 20 57 41 49 54 2E 2E 2E 20 20 20 20 20 20 20 |E WAIT... |
000001E0: 20 20 20 20 20 20 20 20 22 00 05 1E AA 00 9F 31 | "......1|
000001F0: 35 2C 38 2C 31 35 3A 98 31 35 2C 22 49 30 22 3A |5,8,15:.15,"I0":|
00000200: 8D 31 30 32 30 00 19 1E B4 00 9F 38 2C 38 2C 38 |.1020......8,8,8|
00000210: 2C 22 24 30 2C 53 2C 52 22 00 23 1E BE 00 8D 31 |,"$0,S,R".#....1|
00000220: 30 32 30 00 39 1E C8 00 81 49 B2 31 A4 31 34 32 |020.9....I.1.142|
00000230: 3A A1 23 38 2C 41 24 3A 82 00 5A 1E D2 00 81 49 |:.#8,A$:..Z....I|
00000240: B2 31 34 33 A4 31 36 30 3A A1 23 38 2C 41 24 3A |.143.160:.#8,A$:|
00000250: 4E 24 B2 4E 24 AA 41 24 3A 82 00 7D 1E DC 00 81 |N$.N$.A$:..}....|
00000260: 49 B2 31 36 31 A4 31 36 32 3A A1 23 38 2C 41 24 |I.161.162:.#8,A$|
00000270: 3A 49 44 24 B2 49 44 24 AA 41 24 3A 82 00 A7 1E |:ID$.ID$.A$:....|
00000280: E6 00 A1 23 38 2C 41 24 3A 81 49 B2 31 36 34 A4 |...#8,A$:.I.164.|
00000290: 31 36 35 3A A1 23 38 2C 41 24 3A 4F 53 24 B2 4F |165:.#8,A$:OS$.O|
000002A0: 53 24 AA 41 24 3A 82 00 BF 1E F0 00 81 49 B2 31 |S$.A$:.......I.1|
000002B0: 36 36 A4 32 35 34 3A A1 23 38 2C 41 24 3A 82 00 |66.254:.#8,A$:..|
000002C0: C8 1E FA 00 43 54 B2 38 00 D4 1E 04 01 4E 4D B2 |....CT.8.....NM.|
000002D0: 4E 4D AA 31 00 E8 1E 0E 01 8B 43 54 B2 38 A7 43 |NM.1......CT.8.C|
000002E0: 54 B2 31 3A 89 33 30 30 00 04 1F 18 01 43 54 B2 |T.1:.300.....CT.|
000002F0: 43 54 AA 31 3A A1 23 38 2C 41 24 2C 41 24 3A 46 |CT.1:.#8,A$,A$:F|
00000300: 4C B2 53 54 00 13 1F 22 01 8B 46 4C B3 B1 30 89 |L.ST..."..FL..0.|
00000310: 34 38 30 00 2F 1F 2C 01 A1 23 38 2C 41 24 3A 8B |480./.,..#8,A$:.|
00000320: 41 24 B2 22 22 A7 41 24 B2 C7 28 31 33 33 29 00 |A$."".A$..(133).|
00000330: 44 1F 36 01 46 4C B2 53 54 3A 8B 46 4C B3 B1 30 |D.6.FL.ST:.FL..0|
00000340: 89 34 38 30 00 61 1F 40 01 54 59 24 B2 46 54 24 |.480.a.@.TY$.FT$|
00000350: 28 28 C6 28 41 24 29 AF 31 39 31 29 AB 31 32 38 |((.(A$).191).128|
00000360: 29 00 7B 1F 4A 01 A1 23 38 2C 41 24 3A 8B 41 24 |).{.J..#8,A$:.A$|
00000370: B2 22 22 A7 41 24 B2 C7 28 30 29 00 96 1F 54 01 |."".A$..(0)...T.|
00000380: 54 52 24 B2 C9 28 22 20 20 22 AA C4 28 C6 28 41 |TR$..(" "..(.(A|
00000390: 24 29 29 2C 32 29 00 B0 1F 5E 01 A1 23 38 2C 41 |$)),2)...^..#8,A|
000003A0: 24 3A 8B 41 24 B2 22 22 A7 41 24 B2 C7 28 30 29 |$:.A$."".A$..(0)|
000003B0: 00 CB 1F 68 01 53 43 24 B2 C9 28 22 20 20 22 AA |...h.SC$..(" ".|
000003C0: C4 28 C6 28 41 24 29 29 2C 32 29 00 F2 1F 72 01 |.(.(A$)),2)...r.|
000003D0: 46 4C 24 B2 22 22 3A 81 49 B2 33 A4 31 38 3A A1 |FL$."":.I.3.18:.|
000003E0: 23 38 2C 41 24 3A 46 4C 24 B2 46 4C 24 AA 41 24 |#8,A$:FL$.FL$.A$|
000003F0: 3A 82 00 08 20 7C 01 81 49 B2 31 39 A4 32 37 3A |:... |..I.19.27:|
00000400: A1 23 38 2C 41 24 3A 82 00 18 20 86 01 A1 23 38 |.#8,A$:... ...#8|
00000410: 2C 4C 42 24 2C 48 42 24 00 3B 20 90 01 42 4C B2 |,LB$,HB$.; ..BL.|
00000420: C6 28 4C 42 24 AA C7 28 30 29 29 AA 32 35 36 AC |.(LB$..(0)).256.|
00000430: C6 28 48 42 24 AA C7 28 30 29 29 00 54 20 9A 01 |.(HB$..(0)).T ..|
00000440: 8B 54 59 24 B3 B1 22 44 45 4C 22 A7 46 45 B2 46 |.TY$.."DEL".FE.F|
00000450: 45 AB 42 4C 00 6F 20 A4 01 42 4C 24 B2 C9 28 22 |E.BL.o ..BL$..("|
00000460: 20 20 20 20 20 22 AA C4 28 42 4C 29 2C 33 29 00 | "..(BL),3).|
00000470: 81 20 AE 01 8B 54 52 24 B2 22 20 30 22 89 34 38 |. ...TR$." 0".48|
00000480: 30 00 C6 20 B8 01 46 24 28 4E 4D 2C 30 29 B2 46 |0.. ..F$(NM,0).F|
00000490: 4C 24 3A 46 24 28 4E 4D 2C 31 29 B2 54 59 24 3A |L$:F$(NM,1).TY$:|
000004A0: 46 24 28 4E 4D 2C 32 29 B2 54 52 24 3A 46 24 28 |F$(NM,2).TR$:F$(|
000004B0: 4E 4D 2C 33 29 B2 53 43 24 3A 46 24 28 4E 4D 2C |NM,3).SC$:F$(NM,|
000004C0: 34 29 B2 42 4C 24 00 DB 20 C2 01 46 24 28 4E 4D |4).BL$.. ..F$(NM|
000004D0: 2C 35 29 B2 22 20 20 20 20 20 22 00 FB 20 CC 01 |,5)." ".. ..|
000004E0: 8B 54 59 24 B2 22 50 52 47 22 A7 46 24 28 4E 4D |.TY$."PRG".F$(NM|
000004F0: 2C 35 29 B2 22 2D 2D 2D 2D 2D 22 00 04 21 D6 01 |,5)."-----"..!..|
00000500: 89 32 36 30 00 0B 21 E0 01 A0 38 00 15 21 EA 01 |.260..!...8..!..|
00000510: 8D 31 30 32 30 00 33 21 F4 01 8B 46 24 28 4E 4D |.1020.3!...F$(NM|
00000520: 2C 30 29 B2 22 22 A7 4E 4D B2 4E 4D AB 31 3A 89 |,0)."".NM.NM.1:.|
00000530: 35 30 30 00 4D 21 FE 01 46 45 24 B2 C9 28 22 20 |500.M!..FE$..(" |
00000540: 20 20 20 22 AA C4 28 46 45 29 2C 33 29 00 7C 21 | "..(FE),3).|!|
00000550: 08 02 99 C7 28 31 34 35 29 3B 22 53 54 41 52 54 |....(145);"START|
00000560: 20 41 44 44 52 45 53 53 20 3A 22 3A 99 C7 28 31 | ADDRESS :":..(1|
00000570: 37 29 3B 22 20 31 29 20 41 4C 4C 22 00 98 21 12 |7);" 1) ALL"..!.|
00000580: 02 99 22 20 32 29 20 53 4F 4D 45 22 3A 99 22 20 |.." 2) SOME":." |
00000590: 33 29 20 4E 4F 4E 45 22 00 AE 21 1C 02 A1 41 24 |3) NONE"..!...A$|
000005A0: 3A 8B C5 28 41 24 29 B2 30 A7 89 35 34 30 00 BF |:..(A$).0..540..|
000005B0: 21 26 02 8B C5 28 41 24 29 B1 32 89 37 37 30 00 |!&...(A$).2.770.|
000005C0: E4 21 30 02 99 22 93 22 3A 8B 41 24 B2 22 31 22 |.!0..".":.A$."1"|
000005D0: A7 99 22 4A 55 53 54 20 41 20 4D 4F 4D 45 4E 54 |.."JUST A MOMENT|
000005E0: 2E 2E 2E 22 00 F0 21 3A 02 81 49 B2 31 A4 4E 4D |..."..!:..I.1.NM|
000005F0: 00 08 22 44 02 8B 46 24 28 49 2C 31 29 B3 B1 22 |.."D..F$(I,1).."|
00000600: 50 52 47 22 89 37 30 30 00 18 22 4E 02 8B 41 24 |PRG".700.."N..A$|
00000610: B2 22 31 22 89 36 33 30 00 2E 22 58 02 99 46 24 |."1".630.."X..F$|
00000620: 28 49 2C 30 29 3B 22 20 28 59 2F 4E 29 22 00 41 |(I,0);" (Y/N)".A|
00000630: 22 62 02 A1 41 24 3A 8B 41 24 B2 22 22 89 36 31 |"b..A$:.A$."".61|
00000640: 30 00 59 22 6C 02 8B 41 24 B3 B1 22 59 22 A7 99 |0.Y"l..A$.."Y"..|
00000650: 22 91 22 3B 3A 89 37 30 30 00 69 22 76 02 53 41 |".";:.700.i"v.SA|
00000660: 24 B2 46 24 28 49 2C 30 29 00 85 22 80 02 9F 20 |$.F$(I,0).."... |
00000670: 38 2C 38 2C 38 2C 22 30 3A 22 AA 53 41 24 AA 22 |8,8,8,"0:".SA$."|
00000680: 2C 50 2C 52 22 00 8F 22 8A 02 8D 31 30 32 30 00 |,P,R".."...1020.|
00000690: 9F 22 94 02 A1 23 38 2C 4C 42 24 2C 48 42 24 00 |."...#8,LB$,HB$.|
000006A0: C2 22 9E 02 53 41 B2 C6 28 4C 42 24 AA C7 28 30 |."..SA..(LB$..(0|
000006B0: 29 29 AA 32 35 36 AC C6 28 48 42 24 AA C7 28 30 |)).256..(HB$..(0|
000006C0: 29 29 00 C9 22 A8 02 A0 38 00 E9 22 B2 02 46 24 |)).."...8.."..F$|
000006D0: 28 49 2C 35 29 B2 C9 28 22 20 20 20 20 20 20 22 |(I,5)..(" "|
000006E0: AA C4 28 53 41 29 2C 35 29 00 EF 22 BC 02 82 00 |..(SA),5).."....|
000006F0: 1D 23 C6 02 99 22 11 11 11 57 41 49 54 20 55 4E |.#..."...WAIT UN|
00000700: 54 49 4C 20 54 48 45 20 44 52 49 56 45 20 4C 49 |TIL THE DRIVE LI|
00000710: 47 48 54 20 47 4F 45 53 20 4F 46 46 22 00 4D 23 |GHT GOES OFF".M#|
00000720: D0 02 99 20 C7 28 32 38 29 3B A6 32 31 29 3B 3A |... .(28);.21);:|
00000730: 81 51 51 B2 31 A4 31 34 3A 99 20 C7 28 31 36 33 |.QQ.1.14:. .(163|
00000740: 29 3B 3A 82 3A 99 20 C7 28 33 30 29 3B 00 5D 23 |);:.:. .(30);.]#|
00000750: DA 02 99 3A 99 22 54 48 45 4E 20 22 3B 00 7A 23 |...:."THEN ";.z#|
00000760: E4 02 8B 44 56 B2 34 A7 99 22 53 45 54 20 50 52 |...DV.4.."SET PR|
00000770: 49 4E 54 45 52 20 26 20 22 3B 00 8F 23 EE 02 99 |INTER & ";..#...|
00000780: 22 50 52 45 53 53 20 41 4E 59 20 4B 45 59 22 00 |"PRESS ANY KEY".|
00000790: A5 23 F8 02 A1 20 41 24 3A 8B 20 41 24 B2 22 22 |.#... A$:. A$.""|
000007A0: 20 A7 37 36 30 00 B8 23 02 03 8B 44 56 B3 B1 34 | .760..#...DV..4|
000007B0: A7 99 C7 28 31 34 37 29 00 DD 23 0C 03 8B 44 56 |...(147)..#...DV|
000007C0: B2 34 A7 8B 4E 44 24 B2 22 22 A7 9F 36 2C 34 2C |.4..ND$.""..6,4,|
000007D0: 36 3A 98 36 2C C7 28 32 31 29 3A A0 36 00 E7 23 |6:.6,.(21):.6..#|
000007E0: 16 03 9F 34 2C 44 56 00 1F 24 20 03 98 34 2C 42 |...4,DV..$ ..4,B|
000007F0: 47 24 3B 22 B0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |G$;"............|
00000800: C0 C0 C0 C0 C0 C0 C0 B2 C0 C0 B2 C0 C0 B2 C0 C0 |................|
00000810: C0 C0 C0 C0 C0 C0 C0 C0 C0 AE 22 3B 4E 44 24 00 |..........";ND$.|
00000820: 59 24 2A 03 98 34 2C 42 47 24 3B 22 DD 22 3B 4E |Y$*..4,BG$;".";N|
00000830: 24 3B 22 DD 22 3B 49 44 24 3B 22 DD 22 3B 4F 53 |$;".";ID$;".";OS|
00000840: 24 3B 22 DD 46 52 20 53 45 43 3A 20 22 3B 46 45 |$;".FR SEC: ";FE|
00000850: 24 3B 22 DD 22 3B 4E 44 24 00 91 24 34 03 98 34 |$;".";ND$..$4..4|
00000860: 2C 42 47 24 3B 22 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 |,BG$;"..........|
00000870: C0 C0 C0 C0 C0 C0 C0 B2 C0 B1 C0 B2 B1 C0 B2 B1 |................|
00000880: C0 B2 C0 C0 C0 B2 C0 C0 C0 C0 C0 B3 22 3B 4E 44 |............";ND|
00000890: 24 00 C9 24 3E 03 98 34 2C 42 47 24 3B 22 DD 46 |$..$>..4,BG$;".F|
000008A0: 49 4C 45 4E 41 4D 45 3A 20 20 20 20 20 20 20 DD |ILENAME: .|
000008B0: 54 59 50 DD 54 52 DD 53 43 DD 42 4C 4B DD 53 54 |TYP.TR.SC.BLK.ST|
000008C0: 41 52 54 DD 22 3B 4E 44 24 00 01 25 48 03 98 34 |ART.";ND$..%H..4|
000008D0: 2C 42 47 24 3B 22 AB C0 C0 C0 C0 C0 C0 C0 C0 C0 |,BG$;"..........|
000008E0: C0 C0 C0 C0 C0 C0 C0 DB C0 C0 C0 DB C0 C0 DB C0 |................|
000008F0: C0 DB C0 C0 C0 DB C0 C0 C0 C0 C0 B3 22 3B 4E 44 |............";ND|
00000900: 24 00 0D 25 52 03 81 49 B2 31 A4 4E 4D 00 4D 25 |$..%R..I.1.NM.M%|
00000910: 5C 03 46 4C 24 B2 46 24 28 49 2C 30 29 3A 54 59 |\.FL$.F$(I,0):TY|
00000920: 24 B2 46 24 28 49 2C 31 29 3A 54 52 24 B2 46 24 |$.F$(I,1):TR$.F$|
00000930: 28 49 2C 32 29 3A 53 43 24 B2 46 24 28 49 2C 33 |(I,2):SC$.F$(I,3|
00000940: 29 3A 42 4C 24 B2 46 24 28 49 2C 34 29 00 60 25 |):BL$.F$(I,4).`%|
00000950: 66 03 8B 54 59 24 B2 22 44 45 4C 22 89 39 30 30 |f..TY$."DEL".900|
00000960: 00 A7 25 70 03 98 34 2C 42 47 24 3B 22 DD 22 3B |..%p..4,BG$;".";|
00000970: 46 4C 24 3B 22 DD 22 3B 54 59 24 3B 22 DD 22 3B |FL$;".";TY$;".";|
00000980: 54 52 24 3B 22 DD 22 3B 53 43 24 3B 22 DD 22 3B |TR$;".";SC$;".";|
00000990: 42 4C 24 3B 22 DD 22 3B 46 24 28 49 2C 35 29 3B |BL$;".";F$(I,5);|
000009A0: 22 DD 22 3B 4E 44 24 00 DF 25 7A 03 98 34 2C 42 |".";ND$..%z..4,B|
000009B0: 47 24 3B 22 DD 20 20 20 20 20 20 20 20 20 20 20 |G$;". |
000009C0: 20 20 20 20 20 DD 20 20 20 DD 20 20 DD 20 20 DD | . . . .|
000009D0: 20 20 20 DD 20 20 20 20 20 DD 22 3B 4E 44 24 00 | . .";ND$.|
000009E0: E5 25 84 03 82 00 1D 26 8E 03 98 34 2C 42 47 24 |.%.....&...4,BG$|
000009F0: 3B 22 AD C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 C0 |;"..............|
00000A00: C0 C0 C0 B1 C0 C0 C0 B1 C0 C0 B1 C0 C0 B1 C0 C0 |................|
00000A10: C0 B1 C0 C0 C0 C0 C0 BD 22 3B 4E 44 24 00 27 26 |........";ND$.'&|
00000A20: 98 03 98 34 3A A0 34 00 30 26 A2 03 A0 20 31 35 |...4:.4.0&... 15|
00000A30: 00 52 26 AC 03 8B 44 56 B2 34 A7 99 22 93 50 52 |.R&...DV.4..".PR|
00000A40: 49 4E 54 20 41 47 41 49 4E 20 28 59 2F 4E 29 20 |INT AGAIN (Y/N) |
00000A50: 3F 22 00 72 26 B6 03 8B 44 56 B2 33 A7 99 22 56 |?".r&...DV.3.."V|
00000A60: 49 45 57 20 41 47 41 49 4E 20 28 59 2F 4E 29 20 |IEW AGAIN (Y/N) |
00000A70: 3F 22 00 86 26 C0 03 A1 41 24 3A 8B 41 24 B2 22 |?"..&...A$:.A$."|
00000A80: 59 22 A7 37 37 30 00 97 26 CA 03 8B 41 24 B3 B1 |Y".770..&...A$..|
00000A90: 22 4E 22 A7 39 36 30 00 C0 26 D4 03 99 C7 28 31 |"N".960..&....(1|
00000AA0: 34 35 29 22 4E 45 57 20 44 49 52 45 43 54 4F 52 |45)"NEW DIRECTOR|
00000AB0: 59 20 28 59 2F 4E 29 20 3F 20 20 20 20 20 20 22 |Y (Y/N) ? "|
00000AC0: 00 D2 26 DE 03 A1 41 24 3A 8B 41 24 B2 22 59 22 |..&...A$:.A$."Y"|
00000AD0: A7 8A 00 E6 26 E8 03 8B 41 24 B2 22 4E 22 A7 20 |....&...A$."N". |
00000AE0: 99 22 93 22 3A 80 00 EF 26 F2 03 89 39 39 30 00 |.".":...&...990.|
00000AF0: 0F 27 FC 03 84 31 35 2C 45 5A 2C 45 5A 24 2C 54 |.'...15,EZ,EZ$,T|
00000B00: 52 2C 53 45 3A 8B 20 45 5A B2 30 20 A7 20 8E 00 |R,SE:. EZ.0 . ..|
00000B10: 23 27 06 04 54 24 B2 C7 28 31 35 37 29 AA C7 28 |#'..T$..(157)..(|
00000B20: 33 32 29 00 42 27 10 04 99 20 C7 28 31 38 29 20 |32).B'... .(18) |
00000B30: 45 5A 3B 54 24 3B 45 5A 24 3B 54 52 3B 54 24 3B |EZ;T$;EZ$;TR;T$;|
00000B40: 53 45 00 4F 27 1A 04 A0 20 38 3A A0 20 31 35 00 |SE.O'... 8:. 15.|
00000B50: 00 00 |.. |
......ND$."".J.... ND$=CHR$(8):REM REMOV
E REM FOR 1525 OR MPS-801 PRINTERS.O....
FT$(5):.I.0.5:. A$:FT$(I).A$:....(.. DE
L,SEQ,PRG,USR,REL,DEL...2.. F$(144,5)...
<.FE.664...F..G(147);G(158);G(17);"OUTPU
T TO SCREEN OR PRINTER (S/P) ?"...P..A$:
.A$."".80...Z.DV.3:.A$."P".DV.4. .D..A$.
"S"..140.K.N..G(17)"SINGLE OR DOUBLE WID
TH (S/D) ?".^.X..A$:.A$."".120.~...BG$.G
(15):.A$."D".BG$.G(14)......G(17)"INSERT
DISK AND PRESS ANY KEY"...... A$:. A$."
" .150... ..G(145)"PLEASE WAIT...
"......15,8,15:.15,"I0":.1020...
...8,8,8,"$0,S,R".#....1020.9.H..I.1.142
:.#8,A$:..Z.R..I.143.160:.#8,A$:N$.N$.A$
:..}....I.161.162:.#8,A$:ID$.ID$.A$:....
...#8,A$:.I.164.165:.#8,A$:OS$.OS$.A$:..
.....I.166.254:.#8,A$:..H...CT.8.T...NM.
NM.1......CT.8.CT.1:.300.....CT.CT.1:.#8
,A$,A$:FL.ST..."..FL..0.480./.,..#8,A$:.
A$."".A$.G(133).D.6.FL.ST:.FL..0.480.A.@
.TY$.FT$((F(A$).191).128).{.J..#8,A$:.A$
."".A$.G(0)...T.TR$.I(" ".D(F(A$)),2)..
.^..#8,A$:.A$."".A$.G(0).K.H.SC$.I(" ".
D(F(A$)),2)...R.FL$."":.I.3.18:.#8,A$:FL
$.FL$.A$:... |..I.19.27:.#8,A$:... ...#8
,LB$,HB$.; ..BL.F(LB$.G(0)).256.F(HB$.G(
0)).T ...TY$.."DEL".FE.FE.BL.O ..BL$.I("
".D(BL),3).. ...TR$." 0".480.F ..F$
(NM,0).FL$:F$(NM,1).TY$:F$(NM,2).TR$:F$(
NM,3).SC$:F$(NM,4).BL$.. B.F$(NM,5)."
".. L..TY$."PRG".F$(NM,5)."-----"..!V.
.260..!.. 8..!...1020.3!...F$(NM,0)."".N
M.NM.1:.500.M!..FE$.I(" ".D(FE),3).|!
...G(145);"START ADDRESS :":.G(17);" 1)
ALL"..!..." 2) SOME":." 3) NONE"..!...A$
:.E(A$).0..540..!&..E(A$).2.770..!0.."."
:.A$."1".."JUST A MOMENT..."..!:..I.1.NM
.."D..F$(I,1).."PRG".700.."N..A$."1".630
.."X..F$(I,0);" (Y/N)".A"B..A$:.A$."".61
0.Y"L..A$.."Y"..".";:.700.I"V.SA$.F$(I,0
).."... 8,8,8,"0:".SA$.",P,R".."...1020.
."...#8,LB$,HB$.B"..SA.F(LB$.G(0)).256.F
(HB$.G(0)).I".. 8.."..F$(I,5).I(" "
.D(SA),5)..".....#F.."...WAIT UNTIL THE
DRIVE LIGHT GOES OFF".M#P.. G(28);.21);:
.QQ.1.14:. G(163);:.:. G(30);.]#Z..:."TH
EN ";.Z#...DV.4.."SET PRINTER & ";..#...
"PRESS ANY KEY"..#... A$:. A$."" .760..#
...DV..4..G(147)..#...DV.4..ND$.""..6,4,
6:.6,G(21): 6..#...4,DV..$ ..4,BG$;"....
..................................";ND$.
Y$*..4,BG$;".";N$;".";ID$;".";OS$;".FR S
EC: ";FE$;".";ND$..$4..4,BG$;"..........
............................";ND$.I$>..4
,BG$;".FILENAME: .TYP.TR.SC.BLK.ST
ART.";ND$..%H..4,BG$;"..................
....................";ND$..%R..I.1.NM.M%
\.FL$.F$(I,0):TY$.F$(I,1):TR$.F$(I,2):SC
$.F$(I,3):BL$.F$(I,4).`%F..TY$."DEL".900
..%P..4,BG$;".";FL$;".";TY$;".";TR$;".";
SC$;".";BL$;".";F$(I,5);".";ND$..%Z..4,B
G$;". . . . . .
.";ND$..%.....&...4,BG$;"..............
........................";ND$.'&...4: 4.
0&.. 15.R&...DV.4..".PRINT AGAIN (Y/N)
?".R&...DV.3.."VIEW AGAIN (Y/N) ?"..&...
A$:.A$."Y".770..&J..A$.."N".960..&T..G(1
45)"NEW DIRECTORY (Y/N) ? ".R&...A$
:.A$."Y"....&...A$."N". .".":...&...990.
.'...15,EZ,EZ$,TR,SE:. EZ.0 . ..#'..T$.G
(157).G(32).B'... G(18) EZ;T$;EZ$;TR;T$;
SE.O'.. 8: 15...
> CLICK IMAGE PREVIEW FOR FULL MODAL