Buchempfehlung
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Mikrocomputertechnik mit Controllern der Atmel AVR-RISC-Familie
Umfassend, aber leicht verständlich führt dieses Buch in die Programmierung von ATMEL AVR Mikrocontrollern ein. [Mehr Infos...]
FreeBASIC-Chat
Es sind Benutzer im FreeBASIC-Chat online.
(Stand:  )
FreeBASIC bei Twitter
Twitter FreeBASIC-Nachrichten jetzt auch über Twitter erhalten. Follow us!

fb:porticula NoPaste

Info
Info / Hilfe
Liste
Übersicht / Liste
Neu
Datei hochladen
Suche
Quellcode suchen
Download
Dateidownload

Schleife nur mit ESC beenden

Uploader:AdministratorSebastian
Datum/Zeit:09.08.2013 15:09:53

PRINT "Dieses Programm wird nur verlassen wenn Sie die ESC-Taste druecken."
PRINT "Die ESCape-Taste hat den ASCII-Code 27, daher wird auf CHR(27) getestet."
PRINT

DIM TASTE AS STRING

DO
    PRINT TIME   ' Uhrzeit ausgeben

    SLEEP 500    ' 500 ms warten

    TASTE = INKEY

LOOP UNTIL TASTE = CHR(27)

PRINT "----"
PRINT "Aha, Sie haben ESC gedrueckt. Hoeren wir also auf."

SLEEP
END