_  __   _  _         _ _     _      _           _           
  __| |/ /_ | || |     __| (_)___| | __ (_)_ __   __| | _____  __
 / _` | '_ \| || |_   / _` | / __| |/ / | | '_ \ / _` |/ _ \ \/ /
| (_| | (_) |__   _| | (_| | \__ \   <  | | | | | (_| |  __/>  < 
 \__,_|\___/   |_|    \__,_|_|___/_|\_\ |_|_| |_|\__,_|\___/_/\_\
                                                                 
            

BASIC-DEMO 1

FILE INFORMATION

FILENAME(S): BASIC-DEMO 1

FILE TYPE(S): PRG

FILE SIZE: 1.4K

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

APPEARS ON: 2 disk(s)

FILE HASH

23392e5f09e8fe7a03539596f0229a9bdfbf50fc882bf404c2fbdcf8997c15b4

FOUND ON DISKS (2 DISKS)

DISK TITLE FILENAME FILE TYPE COLLECTION TRACK SECTOR ACTIONS
SH 12 86 VORDERS BASIC-DEMO 1 PRG C64er, DuncanTwain 12 0 DOWNLOAD FILE
SH 12 86 VORDERS BASIC-DEMO 1 PRG DuncanTwain 12 0 DOWNLOAD FILE

FILE CONTENT & ANALYSIS

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

00000000: 01 08 1A 08 0A 00 8F 20  2A 2A 2A 2A 2A 2A 2A 2A  |....... ********|
00000010: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 00 33 08 14 00 8F  |**********.3....|
00000020: 20 2A 20 44 45 4D 4F 50  52 4F 47 52 41 4D 4D 20  | * DEMOPROGRAMM |
00000030: 31 20 2A 00 4C 08 1E 00  8F 20 2A 2A 2A 2A 2A 2A  |1 *.L.... ******|
00000040: 2A 2A 2A 2A 2A 2A 2A 2A  2A 2A 2A 2A 00 52 08 28  |************.R.(|
00000050: 00 3A 00 58 08 32 00 3A  00 95 08 3C 00 8B 20 41  |.:.X.2.:...<.. A|
00000060: B2 30 20 A7 20 41 B2 31  3A 93 22 50 55 4C 4C 2D  |.0 . A.1:."PULL-|
00000070: 44 4F 57 4E 2D 4F 42 4A  45 43 54 22 2C 38 2C 31  |DOWN-OBJECT",8,1|
00000080: 3A 8F 20 52 4F 55 54 49  4E 45 4E 20 4E 41 43 48  |:. ROUTINEN NACH|
00000090: 4C 41 44 45 4E 00 9B 08  46 00 3A 00 B1 08 64 00  |LADEN...F.:...d.|
000000A0: 86 20 41 24 28 34 30 29  3A 99 20 C7 28 31 34 37  |. A$(40):. .(147|
000000B0: 29 00 CE 08 6E 00 4B 24  B2 22 46 49 4C 45 20 44  |)...n.K$."FILE D|
000000C0: 49 53 4B 20 45 44 49 54  20 48 45 4C 50 22 00 E1  |ISK EDIT HELP"..|
000000D0: 08 78 00 41 24 28 31 29  B2 22 20 20 20 20 20 20  |.x.A$(1)."      |
000000E0: 22 00 F2 08 82 00 41 24  28 32 29 B2 22 4C 4F 41  |".....A$(2)."LOA|
000000F0: 44 22 00 03 09 8C 00 41  24 28 33 29 B2 22 53 41  |D".....A$(3)."SA|
00000100: 56 45 22 00 14 09 96 00  41 24 28 34 29 B2 22 43  |VE".....A$(4)."C|
00000110: 4F 50 59 22 00 27 09 A0  00 41 24 28 35 29 B2 22  |OPY".'...A$(5)."|
00000120: 52 45 4E 41 4D 45 22 00  3A 09 AA 00 41 24 28 36  |RENAME".:...A$(6|
00000130: 29 B2 22 44 45 4C 45 54  45 22 00 51 09 B4 00 41  |)."DELETE".Q...A|
00000140: 24 28 37 29 B2 22 20 20  20 20 20 20 20 20 20 20  |$(7)."          |
00000150: 22 00 67 09 BE 00 41 24  28 38 29 B2 22 44 49 52  |".g...A$(8)."DIR|
00000160: 45 43 54 4F 52 59 22 00  78 09 C8 00 41 24 28 39  |ECTORY".x...A$(9|
00000170: 29 B2 22 4E 41 4D 45 22  00 88 09 D2 00 41 24 28  |)."NAME".....A$(|
00000180: 31 30 29 B2 22 49 44 22  00 9A 09 DC 00 41 24 28  |10)."ID".....A$(|
00000190: 31 31 29 B2 22 43 4F 50  59 22 00 AE 09 E6 00 41  |11)."COPY".....A|
000001A0: 24 28 31 32 29 B2 22 44  45 4C 45 54 45 22 00 C4  |$(12)."DELETE"..|
000001B0: 09 F0 00 41 24 28 31 33  29 B2 22 56 41 4C 49 44  |...A$(13)."VALID|
000001C0: 41 54 45 22 00 DC 09 FA  00 41 24 28 31 34 29 B2  |ATE".....A$(14).|
000001D0: 22 49 4E 49 54 49 41 4C  49 53 45 22 00 F6 09 04  |"INITIALISE"....|
000001E0: 01 41 24 28 31 35 29 B2  22 20 20 20 20 20 20 20  |.A$(15)."       |
000001F0: 20 20 20 20 20 22 00 0E  0A 0E 01 41 24 28 31 36  |     ".....A$(16|
00000200: 29 B2 22 4D 4F 56 45 20  42 4C 4F 43 4B 22 00 26  |)."MOVE BLOCK".&|
00000210: 0A 18 01 41 24 28 31 37  29 B2 22 43 4F 50 59 20  |...A$(17)."COPY |
00000220: 42 4C 4F 43 4B 22 00 40  0A 22 01 41 24 28 31 38  |BLOCK".@.".A$(18|
00000230: 29 B2 22 44 45 4C 45 54  45 20 42 4C 4F 43 4B 22  |)."DELETE BLOCK"|
00000240: 00 58 0A 2C 01 41 24 28  31 39 29 B2 22 53 41 56  |.X.,.A$(19)."SAV|
00000250: 45 20 42 4C 4F 43 4B 22  00 70 0A 36 01 41 24 28  |E BLOCK".p.6.A$(|
00000260: 32 30 29 B2 22 4C 4F 41  44 20 42 4C 4F 43 4B 22  |20)."LOAD BLOCK"|
00000270: 00 89 0A 40 01 41 24 28  32 31 29 B2 22 50 52 49  |...@.A$(21)."PRI|
00000280: 4E 54 20 42 4C 4F 43 4B  22 00 A5 0A 4A 01 41 24  |NT BLOCK"...J.A$|
00000290: 28 32 32 29 B2 22 20 20  20 20 20 20 20 20 20 20  |(22)."          |
000002A0: 20 20 20 20 22 00 BA 0A  54 01 41 24 28 32 33 29  |    "...T.A$(23)|
000002B0: B2 22 4E 4F 54 45 50 41  44 22 00 D2 0A 5E 01 41  |."NOTEPAD"...^.A|
000002C0: 24 28 32 34 29 B2 22 43  41 4C 43 55 4C 41 54 4F  |$(24)."CALCULATO|
000002D0: 52 22 00 E8 0A 68 01 41  24 28 32 35 29 B2 22 44  |R"...h.A$(25)."D|
000002E0: 41 54 41 42 41 53 45 22  00 04 0B 72 01 41 24 28  |ATABASE"...r.A$(|
000002F0: 32 36 29 B2 22 57 4F 52  44 20 50 52 4F 43 45 53  |26)."WORD PROCES|
00000300: 53 4F 52 22 00 1D 0B 7C  01 41 24 28 32 37 29 B2  |SOR"...|.A$(27).|
00000310: 22 53 50 52 45 41 44 53  48 45 45 54 22 00 38 0B  |"SPREADSHEET".8.|
00000320: 86 01 41 24 28 32 38 29  B2 22 46 49 4C 45 2D 48  |..A$(28)."FILE-H|
00000330: 41 4E 44 4C 49 4E 47 22  00 53 0B 90 01 41 24 28  |ANDLING".S...A$(|
00000340: 32 39 29 B2 22 44 49 53  4B 2D 48 41 4E 44 4C 49  |29)."DISK-HANDLI|
00000350: 4E 47 22 00 63 0B 9A 01  41 24 28 33 30 29 B2 22  |NG".c...A$(30)."|
00000360: 20 20 22 00 6F 0B F4 01  99 20 C7 28 31 39 29 00  |  ".o.... .(19).|
00000370: 97 0B F8 01 99 3A 99 22  44 49 45 53 20 49 53 54  |.....:."DIES IST|
00000380: 20 45 49 4E 20 54 45 53  54 20 44 45 52 20 52 4F  | EIN TEST DER RO|
00000390: 55 54 49 4E 45 4E 22 00  C2 0B F9 01 99 22 5A 55  |UTINEN"......"ZU|
000003A0: 52 20 56 45 52 57 41 4C  54 55 4E 47 20 56 4F 4E  |R VERWALTUNG VON|
000003B0: 20 50 55 4C 4C 2D 44 4F  57 4E 2D 4D 45 4E 55 45  | PULL-DOWN-MENUE|
000003C0: 53 22 00 DE 0B FE 01 99  3A 99 3A 99 3A 99 3A 99  |S"......:.:.:.:.|
000003D0: 3A 99 3A 99 3A 99 3A 99  3A 99 3A 99 3A 99 00 03  |:.:.:.:.:.:.:...|
000003E0: 0C 08 02 99 20 22 41 55  46 52 55 46 20 3A 20 43  |.... "AUFRUF : C|
000003F0: 54 52 4C 2D 54 41 53 54  45 20 44 52 55 45 43 4B  |TRL-TASTE DRUECK|
00000400: 45 4E 22 00 09 0C 09 02  99 00 36 0C 0A 02 99 22  |EN".......6...."|
00000410: 53 54 45 55 45 52 55 4E  47 3A 20 43 55 52 53 4F  |STEUERUNG: CURSO|
00000420: 52 54 41 53 54 45 4E 20  5A 55 4D 20 42 4C 41 45  |RTASTEN ZUM BLAE|
00000430: 54 54 45 52 4E 22 00 63  0C 0B 02 99 22 56 4F 4E  |TTERN".c...."VON|
00000440: 20 4D 45 4E 55 45 20 5A  55 20 4D 45 4E 55 45 20  | MENUE ZU MENUE |
00000450: 55 4E 44 20 5A 55 52 20  41 55 53 57 41 48 4C 20  |UND ZUR AUSWAHL |
00000460: 49 4D 22 00 87 0C 0C 02  99 22 55 4E 54 45 52 4D  |IM"......"UNTERM|
00000470: 45 4E 55 45 2E 20 41 4E  57 41 48 4C 3A 20 27 52  |ENUE. ANWAHL: 'R|
00000480: 45 54 55 52 4E 27 22 00  8D 0C 0D 02 99 00 BC 0C  |ETURN'".........|
00000490: 0E 02 99 22 41 4C 54 45  52 4E 41 54 49 56 3A 27  |..."ALTERNATIV:'|
000004A0: 43 54 52 4C 27 2B 4D 45  4E 55 45 41 4E 46 41 4E  |CTRL'+MENUEANFAN|
000004B0: 47 53 42 55 43 48 53 54  41 42 45 22 00 DF 0C 0F  |GSBUCHSTABE"....|
000004C0: 02 99 22 55 4E 44 20 4D  45 4E 55 45 50 55 4E 4B  |.."UND MENUEPUNK|
000004D0: 54 41 55 53 57 41 48 4C  20 44 55 52 43 48 22 00  |TAUSWAHL DURCH".|
000004E0: 04 0D 10 02 99 22 4A 45  57 45 49 4C 49 47 45 4E  |....."JEWEILIGEN|
000004F0: 20 41 4E 46 41 4E 47 53  42 55 43 48 53 54 41 42  | ANFANGSBUCHSTAB|
00000500: 45 4E 22 3B 00 1A 0D 12  02 8B 20 C2 28 36 35 33  |EN";...... .(653|
00000510: 29 B3 B1 34 20 A7 20 35  33 30 00 2F 0D 1C 02 9E  |)..4 . 530./....|
00000520: 20 35 30 36 39 37 2C 4B  24 2C 41 24 28 31 29 00  | 50697,K$,A$(1).|
00000530: 3B 0D 26 02 99 20 C7 28  31 39 29 00 55 0D 30 02  |;.&.. .(19).U.0.|
00000540: 99 3A 99 3A 99 3A 99 3A  99 3A 99 3A 99 3A 99 3A  |.:.:.:.:.:.:.:.:|
00000550: 99 3A 99 3A 99 00 70 0D  35 02 99 22 47 45 54 52  |.:.:..p.5.."GETR|
00000560: 4F 46 46 45 4E 45 20 41  55 53 57 41 48 4C 3A 22  |OFFENE AUSWAHL:"|
00000570: 00 93 0D 3A 02 99 20 22  4D 45 4E 55 45 20 4E 52  |...:.. "MENUE NR|
00000580: 2E 20 20 20 20 9D 9D 9D  9D 9D 22 C2 28 31 36 37  |.    .....".(167|
00000590: 29 AA 31 00 BB 0D 44 02  99 20 22 4D 45 4E 55 45  |).1...D.. "MENUE|
000005A0: 50 55 4E 4B 54 20 4E 52  2E 20 20 20 20 9D 9D 9D  |PUNKT NR.    ...|
000005B0: 9D 22 C2 28 31 36 38 29  AA 31 22 00 C5 0D 4E 02  |.".(168).1"...N.|
000005C0: 89 20 35 30 30 00 00 00                           |. 500...        |
....... ******************.3.... * DEMOP
ROGRAMM 1 *.L.... ******************.R.(
.:.X.2.:...<.. A.0 . A.1:."PULL-DOWN-OBJ
ECT",8,1:. ROUTINEN NACHLADEN...F.:...D.
. A$(40):. G(147).N.N.K$."FILE DISK EDIT
 HELP"...X.A$(1)."      ".....A$(2)."LOA
D".....A$(3)."SAVE".....A$(4)."COPY".'. 
.A$(5)."RENAME".:...A$(6)."DELETE".Q...A
$(7)."          ".G...A$(8)."DIRECTORY".
X.H.A$(9)."NAME"...R.A$(10)."ID".....A$(
11)."COPY".....A$(12)."DELETE".D...A$(13
)."VALIDATE".....A$(14)."INITIALISE"....
.A$(15)."            ".....A$(16)."MOVE 
BLOCK".&...A$(17)."COPY BLOCK".@.".A$(18
)."DELETE BLOCK".X.,.A$(19)."SAVE BLOCK"
.P.6.A$(20)."LOAD BLOCK"...@.A$(21)."PRI
NT BLOCK"...J.A$(22)."              "...
T.A$(23)."NOTEPAD".R.^.A$(24)."CALCULATO
R"...H.A$(25)."DATABASE"...R.A$(26)."WOR
D PROCESSOR"...|.A$(27)."SPREADSHEET".8.
..A$(28)."FILE-HANDLING".S...A$(29)."DIS
K-HANDLING".C...A$(30)."  ".O.... G(19).
.....:."DIES IST EIN TEST DER ROUTINEN".
B...."ZUR VERWALTUNG VON PULL-DOWN-MENUE
S"......:.:.:.:.:.:.:.:.:.:.:....... "AU
FRUF : CTRL-TASTE DRUECKEN".......6...."
STEUERUNG: CURSORTASTEN ZUM BLAETTERN".C
...."VON MENUE ZU MENUE UND ZUR AUSWAHL 
IM"......"UNTERMENUE. ANWAHL: 'RETURN'".
..........."ALTERNATIV:'CTRL'+MENUEANFAN
GSBUCHSTABE"......"UND MENUEPUNKTAUSWAHL
 DURCH"......"JEWEILIGEN ANFANGSBUCHSTAB
EN";...... B(653)..4 . 530./.... 50697,K
$,A$(1).;.&.. G(19).U.0..:.:.:.:.:.:.:.:
.:.:..P.5.."GETROFFENE AUSWAHL:"...:.. "
MENUE NR.    ....."B(167).1...D.. "MENUE
PUNKT NR.    ...."B(168).1".E.N.. 500...
C64 Preview

> CLICK IMAGE PREVIEW FOR FULL MODAL