10
REM > Timer
20
D%=10000
100
REPEAT
110
CLS
130
FOR
L%=1
TO
25
135
T%=
TIME
140
FOR
A%=1
TO
D%:
NEXT
150
A%=
TIME
-T%
160
PRINT
TIME
;
" "
;A%;
TAB
(15);
SPC
(A%);
"*"
170
NEXT
180
FOR
A%=1
TO
D%:
NEXT
190
UNTIL
FALSE
Download Timer
BBC BASIC detokeniser and syntax highlighter by Ben Ryves.