ptimer.BAS

{* Прерывания от таймера *}

REM basic

' Прерывания от таймера


SCREEN 9 
TIMER On
On TIMER(2) GoSub tmr
COLOR 12, 1
While INKEY$ = ""
Wend
End
tmr:
LOCATE 12, 38
PRINT TIME$
Return