home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
64'er 1995 June
/
64er_Magazin_95-06_1995_Markt__Technik_de_Side_B.d64
/
menue
(
.txt
)
< prev
next >
Wrap
Commodore BASIC
|
2022-10-26
|
379b
|
13 lines
599 rem arbeitsmenue
600 ga=8: rem floppy-geraeteadresse
605 mp=0: rem flag fuer menuepunktewahl loeschen
610 poke53280,1:poke53281,1:poke646,0:printchr$(14)chr$(8)
620 printchr$(147)chr$(13)tab(10)chr$(18)" [210]elative [193]dressdatei "chr$(13)
630 printtab(11)"<1> [196]atei oeffnen"
640 printtab(11)"<2> [196]aten eingeben"
650 printtab(11)"<3> [196]aten ausgeben"
660 printtab(11)"<4> [196]atei schliessen"
670 get t$:mp=val(t$)
680 on mp gosub 1100,7000,8000,3000
690 goto 670