#author("2020-05-07T14:34:21+09:00","","")
#author("2020-05-07T14:34:34+09:00","","")
[[Ys TOOLs C]]

Ys simple clock 0.1.0~
~
・始めに~
このTOOLは日時/時刻を表示するだけのTOOLです~
~
・作成の動機~
TIME系TOOLを作成して振り返った時に~
単純に時刻を知りたくなったら。と思い作成しました~
~
・使い方~
「START」ボタンを押すと時間が動きます~
「STOP」ボタンを押すと時間が止まります~
~
作成：高畑ラボ(Y_repeat)~
~
・連絡先~
バグなどありましたらご報告ください~
また改造後再配布時配布URLを教えていただけると嬉しいです~
y.tack2010@gmail.com~
#code(C,outline){{
#code(C,nooutline){{
screen 0,310,200
cls 1
pos 20,10

cur_year =gettime(0)
cur_month=gettime(1)
cur_day  =gettime(3)
tmp_data_day=""+strf("%04d年",cur_year)+" "+strf("%02d月",cur_month)+" "+strf("%02d日",cur_day)
var4input_data_day=""
var4input_data_day=tmp_data_day

cur_hour=gettime(4)
cur_min =gettime(5)
cur_sec =gettime(6)

tmp_data_hour=""+strf("%02d時",cur_hour)+" "+strf("%02d分",cur_min)+" "+strf("%02d秒",cur_sec)
var4input_data_hour=""
var4input_data_hour=tmp_data_hour

	font "",20
	objmode 2
	
	font "",30:input var4input_data_day,270,40
	ID4input_data_day=stat:font "",20

	pos 20,60
	font "",30:input var4input_data_hour,270,40
	ID4input_data_hour=stat:font "",20

	pos 20,110
	objsize 270,40
	font "",30
	button "START",*l_time_start
	button "STOP",*l_time_stop
	stop
*l_time_start
	while 1
	await 200
	
cur_year =gettime(0)
cur_month=gettime(1)
cur_day  =gettime(3)
tmp_data_day=""+strf("%04d年",cur_year)+" "+strf("%02d月",cur_month)+" "+strf("%02d日",cur_day)
var4input_data_day=tmp_data_day
objprm ID4input_data_day,var4input_data_day

cur_hour=gettime(4)
cur_min =gettime(5)
cur_sec =gettime(6)

tmp_data_hour=""+strf("%02d時",cur_hour)+" "+strf("%02d分",cur_min)+" "+strf("%02d秒",cur_sec)
var4input_data_hour=tmp_data_hour
objprm ID4input_data_hour,var4input_data_hour

	wend
	stop
*l_time_stop
	stop
}}