VIRTUAL DIR-1541
FILE INFORMATION
FILENAME(S): VIRTUAL DIR-1541
FILE TYPE(S): PRG
FILE SIZE: 2.2K
FIRST SEEN: 2025-11-30 21:23:31
APPEARS ON: 1 disk(s)
FILE HASH
6597dab2aedde0758b84bfbb860cb6a82782150fcf23e2aa7ffc62aed64c8b07
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 HULP 43 1 | VIRTUAL DIR-1541 | PRG | DuncanTwain | 13 | 1 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 20 08 64 00 8F 20 56 49 52 54 55 41 4C 20 |.. .d.. VIRTUAL |
00000010: 44 49 52 45 43 54 4F 52 59 20 2D 20 31 35 34 31 |DIRECTORY - 1541|
00000020: 00 26 08 6E 00 9C 00 40 08 78 00 48 24 B2 22 30 |.&.n...@.x.H$."0|
00000030: 31 32 33 34 35 36 37 38 39 41 42 43 44 45 46 22 |123456789ABCDEF"|
00000040: 00 4B 08 82 00 81 49 B2 30 A4 35 00 57 08 8C 00 |.K....I.0.5.W...|
00000050: 87 46 54 24 28 31 29 00 5E 08 96 00 82 49 00 7F |.FT$(1).^....I..|
00000060: 08 A0 00 99 22 93 56 49 52 54 55 41 4C 20 44 49 |....".VIRTUAL DI|
00000070: 52 45 43 54 4F 52 59 20 2D 20 31 35 34 31 22 00 |RECTORY - 1541".|
00000080: A0 08 AA 00 99 22 11 49 4E 53 45 52 54 20 44 49 |.....".INSERT DI|
00000090: 53 4B 45 54 54 45 20 49 4E 20 44 52 49 56 45 22 |SKETTE IN DRIVE"|
000000A0: 00 C3 08 B4 00 99 22 11 50 52 45 53 53 20 12 52 |......".PRESS .R|
000000B0: 45 54 55 52 4E 92 20 54 4F 20 43 4F 4E 54 49 4E |ETURN. TO CONTIN|
000000C0: 55 45 22 00 D6 08 BE 00 A1 43 24 3A 8B 43 24 B2 |UE"......C$:.C$.|
000000D0: 22 22 A7 31 39 30 00 E9 08 C8 00 8B 43 24 B3 B1 |"".190......C$..|
000000E0: C7 28 31 33 29 89 31 39 30 00 F3 08 D2 00 99 22 |.(13).190......"|
000000F0: 4F 4B 22 00 00 09 DC 00 9F 31 35 2C 38 2C 31 35 |OK"......15,8,15|
00000100: 00 0D 09 E6 00 98 31 35 2C 22 49 4F 22 00 25 09 |......15,"IO".%.|
00000110: F0 00 84 31 35 2C 45 4E 24 2C 45 4D 24 2C 45 54 |...15,EN$,EM$,ET|
00000120: 24 2C 45 53 24 00 37 09 FA 00 8B 45 4E 24 B2 22 |$,ES$.7....EN$."|
00000130: 30 30 22 89 33 30 30 00 58 09 04 01 99 22 11 22 |00".300.X...."."|
00000140: 45 4E 24 22 2C 20 22 45 4D 24 22 2C 20 22 45 54 |EN$", "EM$", "ET|
00000150: 24 22 2C 20 22 45 53 24 00 60 09 0E 01 A0 31 35 |$", "ES$.`....15|
00000160: 00 66 09 18 01 80 00 7A 09 22 01 8F 20 46 4F 52 |.f.....z.".. FOR|
00000170: 4D 41 54 54 49 4E 47 20 49 44 00 95 09 2C 01 98 |MATTING ID...,..|
00000180: 31 35 2C 22 4D 2D 52 22 C7 28 32 32 29 C7 28 30 |15,"M-R".(22).(0|
00000190: 29 C7 28 32 29 00 A1 09 36 01 A1 23 31 35 2C 42 |).(2)...6..#15,B|
000001A0: 24 00 AB 09 40 01 8D 31 33 37 30 00 BC 09 4A 01 |$...@..1370...J.|
000001B0: 46 49 24 B2 46 49 24 AA C7 28 41 29 00 C8 09 54 |FI$.FI$..(A)...T|
000001C0: 01 A1 23 31 35 2C 42 24 00 D2 09 5E 01 8D 31 33 |..#15,B$...^..13|
000001D0: 37 30 00 E3 09 68 01 46 49 24 B2 46 49 24 AA C7 |70...h.FI$.FI$..|
000001E0: 28 41 29 00 F5 09 72 01 8F 20 42 4C 4F 43 4B 53 |(A)...r.. BLOCKS|
000001F0: 20 46 52 45 45 00 11 0A 7C 01 98 31 35 2C 22 4D | FREE...|..15,"M|
00000200: 2D 52 22 C7 28 32 35 30 29 C7 28 32 29 C7 28 33 |-R".(250).(2).(3|
00000210: 29 00 1D 0A 86 01 A1 23 31 35 2C 42 24 00 2E 0A |)......#15,B$...|
00000220: 90 01 4C B2 C6 28 42 24 AA C7 28 30 29 29 00 3A |..L..(B$..(0)).:|
00000230: 0A 9A 01 A1 23 31 35 2C 42 24 00 46 0A A4 01 A1 |....#15,B$.F....|
00000240: 23 31 35 2C 42 24 00 57 0A AE 01 48 B2 C6 28 42 |#15,B$.W...H..(B|
00000250: 24 AA C7 28 30 29 29 00 68 0A B8 01 42 46 B2 4C |$..(0)).h...BF.L|
00000260: AA 28 48 AC 32 35 36 29 00 76 0A C2 01 42 41 B2 |.(H.256).v...BA.|
00000270: 36 36 34 AB 42 46 00 7F 0A CC 01 9F 34 2C 33 00 |664.BF......4,3.|
00000280: 8E 0A D6 01 9F 32 2C 38 2C 32 2C 22 23 22 00 A2 |.....2,8,2,"#"..|
00000290: 0A E0 01 9F 33 2C 38 2C 33 2C 22 24 30 2C 50 2C |....3,8,3,"$0,P,|
000002A0: 52 22 00 AD 0A EA 01 A1 23 33 2C 42 24 00 C0 0A |R"......#3,B$...|
000002B0: F4 01 44 4F 53 B2 C6 28 42 24 AA C7 28 30 29 29 |..DOS..(B$..(0))|
000002C0: 00 CD 0A FE 01 81 49 B2 33 A4 31 34 33 00 D8 0A |......I.3.143...|
000002D0: 08 02 A1 23 33 2C 42 24 00 DF 0A 12 02 82 49 00 |...#3,B$......I.|
000002E0: EE 0A 1C 02 81 49 B2 31 34 34 A4 31 35 39 00 F8 |.....I.144.159..|
000002F0: 0A 26 02 8D 31 33 36 30 00 09 0B 30 02 44 4E 24 |.&..1360...0.DN$|
00000300: B2 44 4E 24 AA C7 28 41 29 00 10 0B 3A 02 82 49 |.DN$..(A)...:..I|
00000310: 00 1B 0B 44 02 A1 23 33 2C 42 24 00 26 0B 4E 02 |...D..#3,B$.&.N.|
00000320: A1 23 33 2C 42 24 00 35 0B 58 02 81 49 B2 31 36 |.#3,B$.5.X..I.16|
00000330: 32 A4 31 36 33 00 3F 0B 62 02 8D 31 33 36 30 00 |2.163.?.b..1360.|
00000340: 50 0B 6C 02 49 44 24 B2 49 44 24 AA C7 28 41 29 |P.l.ID$.ID$..(A)|
00000350: 00 57 0B 76 02 82 49 00 66 0B 80 02 81 49 B2 31 |.W.v..I.f....I.1|
00000360: 36 34 A4 32 35 35 00 71 0B 8A 02 A1 23 33 2C 42 |64.255.q....#3,B|
00000370: 24 00 78 0B 94 02 82 49 00 83 0B 9E 02 81 49 B2 |$.x....I......I.|
00000380: 31 A4 36 00 8A 0B A8 02 98 34 00 91 0B B2 02 82 |1.6......4......|
00000390: 49 00 B0 0B BC 02 98 34 2C 22 44 49 53 4B 20 4E |I......4,"DISK N|
000003A0: 41 4D 45 3A 20 20 20 20 20 20 20 20 22 44 4E 24 |AME: "DN$|
000003B0: 00 CF 0B C6 02 98 34 2C 22 44 49 53 4B 20 49 44 |......4,"DISK ID|
000003C0: 3A 20 20 20 20 20 20 20 20 20 20 22 49 44 24 00 |: "ID$.|
000003D0: EE 0B D0 02 98 34 2C 22 46 4F 52 4D 41 54 54 49 |.....4,"FORMATTI|
000003E0: 4E 47 20 49 44 3A 20 20 20 20 22 46 49 24 00 0C |NG ID: "FI$..|
000003F0: 0C DA 02 98 34 2C 22 44 4F 53 20 54 59 50 45 3A |....4,"DOS TYPE:|
00000400: 20 20 20 20 20 20 20 20 22 44 4F 53 00 29 0C E4 | "DOS.)..|
00000410: 02 98 34 2C 22 42 4C 4F 43 4B 53 20 41 4C 4C 4F |..4,"BLOCKS ALLO|
00000420: 43 41 54 45 44 3A 22 42 41 00 46 0C EE 02 98 34 |CATED:"BA.F....4|
00000430: 2C 22 42 4C 4F 43 4B 53 20 46 52 45 45 3A 20 20 |,"BLOCKS FREE: |
00000440: 20 20 20 22 42 46 00 4D 0C F8 02 98 34 00 7E 0C | "BF.M....4.~.|
00000450: 02 03 98 34 2C 22 42 4C 4F 43 4B 53 20 20 20 20 |...4,"BLOCKS |
00000460: 46 49 4C 45 20 4E 41 4D 45 20 20 20 20 20 54 59 |FILE NAME TY|
00000470: 50 45 20 20 54 2D 53 20 20 4C 4F 41 44 22 00 91 |PE T-S LOAD"..|
00000480: 0C 0C 03 8B 46 AD 38 B2 B5 28 46 AD 38 29 A7 98 |....F.8..(F.8)..|
00000490: 34 00 9C 0C 16 03 A1 23 33 2C 42 24 00 AD 0C 20 |4......#3,B$... |
000004A0: 03 54 B2 C6 28 42 24 AA C7 28 30 29 29 00 BF 0C |.T..(B$..(0))...|
000004B0: 2A 03 46 54 24 B2 46 54 24 28 37 AF 46 54 29 00 |*.FT$.FT$(7.FT).|
000004C0: CA 0C 34 03 A1 23 33 2C 42 24 00 DB 0C 3E 03 54 |..4..#3,B$...>.T|
000004D0: B2 C6 28 42 24 AA C7 28 30 29 29 00 FD 0C 48 03 |..(B$..(0))...H.|
000004E0: 54 24 B2 C9 28 22 30 22 AA C9 28 C4 28 54 29 2C |T$..("0"..(.(T),|
000004F0: C3 28 C4 28 54 29 29 AB 31 29 2C 32 29 00 08 0D |.(.(T)).1),2)...|
00000500: 52 03 A1 23 33 2C 42 24 00 19 0D 5C 03 53 B2 C6 |R..#3,B$...\.S..|
00000510: 28 42 24 AA C7 28 30 29 29 00 3B 0D 66 03 53 24 |(B$..(0)).;.f.S$|
00000520: B2 C9 28 22 30 22 AA C9 28 C4 28 53 29 2C C3 28 |..("0"..(.(S),.(|
00000530: C4 28 53 29 29 AB 31 29 2C 32 29 00 46 0D 70 03 |.(S)).1),2).F.p.|
00000540: 4C 41 24 B2 22 22 00 64 0D 7A 03 8B 28 37 AF 46 |LA$."".d.z..(7.F|
00000550: 54 29 B3 B1 30 AF 28 37 AF 46 54 29 B3 B1 32 89 |T)..0.(7.FT)..2.|
00000560: 31 30 32 30 00 79 0D 84 03 98 31 35 2C 22 55 31 |1020.y....15,"U1|
00000570: 22 3B 32 3B 30 3B 32 3B 32 00 8B 0D 8E 03 98 31 |";2;0;2;2......1|
00000580: 35 2C 22 42 2D 50 22 3B 32 3B 32 00 96 0D 98 03 |5,"B-P";2;2.....|
00000590: A1 23 32 2C 42 24 00 A7 0D A2 03 41 B2 C6 28 42 |.#2,B$.....A..(B|
000005A0: 24 AA C7 28 30 29 29 00 B5 0D AC 03 48 B2 B5 28 |$..(0)).....H..(|
000005B0: 41 AD 31 36 29 00 C2 0D B6 03 4C B2 41 AB 31 36 |A.16).....L.A.16|
000005C0: AC 48 00 E2 0D C0 03 4C 41 24 B2 CA 28 48 24 2C |.H.....LA$..(H$,|
000005D0: 48 AA 31 2C 31 29 AA CA 28 48 24 2C 4C AA 31 2C |H.1,1)..(H$,L.1,|
000005E0: 31 29 00 ED 0D CA 03 A1 23 32 2C 42 24 00 FE 0D |1)......#2,B$...|
000005F0: D4 03 41 B2 C6 28 42 24 AA C7 28 30 29 29 00 0C |..A..(B$..(0))..|
00000600: 0E DE 03 48 B2 B5 28 41 AD 31 36 29 00 19 0E E8 |...H..(A.16)....|
00000610: 03 4C B2 41 AB 31 36 AC 48 00 3D 0E F2 03 4C 41 |.L.A.16.H.=...LA|
00000620: 24 B2 CA 28 48 24 2C 48 AA 31 2C 31 29 AA CA 28 |$..(H$,H.1,1)..(|
00000630: 48 24 2C 4C AA 31 2C 31 29 AA 4C 41 24 00 47 0E |H$,L.1,1).LA$.G.|
00000640: FC 03 46 24 B2 22 22 00 52 0E 06 04 4E 55 4C 4C |..F$."".R...NULL|
00000650: B2 30 00 5E 0E 10 04 81 49 B2 31 A4 31 36 00 68 |.0.^....I.1.16.h|
00000660: 0E 1A 04 8D 31 33 36 30 00 80 0E 24 04 8B 42 24 |....1360...$..B$|
00000670: B2 C7 28 30 29 A7 4E 55 4C B2 4E 55 4C 4C AA 31 |..(0).NUL.NULL.1|
00000680: 00 8F 0E 2E 04 46 24 B2 46 24 AA C7 28 41 29 00 |.....F$.F$..(A).|
00000690: 96 0E 38 04 82 49 00 A8 0E 42 04 8B 4E 55 4C 4C |..8..I...B..NULL|
000006A0: B2 31 36 89 31 32 37 30 00 B3 0E 4C 04 81 49 B2 |.16.1270...L..I.|
000006B0: 31 A4 39 00 BE 0E 56 04 A1 23 33 2C 42 24 00 C5 |1.9...V..#3,B$..|
000006C0: 0E 60 04 82 49 00 D0 0E 6A 04 A1 23 33 2C 42 24 |.`..I...j..#3,B$|
000006D0: 00 E1 0E 74 04 42 B2 C6 28 42 24 AA C7 28 30 29 |...t.B..(B$..(0)|
000006E0: 29 00 EC 0E 7E 04 A1 23 33 2C 42 24 00 03 0F 88 |)...~..#3,B$....|
000006F0: 04 42 B2 42 AA 32 35 36 AC C6 28 42 24 AA C7 28 |.B.B.256..(B$..(|
00000700: 30 29 29 00 26 0F 92 04 42 24 B2 C9 28 22 20 20 |0)).&...B$..(" |
00000710: 22 AA C9 28 C4 28 42 29 2C C3 28 C4 28 42 29 29 |"..(.(B),.(.(B))|
00000720: AB 31 29 2C 33 29 00 37 0F 9C 04 8B 53 54 B2 36 |.1),3).7....ST.6|
00000730: 34 A7 45 4F 49 B2 31 00 4B 0F A6 04 8B 46 54 B3 |4.EOI.1.K....FT.|
00000740: 31 32 38 A7 98 34 2C 22 12 22 3B 00 76 0F B0 04 |128..4,".";.v...|
00000750: 98 34 2C 22 20 22 42 24 22 20 20 20 22 46 24 22 |.4," "B$" "F$"|
00000760: 20 20 22 46 54 24 22 20 22 54 24 22 2D 22 53 24 | "FT$" "T$"-"S$|
00000770: 22 20 22 4C 41 24 00 80 0F BA 04 46 B2 46 AA 31 |" "LA$.....F.F.1|
00000780: 00 9F 0F C4 04 8B 46 AD 38 B3 B1 B5 28 46 AD 38 |......F.8...(F.8|
00000790: 29 A7 A1 23 33 2C 42 24 3A A1 23 33 2C 42 24 00 |)..#3,B$:.#3,B$.|
000007A0: B3 0F CE 04 A1 43 24 3A 8B 43 24 B2 22 22 89 31 |.....C$:.C$."".1|
000007B0: 32 35 30 00 C7 0F D8 04 A1 43 24 B2 8B 43 24 B2 |250......C$..C$.|
000007C0: 22 22 A7 31 32 34 30 00 D7 0F E2 04 8B 45 4F 49 |"".1240......EOI|
000007D0: B2 31 89 31 32 37 30 00 E0 0F EC 04 89 37 38 30 |.1.1270......780|
000007E0: 00 E7 0F F6 04 A0 34 00 EE 0F 00 05 A0 33 00 F5 |......4......3..|
000007F0: 0F 0A 05 A0 32 00 0D 10 14 05 84 31 35 2C 45 4E |....2......15,EN|
00000800: 24 2C 45 4D 24 2C 45 54 24 2C 45 53 24 00 15 10 |$,EM$,ET$,ES$...|
00000810: 1E 05 A0 31 35 00 1B 10 28 05 80 00 2C 10 32 05 |...15...(...,.2.|
00000820: 8F 20 46 49 4C 45 20 54 59 50 45 53 00 4A 10 3C |. FILE TYPES.J.<|
00000830: 05 83 20 44 45 4C 2C 53 45 51 2C 50 52 47 2C 55 |.. DEL,SEQ,PRG,U|
00000840: 53 52 2C 52 45 4C 2C 3F 3F 3F 00 5B 10 46 05 8F |SR,REL,???.[.F..|
00000850: 20 47 45 54 20 41 20 42 59 54 45 00 66 10 50 05 | GET A BYTE.f.P.|
00000860: A1 23 33 2C 42 24 00 79 10 5A 05 8B 42 24 B2 22 |.#3,B$.y.Z..B$."|
00000870: 22 A7 42 24 B2 C7 28 30 29 00 85 10 64 05 41 B2 |".B$..(0)...d.A.|
00000880: C6 28 42 24 29 00 98 10 6E 05 8B 41 B1 31 32 37 |.(B$)...n..A.127|
00000890: A7 41 B2 41 AB 31 32 38 00 AC 10 78 05 8B 41 B3 |.A.A.128...x..A.|
000008A0: 33 32 B0 41 B1 39 35 A7 41 B2 36 33 00 BB 10 82 |32.A.95.A.63....|
000008B0: 05 8B 41 B2 33 34 A7 41 B2 36 33 00 C1 10 8C 05 |..A.34.A.63.....|
000008C0: 8E 00 00 00 08 |..... |
.. .D.. VIRTUAL DIRECTORY - 1541.&.N...@
.X.H$."0123456789ABCDEF".K....I.0.5.W...
.FT$(1).^....I.. ..".VIRTUAL DIRECTORY
- 1541". ....".INSERT DISKETTE IN DRIVE"
.C....".PRESS .RETURN. TO CONTINUE".V...
.C$:.C$."".190...H..C$..G(13).190...R.."
OK"......15,8,15......15,"IO".%....15,EN
$,EM$,ET$,ES$.7....EN$."00".300.X...."."
EN$", "EM$", "ET$", "ES$.`... 15.F.....Z
.".. FORMATTING ID...,..15,"M-R"G(22)G(0
)G(2)...6..#15,B$...@..1370...J.FI$.FI$.
G(A).H.T..#15,B$.R.^..1370...H.FI$.FI$.G
(A)...R.. BLOCKS FREE...|..15,"M-R"G(250
)G(2)G(3)......#15,B$.....L.F(B$.G(0)).:
....#15,B$.F....#15,B$.W...H.F(B$.G(0)).
H...BF.L.(H.256).V.B.BA.664.BF..L..4,3.
..V..2,8,2,"#"......3,8,3,"$0,P,R"......
#3,B$.....DOS.F(B$.G(0)).M....I.3.143.X.
...#3,B$......I......I.144.159...&..1360
...0.DN$.DN$.G(A)...:..I...D..#3,B$.&.N.
.#3,B$.5.X..I.162.163.?.B..1360.P.L.ID$.
ID$.G(A).W.V..I.F....I.164.255.Q....#3,B
$.X....I......I.1.6......4......I......4
,"DISK NAME: "DN$.O.F..4,"DISK ID
: "ID$...P..4,"FORMATTING ID:
"FI$...Z..4,"DOS TYPE: "DOS.)..
..4,"BLOCKS ALLOCATED:"BA.F....4,"BLOCKS
FREE: "BF.M....4.~....4,"BLOCKS
FILE NAME TYPE T-S LOAD"......F.8.
.(F.8)..4......#3,B$... .T.F(B$.G(0))...
*.FT$.FT$(7.FT).J.4..#3,B$...>.T.F(B$.G(
0))...H.T$.I("0".I(D(T),C(D(T)).1),2)...
R..#3,B$...\.S.F(B$.G(0)).;.F.S$.I("0".I
(D(S),C(D(S)).1),2).F.P.LA$."".D.Z..(7.F
T)..0.(7.FT)..2.1020.Y....15,"U1";2;0;2;
2......15,"B-P";2;2......#2,B$.....A.F(B
$.G(0)).....H..(A.16).B...L.A.16.H.....L
A$.J(H$,H.1,1).J(H$,L.1,1)...J..#2,B$...
T.A.F(B$.G(0)).....H..(A.16).....L.A.16.
H.=...LA$.J(H$,H.1,1).J(H$,L.1,1).LA$.G.
..F$."".R...NULL.0.^....I.1.16.H....1360
...$..B$.G(0).NUL.NULL.1.....F$.F$.G(A).
..8..I...B..NULL.16.1270...L..I.1.9...V.
.#3,B$.E.`..I.P.J..#3,B$...T.B.F(B$.G(0)
)...~..#3,B$.....B.B.256.F(B$.G(0)).&...
B$.I(" ".I(D(B),C(D(B)).1),3).7....ST.6
4.EOI.1.K....FT.128..4,".";.V....4," "B$
" "F$" "FT$" "T$"-"S$" "LA$.....F.F.1
...D..F.8...(F.8)..#3,B$:.#3,B$...N..C$:
.C$."".1250.G.X..C$..C$."".1240.W....EOI
.1.1270......780..... 4..... 3..... 2...
...15,EN$,EM$,ET$,ES$..... 15...(...,.2.
. FILE TYPES.J.<.. DEL,SEQ,PRG,USR,REL,?
??.[.F.. GET A BYTE.F.P..#3,B$.Y.Z..B$."
".B$.G(0)...D.A.F(B$)...N..A.127.A.A.128
...X..A.32.A.95.A.63......A.34.A.63.A...
.....
> CLICK IMAGE PREVIEW FOR FULL MODAL