#曜日、時間によってNextTrainのToday表示を変更するMortScript

week = FormatTime("w") * 1
time = FormatTime("H") * 1
Switch( week )
  #曜日指定 0=日曜 … 6=土曜日　ここでは月〜金のとき
  Case( 1,2,3,4,5 )
	#変更時刻指定　24時間制　1時間単位　ここでは「14時未満か以上か」で変える
	#14時未満のとき
	If ( time<14)
		#時刻表を指定 "\Program Files\NextTrain\example1.TBL" を変更
		RegWriteString( "HKCU", "Software\TOYO-MASA\NextTrain\Configuration", "TBL File", "\Program Files\NextTrain\example1.TBL" )
	#14時以上のとき
	Else
		#時刻表を指定 "\Program Files\NextTrain\example2.TBL" を変更
		RegWriteString( "HKCU", "Software\TOYO-MASA\NextTrain\Configuration", "TBL File", "\Program Files\NextTrain\example2.TBL" )
	EndIf
  #曜日指定 0=日曜 … 6=土曜日　ここでは土〜日のとき
  Case( 6,0 )
	#なにもせずに終了する
	Exit
EndSwitch