#  2005年 12月 05日 月曜日  02:43 PM 作成
# For c:\jww\外変\today.bat  
BEGIN{
 nowis()
}
END{
	"jmin.exe c:\\jww\\jmmdat\\today.dat 日付文字"|getline
	str=$3;
	sub("y",yearh,str)
	sub("m",manth,str)
	sub("d",day,str)
	sub("t",time24":"minut,str)
	sub("_"," ",str)
	printf("ch 0 0 1 0 \"%s\n", str)
}

function nowis(){
	wdaymoto="日 月 火 水 木 金 土"
	split(wdaymoto,wday);
	now=systime();
	year=strftime("%y",now)
	yearh="H."12+year
	manth=strftime("%m",now)
	manthb=strftime("%b",now)
	day=strftime("%d",now)
	week=wday[1+strftime("%w",now)]
	weekb=strftime("%a",now)
	time=strftime("%p%I",now)
	time24=strftime("%H",now)
	minut=strftime("%M",now)
}