曜日取得

#module
#defcfunc GetDayOfWeek int _p1
youbi=gettime(2)
if youbi=0 : kekka="日" 
if youbi=1 : kekka="月"
if youbi=2 : kekka="火"
if youbi=3 : kekka="水"
if youbi=4 : kekka="木"
if youbi=5 : kekka="金"
if youbi=6 : kekka="土"
if _p1=1 : kekka+="曜日"
if _p1=2 : kekka=""+youbi
if _p1>2 : dialog "エラーが発生しました。\n-->バラメータに指定できない数を入れています。",1,"error" : end
return kekka
#global