'============================================================================
' (p)'23/02/2003 by East-Power-Soft
'
' Timer mit 1/19 Sekunden.
'============================================================================

seconds% = 1 '---> Anzahl der Sekunden die gewartet werden soll

seconds% = seconds% * 19
DEF SEG = 0
POKE (&H46C), 0
CountDown:
IF PEEK(&H46C) < seconds% THEN GOTO CountDown
DEF SEG