home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Power-Programmierung
/
CD1.mdf
/
basic
/
interpre
/
tsrbasic
/
clock.bas
< prev
next >
Wrap
BASIC Source File
|
1991-04-03
|
167b
|
6 lines
100 print "Press ctrl-shift-b to terminate clock."
110 suspend 0, 0x30, 0x06, 18, 0, timer
120 if not timer then cls : end
130 display 0, 72, time()
140 goto 110