//TRAIN00 reference
VarLayout L00
Var v
Var s
//SetEnableHomeKey Zero
getlayout L00
BeginFunc getSpeed
GetCurrentVoltage v
GetCurrentSpeed s
mov L00 Speed this s
mov L00 Volt this v
EndFunc
|
//TRAIN01 feedback
VarLayout L00
Var i
Var v
Var s
Var acctime
set acctime 100
//SetEnableHomeKey Zero
getlayout L00
BeginFunc getSpeed
GetCurrentVoltage v
GetCurrentSpeed s
mov L00 Speed01 this s
mov L00 Volt01 this v
EndFunc
BeginFunc setSpeed
mov this i L00 input1
SetTimerVoltage i acctime
EndFunc
|
//TRAIN02 feedforward
VarLayout L00
Var v
Var acctime
set acctime 100
//SetEnableHomeKey Zero
getlayout L00
BeginFunc setSpeed
mov this v L00 input2
SetTimerVoltage v acctime
EndFunc
|