MENU-DEMO.SRC
FILE INFORMATION
FILENAME(S): MENU-DEMO.SRC
FILE TYPE(S): PRG
FILE SIZE: 2.5K
FIRST SEEN: 2025-10-20 00:40:16
APPEARS ON: 1 disk(s)
FILE HASH
688fa8df4394ff442b889a686ffbc794f55ef7e1a4342de082e241ac3739d4e6
FOUND ON DISKS (1 DISKS)
| DISK TITLE | FILENAME | FILE TYPE | COLLECTION | TRACK | SECTOR | ACTIONS |
|---|---|---|---|---|---|---|
| MT90570 S B | MENU-DEMO.SRC | PRG | Treasure Chest - Joker79 | 32 | 3 | DOWNLOAD FILE |
FILE CONTENT & ANALYSIS
00000000: D8 1F FE 1F 32 00 3B 20 2A 2A 2A 20 4E 49 43 48 |....2.; *** NICH| 00000010: 54 20 41 53 53 45 4D 42 4C 49 45 52 46 41 45 48 |T ASSEMBLIERFAEH| 00000020: 49 47 21 20 2A 2A 2A 00 24 20 3C 00 3B 20 3D 3D |IG! ***.$ <.; ==| 00000030: 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D 3D |================| 00000040: 3D 3D 3D 3D 3D 3D 3D 3D 3D 20 2A 2A 2A 00 2A 20 |========= ***.* | 00000050: 46 00 3B 00 30 20 50 00 3B 00 3D 20 64 00 2E 42 |F.;.0 P.;.= d..B| 00000060: 41 20 32 30 30 30 00 5B 20 69 00 2E 4F 42 20 22 |A 2000.[ i..OB "| 00000070: 40 3A 4D 45 4E 55 45 44 45 4D 4F 2D 45 58 45 2C |@:MENUEDEMO-EXE,| 00000080: 50 2C 57 22 00 85 20 6E 00 20 2E 2E 2E 49 4E 49 |P,W".. n. ...INI| 00000090: 54 2D 4C 49 42 3B 20 C7 45 4F 53 2D C2 49 42 4C |T-LIB; .EOS-.IBL| 000000A0: 49 4F 54 48 45 4B 20 4F 45 46 46 4E 45 4E 00 A2 |IOTHEK OEFFNEN..| 000000B0: 20 73 00 20 2E 2E 2E 43 4C 53 3B 20 D3 43 48 49 | s. ...CLS; .CHI| 000000C0: 52 4D 20 4C 4F 45 53 43 48 45 4E 00 D1 20 78 00 |RM LOESCHEN.. x.| 000000D0: 20 2E 2E 2E 45 58 45 43 4C 49 42 28 4D 54 45 58 | ...EXECLIB(MTEX| 000000E0: 54 31 2C 43 4F 4E 56 45 52 54 29 3B 20 CD 45 4E |T1,CONVERT); .EN| 000000F0: 55 45 54 45 58 54 45 20 31 2C 00 02 21 7D 00 20 |UETEXTE 1,..!}. | 00000100: 2E 2E 2E 45 58 45 43 4C 49 42 28 4D 54 45 58 54 |...EXECLIB(MTEXT| 00000110: 32 2C 43 4F 4E 56 45 52 54 29 3B 20 20 20 20 20 |2,CONVERT); | 00000120: 20 20 20 20 20 20 32 20 55 4E 44 00 3A 21 82 00 | 2 UND.:!..| 00000130: 20 2E 2E 2E 45 58 45 43 4C 49 42 28 4D 54 45 58 | ...EXECLIB(MTEX| 00000140: 54 33 2C 43 4F 4E 56 45 52 54 29 3B 20 20 20 20 |T3,CONVERT); | 00000150: 20 20 20 20 20 33 20 4B 4F 4E 56 45 52 54 49 45 | 3 KONVERTIE| 00000160: 52 45 4E 00 63 21 87 00 20 2E 2E 2E 4D 45 4E 55 |REN.c!.. ...MENU| 00000170: 28 54 41 42 45 4C 4C 45 31 2C 30 29 3B 20 CD 45 |(TABELLE1,0); .E| 00000180: 4E 55 45 20 41 55 46 42 41 55 45 4E 00 A0 21 8C |NUE AUFBAUEN..!.| 00000190: 00 53 43 48 4C 45 49 46 45 20 2E 2E 2E 43 41 4C |.SCHLEIFE ...CAL| 000001A0: 4C 4D 41 49 4E 28 53 43 48 4C 45 49 46 45 29 3B |LMAIN(SCHLEIFE);| 000001B0: 20 C8 41 55 50 54 53 43 48 4C 45 49 46 45 20 41 | .AUPTSCHLEIFE A| 000001C0: 4E 53 50 52 49 4E 47 45 4E 00 A6 21 91 00 3B 00 |NSPRINGEN..!..;.| 000001D0: AC 21 96 00 3B 00 B2 21 9B 00 3B 00 B8 21 A0 00 |.!..;..!..;..!..| 000001E0: 3B 00 BE 21 A5 00 3B 00 E4 21 AA 00 3B 23 23 23 |;..!..;..!..;###| 000001F0: 20 D4 41 42 45 4C 4C 45 20 46 55 45 52 20 CD 45 | .ABELLE FUER .E| 00000200: 4E 55 45 4C 45 49 53 54 45 20 23 23 23 00 0A 22 |NUELEISTE ###.."| 00000210: AF 00 3B 23 23 23 23 23 23 23 23 23 23 23 23 23 |..;#############| 00000220: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 00000230: 23 23 23 00 3C 22 B4 00 54 41 42 45 4C 4C 45 31 |###.<"..TABELLE1| 00000240: 20 2E 42 59 35 3B 20 C1 4E 47 41 42 45 4E 20 5A | .BY5; .NGABEN Z| 00000250: 55 52 20 C7 52 4F 45 53 53 45 20 44 45 53 20 CD |UR .ROESSE DES .| 00000260: 45 4E 55 45 53 00 47 22 B9 00 20 2E 42 59 31 37 |ENUES.G".. .BY17| 00000270: 00 51 22 BE 00 20 2E 57 4F 35 00 5D 22 C3 00 20 |.Q".. .WO5.]".. | 00000280: 2E 57 4F 31 33 30 00 97 22 C8 00 20 2E 42 59 32 |.WO130..".. .BY2| 00000290: 21 4F 21 56 49 53 49 42 4C 45 21 4F 21 48 4F 52 |!O!VISIBLE!O!HOR| 000002A0: 49 5A 4F 4E 54 41 4C 3B 20 32 20 C5 49 4E 54 52 |IZONTAL; 2 .INTR| 000002B0: 41 45 47 45 2C 20 48 4F 52 49 5A 4F 4E 54 41 4C |AEGE, HORIZONTAL| 000002C0: 00 BB 22 CD 00 3B 20 23 23 20 CD 45 4E 55 45 50 |.."..; ## .ENUEP| 000002D0: 55 4E 4B 54 20 22 CD 45 4E 55 45 2D C4 45 4D 4F |UNKT ".ENUE-.EMO| 000002E0: 22 20 23 23 00 D1 22 D2 00 4D 50 55 4E 4B 54 31 |" ##.."..MPUNKT1| 000002F0: 20 2E 57 4F 4D 54 45 58 54 31 00 F2 22 D7 00 20 | .WOMTEXT1..".. | 00000300: 2E 42 59 53 55 42 4D 45 4E 55 45 3B 20 41 4C 53 |.BYSUBMENUE; ALS| 00000310: 20 D5 4E 54 45 52 4D 45 4E 55 45 00 22 23 DC 00 | .NTERMENUE."#..| 00000320: 20 2E 57 4F 54 41 42 45 4C 4C 45 32 3B 20 DA 45 | .WOTABELLE2; .E| 00000330: 49 47 45 52 20 41 55 46 20 D5 4E 54 45 52 4D 45 |IGER AUF .NTERME| 00000340: 4E 55 45 54 41 42 45 4C 4C 4C 45 00 47 23 E1 00 |NUETABELLLE.G#..| 00000350: 3B 20 23 23 20 CD 45 4E 55 45 50 55 4E 4B 54 20 |; ## .ENUEPUNKT | 00000360: 22 CD 45 4E 55 45 4C 45 49 53 54 45 22 20 23 23 |".ENUELEISTE" ##| 00000370: 00 5D 23 E6 00 4D 50 55 4E 4B 54 32 20 2E 57 4F |.]#..MPUNKT2 .WO| 00000380: 4D 54 45 58 54 32 00 87 23 EB 00 20 2E 42 59 53 |MTEXT2..#.. .BYS| 00000390: 50 52 55 4E 54 45 52 4D 3B 20 D5 4E 54 45 52 4D |PRUNTERM; .NTERM| 000003A0: 45 4E 55 45 20 4D 49 54 20 D2 4F 55 54 49 4E 45 |ENUE MIT .OUTINE| 000003B0: 00 AA 23 F0 00 20 2E 57 4F 45 58 45 43 31 3B 20 |..#.. .WOEXEC1; | 000003C0: DA 45 49 47 45 52 20 41 55 46 20 C4 49 53 50 41 |.EIGER AUF .ISPA| 000003D0: 54 43 48 00 B0 23 F5 00 3B 00 B6 23 FA 00 3B 00 |TCH..#..;..#..;.| 000003E0: D2 23 FF 00 3B 20 20 20 20 20 28 D4 45 58 54 45 |.#..; (.EXTE| 000003F0: 20 5A 55 20 CD 45 4E 55 45 31 29 00 06 24 04 01 | ZU .ENUE1)..$..| 00000400: 4D 54 45 58 54 31 20 2E 54 58 22 CD 45 4E 55 45 |MTEXT1 .TX".ENUE| 00000410: 2D C4 45 4D 4F 22 3B 20 D4 45 58 54 20 5A 55 20 |-.EMO"; .EXT ZU | 00000420: CD 45 4E 55 45 20 31 2C D0 55 4E 4B 54 20 31 00 |.ENUE 1,.UNKT 1.| 00000430: 32 24 09 01 20 2E 42 59 4E 55 4C 4C 3B 20 C1 42 |2$.. .BYNULL; .B| 00000440: 53 43 48 4C 55 53 53 4B 45 4E 4E 55 4E 47 20 28 |SCHLUSSKENNUNG (| 00000450: 57 49 45 20 49 4D 4D 45 52 21 29 00 67 24 0E 01 |WIE IMMER!).g$..| 00000460: 4D 54 45 58 54 32 20 2E 54 58 22 CD 45 4E 55 45 |MTEXT2 .TX".ENUE| 00000470: 4C 45 49 53 54 45 22 3B 20 D4 45 58 54 20 5A 55 |LEISTE"; .EXT ZU| 00000480: 20 CD 45 4E 55 45 20 31 2C D0 55 4E 4B 54 20 32 | .ENUE 1,.UNKT 2| 00000490: 00 74 24 13 01 20 2E 42 59 4E 55 4C 4C 00 7A 24 |.t$.. .BYNULL.z$| 000004A0: 18 01 3B 00 80 24 1D 01 3B 00 86 24 22 01 3B 00 |..;..$..;..$".;.| 000004B0: AC 24 27 01 3B 23 23 20 D5 4E 54 45 52 4D 45 4E |.$'.;## .NTERMEN| 000004C0: 55 45 20 5A 55 20 22 CD 45 4E 55 45 2D C4 45 4D |UE ZU ".ENUE-.EM| 000004D0: 4F 22 20 23 23 00 D2 24 2C 01 3B 23 23 23 23 23 |O" ##..$,.;#####| 000004E0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 000004F0: 23 23 23 23 23 23 23 23 23 23 23 00 D8 24 31 01 |###########..$1.| 00000500: 3B 00 0A 25 36 01 54 41 42 45 4C 4C 45 32 20 2E |;..%6.TABELLE2 .| 00000510: 42 59 31 38 3B 20 D5 4E 54 45 52 4D 45 4E 55 45 |BY18; .NTERMENUE| 00000520: 20 5A 55 20 20 CD 45 4E 55 45 31 2C D0 55 4E 4B | ZU .ENUE1,.UNK| 00000530: 54 20 31 00 15 25 3B 01 20 2E 42 59 33 30 00 1F |T 1..%;. .BY30..| 00000540: 25 40 01 20 2E 57 4F 35 00 2A 25 45 01 20 2E 57 |%@. .WO5.*%E. .W| 00000550: 4F 33 30 00 6C 25 4A 01 20 2E 42 59 31 21 4F 21 |O30.l%J. .BY1!O!| 00000560: 56 49 53 49 42 4C 45 21 4F 21 56 45 52 54 49 4B |VISIBLE!O!VERTIK| 00000570: 41 4C 3B 20 31 20 CD 45 4E 55 45 50 55 4E 4B 54 |AL; 1 .ENUEPUNKT| 00000580: 2C 53 43 48 4C 49 45 53 53 45 4E 44 2C 56 45 52 |,SCHLIESSEND,VER| 00000590: 54 49 4B 41 4C 00 8B 25 4F 01 3B 20 20 23 23 20 |TIKAL..%O.; ## | 000005A0: CD 45 4E 55 45 50 55 4E 4B 54 20 22 C7 C5 CF D3 |.ENUEPUNKT "....| 000005B0: 22 20 23 23 00 B9 25 54 01 4D 50 55 4E 4B 54 33 |" ##..%T.MPUNKT3| 000005C0: 20 2E 57 4F 4D 54 45 58 54 33 3B 20 DA 45 49 47 | .WOMTEXT3; .EIG| 000005D0: 45 52 20 41 55 46 20 D4 45 58 54 20 22 C7 C5 CF |ER AUF .EXT "...| 000005E0: D3 22 00 F4 25 59 01 20 2E 42 59 53 50 52 55 4E |."..%Y. .BYSPRUN| 000005F0: 47 3B 20 42 45 49 20 41 4E 4B 4C 49 43 4B 45 4E |G; BEI ANKLICKEN| 00000600: 20 5A 55 52 20 D2 4F 55 54 49 4E 45 20 D2 C5 D8 | ZUR .OUTINE ...| 00000610: D4 D5 D2 CE A0 53 50 52 49 4E 47 45 4E 00 03 26 |.....SPRINGEN..&| 00000620: 5E 01 20 2E 57 4F 52 45 54 55 52 4E 00 1D 26 63 |^. .WORETURN..&c| 00000630: 01 3B 20 20 20 28 54 45 58 54 20 5A 55 20 4D 45 |.; (TEXT ZU ME| 00000640: 4E 55 45 20 32 29 00 32 26 68 01 4D 54 45 58 54 |NUE 2).2&h.MTEXT| 00000650: 33 20 2E 54 58 22 C7 C5 CF D3 22 00 3F 26 6D 01 |3 .TX"....".?&m.| 00000660: 20 2E 42 59 4E 55 4C 4C 00 45 26 72 01 3B 00 4B | .BYNULL.E&r.;.K| 00000670: 26 77 01 3B 00 51 26 7C 01 3B 00 74 26 81 01 3B |&w.;.Q&|.;.t&..;| 00000680: 20 20 23 23 20 D2 45 41 4B 54 49 4F 4E 45 4E 20 | ## .EAKTIONEN | 00000690: 5A 55 20 CD 45 4E 55 45 20 31 20 23 23 00 97 26 |ZU .ENUE 1 ##..&| 000006A0: 86 01 3B 20 20 23 23 23 23 23 23 23 23 23 23 23 |..; ###########| 000006B0: 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 23 |################| 000006C0: 00 9D 26 8B 01 3B 00 D6 26 90 01 45 58 45 43 31 |..&..;..&..EXEC1| 000006D0: 20 4A 53 52 49 4E 49 54 49 4F 3B 20 D6 C9 C3 20 | JSRINITIO; ... | 000006E0: 49 4E 20 44 45 4E 20 C1 44 52 45 53 53 42 45 52 |IN DEN .DRESSBER| 000006F0: 45 49 43 48 20 45 49 4E 42 4C 45 4E 44 45 4E 00 |EICH EINBLENDEN.| 00000700: 0A 27 95 01 20 4C 44 58 23 24 46 46 3B 20 D8 2D |.'.. LDX#$FF; .-| 00000710: 49 4E 44 49 5A 49 45 52 54 45 20 D3 43 48 4C 45 |INDIZIERTE .CHLE| 00000720: 49 46 45 20 5A 55 4D 20 C6 41 52 42 57 45 43 48 |IFE ZUM .ARBWECH| 00000730: 53 45 4C 00 1C 27 9A 01 4C 4F 4F 50 20 49 4E 43 |SEL..'..LOOP INC| 00000740: 24 44 30 32 30 00 29 27 9F 01 20 4C 44 59 23 24 |$D020.)'.. LDY#$| 00000750: 46 46 00 35 27 A4 01 4C 50 32 20 44 45 59 00 41 |FF.5'..LP2 DEY.A| 00000760: 27 A9 01 20 42 4E 45 4C 50 32 00 4A 27 AE 01 20 |'.. BNELP2.J'.. | 00000770: 44 45 58 00 57 27 B3 01 20 42 4E 45 4C 4F 4F 50 |DEX.W'.. BNELOOP| 00000780: 00 96 27 B8 01 20 4A 53 52 44 4F 4E 45 49 4F 3B |..'.. JSRDONEIO;| 00000790: 20 CF 52 49 47 49 4E 41 4C 20 C7 C5 CF D3 2D CB | .RIGINAL ....-.| 000007A0: 4F 4E 46 49 47 55 52 41 54 49 4F 4E 20 57 49 45 |ONFIGURATION WIE| 000007B0: 44 45 52 20 45 49 4E 53 43 48 41 4C 54 45 4E 00 |DER EINSCHALTEN.| 000007C0: D7 27 BD 01 20 2E 2E 2E 4C 4F 41 44 57 28 54 41 |.'.. ...LOADW(TA| 000007D0: 42 45 4C 4C 45 33 2C 52 30 29 3B 20 C1 44 52 45 |BELLE3,R0); .DRE| 000007E0: 53 53 45 20 44 45 53 20 D5 4E 54 45 52 4D 45 4E |SSE DES .NTERMEN| 000007F0: 55 45 53 20 48 49 4E 54 45 52 4C 41 53 53 45 4E |UES HINTERLASSEN| 00000800: 00 F3 27 C2 01 20 52 54 53 3B 20 5A 55 52 20 C8 |..'.. RTS; ZUR .| 00000810: 41 55 50 54 53 43 48 4C 45 49 46 45 00 F9 27 C7 |AUPTSCHLEIFE..'.| 00000820: 01 3B 00 2A 28 CC 01 54 41 42 45 4C 4C 45 33 20 |.;.*(..TABELLE3 | 00000830: 2E 42 59 31 39 3B 20 D5 4E 54 45 52 4D 45 4E 55 |.BY19; .NTERMENU| 00000840: 45 20 5A 55 20 CD 45 4E 55 45 50 55 4E 4B 54 20 |E ZU .ENUEPUNKT | 00000850: 31 2F 32 00 35 28 D1 01 20 2E 42 59 33 30 00 40 |1/2.5(.. .BY30.@| 00000860: 28 D6 01 20 2E 57 4F 38 30 00 4C 28 DB 01 20 2E |(.. .WO80.L(.. .| 00000870: 57 4F 31 31 30 00 6B 28 E0 01 20 2E 42 59 31 21 |WO110.k(.. .BY1!| 00000880: 4F 21 43 4C 4F 53 49 4E 47 21 4F 21 56 45 52 54 |O!CLOSING!O!VERT| 00000890: 49 4B 41 4C 00 71 28 E5 01 3B 00 93 28 EA 01 20 |IKAL.q(..;..(.. | 000008A0: 2E 57 4F 4D 54 45 58 54 33 3B 20 DA 45 49 47 45 |.WOMTEXT3; .EIGE| 000008B0: 52 20 41 55 46 20 22 C7 C5 CF D3 22 00 A2 28 EF |R AUF "...."..(.| 000008C0: 01 20 2E 42 59 53 50 52 55 4E 47 00 B1 28 F4 01 |. .BYSPRUNG..(..| 000008D0: 20 2E 57 4F 52 45 54 55 52 4E 00 B7 28 F9 01 3B | .WORETURN..(..;| 000008E0: 00 DA 28 FE 01 52 45 54 55 52 4E 20 4A 4D 50 44 |..(..RETURN JMPD| 000008F0: 45 53 4B 54 4F 50 3B 20 DA 55 4D 20 C4 45 53 4B |ESKTOP; .UM .ESK| 00000900: D4 4F 50 00 E0 28 10 27 3B 00 05 29 1A 27 3B 20 |.OP..(.';..).'; | 00000910: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 00000920: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 00 2A |**************.*| 00000930: 29 24 27 3B 20 2A 20 48 49 45 52 20 49 53 54 20 |)$'; * HIER IST | 00000940: 44 49 45 20 4C 41 42 45 4C 42 49 42 4C 49 4F 54 |DIE LABELBIBLIOT| 00000950: 48 45 4B 00 4C 29 2E 27 3B 20 2A 20 41 55 53 20 |HEK.L).'; * AUS | 00000960: 44 45 4E 20 5A 45 49 4C 45 4E 20 31 30 30 30 30 |DEN ZEILEN 10000| 00000970: 2D 45 4E 44 45 00 73 29 38 27 3B 20 2A 20 49 4E |-ENDE.s)8'; * IN| 00000980: 20 22 49 43 4F 4E 2D 44 45 4D 4F 2E 53 52 43 22 | "ICON-DEMO.SRC"| 00000990: 20 41 4E 5A 55 48 41 45 4E 47 45 4E 00 98 29 42 | ANZUHAENGEN..)B| 000009A0: 27 3B 20 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |'; *************| 000009B0: 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A 2A |****************| 000009C0: 2A 00 9E 29 4C 27 3B 00 BD 29 56 27 3B 20 2A 20 |*..)L';..)V'; * | 000009D0: 44 41 4E 4E 20 49 53 54 20 44 49 45 53 45 20 44 |DANN IST DIESE D| 000009E0: 41 54 45 49 20 2A 00 DC 29 60 27 3B 20 2A 20 41 |ATEI *..)`'; * A| 000009F0: 53 53 45 4D 42 4C 49 45 52 46 41 45 48 49 47 20 |SSEMBLIERFAEHIG | 00000A00: 20 20 20 20 2A 00 00 00 | *... |
X...2.; *** NICHT ASSEMBLIERFAEHIG! ***.
$ <.; =========================== ***.*
F.;.0 P.;.= D..BA 2000.[ I..OB "@:MENUED
EMO-EXE,P,W".. N. ...INIT-LIB; GEOS-BIBL
IOTHEK OEFFNEN.. S. ...CLS; SCHIRM LOESC
HEN.Q X. ...EXECLIB(MTEXT1,CONVERT); MEN
UETEXTE 1,..!}. ...EXECLIB(MTEXT2,CONVER
T); 2 UND.:!.. ...EXECLIB(MTEX
T3,CONVERT); 3 KONVERTIEREN.C!..
...MENU(TABELLE1,0); MENUE AUFBAUEN. !.
.SCHLEIFE ...CALLMAIN(SCHLEIFE); HAUPTSC
HLEIFE ANSPRINGEN..!..;..!..;..!..;..! .
;..!..;..!..;### TABELLE FUER MENUELEIST
E ###.."..;#############################
###.<"..TABELLE1 .BY5; ANGABEN ZUR GROES
SE DES MENUES.G".. .BY17.Q".. .WO5.]"C.
.WO130.."H. .BY2!O!VISIBLE!O!HORIZONTAL;
2 EINTRAEGE, HORIZONTAL.."M.; ## MENUEP
UNKT "MENUE-DEMO" ##.Q"R.MPUNKT1 .WOMTEX
T1.."W. .BYSUBMENUE; ALS UNTERMENUE."#..
.WOTABELLE2; ZEIGER AUF UNTERMENUETABEL
LLE.G#..; ## MENUEPUNKT "MENUELEISTE" ##
.]#..MPUNKT2 .WOMTEXT2..#.. .BYSPRUNTERM
; UNTERMENUE MIT ROUTINE..#.. .WOEXEC1;
ZEIGER AUF DISPATCH..#..;..#..;.R#..;
(TEXTE ZU MENUE1)..$..MTEXT1 .TX"MENUE
-DEMO"; TEXT ZU MENUE 1,PUNKT 1.2$.. .BY
NULL; ABSCHLUSSKENNUNG (WIE IMMER!).G$..
MTEXT2 .TX"MENUELEISTE"; TEXT ZU MENUE 1
,PUNKT 2.T$.. .BYNULL.Z$..;..$..;..$".;.
.$'.;## UNTERMENUE ZU "MENUE-DEMO" ##.R$
,.;################################.X$1.
;..%6.TABELLE2 .BY18; UNTERMENUE ZU MEN
UE1,PUNKT 1..%;. .BY30..%@. .WO5.*%E. .W
O30.L%J. .BY1!O!VISIBLE!O!VERTIKAL; 1 ME
NUEPUNKT,SCHLIESSEND,VERTIKAL..%O.; ##
MENUEPUNKT "GEOS" ##..%T.MPUNKT3 .WOMTEX
T3; ZEIGER AUF TEXT "GEOS"..%Y. .BYSPRUN
G; BEI ANKLICKEN ZUR ROUTINE REXTURN SPR
INGEN..&^. .WORETURN..&C.; (TEXT ZU ME
NUE 2).2&H.MTEXT3 .TX"GEOS".?&M. .BYNULL
.E&R.;.K&W.;.Q&|.;.T&..; ## REAKTIONEN
ZU MENUE 1 ##..&..; ###################
########..&..;.V&..EXEC1 JSRINITIO; VIC
IN DEN ADRESSBEREICH EINBLENDEN..'.. LDX
#$FF; X-INDIZIERTE SCHLEIFE ZUM FARBWECH
SEL..'..LOOP INC$D020.)'.. LDY#$FF.5'..L
P2 DEY.A'.. BNELP2.J'.. DEX.W'.. BNELOOP
..'.. JSRDONEIO; ORIGINAL GEOS-KONFIGURA
TION WIEDER EINSCHALTEN.W'.. ...LOADW(TA
BELLE3,R0); ADRESSE DES UNTERMENUES HINT
ERLASSEN..'B. RTS; ZUR HAUPTSCHLEIFE..'G
.;.*(L.TABELLE3 .BY19; UNTERMENUE ZU MEN
UEPUNKT 1/2.5(Q. .BY30.@(V. .WO80.L(.. .
WO110.K(.. .BY1!O!CLOSING!O!VERTIKAL.Q(.
.;..(.. .WOMTEXT3; ZEIGER AUF "GEOS"..(.
. .BYSPRUNG..(.. .WORETURN..(..;.Z(..RET
URN JMPDESKTOP; ZUM DESKTOP..(.';..).';
******************************.*)$'; * H
IER IST DIE LABELBIBLIOTHEK.L).'; * AUS
DEN ZEILEN 10000-ENDE.S)8'; * IN "ICON-D
EMO.SRC" ANZUHAENGEN..)B'; *************
*****************..)L';..)V'; * DANN IST
DIESE DATEI *..)`'; * ASSEMBLIERFAEHIG
*...
> CLICK IMAGE PREVIEW FOR FULL MODAL