CLS PRINT "Prg-Name: FKT-TAST.Bas" PRINT "Autor: Stephanie Heinrich" PRINT "Datum: 10.02.03" REM---Belegung der Funktionstasten mit String--- KEY 1, "Piep" KEY 2, "Melde" KEY 10, "Ende" REM---Aktiviereung der Funktionstastenanzeige--- KEY ON REM---Definition der UP-Verzweigung--- ON KEY(1) GOSUB Ton ON KEY(2) GOSUB Meldung ON KEY(10) GOSUB Ende REM---Aktivierung der Funktionstasten--- KEY(1) ON KEY(2) ON KEY(10) ON SLEEP REM---Provisorischer Programmteil--- END REM---Unterprogramme--- REM---UP-1--- Ton: BEEP PRINT "BEEEEEP" RETURN REM---UP-2--- Meldung: CLS PRINT "Sie haben die Funktionstaste F2 bet„tigt." PRINT "Weiter: Bet„tigen sie eine Taste." SLEEP REM---UP-3--- Ende: CLS PRINT "Sie haben die Funktionstaste F10 bet„tigt." PRINT "Das Programm wird jetzt beendet." PRINT "Weiter: Bet„tigen Sie eine Taste." SLEEP REM---Ausschalten der Funktionstasten--- KEY OFF REM---Deaktivierung der Funktionstasten--- KEY(1) OFF KEY(2) OFF KEY(10) OFF CLS END