- 追加された行はこの色です。
- 削除された行はこの色です。
#author("2020-04-29T10:35:50+09:00","","")
#freeze
#author("2020-04-29T10:37:47+09:00","","")
[[Ys TOOLs C]]
Ys Stop Watch 0.1.0~
~
・始めに~
このTOOLは簡単なストップウォッチです~
~
・作成の動機~
タイマーのTOOLを作成して、~
ストップウォッチなTOOLも欲しいと思って作成しました~
~
・使い方~
STARTボタンを押してください。STOPボタンを押すと止まります。~
RESTARTボタンを押すと時間がクリアされます~
~
・今後~
時間を途中から始めたい時があるので~
開始時間を設定出来るようにしたいですね~
分単位のみでいいので~
~
・HSP開発wikiのストップウォッチサンプルを基に改造しました~
僕がライセンスを指定するのは出来かねますので~
再配布は控えてください~
~
作成:高畑ラボ(Y_repeat)~
~
#code{{
cur_time=0
screen 0,140,200
cls 1
font "",20
objmode 2
objsize 140,50
font "",30:button "start", *start:font "",20
hoge = " 0:00:00"
mes "TIME"
font "",30:input hoge,140,30
ID4hoge=stat:font "",20
font "",30:button "stop",*l_stop
font "",30:button "reset",*l_reset
stop
*start
while 1
await 1000
cur_time++
tmp=cur_time
hoge=""+strf("%3d",(tmp/3600))+":"+ strf("%02d",((tmp\3600)/60))+":"+strf("%02d",(tmp\60))
objprm ID4hoge,hoge
wend
stop
*l_stop
stop
*l_reset
cur_time=0
tmp=cur_time
hoge=""+strf("%3d",(tmp/3600))+":"+ strf("%02d",((tmp\3600)/60))+":"+strf("%02d",(tmp\60))
objprm ID4hoge,hoge
stop
}}