PD MENU MAKER
FILE INFORMATION
FILENAME(S): PD MENU MAKER
FILE TYPE(S): PRG
FILE SIZE: 2.6K
FIRST SEEN: 2025-11-30 01:12:43
APPEARS ON: 1 disk(s)
FILE HASH
7feabdad6bf7f014d06db05df7c0f6d9bde1735a8dfa2f6cb2ac7d63e5f89ed0
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| 10710 10 87 | PD MENU MAKER | PRG | C64er | 11 | 7 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
> DETECTED: COMMODORE BASIC PROGRAM (LOAD ADDRESS $0801)
00000000: 01 08 07 08 01 00 8F 00 23 08 02 00 8F 20 50 55 |........#.... PU|
00000010: 4C 4C 44 4F 57 4E 20 20 20 4D 45 4E 55 20 4D 41 |LLDOWN MENU MA|
00000020: 4B 45 52 00 29 08 03 00 8F 00 40 08 04 00 8F 20 |KER.).....@.... |
00000030: 28 43 29 20 38 36 3A 20 4D 41 52 4F 53 4F 46 54 |(C) 86: MAROSOFT|
00000040: 00 46 08 05 00 8F 00 69 08 09 00 8B 20 46 4C B2 |.F.....i.... FL.|
00000050: 30 20 A7 20 86 20 4D 28 35 29 2C 4D 24 28 35 29 |0 . . M(5),M$(5)|
00000060: 2C 42 24 28 35 2C 31 31 29 00 9E 08 0A 00 8B 20 |,B$(5,11)...... |
00000070: 46 4C B2 30 20 A7 20 46 4C B2 31 3A 99 20 22 93 |FL.0 . FL.1:. ".|
00000080: 4C 4F 41 44 49 4E 47 20 50 44 31 2D 34 20 2E 2E |LOADING PD1-4 ..|
00000090: 2E 22 3A 93 20 22 50 44 31 22 2C 38 2C 31 00 BC |.":. "PD1",8,1..|
000000A0: 08 0B 00 8B 20 46 4C B2 31 20 A7 20 46 4C B2 32 |.... FL.1 . FL.2|
000000B0: 3A 93 20 22 50 44 32 22 2C 38 2C 31 00 DA 08 0C |:. "PD2",8,1....|
000000C0: 00 8B 20 46 4C B2 32 20 A7 20 46 4C B2 33 3A 93 |.. FL.2 . FL.3:.|
000000D0: 20 22 50 44 33 22 2C 38 2C 31 00 F8 08 0D 00 8B | "PD3",8,1......|
000000E0: 20 46 4C B2 33 20 A7 20 46 4C B2 34 3A 93 20 22 | FL.3 . FL.4:. "|
000000F0: 50 44 34 22 2C 38 2C 31 00 28 09 0E 00 99 22 93 |PD4",8,1.(....".|
00000100: 50 55 4C 4C 44 4F 57 4E 20 4D 45 4E 55 20 4D 41 |PULLDOWN MENU MA|
00000110: 4B 45 52 20 20 20 20 20 20 20 20 28 43 29 20 4D |KER (C) M|
00000120: 41 52 4F 53 4F 46 54 22 00 47 09 0F 00 9F 20 31 |AROSOFT".G.... 1|
00000130: 2C 38 2C 31 35 3A 98 31 2C 22 52 3A 48 23 48 23 |,8,15:.1,"R:H#H#|
00000140: 48 23 3D 50 44 30 22 00 63 09 10 00 84 31 2C 41 |H#=PD0".c....1,A|
00000150: 2C 42 24 2C 43 2C 44 3A 8B 20 41 B3 B1 30 20 A7 |,B$,C,D:. A..0 .|
00000160: 20 32 30 00 A3 09 11 00 98 31 2C 22 52 3A 50 44 | 20......1,"R:PD|
00000170: 30 3D 48 23 48 23 48 23 22 3A 99 22 11 11 20 50 |0=H#H#H#":.".. P|
00000180: 44 30 20 45 58 49 53 54 49 45 52 54 20 53 43 48 |D0 EXISTIERT SCH|
00000190: 4F 4E 20 41 55 46 20 44 49 45 53 45 52 20 44 49 |ON AUF DIESER DI|
000001A0: 53 4B 22 00 C9 09 12 00 99 22 20 41 4E 44 45 52 |SK"......" ANDER|
000001B0: 45 20 44 49 53 4B 20 45 49 4E 4C 45 47 45 4E 2C |E DISK EINLEGEN,|
000001C0: 20 3C 52 45 54 55 52 4E 3E 00 DB 09 13 00 85 20 | <RETURN>...... |
000001D0: 41 24 3A A0 20 31 3A 89 20 31 35 00 EA 09 14 00 |A$:. 1:. 15.....|
000001E0: 98 31 2C 22 49 22 3A A0 20 31 00 1A 0A 15 00 99 |.1,"I":. 1......|
000001F0: 22 11 11 11 45 53 20 53 54 45 48 45 4E 20 35 20 |"...ES STEHEN 5 |
00000200: 4F 42 45 52 4D 45 4E 55 45 53 20 5A 55 52 20 56 |OBERMENUES ZUR V|
00000210: 45 52 46 55 45 47 55 4E 47 2E 00 41 0A 16 00 99 |ERFUEGUNG..A....|
00000220: 22 11 42 49 54 54 45 20 47 45 42 45 4E 20 53 49 |".BITTE GEBEN SI|
00000230: 45 20 44 49 45 20 4E 41 4D 45 4E 20 45 49 4E 3A |E DIE NAMEN EIN:|
00000240: 22 00 8D 0A 17 00 99 20 22 11 53 54 45 4C 4C 45 |"...... ".STELLE|
00000250: 4E 20 53 49 45 20 44 49 45 20 47 52 4F 53 53 2F |N SIE DIE GROSS/|
00000260: 4B 4C 45 49 4E 53 48 52 45 49 42 55 4E 47 20 57 |KLEINSHREIBUNG W|
00000270: 49 45 49 4E 20 49 48 52 45 4D 20 50 52 4F 47 52 |IEIN IHREM PROGR|
00000280: 41 4D 4D 20 45 49 4E 20 21 21 21 11 11 00 B0 0A |AMM EIN !!!.....|
00000290: 1E 00 81 20 58 B2 31 20 A4 20 35 3A 42 24 B2 22 |... X.1 . 5:B$."|
000002A0: 20 22 3A 8B 20 58 B2 35 20 A7 20 42 24 B2 22 22 | ":. X.5 . B$.""|
000002B0: 00 C1 0A 28 00 99 22 4D 45 4E 55 22 58 22 3A 22 |...(.."MENU"X":"|
000002C0: 3B 00 CA 0A 32 00 85 20 54 24 00 EB 0A 3C 00 8B |;...2.. T$...<..|
000002D0: 20 C3 28 54 24 29 B1 37 AA 28 58 B2 35 29 20 A7 | .(T$).7.(X.5) .|
000002E0: 20 99 22 91 22 3B 3A 89 20 34 30 00 F1 0A 46 00 | .".";:. 40...F.|
000002F0: 99 00 0B 0B 50 00 8B 20 C3 28 54 24 29 B2 37 AA |....P.. .(T$).7.|
00000300: 28 58 B2 35 29 20 A7 20 31 30 30 00 1E 0B 5A 00 |(X.5) . 100...Z.|
00000310: 54 24 B2 54 24 AA 22 20 22 3A 89 20 38 30 00 40 |T$.T$." ":. 80.@|
00000320: 0B 64 00 4D 24 28 58 29 B2 54 24 3A 54 24 B2 22 |.d.M$(X).T$:T$."|
00000330: 22 3A 99 3A 99 22 91 1D 1D 1D 1D 1D 1D 1D 20 22 |":.:."........ "|
00000340: 00 48 0B 6E 00 82 20 58 00 54 0B 78 00 4D 45 24 |.H.n.. X.T.x.ME$|
00000350: B2 22 20 22 00 78 0B 82 00 81 20 58 B2 31 20 A4 |." ".x.... X.1 .|
00000360: 20 35 3A 4D 45 24 B2 4D 45 24 AA 4D 24 28 58 29 | 5:ME$.ME$.M$(X)|
00000370: AA 22 20 22 3A 82 20 58 00 9A 0B 8C 00 99 22 93 |." ":. X......".|
00000380: 22 4D 45 24 3B 3A 81 20 58 B2 31 20 A4 20 34 30 |"ME$;:. X.1 . 40|
00000390: 3A 99 22 3D 22 3B 3A 82 20 58 00 CF 0B 96 00 99 |:."=";:. X......|
000003A0: 3A 99 22 11 11 11 5E 20 53 4F 20 53 49 45 48 54 |:."...^ SO SIEHT|
000003B0: 20 44 49 45 20 4B 4F 50 46 5A 45 49 4C 45 20 41 | DIE KOPFZEILE A|
000003C0: 55 53 2E 20 4F 4B 20 28 4A 2F 4E 29 20 3F 22 00 |US. OK (J/N) ?".|
000003D0: E6 0B A0 00 A1 20 41 24 3A 8B 20 41 24 B2 22 22 |..... A$:. A$.""|
000003E0: 20 A7 20 31 36 30 00 F9 0B AA 00 8B 20 41 24 B3 | . 160...... A$.|
000003F0: B1 22 4A 22 20 A7 20 31 30 00 25 0C C8 00 99 20 |."J" . 10.%.... |
00000400: 22 93 11 4A 45 54 5A 54 20 44 49 45 20 41 4E 5A |"..JETZT DIE ANZ|
00000410: 41 48 4C 20 42 45 46 45 48 4C 45 20 50 52 4F 20 |AHL BEFEHLE PRO |
00000420: 4D 45 4E 55 3A 00 33 0C D2 00 81 20 58 B2 31 20 |MENU:.3.... X.1 |
00000430: A4 20 35 00 52 0C DC 00 99 22 11 4D 45 4E 55 22 |. 5.R....".MENU"|
00000440: 58 22 3A 20 22 AA 4D 24 28 58 29 3A 85 20 4D 28 |X": ".M$(X):. M(|
00000450: 58 29 00 79 0C E6 00 8B 20 4D 28 58 29 B1 31 30 |X).y.... M(X).10|
00000460: 20 B0 20 4D 28 58 29 B3 31 20 A7 20 99 22 91 91 | . M(X).1 . ."..|
00000470: 91 22 3B 3A 89 20 32 32 30 00 81 0C F0 00 82 20 |.";:. 220...... |
00000480: 58 00 A0 0C FA 00 99 22 93 11 55 4E 44 20 4A 45 |X......"..UND JE|
00000490: 54 5A 54 20 44 49 45 20 42 45 46 45 48 4C 45 3A |TZT DIE BEFEHLE:|
000004A0: 00 D2 0C 04 01 81 20 58 B2 31 20 A4 20 35 3A 99 |...... X.1 . 5:.|
000004B0: 22 11 46 55 45 52 20 4D 45 4E 55 22 58 22 3A 20 |".FUER MENU"X": |
000004C0: 22 4D 24 28 58 29 22 20 28 22 4D 28 58 29 22 29 |"M$(X)" ("M(X)")|
000004D0: 11 22 00 E3 0C 0E 01 81 20 59 B2 31 20 A4 20 4D |."...... Y.1 . M|
000004E0: 28 58 29 00 F7 0C 18 01 99 59 22 3A 22 3A 85 20 |(X)......Y":":. |
000004F0: 42 24 28 58 2C 59 29 00 19 0D 22 01 8B 20 C3 28 |B$(X,Y)...".. .(|
00000500: 42 24 28 58 2C 59 29 29 B1 31 37 20 A7 20 99 22 |B$(X,Y)).17 . ."|
00000510: 91 22 3B 3A 89 20 32 38 30 00 33 0D 23 01 8B 20 |.";:. 280.3.#.. |
00000520: C3 28 42 24 28 58 2C 59 29 29 B2 31 37 20 A7 20 |.(B$(X,Y)).17 . |
00000530: 32 39 33 00 51 0D 24 01 42 24 28 58 2C 59 29 B2 |293.Q.$.B$(X,Y).|
00000540: 42 24 28 58 2C 59 29 AA 22 20 22 3A 89 20 32 39 |B$(X,Y)." ":. 29|
00000550: 31 00 6F 0D 25 01 42 24 28 58 2C 59 29 B2 22 3D |1.o.%.B$(X,Y)."=|
00000560: 20 22 AA 42 24 28 58 2C 59 29 AA 22 20 3D 22 00 | ".B$(X,Y)." =".|
00000570: 9B 0D 2C 01 82 20 59 3A 42 24 28 58 2C 59 29 B2 |..,.. Y:B$(X,Y).|
00000580: 22 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |"===============|
00000590: 3D 3D 3D 3D 3D 3D 22 3A 82 20 58 00 C3 0D 36 01 |======":. X...6.|
000005A0: 99 22 93 11 11 20 20 28 31 29 20 55 45 42 45 52 |."... (1) UEBER|
000005B0: 53 49 43 48 54 20 41 4D 20 42 49 4C 44 53 43 48 |SICHT AM BILDSCH|
000005C0: 49 52 4D 00 E7 0D 37 01 99 22 11 20 20 28 32 29 |IRM...7..". (2)|
000005D0: 20 55 45 42 45 52 53 49 43 48 54 20 41 55 46 20 | UEBERSICHT AUF |
000005E0: 44 52 55 43 4B 45 52 00 13 0E 38 01 99 22 11 20 |DRUCKER...8..". |
000005F0: 20 28 33 29 20 44 41 54 45 4E 20 45 52 52 45 43 | (3) DATEN ERREC|
00000600: 48 4E 45 4E 20 55 4E 44 20 53 50 45 49 43 48 45 |HNEN UND SPEICHE|
00000610: 52 4E 22 00 36 0E 40 01 A1 20 41 24 3A 41 B2 C5 |RN".6.@.. A$:A..|
00000620: 28 41 24 29 3A 8B 20 41 B2 30 20 B0 20 41 B1 33 |(A$):. A.0 . A.3|
00000630: 20 A7 20 33 32 30 00 46 0E 4A 01 8B 20 41 B2 33 | . 320.F.J.. A.3|
00000640: 20 A7 20 35 30 30 00 52 0E 54 01 9F 20 31 2C 32 | . 500.R.T.. 1,2|
00000650: AA 41 00 63 0E 5E 01 98 31 3A 98 31 3A 98 31 2C |.A.c.^..1:.1:.1,|
00000660: 4D 45 24 00 84 0E 68 01 81 20 58 B2 31 20 A4 20 |ME$...h.. X.1 . |
00000670: 35 3A 98 31 3A 20 98 31 2C 4D 24 28 58 29 22 3A |5:.1: .1,M$(X)":|
00000680: 22 3A 98 31 00 A6 0E 72 01 81 20 59 B2 31 20 A4 |":.1...r.. Y.1 .|
00000690: 20 4D 28 58 29 3A 98 31 2C 59 22 20 20 2D 22 42 | M(X):.1,Y" -"B|
000006A0: 24 28 58 2C 59 29 00 B0 0E 7C 01 82 20 59 2C 58 |$(X,Y)...|.. Y,X|
000006B0: 00 BE 0E 86 01 A0 20 31 3A 89 20 33 31 30 00 F8 |...... 1:. 310..|
000006C0: 0E F4 01 99 22 93 11 11 11 11 42 49 54 54 45 20 |....".....BITTE |
000006D0: 57 41 52 54 45 4E 2C 20 49 43 48 20 52 45 43 48 |WARTEN, ICH RECH|
000006E0: 4E 45 2E 2E 2E 11 13 20 5F 20 48 49 45 52 20 43 |NE..... _ HIER C|
000006F0: 4F 44 45 54 45 53 54 21 00 11 0F FE 01 8F 20 48 |ODETEST!...... H|
00000700: 45 41 44 45 52 20 28 4B 4F 50 46 5A 45 49 4C 45 |EADER (KOPFZEILE|
00000710: 29 00 2C 0F 08 02 4C B2 34 39 34 30 38 3A 54 24 |).,...L.49408:T$|
00000720: B2 4D 45 24 3A 8D 20 31 30 30 30 30 00 3A 0F 12 |.ME$:. 10000.:..|
00000730: 02 81 20 58 B2 31 20 A4 20 35 00 4F 0F 1C 02 97 |.. X.1 . 5.O....|
00000740: 20 35 30 39 32 37 AA 58 2C 4D 28 58 29 AB 31 00 | 50927.X,M(X).1.|
00000750: 57 0F 26 02 82 20 58 00 63 0F 30 02 4C B2 35 31 |W.&.. X.c.0.L.51|
00000760: 37 31 32 00 79 0F 3A 02 81 20 58 B2 31 20 A4 20 |712.y.:.. X.1 . |
00000770: 35 3A 4C B2 4C AA 32 35 36 00 AC 0F 44 02 54 24 |5:L.L.256...D.T$|
00000780: B2 22 22 3A 81 20 59 B2 31 20 A4 20 4D 28 58 29 |."":. Y.1 . M(X)|
00000790: AA 31 3A 54 24 B2 54 24 AA 42 24 28 58 2C 59 29 |.1:T$.T$.B$(X,Y)|
000007A0: 3A 82 20 59 3A 8D 20 31 30 30 30 30 00 B4 0F 4E |:. Y:. 10000...N|
000007B0: 02 82 20 58 00 DA 0F 58 02 99 22 13 20 20 20 20 |.. X...X..". |
000007C0: 20 20 20 20 5F 20 43 4F 55 4E 54 44 4F 57 4E 20 | _ COUNTDOWN |
000007D0: 20 20 20 20 20 20 20 20 20 22 00 00 10 5C 02 99 | "...\..|
000007E0: 22 44 49 53 4B 45 54 54 45 20 45 49 4E 4C 45 47 |"DISKETTE EINLEG|
000007F0: 45 4E 21 20 4F 4B 3F 20 52 45 54 55 52 4E 21 22 |EN! OK? RETURN!"|
00000800: 00 09 10 5D 02 85 20 41 24 00 2D 10 62 02 99 22 |...].. A$.-.b.."|
00000810: 13 11 11 11 11 11 11 49 43 48 20 53 50 45 49 43 |.......ICH SPEIC|
00000820: 48 45 52 45 20 4A 45 54 5A 54 20 21 22 00 43 10 |HERE JETZT !".C.|
00000830: 6C 02 9F 20 31 2C 38 2C 32 2C 22 50 44 30 2C 50 |l.. 1,8,2,"PD0,P|
00000840: 2C 57 22 00 57 10 76 02 98 31 2C C7 28 30 29 3B |,W".W.v..1,.(0);|
00000850: C7 28 31 39 32 29 3B 00 7F 10 80 02 81 20 58 B2 |.(192);...... X.|
00000860: 34 39 31 35 32 20 A4 20 35 33 32 34 37 3A 99 22 |49152 . 53247:."|
00000870: 13 22 35 33 32 34 37 AB 58 22 20 20 20 20 22 00 |."53247.X" ".|
00000880: 93 10 8A 02 98 31 2C C7 28 C2 28 58 29 29 3B 3A |.....1,.(.(X));:|
00000890: 82 20 58 00 9B 10 94 02 A0 20 31 00 C2 10 BC 02 |. X...... 1.....|
000008A0: 99 22 93 11 11 11 43 4F 44 45 54 41 42 45 4C 4C |."....CODETABELL|
000008B0: 45 20 41 55 53 44 52 55 43 4B 45 4E 20 28 4A 2F |E AUSDRUCKEN (J/|
000008C0: 4E 29 00 D9 10 C6 02 A1 20 41 24 3A 8B 20 41 24 |N)...... A$:. A$|
000008D0: B2 22 22 20 A7 20 37 31 30 00 EE 10 D0 02 8B 20 |."" . 710...... |
000008E0: 41 24 B3 B1 22 4A 22 20 A7 20 39 39 39 39 00 F8 |A$.."J" . 9999..|
000008F0: 10 DA 02 9F 20 31 2C 34 00 45 11 E4 02 98 31 2C |.... 1,4.E....1,|
00000900: 22 43 4F 44 45 54 41 42 45 4C 4C 45 20 46 55 45 |"CODETABELLE FUE|
00000910: 52 20 50 55 4C 4C 44 4F 57 4E 2D 4D 45 4E 55 45 |R PULLDOWN-MENUE|
00000920: 53 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 |S |
00000930: 20 20 20 20 20 28 43 29 20 4D 41 52 4F 53 4F 46 | (C) MAROSOF|
00000940: 54 20 27 38 36 00 63 11 EE 02 98 31 3A 98 31 2C |T '86.c....1:.1,|
00000950: 22 4B 4F 50 46 5A 45 49 4C 45 3A 22 3A 98 31 2C |"KOPFZEILE:":.1,|
00000960: 4D 45 24 00 80 11 F8 02 81 20 58 B2 31 20 A4 20 |ME$...... X.1 . |
00000970: 35 3A 98 31 3A 98 31 2C 4D 24 28 58 29 3A 98 31 |5:.1:.1,M$(X):.1|
00000980: 00 B3 11 02 03 81 20 59 B2 31 20 A4 20 4D 28 58 |...... Y.1 . M(X|
00000990: 29 3A 98 31 2C 28 58 AB 31 29 AC 31 30 AA 59 AB |):.1,(X.1).10.Y.|
000009A0: 31 3B A3 35 29 3B 42 24 28 58 2C 59 29 3A 82 20 |1;.5);B$(X,Y):. |
000009B0: 59 2C 58 00 D7 11 0C 03 98 31 3A 98 31 2C 39 39 |Y,X......1:.1,99|
000009C0: 3B A3 35 29 22 51 55 49 54 20 4F 48 4E 45 20 41 |;.5)"QUIT OHNE A|
000009D0: 55 53 57 41 48 4C 22 00 DF 11 16 03 A0 20 31 00 |USWAHL"...... 1.|
000009E0: E5 11 0F 27 80 00 05 12 10 27 8F 20 43 4F 44 45 |...'.....'. CODE|
000009F0: 20 45 52 52 45 43 48 4E 45 4E 20 55 4E 44 20 4E | ERRECHNEN UND N|
00000A00: 41 43 48 20 4C 00 24 12 1A 27 81 20 49 B2 31 20 |ACH L.$..'. I.1 |
00000A10: A4 20 C3 28 54 24 29 3A 41 24 B2 CA 28 54 24 2C |. .(T$):A$..(T$,|
00000A20: 49 2C 31 29 00 31 12 24 27 99 22 13 22 3B 41 24 |I,1).1.$'.".";A$|
00000A30: 3B 00 45 12 2E 27 97 20 4C AA 49 AB 31 2C C2 28 |;.E..'. L.I.1,.(|
00000A40: 31 30 32 34 29 00 4D 12 38 27 82 20 49 00 53 12 |1024).M.8'. I.S.|
00000A50: 42 27 8E 00 00 00 |B'.... |
........#.... PULLDOWN MENU MAKER.)...
..@.... (C) 86: MAROSOFT.F.....I.... FL.
0 . . M(5),M$(5),B$(5,11)...... FL.0 . F
L.1:. ".LOADING PD1-4 ...":. "PD1",8,1..
.... FL.1 . FL.2:. "PD2",8,1.Z.... FL.2
. FL.3:. "PD3",8,1...... FL.3 . FL.4:. "
PD4",8,1.(....".PULLDOWN MENU MAKER
(C) MAROSOFT".G.... 1,8,15:.1,"R:H#H#
H#=PD0".C....1,A,B$,C,D:. A..0 . 20.....
.1,"R:PD0=H#H#H#":.".. PD0 EXISTIERT SCH
ON AUF DIESER DISK".I...." ANDERE DISK E
INLEGEN, <RETURN>...... A$: 1:. 15.....
.1,"I": 1......"...ES STEHEN 5 OBERMENU
ES ZUR VERFUEGUNG..A....".BITTE GEBEN SI
E DIE NAMEN EIN:"...... ".STELLEN SIE DI
E GROSS/KLEINSHREIBUNG WIEIN IHREM PROGR
AMM EIN !!!........ X.1 . 5:B$." ":. X.5
. B$."".A.(.."MENU"X":";.J.2.. T$...<..
C(T$).7.(X.5) . .".";:. 40...F.....P..
C(T$).7.(X.5) . 100...Z.T$.T$." ":. 80.@
.D.M$(X).T$:T$."":.:."........ ".H.N.. X
.T.X.ME$." ".X.... X.1 . 5:ME$.ME$.M$(X)
." ":. X......"."ME$;:. X.1 . 40:."=";:.
X.O....:."...^ SO SIEHT DIE KOPFZEILE A
US. OK (J/N) ?"... .. A$:. A$."" . 160..
.... A$.."J" . 10.%.H.. "..JETZT DIE ANZ
AHL BEFEHLE PRO MENU:.3.R.. X.1 . 5.R...
.".MENU"X": ".M$(X):. M(X).Y.... M(X).10
. M(X).1 . ."...";:. 220...... X. ...."
..UND JETZT DIE BEFEHLE:.R.... X.1 . 5:.
".FUER MENU"X": "M$(X)" ("M(X)")."......
Y.1 . M(X)......Y":":. B$(X,Y)...".. C(
B$(X,Y)).17 . .".";:. 280.3.#.. C(B$(X,Y
)).17 . 293.Q.$.B$(X,Y).B$(X,Y)." ":. 29
1.O.%.B$(X,Y)."= ".B$(X,Y)." ="...,.. Y:
B$(X,Y)."=====================":. X.C.6.
."... (1) UEBERSICHT AM BILDSCHIRM...7.
.". (2) UEBERSICHT AUF DRUCKER...8..".
(3) DATEN ERRECHNEN UND SPEICHERN".6.@.
. A$:A.E(A$):. A.0 . A.3 . 320.F.J.. A.3
. 500.R.T.. 1,2.A.C.^..1:.1:.1,ME$...H.
. X.1 . 5:.1: .1,M$(X)":":.1...R.. Y.1 .
M(X):.1,Y" -"B$(X,Y)...|.. Y,X..... 1
:. 310......".....BITTE WARTEN, ICH RECH
NE..... _ HIER CODETEST!...... HEADER (K
OPFZEILE).,...L.49408:T$.ME$:. 10000.:..
.. X.1 . 5.O.... 50927.X,M(X).1.W.&.. X.
C.0.L.51712.Y.:.. X.1 . 5:L.L.256...D.T$
."":. Y.1 . M(X).1:T$.T$.B$(X,Y):. Y:. 1
0000...N.. X.Z.X..". _ COUNTDOWN
"...\.."DISKETTE EINLEGEN! OK?
RETURN!"...].. A$.-.B..".......ICH SPEIC
HERE JETZT !".C.L.. 1,8,2,"PD0,P,W".W.V.
.1,G(0);G(192);..... X.49152 . 53247:."
."53247.X" "......1,G(B(X));:. X.....
1.B...."....CODETABELLE AUSDRUCKEN (J/
N).Y.F.. A$:. A$."" . 710...P.. A$.."J"
. 9999...Z.. 1,4.E....1,"CODETABELLE FUE
R PULLDOWN-MENUES (C)
MAROSOFT '86.C....1:.1,"KOPFZEILE:":.1,
ME$...... X.1 . 5:.1:.1,M$(X):.1...... Y
.1 . M(X):.1,(X.1).10.Y.1;.5);B$(X,Y):.
Y,X.W....1:.1,99;.5)"QUIT OHNE AUSWAHL".
.... 1....'.....'. CODE ERRECHNEN UND N
ACH L.$..'. I.1 . C(T$):A$.J(T$,I,1).1.$
'.".";A$;.E..'. L.I.1,B(1024).M.8'. I.S.
B'....
> CLICK IMAGE PREVIEW FOR FULL MODAL