CANoe CAPL

CGW--------------
includes
{
}

variables
{
mstimer flash;
int LTS=0;
int RTS=0;
}

on signal_update DoorLockSts
{
if($DoorLockSts==0)
$DoorLockSts=1;

}

on sysvar Gateway::LockButton
{
if(@Gateway::LockButton==1)
@Gateway::Lockstate=0;
}

on sysvar Gateway::UnlockButton
{
if(@Gateway::UnlockButton==1)
@Gateway::Lockstate=1;
}

on sysvar Gateway::Lockstate
{
if(@this==0)
$DoorLockSts=1;
else
$DoorLockSts=3;
}

on signal DoorLockSts
{
if((($DrvDoorSts==1)||($PassengerDoorSts1)||($LRDoorSts==1)||($RRDoorSts1))&&($DoorLockSts==1))
@Gateway::Lockstate=1;
}

on sysvar Gateway::Turnsignal
{
switch (@this)
{
case(0):
LTS=0;RTS=0;break;
case(1):
LTS=1;RTS=0;break;
case(2):
LTS=0;RTS=1;break;
}
setTimer(flash,10);
}

on timer flash
{
setTimer(flash,450);
if(LTS1)
KaTeX parse error: Double subscript at position 14: LTurnLmpSts_R_̲Pbox=!LTurnLmpSts_R_Pbox;
else
$LTurnLmpSts_R_Pbox=0;
if(RTS1)
KaTeX parse error: Double subscript at position 14: RTurnLmpSts_R_̲Pbox=!RTurnLmpSts_R_Pbox;
else
$RTurnLmpSts_R_Pbox=0;
}

on sysvar Gateway::Drvdoor
{
$DrvDoorSts=@this;
}

on sysvar Gateway::LRdoor
{
$LRDoorSts=@this;
}

on sysvar Gateway::Psgdoor
{
$PassengerDoorSts=@this;
}

on sysvar Gateway::RRdoor
{
$RRDoorSts=@this;
}
HUT----------
/@!Encoding:936/
includes
{

}

variables
{
msTimer Fflash;
msTimer Dflash;
msTimer Uflash;
int StolenF=0;
int DFcircle=0,ULcircle=0;
int debug=0;
}

on start
{
setTimer(Fflash,10);
}

on sysvar Gateway::Turnsignal
{
if(@this==0)
@HUT::LeftTI=0;
@HUT::RightTI=0;
}

on signal_update LTurnLmpSts_R_Pbox
{
switch(@HUT::LeftTurnCondition)
{
case(0):
if((StolenF0)&&(ULcircle0))
{@HUT::LeftTI=KaTeX parse error: Double subscript at position 14: LTurnLmpSts_R_̲Pbox; @HU…LTurnLmpSts_R_Pbox;}break;
case(1):
@HUT::LeftTL=1;break;
case(2):
@HUT::LeftTL=0;break;
}
if(@Gateway::Turnsignal==1)
{
if(@HUT::LeftTurnCondition>0)
$AudioMuteSts=1;
else
$AudioMuteSts=0;
}
}

on signal_update RTurnLmpSts_R_Pbox
{
switch(@HUT::RightTurnCondition)
{
case(0):
if((StolenF0)&&(ULcircle0))
{@HUT::RightTI=KaTeX parse error: Double subscript at position 14: RTurnLmpSts_R_̲Pbox; @HU…RTurnLmpSts_R_Pbox;}break;
case(1):
@HUT::RightTL=1;break;
case(2):
@HUT::RightTL=0;break;
}
if(@Gateway::Turnsignal==2)
{
if(@HUT::RightTurnCondition>0)
$AudioMuteSts=1;
else
$AudioMuteSts=0;
}

}

on timer Fflash
{
setTimer(Fflash,200);
if(@Gateway::Turnsignal1)
{
if(@HUT::LeftTurnCondition0)
return;
else
@HUT::LeftTI=!@HUT::LeftTI;
}
if(@Gateway::Turnsignal2)
{
if(@HUT::RightTurnCondition0)
return;
else
@HUT::RightTI=!@HUT::RightTI;
}
}

on signal_update DoorLockSts
{
if((KaTeX parse error: Expected 'EOF', got '&' at position 16: DoorLockSts==1)&̲&((DrvDoorSts1)||($PassengerDoorSts==1)||($LRDoorSts1)||(KaTeX parse error: Expected 'EOF', got '&' at position 15: RRDoorSts==1))&̲&(DFcircle==0))…DoorLockSts3)&&(StolenF1))
{cancelTimer(Dflash);
@HUT::LeftTI=0;
@HUT::LeftTL=0;
@HUT::RightTI=0;
@HUT::RightTL=0;
StolenF=0;DFcircle=0;
}
}

on timer Dflash
{
setTimer(Dflash,250);
@HUT::LeftTI=!@HUT::LeftTI;
@HUT::LeftTL=!@HUT::LeftTL;
@HUT::RightTI=!@HUT::RightTI;
@HUT::RightTL=!@HUT::RightTL;
DFcircle+=1;
}

on signal DoorLockSts
{
if((StolenF0)&&(ULcircle0)&&($DoorLockSts==3))
{setTimer(Uflash,300);ULcircle=1;}
}

on timer Uflash
{
if(ULcircle<5)
{
setTimer(Uflash,300);
@HUT::LeftTI=!@HUT::LeftTI;
@HUT::LeftTL=!@HUT::LeftTL;
@HUT::RightTI=!@HUT::RightTI;
@HUT::RightTL=!@HUT::RightTL;
ULcircle+=1;
}
else
{
@HUT::LeftTI=0;
@HUT::LeftTL=0;
@HUT::RightTI=0;
@HUT::RightTL=0;
ULcircle=0;
cancelTimer(Uflash);
}
}
T-box--------------
/@!Encoding:936/
includes
{

}

variables
{
int flag1=0,flag2=0;
}

on signal_update DoorLockSts
{
if(@Tbox::ClearMsg==1)
{
@Tbox::`Message=0;
}
}

on signal DrvDoorSts
{
if((KaTeX parse error: Expected 'EOF', got '&' at position 15: DrvDoorSts==1)&̲&(DoorLockSts1))
@Tbox::Message=2; } on signal PassengerDoorSts { if(($PassengerDoorSts==1)&&($DoorLockSts==1)) @Tbox::Message=2;
}
on signal LRDoorSts
{
if((KaTeX parse error: Expected 'EOF', got '&' at position 14: LRDoorSts==1)&̲&(DoorLockSts1))
@Tbox::Message=2; } on signal RRDoorSts { if(($RRDoorSts==1)&&($DoorLockSts==1)) @Tbox::Message=2;
}

on signal DoorLockSts
{
if($DoorLockSts==3)
flag1=0;
}

on signal AudioMuteSts
{
if($AudioMuteSts==1)
@Tbox::`Message=1;
}