トグルスイッチテンプレート

「機関車入換えホッキホキ」の対策として一応。

//----------------------------------------------------------------------
//トグルスイッチテンプレート
//----------------------------------------------------------------------
//変数宣言
Var KeyEventID
Var VarFlag

//スタート
set VarFlag 0
（コマンド：状態１)
SetEventKey this MethodToggle KeyEventID （キー）

//メソッド
BeginFunc MethodToggle
if VarFlag
（コマンド：状態１)
else
（コマンド：状態２)
endif
xor VarFlag 1
EndFunc

というスクリプトのテンプレートを作ったので、これを使用し、

//----------------------------------------------------------------------
//作業カメラの追跡モードのトグルスイッチ化（「１」キー使用）
//----------------------------------------------------------------------
//変数宣言
VarCamera ObjCamera
Var KeyEventID
Var VarFlag

//スタート
get ObjCamera this
SetActiveCamera ObjCamera
set VarFlag 0
SetCameraTraceMode 1
SetEventKey this MethodToggle KeyEventID 1

//メソッド
BeginFunc MethodToggle
if VarFlag
SetCameraTraceMode 1
DrawMessage カメラ追跡モードＯＮ
else
SetCameraTraceMode 0
DrawMessage カメラ追跡モードＯＦＦ
endif
xor VarFlag 1
EndFunc

を今のカメラのスクリプトと交換してもらえれば、ヤバくなったら逃げられます。まぁヤバい状態でオンにしたら即自爆なんですが（笑）。

このテンプレートはポイント、踏み切り、信号等でも部分的には使えるでしょう。