; Clock
; -----
; Puts a large clock display in the top right hand
; corner of the screen using a script banner.
; Places a clock icon in the system tray, allowing
; the clock to be removed when double clicked
;
;report on
;step on
setfont Verdana,24,B
puttray Clock,exit,fclock.ico

:loop
gettime A
substr %A,1,5,B
banner %B,r|t,150|50,5,a
suspend M
goto loop

:exit
msgbox Clock,Remove Clock Display ?,4,C
ifmsg no,loop
banoff
:end