V.D.E. V1

FILE INFORMATION

FILENAME(S): V.D.E. V1

FILE TYPE(S): PRG

FILE SIZE: 1.1K

FIRST SEEN: 2025-11-30 01:12:46

APPEARS ON: 3 disk(s)

FILE HASH

03041ccafdbcd0783c9e5028ccf0253e36c7910ae0b0ad41eecfd4eaa965aa1c

FOUND ON DISKS (3 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
10001 SEITE 1	V.D.E. V1	PRG	C64er	30	14	DOWNLOAD FILE
64 ER SONDERH 75	V.D.E. V1	PRG	C64er	33	14	DOWNLOAD FILE
10001 SEITE 1	V.D.E. V1	PRG	DuncanTwain	30	14	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)

00000000: 01 08 48 08 01 00 41 32  B2 35 33 32 38 30 3A 8D  |..H...A2.53280:.|
00000010: 38 3A 85 22 11 11 11 11  11 46 55 4E 4B 54 49 4F  |8:.".....FUNKTIO|
00000020: 4E 20 28 59 3D 29 3A 20  20 20 50 45 45 4B 28 4C  |N (Y=):   PEEK(L|
00000030: 4E 29 9D 9D 9D 9D 9D 9D  9D 9D 9D 9D 22 3B 46 32  |N)..........";F2|
00000040: 24 3A 97 41 32 2C 31 33  00 85 08 02 00 99 22 13  |$:.A2,13......".|
00000050: 90 11 11 11 11 11 22 3B  46 24 3B 46 32 24 3A 99  |......";F$;F2$:.|
00000060: 22 52 55 4E 33 3A 91 91  91 91 91 22 3A 97 36 33  |"RUN3:.....":.63|
00000070: 32 2C 31 33 3A 97 36 33  33 2C 31 33 3A 97 31 39  |2,13:.633,13:.19|
00000080: 38 2C 33 3A 80 00 BD 08  03 00 97 31 39 38 2C 30  |8,3:.......198,0|
00000090: 3A 85 22 11 11 11 11 11  9E 53 54 41 52 54 2D 5A  |:."......START-Z|
000000A0: 45 49 4C 45 4E 4E 55 4D  4D 45 52 3A 20 20 20 31  |EILENNUMMER:   1|
000000B0: 30 30 30 9D 9D 9D 9D 9D  9D 22 3B 5A 4E 00 F7 08  |000......";ZN...|
000000C0: 04 00 85 22 11 53 43 48  52 49 54 54 57 45 49 54  |...".SCHRITTWEIT|
000000D0: 45 2D 5A 45 49 4C 45 4E  4E 55 4D 4D 45 52 3A 20  |E-ZEILENNUMMER: |
000000E0: 20 20 31 30 9D 9D 9D 9D  22 3B 5A 5A 3A 81 54 B2  |  10....";ZZ:.T.|
000000F0: 30 A4 32 37 3A 87 44 00  36 09 05 00 97 34 39 31  |0.27:.D.6....491|
00000100: 35 32 AA 54 2C 44 3A 82  3A 85 22 11 53 54 41 52  |52.T,D:.:.".STAR|
00000110: 54 57 45 52 54 20 44 45  52 20 4C 41 55 46 45 4E  |TWERT DER LAUFEN|
00000120: 44 45 4E 20 4E 55 4D 4D  45 52 3A 20 20 20 30 9D  |DEN NUMMER:   0.|
00000130: 9D 9D 22 3B 4C 4E 00 73  09 06 00 85 22 11 53 43  |..";LN.s....".SC|
00000140: 48 52 49 54 54 57 45 49  54 45 20 44 45 52 20 4C  |HRITTWEITE DER L|
00000150: 41 55 46 45 4E 44 45 4E  20 4E 55 4D 4D 45 52 3A  |AUFENDEN NUMMER:|
00000160: 20 20 20 31 9D 9D 9D 22  3B 4E 5A 3A 41 B2 34 39  |   1...";NZ:A.49|
00000170: 31 35 32 00 B5 09 07 00  85 22 11 47 45 53 41 4D  |152......".GESAM|
00000180: 54 5A 41 48 4C 20 44 45  52 20 44 41 54 45 4E 3A  |TZAHL DER DATEN:|
00000190: 20 20 20 31 30 30 20 9D  9D 9D 9D 9D 9D 22 3B 47  |   100 ......";G|
000001A0: 44 3A 9E 41 3A 97 41 AA  32 2C 34 39 3A 97 41 AA  |D:.A:.A.2,49:.A.|
000001B0: 34 2C 32 33 34 00 F8 09  08 00 4D 44 B2 36 3A 97  |4,234.....MD.6:.|
000001C0: 41 32 2C 30 3A 97 41 32  AA 31 2C 30 3A 99 22 93  |A2,0:.A2.1,0:.".|
000001D0: 22 3B A3 31 35 29 3B 22  9E 11 11 56 2E 44 2E 45  |";.15);"...V.D.E|
000001E0: 2E 20 56 31 9D 9D 9D 9D  9D 9D 9D 9D 9D 11 A3 A3  |. V1............|
000001F0: A3 A3 A3 A3 A3 A3 A3 22  00 3E 0A 09 00 41 32 24  |.......".>...A2$|
00000200: B2 C7 28 33 34 29 3A 46  24 B2 22 39 20 3F 22 AA  |..(34):F$."9 ?".|
00000210: 41 32 24 AA C7 28 31 34  37 29 AA 22 11 11 22 AA  |A2$..(147)."..".|
00000220: 41 32 24 AA 22 3A 46 4F  52 41 5A 3D 30 54 4F 31  |A2$.":FORAZ=0TO1|
00000230: 34 3A 59 3D 22 3A 41 32  B2 36 33 31 3A 8E 00 6D  |4:Y=":A2.631:..m|
00000240: 0A 0A 00 4C 4E B2 4C 4E  AA 4E 5A 3A 59 24 B2 C4  |...LN.LN.NZ:Y$..|
00000250: 28 59 29 3A 8B 59 B3 31  30 A7 59 24 B2 22 30 30  |(Y):.Y.10.Y$."00|
00000260: 22 AA C9 28 59 24 2C 31  29 3A 89 31 33 00 A9 0A  |"..(Y$,1):.13...|
00000270: 0B 00 8B 59 B3 31 30 30  A7 59 24 B2 22 30 22 AA  |...Y.100.Y$."0".|
00000280: C9 28 59 24 2C 32 29 3A  89 31 33 3A 83 20 31 32  |.(Y$,2):.13:. 12|
00000290: 30 2C 31 36 39 2C 31 33  2C 31 36 30 2C 31 39 32  |0,169,13,160,192|
000002A0: 2C 31 34 31 2C 32 30 2C  33 00 EC 0A 0C 00 59 24  |,141,20,3.....Y$|
000002B0: B2 C9 28 59 24 2C 33 29  3A 83 20 31 34 30 2C 32  |..(Y$,3):. 140,2|
000002C0: 31 2C 33 2C 38 38 2C 39  36 2C 31 36 39 2C 32 2C  |1,3,88,96,169,2,|
000002D0: 31 33 33 2C 31 39 38 2C  31 36 39 2C 31 33 2C 31  |133,198,169,13,1|
000002E0: 34 31 2C 31 31 39 2C 32  2C 31 34 31 00 29 0B 0D  |41,119,2,141.)..|
000002F0: 00 47 24 B2 47 24 AA 59  24 AA 22 2C 22 3A 44 41  |.G$.G$.Y$.",":DA|
00000300: B2 44 41 AA 31 3A 47 44  B2 47 44 AB 31 3A 8B 47  |.DA.1:GD.GD.1:.G|
00000310: 44 B3 B2 30 A7 31 37 3A  83 20 31 32 30 2C 32 2C  |D..0.17:. 120,2,|
00000320: 37 36 2C 34 39 2C 32 33  34 00 3F 0B 0E 00 8B 44  |76,49,234.?....D|
00000330: 41 B3 B1 4D 44 A7 41 5A  B2 41 5A AB 31 3A 82 00  |A..MD.AZ.AZ.1:..|
00000340: 59 0B 0F 00 47 24 B2 C8  28 47 24 2C C3 28 47 24  |Y...G$..(G$,.(G$|
00000350: 29 AB 31 29 3A 44 41 B2  30 00 96 0B 10 00 47 24  |).1):DA.0.....G$|
00000360: B2 C4 28 5A 4E 29 AA 22  20 44 41 54 41 20 22 AA  |..(ZN)." DATA ".|
00000370: 47 24 3A 5A 4E B2 5A 4E  AA 5A 5A 3A 97 36 34 36  |G$:ZN.ZN.ZZ:.646|
00000380: 2C 37 3A 99 47 24 3A 47  24 B2 22 22 3A 82 3A 41  |,7:.G$:G$."":.:A|
00000390: B2 30 3A 89 31 38 00 C4  0B 11 00 47 24 B2 C8 28  |.0:.18.....G$..(|
000003A0: 47 24 2C 28 C3 28 47 24  29 AB 31 29 29 3A 99 C4  |G$,(.(G$).1)):..|
000003B0: 28 5A 4E 29 AA 22 20 44  41 54 41 20 22 AA 47 24  |(ZN)." DATA ".G$|
000003C0: 3A 41 B2 31 00 0C 0C 12  00 99 22 90 38 20 5A 4E  |:A.1......".8 ZN|
000003D0: 3D 22 3B 5A 4E 3B 22 9D  3A 5A 5A 3D 22 3B 5A 5A  |=";ZN;".:ZZ=";ZZ|
000003E0: 3B 22 9D 3A 4C 4E 3D 22  3B 4C 4E 3B 22 9D 3A 4D  |;".:LN=";LN;".:M|
000003F0: 44 3D 22 3B 4D 44 3B 22  9D 3A 4E 5A 3D 22 3B 4E  |D=";MD;".:NZ=";N|
00000400: 5A 3B 22 9D 3A 47 44 3D  22 3B 47 44 00 4F 0C 13  |Z;".:GD=";GD.O..|
00000410: 00 41 24 B2 22 53 D9 34  39 31 35 32 3A 50 CF 31  |.A$."S.49152:P.1|
00000420: 39 38 2C 30 3A 53 D9 35  38 36 39 32 3A 50 CF 36  |98,0:S.58692:P.6|
00000430: 34 36 2C 37 3A 22 3A 41  32 24 B2 C7 28 33 34 29  |46,7:":A2$..(34)|
00000440: 3A 8B 41 B2 30 A7 99 22  52 D5 38 13 22 3A 80 00  |:.A.0.."R.8.":..|
00000450: 93 0C 14 00 99 22 90 3F  43 C8 28 31 34 37 29 3A  |.....".?C.(147):|
00000460: 3F 3A 3F 3A 46 CF 41 3D  31 54 4F 32 30 3A 3F 41  |?:?:F.A=1TO20:?A|
00000470: 3A 4E C5 3A 3F 22 3B 41  32 24 3B 41 24 3B 22 4C  |:N.:?";A2$;A$;"L|
00000480: C9 3A 22 3B 41 32 24 3B  22 3A 3F 43 C8 28 31 39  |.:";A2$;":?C.(19|
00000490: 29 13 22 00 00 00                                 |)."...          |

..H...A2.53280:.8:.".....FUNKTION (Y=): 
  PEEK(LN)..........";F2$:.A2,13......".
......";F$;F2$:."RUN3:.....":.632,13:.63
3,13:.198,3:.......198,0:."......START-Z
EILENNUMMER:   1000......";ZN......".SCH
RITTWEITE-ZEILENNUMMER:   10....";ZZ:.T.
0.27:.D.6....49152.T,D:.:.".STARTWERT DE
R LAUFENDEN NUMMER:   0...";LN.S....".SC
HRITTWEITE DER LAUFENDEN NUMMER:   1..."
;NZ:A.49152......".GESAMTZAHL DER DATEN:
   100 ......";GD:.A:.A.2,49:.A.4,234...
..MD.6:.A2,0:.A2.1,0:.".";.15);"...V.D.E
. V1...................".>...A2$.G(34):F
$."9 ?".A2$.G(147)."..".A2$.":FORAZ=0TO1
4:Y=":A2.631:..M...LN.LN.NZ:Y$.D(Y):.Y.1
0.Y$."00".I(Y$,1):.13......Y.100.Y$."0".
I(Y$,2):.13:. 120,169,13,160,192,141,20,
3.....Y$.I(Y$,3):. 140,21,3,88,96,169,2,
133,198,169,13,141,119,2,141.)...G$.G$.Y
$.",":DA.DA.1:GD.GD.1:.GD..0.17:. 120,2,
76,49,234.?....DA..MD.AZ.AZ.1:..Y...G$.H
(G$,C(G$).1):DA.0.....G$.D(ZN)." DATA ".
G$:ZN.ZN.ZZ:.646,7:.G$:G$."":.:A.0:.18.D
...G$.H(G$,(C(G$).1)):.D(ZN)." DATA ".G$
:A.1......".8 ZN=";ZN;".:ZZ=";ZZ;".:LN="
;LN;".:MD=";MD;".:NZ=";NZ;".:GD=";GD.O..
.A$."SY49152:PO198,0:SY58692:PO646,7:":A
2$.G(34):.A.0.."RU8.":.......".?CH(147):
?:?:FOA=1TO20:?A:NE:?";A2$;A$;"LI:";A2$;
":?CH(19)."...

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL