PULL DOWNS

FILE INFORMATION

FILENAME(S): PULL DOWNS

FILE TYPE(S): PRG

FILE SIZE: 1.6K

FIRST SEEN: 2025-10-20 14:30:12

APPEARS ON: 4 disk(s)

FILE HASH

1c3e1447156767a11fba0d958414189d8a6d432863a3f93495f27c58879352e7

FOUND ON DISKS (4 DISKS)

DISK TITLE	FILENAME	FILE TYPE	COLLECTION	TRACK	SECTOR	ACTIONS
GAZETTE 2 3 00	PULL DOWNS	PRG	Treasure Chest - Klaus Der Suhler	8	6	DOWNLOAD FILE
WOLF S SOFT C020	PULL DOWNS	PRG	Treasure Chest - Klaus Der Suhler	17	17	DOWNLOAD FILE
C128 Z004	PULL DOWNS	PRG	Treasure Chest - Plattfuss	17	19	DOWNLOAD FILE
18	PULL DOWNS	PRG	Treasure Chest - Plattfuss	13	2	DOWNLOAD FILE

FILE CONTENT & ANALYSIS

00000000: 01 1C 26 1C 01 00 8F 20  2B 2B 2B 2B 2B 2B 2B 2B  |..&.... ++++++++|
00000010: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00000020: 2B 2B 2B 2B 2B 2B 00 4B  1C 02 00 8F 20 2B 20 20  |++++++.K.... +  |
00000030: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000040: 20 20 20 20 20 20 20 20  20 20 2B 00 70 1C 03 00  |          +.p...|
00000050: 8F 20 2B 20 20 20 20 50  55 4C 4C 20 44 4F 57 4E  |. +    PULL DOWN|
00000060: 20 4D 45 4E 55 20 44 45  4D 4F 20 20 20 20 20 2B  | MENU DEMO     +|
00000070: 00 95 1C 04 00 8F 20 2B  20 20 20 20 55 53 49 4E  |...... +    USIN|
00000080: 47 20 48 49 52 45 53 20  47 52 41 50 48 49 43 20  |G HIRES GRAPHIC |
00000090: 20 20 20 20 2B 00 BA 1C  05 00 8F 20 2B 20 20 20  |    +...... +   |
000000A0: 20 43 4F 4D 4D 41 4E 44  53 2E 20 20 20 20 20 20  | COMMANDS.      |
000000B0: 20 20 20 20 20 20 20 20  20 2B 00 DF 1C 06 00 8F  |         +......|
000000C0: 20 2B 20 20 20 20 20 20  20 20 20 20 20 20 20 20  | +              |
000000D0: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 2B 00  |              +.|
000000E0: 04 1D 07 00 8F 20 2B 20  20 20 53 54 45 56 45 20  |..... +   STEVE |
000000F0: 4A 41 43 4F 42 53 20 20  31 31 2D 31 39 2D 38 35  |JACOBS  11-19-85|
00000100: 20 20 20 2B 00 29 1D 08  00 8F 20 2B 20 20 20 20  |   +.).... +    |
00000110: 20 20 20 20 20 20 20 20  20 20 20 20 20 20 20 20  |                |
00000120: 20 20 20 20 20 20 20 20  2B 00 4E 1D 09 00 8F 20  |        +.N.... |
00000130: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 2B 2B  |++++++++++++++++|
00000140: 2B 2B 2B 2B 2B 2B 2B 2B  2B 2B 2B 2B 2B 2B 00 6A  |++++++++++++++.j|
00000150: 1D 0A 00 4C 43 24 B2 C7  28 31 34 29 3A 20 8F 20  |...LC$..(14): . |
00000160: 4C 4F 57 45 52 20 43 41  53 45 00 9C 1D 14 00 41  |LOWER CASE.....A|
00000170: 24 B2 4C 43 24 AA 22 20  20 20 D4 48 49 53 20 45  |$.LC$."   .HIS E|
00000180: 58 41 4D 50 4C 45 20 43  41 4E 20 42 45 20 55 53  |XAMPLE CAN BE US|
00000190: 45 44 20 49 4E 20 C2 C1  D3 C9 C3 22 00 CE 1D 1E  |ED IN ....."....|
000001A0: 00 42 24 B2 4C 43 24 AA  22 50 52 4F 47 52 41 4D  |.B$.LC$."PROGRAM|
000001B0: 53 20 54 4F 20 4C 45 41  56 45 20 54 45 58 54 20  |S TO LEAVE TEXT |
000001C0: 4F 4E 20 54 48 45 20 53  43 52 45 45 4E 22 00 03  |ON THE SCREEN"..|
000001D0: 1E 28 00 43 24 B2 4C 43  24 AA 22 41 4E 44 20 48  |.(.C$.LC$."AND H|
000001E0: 41 56 45 20 27 D0 55 4C  4C 20 C4 4F 57 4E 20 CD  |AVE '.ULL .OWN .|
000001F0: 45 4E 55 53 27 20 41 54  20 54 48 45 20 54 4F 55  |ENUS' AT THE TOU|
00000200: 43 48 22 00 33 1E 32 00  44 24 B2 4C 43 24 AA 22  |CH".3.2.D$.LC$."|
00000210: 4F 46 20 41 20 42 55 54  54 4F 4E 2E 20 D4 48 45  |OF A BUTTON. .HE|
00000220: 20 4D 45 4E 55 20 49 54  45 4D 53 20 43 41 4E 20  | MENU ITEMS CAN |
00000230: 42 45 22 00 68 1E 3C 00  45 24 B2 4C 43 24 AA 22  |BE".h.<.E$.LC$."|
00000240: 43 48 41 4E 47 45 44 20  42 59 20 43 48 41 4E 47  |CHANGED BY CHANG|
00000250: 49 4E 47 20 54 48 45 20  53 54 52 49 4E 47 53 20  |ING THE STRINGS |
00000260: 27 C1 20 54 48 52 55 22  00 99 1E 46 00 46 24 B2  |'. THRU"...F.F$.|
00000270: 4C 43 24 AA 22 C9 27 2E  20 C9 20 48 4F 50 45 20  |LC$.".'. . HOPE |
00000280: 54 48 49 53 20 48 45 4C  50 53 20 59 4F 55 20 54  |THIS HELPS YOU T|
00000290: 4F 20 45 58 50 41 4E 44  22 00 CD 1E 50 00 47 24  |O EXPAND"...P.G$|
000002A0: B2 4C 43 24 AA 22 59 4F  55 52 20 50 52 4F 47 52  |.LC$."YOUR PROGR|
000002B0: 41 4D 4D 49 4E 47 20 41  42 49 4C 49 54 49 45 53  |AMMING ABILITIES|
000002C0: 20 41 4E 44 20 45 58 43  49 54 45 53 22 00 02 1F  | AND EXCITES"...|
000002D0: 5A 00 48 24 B2 4C 43 24  AA 22 59 4F 55 20 41 42  |Z.H$.LC$."YOU AB|
000002E0: 4F 55 54 20 54 48 45 20  43 41 50 41 42 49 4C 49  |OUT THE CAPABILI|
000002F0: 54 49 45 53 20 4F 46 20  54 48 45 20 C3 2D 31 32  |TIES OF THE .-12|
00000300: 38 22 00 32 1F 64 00 49  24 B2 4C 43 24 AA 22 20  |8".2.d.I$.LC$." |
00000310: 50 45 52 53 4F 4E 41 4C  20 43 4F 4D 50 55 54 45  |PERSONAL COMPUTE|
00000320: 52 20 46 52 4F 4D 20 C3  CF CD CD CF C4 CF D2 C5  |R FROM .........|
00000330: 21 22 00 4A 1F 6E 00 E7  30 2C 32 3A E7 31 2C 31  |!".J.n..0,2:.1,1|
00000340: 3A E7 34 2C 38 3A E7 35  2C 31 00 87 1F 82 00 DE  |:.4,8:.5,1......|
00000350: 32 2C 31 2C 30 3A 8F 20  53 45 54 20 55 50 20 48  |2,1,0:. SET UP H|
00000360: 49 52 45 53 20 53 43 52  45 45 4E 20 49 4E 20 4D  |IRES SCREEN IN M|
00000370: 45 4D 4F 52 59 20 42 55  54 20 4E 4F 54 20 4F 4E  |EMORY BUT NOT ON|
00000380: 20 53 43 52 45 45 4E 00  AE 1F 8C 00 8F 20 44 49  | SCREEN...... DI|
00000390: 53 50 4C 41 59 20 54 45  58 54 20 49 4E 20 4D 45  |SPLAY TEXT IN ME|
000003A0: 4D 4F 52 59 20 4C 4F 43  41 54 49 4F 4E 53 00 BC  |MORY LOCATIONS..|
000003B0: 1F 96 00 E0 31 2C 31 2C  31 2C 41 24 00 CA 1F A0  |....1,1,1,A$....|
000003C0: 00 E0 31 2C 31 2C 32 2C  42 24 00 D8 1F AA 00 E0  |..1,1,2,B$......|
000003D0: 31 2C 31 2C 33 2C 43 24  00 E6 1F B4 00 E0 31 2C  |1,1,3,C$......1,|
000003E0: 31 2C 34 2C 44 24 00 F4  1F BE 00 E0 31 2C 31 2C  |1,4,D$......1,1,|
000003F0: 35 2C 45 24 00 02 20 C8  00 E0 31 2C 31 2C 36 2C  |5,E$.. ...1,1,6,|
00000400: 46 24 00 10 20 D2 00 E0  31 2C 31 2C 37 2C 47 24  |F$.. ...1,1,7,G$|
00000410: 00 1E 20 DC 00 E0 31 2C  31 2C 38 2C 48 24 00 2C  |.. ...1,1,8,H$.,|
00000420: 20 E6 00 E0 31 2C 31 2C  39 2C 49 24 00 4C 20 F0  | ...1,1,9,I$.L .|
00000430: 00 E0 31 2C 31 34 2C 31  32 2C 4C 43 24 AA 22 D3  |..1,14,12,LC$.".|
00000440: 54 45 56 45 20 CA 41 43  4F 42 53 22 00 6C 20 FA  |TEVE .ACOBS".l .|
00000450: 00 E0 31 2C 31 34 2C 31  33 2C 4C 43 24 AA 22 20  |..1,14,13,LC$." |
00000460: 27 C2 49 47 20 CA 41 4B  45 27 20 22 00 A0 20 0E  |'.IG .AKE' ".. .|
00000470: 01 E1 31 2C 30 2C 30 2C  33 31 39 2C 31 31 39 3A  |..1,0,0,319,119:|
00000480: 8F 20 44 52 41 57 20 41  20 42 4F 58 20 41 52 4F  |. DRAW A BOX ARO|
00000490: 55 4E 44 20 48 49 52 45  53 20 53 43 52 45 45 4E  |UND HIRES SCREEN|
000004A0: 00 AC 20 13 01 81 50 B2  31 A4 32 30 00 D6 20 14  |.. ...P.1.20.. .|
000004B0: 01 99 22 20 20 20 20 20  D0 55 4C 4C 20 44 4F 57  |.."     .ULL DOW|
000004C0: 4E 20 4D 45 4E 55 20 44  45 4D 4F 4E 53 54 52 41  |N MENU DEMONSTRA|
000004D0: 54 49 4F 4E 21 22 00 DD  20 15 01 82 50 00 04 21  |TION!".. ...P..!|
000004E0: 16 01 99 3A 99 22 20 20  20 20 20 20 20 20 20 20  |...:."          |
000004F0: D0 52 45 53 53 20 54 48  45 20 D3 50 41 43 45 20  |.RESS THE .PACE |
00000500: C2 41 52 22 00 3D 21 18  01 81 47 B2 30 A4 31 35  |.AR".=!...G.0.15|
00000510: 3A 8F 20 53 45 54 20 43  4F 55 4E 54 45 52 20 46  |:. SET COUNTER F|
00000520: 4F 52 20 53 54 41 52 54  20 4F 46 20 4D 45 4E 55  |OR START OF MENU|
00000530: 20 44 49 53 50 4C 41 59  20 4C 4F 4F 50 00 68 21  | DISPLAY LOOP.h!|
00000540: 22 01 DE 32 2C 30 2C 47  3A 8F 20 53 54 41 52 54  |"..2,0,G:. START|
00000550: 20 44 49 53 50 4C 41 59  20 4F 46 20 48 49 52 45  | DISPLAY OF HIRE|
00000560: 53 20 53 43 52 45 45 4E  00 AB 21 2C 01 81 54 B2  |S SCREEN..!,..T.|
00000570: 31 A4 35 3A 82 3A 8F 20  53 49 4D 50 4C 45 20 54  |1.5:.:. SIMPLE T|
00000580: 49 4D 49 4D 47 20 4C 4F  4F 50 20 54 4F 20 53 4C  |IMIMG LOOP TO SL|
00000590: 4F 57 20 44 4F 57 4E 20  54 48 45 20 50 55 4C 4C  |OW DOWN THE PULL|
000005A0: 20 44 4F 57 4E 20 53 50  45 45 44 00 B2 21 36 01  | DOWN SPEED..!6.|
000005B0: 82 47 00 E2 21 3C 01 A1  5A 24 3A 8B 5A 24 B2 22  |.G..!<..Z$:.Z$."|
000005C0: 22 A7 33 31 36 3A 8F 20  57 41 49 54 20 46 4F 52  |".316:. WAIT FOR|
000005D0: 20 4B 45 59 20 54 4F 20  42 45 20 50 52 45 53 53  | KEY TO BE PRESS|
000005E0: 45 44 00 17 22 40 01 81  47 B2 31 35 A4 30 A9 AB  |ED.."@..G.15.0..|
000005F0: 31 3A 8F 20 53 45 54 20  4C 4F 4F 50 20 56 41 4C  |1:. SET LOOP VAL|
00000600: 55 45 53 20 46 4F 52 20  52 45 54 52 41 43 54 49  |UES FOR RETRACTI|
00000610: 4E 47 20 4D 45 4E 55 00  22 22 45 01 DE 32 2C 30  |NG MENU.""E..2,0|
00000620: 2C 47 00 44 22 4A 01 81  54 B2 31 A4 35 3A 82 3A  |,G.D"J..T.1.5:.:|
00000630: 8F 20 53 49 4D 50 4C 45  20 54 49 4D 49 4E 47 20  |. SIMPLE TIMING |
00000640: 4C 4F 4F 50 00 4B 22 54  01 82 47 00 5E 22 59 01  |LOOP.K"T..G.^"Y.|
00000650: A1 5A 24 3A 8B 5A 24 B2  22 22 A7 33 34 35 00 67  |.Z$:.Z$."".345.g|
00000660: 22 5B 01 89 32 38 30 00  00 00                    |"[..280...      |

..&.... ++++++++++++++++++++++++++++++.K
.... +                            +.P...
. +    PULL DOWN MENU DEMO     +...... +
    USING HIRES GRAPHIC     +...... +   
 COMMANDS.               +...... +      
                      +...... +   STEVE 
JACOBS  11-19-85   +.).... +            
                +.N.... ++++++++++++++++
++++++++++++++.J...LC$.G(14): . LOWER CA
SE.....A$.LC$."   THIS EXAMPLE CAN BE US
ED IN BASIC".N...B$.LC$."PROGRAMS TO LEA
VE TEXT ON THE SCREEN"...(.C$.LC$."AND H
AVE 'PULL DOWN MENUS' AT THE TOUCH".3.2.
D$.LC$."OF A BUTTON. THE MENU ITEMS CAN 
BE".H.<.E$.LC$."CHANGED BY CHANGING THE 
STRINGS 'A THRU"...F.F$.LC$."I'. I HOPE 
THIS HELPS YOU TO EXPAND".M.P.G$.LC$."YO
UR PROGRAMMING ABILITIES AND EXCITES"...
Z.H$.LC$."YOU ABOUT THE CAPABILITIES OF 
THE C-128".2.D.I$.LC$." PERSONAL COMPUTE
R FROM COMMODORE!".J.N..0,2:.1,1:.4,8:.5
,1......2,1,0:. SET UP HIRES SCREEN IN M
EMORY BUT NOT ON SCREEN...... DISPLAY TE
XT IN MEMORY LOCATIONS......1,1,1,A$.J. 
..1,1,2,B$.X....1,1,3,C$......1,1,4,D$..
....1,1,5,E$.. H..1,1,6,F$.. R..1,1,7,G$
.. ...1,1,8,H$., ...1,1,9,I$.L ...1,14,1
2,LC$."STEVE JACOBS".L ...1,14,13,LC$." 
'BIG JAKE' ".  ...1,0,0,319,119:. DRAW A
 BOX AROUND HIRES SCREEN.. ...P.1.20.V .
.."     PULL DOWN MENU DEMONSTRATION!"..
 ...P..!...:."          PRESS THE SPACE 
BAR".=!...G.0.15:. SET COUNTER FOR START
 OF MENU DISPLAY LOOP.H!"..2,0,G:. START
 DISPLAY OF HIRES SCREEN..!,..T.1.5:.:. 
SIMPLE TIMIMG LOOP TO SLOW DOWN THE PULL
 DOWN SPEED..!6..G..!<..Z$:.Z$."".316:. 
WAIT FOR KEY TO BE PRESSED.."@..G.15.0..
1:. SET LOOP VALUES FOR RETRACTING MENU.
""E..2,0,G.D"J..T.1.5:.:. SIMPLE TIMING 
LOOP.K"T..G.^"Y..Z$:.Z$."".345.G"[..280.
..

Visualization:

Width: Skip load address (+2) Invert

> CLICK IMAGE PREVIEW FOR FULL MODAL