VFS
FILE INFORMATION
FILENAME(S): VFS
FILE TYPE(S): PRG
FILE SIZE: 2.3K
FIRST SEEN: 2025-11-30 21:08:30
APPEARS ON: 1 disk(s)
FILE HASH
eba011c948f03edcaff351ceb9bc31361df197c0269cb468ff203abb00bec4b5
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| DISKSORT 1500 | VFS | PRG | DuncanTwain | 14 | 10 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 1E 08 0A 00 8B 41 41 B2 30 A7 41 41 B2 31 |.......AA.0.AA.1|
00000010: 3A 93 22 56 2D 53 4F 52 54 22 2C 38 2C 31 00 3A |:."V-SORT",8,1.:|
00000020: 08 14 00 8B 41 41 B2 31 A7 41 41 B2 32 3A 93 22 |....AA.1.AA.2:."|
00000030: 56 2D 44 49 52 22 2C 38 2C 31 00 48 08 16 00 86 |V-DIR",8,1.H....|
00000040: 56 24 28 31 30 30 30 29 00 5E 08 1E 00 97 35 33 |V$(1000).^....53|
00000050: 32 38 30 2C 30 3A 97 35 33 32 38 31 2C 30 00 83 |280,0:.53281,0..|
00000060: 08 28 00 99 22 08 9E 93 12 20 56 49 44 45 4F 20 |.(..".... VIDEO |
00000070: 43 4F 4E 54 52 4F 4C 4C 45 52 20 53 59 53 54 45 |CONTROLLER SYSTE|
00000080: 4D 20 22 00 9B 08 2D 00 99 22 11 20 56 49 44 45 |M "...-..". VIDE|
00000090: 4F 27 53 20 53 45 45 4E 3A 22 48 00 BB 08 32 00 |O'S SEEN:"H...2.|
000000A0: 99 22 11 11 11 20 5B 46 31 5D 20 4C 4F 41 44 20 |."... [F1] LOAD |
000000B0: 56 49 44 45 4F 20 46 49 4C 45 22 00 D9 08 37 00 |VIDEO FILE"...7.|
000000C0: 99 22 11 20 5B 46 32 5D 20 53 41 56 45 20 56 49 |.". [F2] SAVE VI|
000000D0: 44 45 4F 20 46 49 4C 45 22 00 F7 08 3C 00 99 22 |DEO FILE"...<.."|
000000E0: 11 20 5B 46 33 5D 20 45 44 49 54 20 56 49 44 45 |. [F3] EDIT VIDE|
000000F0: 4F 20 46 49 4C 45 22 00 15 09 41 00 99 22 11 20 |O FILE"...A..". |
00000100: 5B 46 35 5D 20 53 48 4F 57 20 56 49 44 45 4F 20 |[F5] SHOW VIDEO |
00000110: 46 49 4C 45 22 00 33 09 44 00 99 22 11 20 5B 46 |FILE".3.D..". [F|
00000120: 36 5D 20 53 4F 52 54 20 56 49 44 45 4F 20 46 49 |6] SORT VIDEO FI|
00000130: 4C 45 22 00 50 09 46 00 99 22 11 20 5B 46 37 5D |LE".P.F..". [F7]|
00000140: 20 53 48 4F 57 20 44 49 52 45 43 54 4F 52 59 22 | SHOW DIRECTORY"|
00000150: 00 6A 09 50 00 99 22 11 20 5B 46 38 5D 20 51 55 |.j.P..". [F8] QU|
00000160: 49 54 20 53 59 53 54 45 4D 22 00 73 09 5A 00 8D |IT SYSTEM".s.Z..|
00000170: 39 39 39 00 8F 09 64 00 8B C6 28 45 24 29 B3 31 |999...d...(E$).1|
00000180: 33 33 B0 C6 28 45 24 29 B1 31 34 30 A7 39 30 00 |33..(E$).140.90.|
00000190: A2 09 6E 00 8B 45 24 B2 C7 28 31 33 33 29 A7 32 |..n..E$..(133).2|
000001A0: 30 30 00 B5 09 78 00 8B 45 24 B2 C7 28 31 33 37 |00...x..E$..(137|
000001B0: 29 A7 32 36 30 00 C8 09 82 00 8B 45 24 B2 C7 28 |).260......E$..(|
000001C0: 31 33 34 29 A7 33 35 30 00 DB 09 8C 00 8B 45 24 |134).350......E$|
000001D0: B2 C7 28 31 33 35 29 A7 36 32 30 00 EE 09 91 00 |..(135).620.....|
000001E0: 8B 45 24 B2 C7 28 31 33 39 29 A7 35 30 30 00 10 |.E$..(139).500..|
000001F0: 0A 96 00 8B 45 24 B2 C7 28 31 33 36 29 A7 99 22 |....E$..(136).."|
00000200: 93 22 3A 9E 38 32 38 3A 8D 39 39 39 3A 89 33 30 |.":.828:.999:.30|
00000210: 00 23 0A A0 00 8B 45 24 B2 C7 28 31 34 30 29 A7 |.#....E$..(140).|
00000220: 39 30 30 00 2B 0A AA 00 89 39 30 00 38 0A C8 00 |900.+....90.8...|
00000230: 8B 48 B3 B1 30 A7 33 30 00 54 0A CA 00 99 22 93 |.H..0.30.T....".|
00000240: 20 4C 4F 41 44 49 4E 47 20 56 49 44 45 4F 20 46 | LOADING VIDEO F|
00000250: 49 4C 45 22 00 61 0A CD 00 9F 31 35 2C 38 2C 31 |ILE".a....15,8,1|
00000260: 35 00 7D 0A D2 00 9F 32 2C 38 2C 32 2C 22 56 49 |5.}....2,8,2,"VI|
00000270: 44 45 4F 20 46 49 4C 45 2C 53 2C 52 22 00 87 0A |DEO FILE,S,R"...|
00000280: DC 00 84 32 2C 46 24 00 93 0A E6 00 48 B2 C5 28 |...2,F$.....H..(|
00000290: 46 24 29 00 9E 0A F0 00 81 59 B2 31 A4 48 00 AB |F$)......Y.1.H..|
000002A0: 0A F2 00 84 32 2C 56 24 28 59 29 00 BC 0A F4 00 |....2,V$(Y).....|
000002B0: 82 3A A0 32 3A A0 31 35 3A 89 33 30 00 C8 0A 04 |.:.2:.15:.30....|
000002C0: 01 8B 48 B2 30 A7 33 30 00 EB 0A 07 01 99 22 93 |..H.0.30......".|
000002D0: 20 53 43 52 41 54 43 48 49 4E 47 20 4F 4C 44 20 | SCRATCHING OLD |
000002E0: 56 49 44 45 4F 20 46 49 4C 45 22 00 07 0B 09 01 |VIDEO FILE".....|
000002F0: 9F 31 35 2C 38 2C 31 35 2C 22 53 3A 56 49 44 45 |.15,8,15,"S:VIDE|
00000300: 4F 20 46 49 4C 45 22 00 22 0B 0C 01 99 22 11 20 |O FILE"."....". |
00000310: 53 41 56 49 4E 47 20 56 49 44 45 4F 20 46 49 4C |SAVING VIDEO FIL|
00000320: 45 22 00 3E 0B 0E 01 9F 32 2C 38 2C 32 2C 22 56 |E".>....2,8,2,"V|
00000330: 49 44 45 4F 20 46 49 4C 45 2C 53 2C 57 22 00 4A |IDEO FILE,S,W".J|
00000340: 0B 18 01 44 24 B2 C4 28 48 29 00 5A 0B 22 01 98 |...D$..(H).Z."..|
00000350: 32 2C 44 24 3B C7 28 31 33 29 00 65 0B 2C 01 81 |2,D$;.(13).e.,..|
00000360: 59 B2 31 A4 48 00 72 0B 31 01 98 32 2C 56 24 28 |Y.1.H.r.1..2,V$(|
00000370: 59 29 00 83 0B 36 01 82 3A A0 32 3A A0 31 35 3A |Y)...6..:.2:.15:|
00000380: 89 33 30 00 9D 0B 5E 01 85 22 93 45 4E 54 45 52 |.30...^..".ENTER|
00000390: 20 53 54 41 52 54 20 4E 52 2E 22 3B 53 00 AD 0B | START NR.";S...|
000003A0: 60 01 8B 53 B3 31 B0 53 B1 48 A7 33 30 00 B8 0B |`..S.1.S.H.30...|
000003B0: 65 01 81 49 B2 53 A4 48 00 CC 0B 66 01 A1 57 24 |e..I.S.H...f..W$|
000003C0: 3A 8B 57 24 B3 B1 22 22 A7 33 36 34 00 D5 0B 67 |:.W$.."".364...g|
000003D0: 01 8D 39 37 30 00 DB 0B 6A 01 82 00 E4 0B 6C 01 |..970...j.....l.|
000003E0: 8D 39 39 37 00 ED 0B 6D 01 8D 39 39 39 00 08 0C |.997...m..999...|
000003F0: 70 01 8B 45 24 B2 22 2B 22 A7 48 B2 48 AA 31 3A |p..E$."+".H.H.1:|
00000400: 4E B2 48 3A 8D 34 30 30 00 22 0C 72 01 8B 45 24 |N.H:.400.".r..E$|
00000410: B2 22 2A 22 A7 85 22 4E 52 2E 22 3B 4E 3A 8D 34 |."*".."NR.";N:.4|
00000420: 32 30 00 3C 0C 74 01 8B 45 24 B2 22 21 22 A7 85 |20.<.t..E$."!"..|
00000430: 22 4E 52 2E 22 3B 4E 3A 89 34 36 30 00 63 0C 76 |"NR.";N:.460.c.v|
00000440: 01 8B 45 24 B2 22 5F 22 A7 99 22 53 4F 52 54 49 |..E$."_".."SORTI|
00000450: 4E 47 20 4F 4E 45 20 4D 4F 4D 45 4E 54 22 3A 89 |NG ONE MOMENT":.|
00000460: 35 31 30 00 6B 0C 78 01 53 B2 54 00 74 0C 7C 01 |510.k.x.S.T.t.|.|
00000470: 89 33 36 34 00 A0 0C 90 01 99 22 20 20 4E 41 4D |.364......" NAM|
00000480: 45 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |E |
00000490: 20 20 59 59 4D 4D 44 44 22 3A 85 56 24 28 4E 29 | YYMMDD":.V$(N)|
000004A0: 00 BD 0C 94 01 8B C5 28 CA 28 56 24 28 4E 29 2C |.......(.(V$(N),|
000004B0: 32 32 2C 32 29 29 B3 38 35 A7 34 30 30 00 DA 0C |22,2)).85.400...|
000004C0: 96 01 8B C5 28 CA 28 56 24 28 4E 29 2C 32 34 2C |....(.(V$(N),24,|
000004D0: 32 29 29 B1 31 32 A7 34 30 30 00 F7 0C 98 01 8B |2)).12.400......|
000004E0: C5 28 CA 28 56 24 28 4E 29 2C 32 36 2C 32 29 29 |.(.(V$(N),26,2))|
000004F0: B1 33 31 A7 34 30 30 00 FD 0C 9A 01 8E 00 0C 0D |.31.400.........|
00000500: A4 01 8B 4E B3 31 B0 4E B1 48 A7 8E 00 1C 0D AE |...N.1.N.H......|
00000510: 01 99 4E 3B A3 34 29 56 24 28 4E 29 00 2D 0D B8 |..N;.4)V$(N).-..|
00000520: 01 85 22 91 20 20 22 3B 56 24 28 4E 29 00 33 0D |..". ";V$(N).3.|
00000530: C2 01 8E 00 43 0D CC 01 8B 4E B3 31 B0 4E B1 48 |....C....N.1.N.H|
00000540: A7 33 30 00 6D 0D D6 01 56 24 28 4E 29 B2 C7 28 |.30.m...V$(N)..(|
00000550: 32 35 35 29 3A 9E 34 39 31 35 32 2C 48 2C 56 24 |255):.49152,H,V$|
00000560: 28 31 29 3A 48 B2 48 AB 31 3A 89 33 30 00 88 0D |(1):H.H.1:.30...|
00000570: F4 01 99 22 93 53 4F 52 54 49 4E 47 20 56 49 44 |...".SORTING VID|
00000580: 45 4F 20 46 49 4C 45 22 00 9F 0D FE 01 9E 34 39 |EO FILE"......49|
00000590: 31 35 32 2C 48 2C 56 24 28 31 29 3A 89 33 30 00 |152,H,V$(1):.30.|
000005A0: A8 0D 6C 02 99 22 93 22 00 C2 0D 6D 02 99 22 4E |..l.."."...m.."N|
000005B0: 12 55 92 4D 42 45 52 20 2F 20 12 4D 92 4F 4E 54 |.U.MBER / .M.ONT|
000005C0: 48 22 00 DB 0D 6E 02 99 22 12 41 92 4C 4C 20 20 |H"...n..".A.LL |
000005D0: 20 20 2F 20 12 59 92 45 41 52 22 00 F4 0D 6F 02 | / .Y.EAR"...o.|
000005E0: 99 22 12 4E 92 41 4D 45 20 20 20 2F 20 12 44 92 |.".N.AME / .D.|
000005F0: 41 54 45 22 00 09 0E 70 02 99 22 5F 20 3D 20 45 |ATE"...p.."_ = E|
00000600: 58 49 54 22 3A 8D 39 39 39 00 19 0E 76 02 8B 45 |XIT":.999...v..E|
00000610: 24 B2 22 4D 22 A7 37 32 30 00 29 0E 80 02 8B 45 |$."M".720.)....E|
00000620: 24 B2 22 41 22 A7 37 33 30 00 39 0E 8A 02 8B 45 |$."A".730.9....E|
00000630: 24 B2 22 59 22 A7 37 34 30 00 49 0E 94 02 8B 45 |$."Y".740.I....E|
00000640: 24 B2 22 4E 22 A7 37 37 30 00 59 0E 9E 02 8B 45 |$."N".770.Y....E|
00000650: 24 B2 22 44 22 A7 37 36 30 00 69 0E A3 02 8B 45 |$."D".760.i....E|
00000660: 24 B2 22 55 22 A7 37 35 30 00 71 0E A8 02 89 33 |$."U".750.q....3|
00000670: 30 00 87 0E B2 02 99 22 4B 45 59 21 22 3A 8D 39 |0......"KEY!":.9|
00000680: 39 39 3A 89 36 32 30 00 A2 0E D0 02 85 22 4D 4D |99:.620......"MM|
00000690: 22 3B 4D 24 3A 8B C5 28 4D 24 29 B1 31 32 A7 37 |";M$:..(M$).12.7|
000006A0: 32 30 00 AD 0E D2 02 81 49 B2 31 A4 48 00 C8 0E |20......I.1.H...|
000006B0: D4 02 8B CA 28 56 24 28 49 29 2C 32 34 2C 32 29 |....(V$(I),24,2)|
000006C0: B2 4D 24 A7 8D 39 37 30 00 D3 0E D6 02 82 3A 89 |.M$..970......:.|
000006D0: 36 39 30 00 E3 0E DA 02 81 49 B2 31 A4 48 3A 8D |690......I.1.H:.|
000006E0: 39 37 30 00 F8 0E DC 02 A1 58 24 3A 8B 58 24 B3 |970......X$:.X$.|
000006F0: B1 22 22 A7 8D 39 39 35 00 03 0F DE 02 82 3A 89 |.""..995......:.|
00000700: 36 39 30 00 10 0F E4 02 85 22 59 59 22 3B 59 24 |690......"YY";Y$|
00000710: 00 21 0F E6 02 8B C5 28 59 24 29 B3 38 35 A7 33 |.!.....(Y$).85.3|
00000720: 30 00 2C 0F E8 02 81 49 B2 31 A4 48 00 47 0F EA |0.,....I.1.H.G..|
00000730: 02 8B CA 28 56 24 28 49 29 2C 32 32 2C 32 29 B2 |...(V$(I),22,2).|
00000740: 59 24 A7 8D 39 37 30 00 52 0F EC 02 82 3A 89 36 |Y$..970.R....:.6|
00000750: 39 30 00 66 0F EE 02 85 22 53 54 41 52 54 20 4E |90.f...."START N|
00000760: 52 2E 22 3B 4E 52 00 78 0F F0 02 8B 4E 52 B3 31 |R.";NR.x....NR.1|
00000770: B0 4E 52 B1 48 A7 33 30 00 89 0F F2 02 81 49 B2 |.NR.H.30......I.|
00000780: 4E 52 A4 48 3A 8D 39 37 30 00 9E 0F F4 02 A1 58 |NR.H:.970......X|
00000790: 24 3A 8B 58 24 B3 B1 22 22 A7 8D 39 39 35 00 A9 |$:.X$..""..995..|
000007A0: 0F F6 02 82 3A 89 36 39 30 00 B9 0F F8 02 85 22 |....:.690......"|
000007B0: 59 59 4D 4D 22 3B 59 4D 24 00 C4 0F FA 02 81 49 |YYMM";YM$......I|
000007C0: B2 31 A4 48 00 E0 0F FB 02 8B CA 28 56 24 28 49 |.1.H.......(V$(I|
000007D0: 29 2C 32 32 2C 34 29 B2 59 4D 24 A7 8D 39 37 30 |),22,4).YM$..970|
000007E0: 00 EB 0F FC 02 82 3A 89 36 39 30 00 FB 0F 02 03 |......:.690.....|
000007F0: 85 22 4E 41 4D 45 22 3B 4E 4D 24 00 20 10 04 03 |."NAME";NM$. ...|
00000800: 81 49 B2 31 A4 48 3A 8B C8 28 56 24 28 49 29 2C |.I.1.H:..(V$(I),|
00000810: C3 28 4E 4D 24 29 29 B2 4E 4D 24 A7 8D 39 37 30 |.(NM$)).NM$..970|
00000820: 00 2B 10 06 03 82 3A 89 36 39 30 00 38 10 84 03 |.+....:.690.8...|
00000830: 8B 48 B2 30 A7 39 32 30 00 50 10 8A 03 99 22 93 |.H.0.920.P....".|
00000840: 53 41 56 45 20 46 49 4C 45 3F 22 3A 8D 39 39 39 |SAVE FILE?":.999|
00000850: 00 61 10 8E 03 8B 45 24 B3 B1 22 4E 22 A7 32 36 |.a....E$.."N".26|
00000860: 30 00 75 10 93 03 81 4A B2 31 A4 48 3A 99 56 24 |0.u....J.1.H:.V$|
00000870: 28 4A 29 3A 82 00 7B 10 98 03 80 00 8D 10 CA 03 |(J):..{.........|
00000880: 99 49 3B A3 34 29 56 24 28 49 29 3A 8E 00 AE 10 |.I;.4)V$(I):....|
00000890: E3 03 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A |...198,0:.198,1:|
000008A0: A1 54 24 3A 8B 54 24 B3 B1 22 5F 22 A7 8E 00 B6 |.T$:.T$.."_"....|
000008B0: 10 E4 03 89 33 30 00 E5 10 E5 03 99 22 12 20 2A |....30......". *|
000008C0: 3D 45 44 49 54 20 2B 3D 41 44 44 20 21 3D 44 45 |=EDIT +=ADD !=DE|
000008D0: 4C 45 54 45 20 46 3D 46 49 4E 44 20 5F 3D 45 58 |LETE F=FIND _=EX|
000008E0: 49 54 22 3A 8E 00 EB 10 E6 03 80 00 03 11 E7 03 |IT":............|
000008F0: 97 31 39 38 2C 30 3A 92 31 39 38 2C 31 3A A1 45 |.198,0:.198,1:.E|
00000900: 24 3A 8E 00 00 00 |$:.... |
.......AA.0.AA.1:."V-SORT",8,1.:....AA.1
.AA.2:."V-DIR",8,1.H....V$(1000).^....53
280,0:.53281,0...(..".... VIDEO CONTROLL
ER SYSTEM "...-..". VIDEO'S SEEN:"H...2.
."... [F1] LOAD VIDEO FILE".Y.7..". [F2]
SAVE VIDEO FILE"...<..". [F3] EDIT VIDE
O FILE"...A..". [F5] SHOW VIDEO FILE".3.
D..". [F6] SORT VIDEO FILE".P.F..". [F7]
SHOW DIRECTORY".J.P..". [F8] QUIT SYSTE
M".S.Z..999...D..F(E$).133.F(E$).140.90.
..N..E$.G(133).200...X..E$.G(137).260.H.
...E$.G(134).350......E$.G(135).620.....
.E$.G(139).500......E$.G(136)..".":.828:
.999:.30.#. ..E$.G(140).900.+....90.8.H.
.H..0.30.T.J..". LOADING VIDEO FILE".A.M
..15,8,15.}.R..2,8,2,"VIDEO FILE,S,R"...
...2,F$.....H.E(F$)......Y.1.H......2,V$
(Y)......: 2: 15:.30.H....H.0.30......".
SCRATCHING OLD VIDEO FILE"......15,8,15
,"S:VIDEO FILE"."....". SAVING VIDEO FIL
E".>....2,8,2,"VIDEO FILE,S,W".J...D$.D(
H).Z."..2,D$;G(13).E.,..Y.1.H.R.1..2,V$(
Y)...6..: 2: 15:.30...^..".ENTER START N
R.";S...`..S.1.S.H.30...E..I.S.H.L.F..W$
:.W$.."".364.U.G..970...J.....L..997...M
..999...P..E$."+".H.H.1:N.H:.400.".R..E$
."*".."NR.";N:.420.<.T..E$."!".."NR.";N:
.460.C.V..E$."_".."SORTING ONE MOMENT":.
510.K.X.S.T.T.|..364. ...." NAME
YYMMDD":.V$(N)......E(J(V$(N),
22,2)).85.400.Z....E(J(V$(N),24,2)).12.4
00......E(J(V$(N),26,2)).31.400.........
...N.1.N.H........N;.4)V$(N).-....". ";
V$(N).3.B...C.L..N.1.N.H.30.M.V.V$(N).G(
255):.49152,H,V$(1):H.H.1:.30......".SOR
TING VIDEO FILE"......49152,H,V$(1):.30.
..L..".".B.M.."N.U.MBER / .M.ONTH"...N..
".A.LL / .Y.EAR"...O..".N.AME / .D.
ATE"...P.."_ = EXIT":.999...V..E$."M".72
0.)....E$."A".730.9....E$."Y".740.I....E
$."N".770.Y....E$."D".760.I....E$."U".75
0.Q....30......"KEY!":.999:.620...P.."MM
";M$:.E(M$).12.720...R..I.1.H.H.T..J(V$(
I),24,2).M$..970.S.V..:.690...Z..I.1.H:.
970......X$:.X$..""..995......:.690.....
."YY";Y$.!....E(Y$).85.30.,....I.1.H.G..
..J(V$(I),22,2).Y$..970.R....:.690.F....
"START NR.";NR.X....NR.1.NR.H.30......I.
NR.H:.970......X$:.X$..""..995......:.69
0......"YYMM";YM$.D....I.1.H......J(V$(I
),22,4).YM$..970......:.690......"NAME";
NM$. ....I.1.H:.H(V$(I),C(NM$)).NM$..970
.+....:.690.8....H.0.920.P....".SAVE FIL
E?":.999.A....E$.."N".260.U....J.1.H:.V$
(J):..{.......J..I;.4)V$(I):.......198,0
:.198,1:.T$:.T$.."_"........30......". *
=EDIT +=ADD !=DELETE F=FIND _=EXIT":....
.........198,0:.198,1:.E$:....
×
C64 Image
> CLICK IMAGE PREVIEW FOR FULL MODAL