10 Y=PEEK(203):@#22:REM Y=TASTENCODE
20 GOSUB 800:REM UHR ANZEIGEN
30 IF Y=64 THEN 480:REM KEINE TASTE GEDRUECKT
40 Y$=CHR$(PEEK(60289+Y+(PEEK(653)AND1)*65)):REM IN ASCII-CODE UMWANDELN
50 POKE 53280,0:FOR I=1 TO 30:NEXT:POKE 53280,14
60 IF Y$="F" THEN ^"3/DISK-TOOLS/:FCOPY"
70 IF Y$="S" THEN GOSUB900:@"CD4/STROKE WORLD":@"CP4":^"*"
80 IF Y$="H" THEN GOSUB500:GOTO40:REM (H)ILFESEITE
90 IF Y$=" " THEN @#8:^"*":REM LOAD"*",8:RUN
100 IF Y$="$" THEN @#8:@"$":REM LOAD"$",8:LIST
480 POKE198,0:NEW:REM TASTATURPUFFER LEER UND ENDE
490 REM **************************
500 PRINT "[147]    ABKUERZUNGEN":PRINT
510 PRINT "    F - FCOPY"
520 PRINT "    S - STROKE WORLD"
530 PRINT "    $ - DIRECTORY VON FLOPPY #8"
540 PRINT "SPACE - ERSTES PRG VON FLOPPY #8"
600 WAIT 203,64:REM WARTEN, BIS H-TASTE LOSGELASSEN IST
610 Y=PEEK(203):IF Y=64 THEN 610:REM NEUE TASTE ABWARTEN
620 POKE198,0:RETURN:REM TASTATURPUFFER LEER UND ZURUECK IN ZEILE 80
630 REM **************************
800 @"T-RA",22:@"",22:RETURN:REM UHRANZEIGE
810 REM **************************
900 @"S-8":FOR I=1 TO 500:NEXT:@#8:RETURN:REM SWAP8