PULL-DOWN-DEMO
FILE INFORMATION
FILENAME(S): PULL-DOWN-DEMO
FILE TYPE(S): PRG
FILE SIZE: 2K
FIRST SEEN: 2025-12-02 02:01:48
APPEARS ON: 1 disk(s)
FILE HASH
b9549f91b9d889daeb54fb5c899433654520c64105194e099104b4ed90f0213a
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| C64 MAGAZIN 19 2 | PULL-DOWN-DEMO | PRG | marcus | 3 | 6 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 23 08 64 00 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |..#.d.. --------|
00000010: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000020: 2D 2D 2D 00 45 08 6E 00 8F 20 50 55 4C 4C 2D 44 |---.E.n.. PULL-D|
00000030: 4F 57 4E 2D 44 45 4D 4F 20 20 36 34 27 45 52 20 |OWN-DEMO 64'ER |
00000040: 30 39 2F 39 35 00 67 08 78 00 8F 20 2D 2D 2D 2D |09/95.g.x.. ----|
00000050: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000060: 2D 2D 2D 2D 2D 2D 2D 00 6D 08 82 00 3A 00 88 08 |-------.m...:...|
00000070: C8 00 99 22 93 22 3A 97 35 33 32 38 30 2C 30 3A |...".":.53280,0:|
00000080: 97 35 33 32 38 31 2C 30 00 93 08 D2 00 8D 20 31 |.53281,0...... 1|
00000090: 30 30 30 00 9E 08 DC 00 8D 20 31 32 30 30 00 A4 |000...... 1200..|
000000A0: 08 84 03 80 00 C8 08 8E 03 3A 8F 20 2D 2D 2D 2D |.........:. ----|
000000B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000000C0: 2D 2D 2D 2D 2D 2D 2D 2D 00 EB 08 E8 03 8F 20 44 |--------...... D|
000000D0: 45 46 49 4E 49 54 49 4F 4E 20 44 45 52 20 4D 45 |EFINITION DER ME|
000000E0: 4E 55 45 2D 53 54 52 49 4E 47 53 00 0E 09 ED 03 |NUE-STRINGS.....|
000000F0: 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |. --------------|
00000100: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 3D |--------------.=|
00000110: 09 F2 03 86 20 4D 31 24 28 31 30 2C 31 30 29 3A |.... M1$(10,10):|
00000120: 86 20 4D 59 28 31 29 3A 4D 58 B2 30 3A 5A 59 28 |. MY(1):MX.0:ZY(|
00000130: 30 29 B2 31 3A 5A 59 B2 28 31 29 B2 31 00 56 09 |0).1:ZY.(1).1.V.|
00000140: FC 03 4D 45 24 28 30 2C 30 29 B2 22 44 49 53 4B |..ME$(0,0)."DISK|
00000150: 20 20 20 20 20 22 00 6F 09 06 04 4D 45 24 28 31 | ".o...ME$(1|
00000160: 2C 30 29 B2 22 44 49 52 45 43 54 4F 52 59 22 00 |,0)."DIRECTORY".|
00000170: 88 09 10 04 4D 45 24 28 32 2C 30 29 B2 22 4C 41 |....ME$(2,0)."LA|
00000180: 44 45 4E 20 20 20 20 22 00 A1 09 1A 04 4D 45 24 |DEN ".....ME$|
00000190: 28 33 2C 30 29 B2 22 53 50 45 49 43 48 45 52 4E |(3,0)."SPEICHERN|
000001A0: 22 00 BA 09 24 04 4D 45 24 28 30 2C 31 29 B2 22 |"...$.ME$(0,1)."|
000001B0: 4F 50 54 49 4F 4E 20 20 20 22 00 D3 09 2E 04 4D |OPTION ".....M|
000001C0: 45 24 28 31 2C 31 29 B2 22 4F 50 54 49 4F 4E 20 |E$(1,1)."OPTION |
000001D0: 31 20 22 00 EC 09 38 04 4D 45 24 28 32 2C 31 29 |1 "...8.ME$(2,1)|
000001E0: B2 22 4F 50 54 49 4F 4E 20 32 20 22 00 06 0A 4C |."OPTION 2 "...L|
000001F0: 04 4C 45 24 20 20 20 20 20 B2 22 92 20 20 20 20 |.LE$ .". |
00000200: 20 20 20 20 20 22 00 13 0A 56 04 46 31 24 B2 22 | "...V.F1$."|
00000210: 12 98 22 00 20 0A 60 04 46 32 24 B2 22 12 9B 22 |..". .`.F2$.".."|
00000220: 00 2F 0A 6A 04 41 31 24 28 30 29 B2 22 1D 22 00 |./.j.A1$(0).".".|
00000230: 4A 0A 74 04 41 31 24 28 31 29 B2 22 1D 1D 1D 1D |J.t.A1$(1)."....|
00000240: 1D 1D 1D 1D 1D 1D 1D 1D 1D 22 00 5E 0A 7E 04 4D |.........".^.~.M|
00000250: 59 28 30 29 B2 33 3A 4D 59 28 31 29 B2 32 00 64 |Y(0).3:MY(1).2.d|
00000260: 0A A6 04 8E 00 81 0A AB 04 8F 20 2D 2D 2D 2D 2D |.......... -----|
00000270: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000280: 2D 00 9E 0A B0 04 8F 20 50 55 4C 4C 2D 44 4F 57 |-...... PULL-DOW|
00000290: 4E 2D 55 4E 54 45 52 52 4F 55 54 49 4E 45 00 BB |N-UNTERROUTINE..|
000002A0: 0A B5 04 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.... -----------|
000002B0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 F0 0A BA 04 |-----------.....|
000002C0: 99 22 13 12 97 20 05 44 49 53 4B 20 20 20 20 20 |."... .DISK |
000002D0: 97 20 20 20 4F 50 54 49 4F 4E 20 20 20 20 20 20 |. OPTION |
000002E0: 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 | "|
000002F0: 00 FB 0A C4 04 8D 20 31 33 30 30 00 0F 0B CE 04 |...... 1300.....|
00000300: A1 54 24 3A 8B 54 24 B2 22 22 A7 31 32 33 30 00 |.T$:.T$."".1230.|
00000310: 3F 0B D8 04 8B 20 54 24 B2 22 1D 22 20 B0 20 54 |?.... T$."." . T|
00000320: 24 B2 22 9D 22 20 A7 20 8D 31 34 30 30 3A 8D 31 |$."." . .1400:.1|
00000330: 35 30 30 3A 8D 31 33 30 30 3A 89 31 32 33 30 00 |500:.1300:.1230.|
00000340: 53 0B E2 04 8B 54 24 B2 C7 28 31 33 29 A7 20 32 |S....T$..(13). 2|
00000350: 30 30 30 00 87 0B EC 04 8B 54 24 B2 22 91 22 AF |000......T$.".".|
00000360: 20 5A 59 28 4D 58 29 B1 31 20 A7 20 5A 59 28 4D | ZY(MX).1 . ZY(M|
00000370: 58 29 B2 5A 59 28 4D 58 29 AB 31 3A 8D 31 36 30 |X).ZY(MX).1:.160|
00000380: 30 3A 89 31 32 33 30 00 C0 0B F6 04 8B 54 24 B2 |0:.1230......T$.|
00000390: 22 11 22 AF 20 5A 59 28 4D 58 29 B3 4D 59 28 4D |".". ZY(MX).MY(M|
000003A0: 58 29 20 A7 20 5A 59 28 4D 58 29 B2 5A 59 28 4D |X) . ZY(MX).ZY(M|
000003B0: 58 29 AA 31 3A 8D 31 37 30 30 3A 89 31 32 33 30 |X).1:.1700:.1230|
000003C0: 00 DF 0B 0A 05 89 31 32 33 30 3A 8F 20 54 41 53 |......1230:. TAS|
000003D0: 54 41 54 55 52 2D 4B 4F 4E 54 52 4F 4C 4C 45 00 |TATUR-KONTROLLE.|
000003E0: F0 0B 0F 05 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |..... ----------|
000003F0: 00 01 0C 14 05 8F 20 41 55 46 4B 4C 41 50 50 45 |...... AUFKLAPPE|
00000400: 4E 00 12 0C 19 05 8F 20 2D 2D 2D 2D 2D 2D 2D 2D |N...... --------|
00000410: 2D 2D 00 1D 0C 1E 05 99 22 13 11 22 3B 00 38 0C |--......"..";.8.|
00000420: 28 05 99 46 32 24 AA 41 31 24 28 4D 58 29 AA 4D |(..F2$.A1$(MX).M|
00000430: 45 24 28 31 2C 4D 58 29 00 4B 0C 32 05 81 20 49 |E$(1,MX).K.2.. I|
00000440: B2 32 20 A4 20 4D 59 28 4D 58 29 00 66 0C 3C 05 |.2 . MY(MX).f.<.|
00000450: 99 46 31 24 AA 41 31 24 28 4D 58 29 AA 4D 45 24 |.F1$.A1$(MX).ME$|
00000460: 28 49 2C 4D 58 29 00 6E 0C 46 05 82 20 49 00 74 |(I,MX).n.F.. I.t|
00000470: 0C 6E 05 8E 00 83 0C 73 05 8F 20 2D 2D 2D 2D 2D |.n.....s.. -----|
00000480: 2D 2D 2D 00 92 0C 78 05 8F 20 4C 4F 45 53 43 48 |---...x.. LOESCH|
00000490: 45 4E 00 A1 0C 7D 05 8F 20 2D 2D 2D 2D 2D 2D 2D |EN...}.. -------|
000004A0: 2D 00 AC 0C 82 05 99 22 13 11 22 3B 00 BF 0C 8C |-......"..";....|
000004B0: 05 81 20 49 B2 31 20 A4 20 4D 59 28 4D 58 29 00 |.. I.1 . MY(MX).|
000004C0: D0 0C 96 05 99 41 31 24 28 4D 58 29 AA 4C 45 24 |.....A1$(MX).LE$|
000004D0: 00 D8 0C A0 05 82 20 49 00 DE 0C D2 05 8E 00 FB |...... I........|
000004E0: 0C D7 05 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.... -----------|
000004F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 18 0D DC 05 |-----------.....|
00000500: 8F 20 50 55 4C 4C 2D 44 4F 57 4E 2D 4B 4F 50 46 |. PULL-DOWN-KOPF|
00000510: 20 41 45 4E 44 45 52 4E 00 35 0D E1 05 8F 20 2D | AENDERN.5.... -|
00000520: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000530: 2D 2D 2D 2D 2D 00 52 0D E6 05 99 22 13 12 97 22 |-----.R...."..."|
00000540: AA 41 31 24 28 4D 58 29 AA 4D 45 24 28 30 2C 4D |.A1$(MX).ME$(0,M|
00000550: 58 29 00 5E 0D F0 05 4D 58 B2 31 AB 4D 58 00 7B |X).^...MX.1.MX.{|
00000560: 0D FA 05 99 22 13 12 05 22 AA 41 31 24 28 4D 58 |...."...".A1$(MX|
00000570: 29 AA 4D 45 24 28 30 2C 4D 58 29 00 88 0D 04 06 |).ME$(0,MX).....|
00000580: 5A 59 28 4D 58 29 B2 31 00 8E 0D 36 06 8E 00 B3 |ZY(MX).1...6....|
00000590: 0D 3B 06 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |.;.. -----------|
000005A0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000005B0: 2D 2D 2D 00 D8 0D 40 06 8F 20 42 41 4C 4B 45 4E |---...@.. BALKEN|
000005C0: 20 49 4E 20 50 55 4C 4C 2D 44 4F 57 4E 20 4E 41 | IN PULL-DOWN NA|
000005D0: 43 48 20 55 4E 54 45 4E 00 FD 0D 45 06 8F 20 2D |CH UNTEN...E.. -|
000005E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000005F0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 0F 0E |-------------...|
00000600: 4A 06 99 22 13 22 AA 41 31 24 28 4D 58 29 3B 00 |J..".".A1$(MX);.|
00000610: 21 0E 54 06 81 20 49 B2 31 A4 20 5A 59 28 4D 58 |!.T.. I.1. ZY(MX|
00000620: 29 00 2B 0E 5E 06 99 22 11 22 3B 00 33 0E 68 06 |).+.^..".";.3.h.|
00000630: 82 20 49 00 4B 0E 72 06 99 46 32 24 AA 4D 45 24 |. I.K.r..F2$.ME$|
00000640: 28 5A 59 28 4D 58 29 2C 4D 58 29 00 6D 0E 7C 06 |(ZY(MX),MX).m.|.|
00000650: 99 41 31 24 28 4D 58 29 AA 46 31 24 AA 4D 45 24 |.A1$(MX).F1$.ME$|
00000660: 28 5A 59 28 4D 58 29 AA 31 2C 4D 58 29 00 73 0E |(ZY(MX).1,MX).s.|
00000670: 9A 06 8E 00 98 0E 9F 06 8F 20 2D 2D 2D 2D 2D 2D |......... ------|
00000680: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
00000690: 2D 2D 2D 2D 2D 2D 2D 2D 00 BD 0E A4 06 8F 20 42 |--------...... B|
000006A0: 41 4C 4B 45 4E 20 49 4E 20 50 55 4C 4C 2D 44 4F |ALKEN IN PULL-DO|
000006B0: 57 4E 20 4E 41 43 48 20 55 4E 54 45 4E 00 E2 0E |WN NACH UNTEN...|
000006C0: A9 06 8F 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |... ------------|
000006D0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D |----------------|
000006E0: 2D 2D 00 F4 0E AE 06 99 22 13 22 AA 41 31 24 28 |--......".".A1$(|
000006F0: 4D 58 29 3B 00 08 0F B8 06 81 20 49 B2 31 A4 20 |MX);...... I.1. |
00000700: 5A 59 28 4D 58 29 AB 31 00 12 0F C2 06 99 22 11 |ZY(MX).1......".|
00000710: 22 3B 00 1A 0F CC 06 82 20 49 00 34 0F D6 06 99 |";...... I.4....|
00000720: 46 31 24 AA 4D 45 24 28 5A 59 28 4D 58 29 AB 31 |F1$.ME$(ZY(MX).1|
00000730: 2C 4D 58 29 00 54 0F E0 06 99 41 31 24 28 4D 58 |,MX).T....A1$(MX|
00000740: 29 AA 46 32 24 AA 4D 45 24 28 5A 59 28 4D 58 29 |).F2$.ME$(ZY(MX)|
00000750: 2C 4D 58 29 00 5A 0F FE 06 8E 00 7B 0F CB 07 8F |,MX).Z.....{....|
00000760: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
00000770: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 8E 0F D0 07 |-----------.....|
00000780: 8F 20 41 55 53 57 41 48 4C 20 4F 4B 41 59 00 AE |. AUSWAHL OKAY..|
00000790: 0F DA 07 8F 20 53 50 52 55 4E 47 20 5A 55 20 55 |.... SPRUNG ZU U|
000007A0: 4E 54 45 52 50 52 4F 47 52 41 4D 4D 45 4E 00 CA |NTERPROGRAMMEN..|
000007B0: 0F E4 07 8F 20 50 45 52 20 4F 4E 2D 47 4F 54 4F |.... PER ON-GOTO|
000007C0: 2D 41 4E 57 45 49 53 55 4E 47 00 EB 0F E9 07 8F |-ANWEISUNG......|
000007D0: 20 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D | ---------------|
000007E0: 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 2D 00 1C 10 EE 07 |-----------.....|
000007F0: 99 22 13 1D 1D 1D 11 11 11 11 11 11 22 AA 22 05 |."..........".".|
00000800: 22 AA 4D 45 24 28 5A 59 28 4D 58 29 2C 4D 58 29 |".ME$(ZY(MX),MX)|
00000810: AA 22 20 47 45 57 41 45 48 4C 54 22 00 27 10 2A |." GEWAEHLT".'.*|
00000820: 08 89 20 31 32 33 30 00 00 00 |.. 1230... |
..#.D.. ---------------------------.E.N.
. PULL-DOWN-DEMO 64'ER 09/95.G.X.. ----
-----------------------.M...:...H..".":.
53280,0:.53281,0...R.. 1000...... 1200..
.....H...:. ----------------------------
...... DEFINITION DER MENUE-STRINGS.....
. ----------------------------.=.... M1$
(10,10):. MY(1):MX.0:ZY(0).1:ZY.(1).1.V.
..ME$(0,0)."DISK ".O...ME$(1,0)."DIR
ECTORY".....ME$(2,0)."LADEN ".....ME$
(3,0)."SPEICHERN"...$.ME$(0,1)."OPTION
".S...ME$(1,1)."OPTION 1 "...8.ME$(2,1)
."OPTION 2 "...L.LE$ .". "..
.V.F1$."..". .`.F2$.".."./.J.A1$(0).".".
J.T.A1$(1).".............".^.~.MY(0).3:M
Y(1).2.D.......... ---------------------
-...... PULL-DOWN-UNTERROUTINE...... ---
-------------------......"... .DISK
. OPTION "...D.. 1
300...N..T$:.T$."".1230.?.X.. T$."." . T
$."." . .1400:.1500:.1300:.1230.S....T$.
G(13). 2000......T$.".". ZY(MX).1 . ZY(M
X).ZY(MX).1:.1600:.1230......T$.".". ZY(
MX).MY(MX) . ZY(MX).ZY(MX).1:.1700:.1230
......1230:. TASTATUR-KONTROLLE...... --
--------...... AUFKLAPPEN...... --------
--......"..";.8.(..F2$.A1$(MX).ME$(1,MX)
.K.2.. I.2 . MY(MX).F.<..F1$.A1$(MX).ME$
(I,MX).N.F.. I.T.N.....S.. --------...X.
. LOESCHEN...}.. --------......"..";....
.. I.1 . MY(MX).P....A1$(MX).LE$.X. .. I
...R.....W.. ----------------------.....
. PULL-DOWN-KOPF AENDERN.5.... ---------
-------------.R...."...".A1$(MX).ME$(0,M
X).^...MX.1.MX.{...."...".A1$(MX).ME$(0,
MX).....ZY(MX).1...6.....;.. -----------
-------------------.X.@.. BALKEN IN PULL
-DOWN NACH UNTEN...E.. -----------------
-------------...J..".".A1$(MX);.!.T.. I.
1. ZY(MX).+.^..".";.3.H.. I.K.R..F2$.ME$
(ZY(MX),MX).M.|..A1$(MX).F1$.ME$(ZY(MX).
1,MX).S.......... ----------------------
--------...... BALKEN IN PULL-DOWN NACH
UNTEN...... ----------------------------
--......".".A1$(MX);...... I.1. ZY(MX).1
...B..".";...L.. I.4.V..F1$.ME$(ZY(MX).1
,MX).T....A1$(MX).F2$.ME$(ZY(MX),MX).Z..
...{.K.. --------------------------...P.
. AUSWAHL OKAY...Z.. SPRUNG ZU UNTERPROG
RAMMEN.J.... PER ON-GOTO-ANWEISUNG......
--------------------------......"......
....".".".ME$(ZY(MX),MX)." GEWAEHLT".'.*
.. 1230...
> CLICK IMAGE PREVIEW FOR FULL MODAL