more時計

環境
spalm more iアプリ版
確認機種
SH-06B
内容
less時計をmore用にしました。
変更点
spalm moreでは、整数と少数の変換を明示しないといけないので、
1000→1000.0で少数にしました。
また、\1を付けて整数にしました。
あとは表示の調整等です。

origin(width\2,height\2)
while(!input(0)){
lock()
cls()
col(0x0000FF)
arc(-120,-120,240)
j=second+millisecond/1000.0
d=j*6-90
line(0,0,(115*dcos(d))\1,(115*dsin(d))\1)
j=minute+j/60
d=j*6-90
line(0,0,(110*dcos(d))\1,(110*dsin(d))\1)
j=hour+j/60
d=j*30-90
line(0,0,(80*dcos(d))\1,(80*dsin(d))\1)
text("time:".hour.":".minute.":".second)
unlock()
sleep(1)
}
end