>>523
*clock
gosub *clock2 // 一応変数secondの初期化
repeat
if second!gettime(6) : gosub *clock2
wait 1
loop
*clock2
second=gettime(6)
mes second
return

適当だけど