* Данный текст распознан в автоматическом режиме, поэтому может содержать ошибки
166
Языки Бейсик
TIMER ON включает отслеживание события для таймера. T I M E R OFF выключает отслеживание события для таймера. T I M E R STOP приостанавливает отслеживание события. События обрабатыва ются при включении T I M E R O N отслеживания события. n% числосекунд,которыедолжныпройти,преждечемONTIMERобратится к подпрограмме отслеживания события; значения находятся в пределах от 1 до 86 400 (24 часа). Строка меткаилиномерпервойстрокиподпро раммыотслеживаниясобытия. Пример:
ON TIMER(1) GOSUBTimeUpdate TIMER ON CLS PRINT "Время: "; TIME$ S t a r t T i m e = TIMER WHILE T i m e P a s t < 10 TimePast = TIMER — S t a r t T i m e WEND END TimeUpdate: LOCATE 1 , 8: PRINT TIME$ RETURN
См. также T I M E R Функция
ON G O S U B - о п е р а т о р
Выполняет переход в одно из нескольких положений в зависимости от значения пе¬ ременной. Формат записи: ON выражение% GOSUB список строк ON выражение% GOTO список строк де выражение% список_строк целочисленная переменная в диапазоне от 0 до 255. набор меток или номеров строк. Если значение переменной рав но 1,топрограммапереходитвпервуюстрокуизсписка;еслизначениепеременнойравно 2, то программапереходитво вторую строку из списка и т.д. SELECT CASE предоставляет более удобный путь для ветвления программы.
Пример:
FORi%=1TO2 ON i % GOSUB One, Two NEXT i % END One: PRINT"Один" RETURN Two: PRINT "Два" RETURN
См. также O N Ключевое слово, SELECT CASE