SOmething along these lines may work,  I have seen a better example on here somewhere.
Sub Main()
If OemTrigger1 And GetVar(1000)< 1 Then GoTo N2
If OemTrigger1 And GetVar(1000)> 0 Then GoTo N3
GoTo N4
N2: 
ActivateSignal(output5)
SetVar(1000,1)
GoTo N4
N3:
DeactivateSignal(output5)
SetVar(1000,0)
GoTo N4
N4:
End Sub
End
OR maybe something like this
If OemTrigger1 And GetVar(1000)<1 Then                
   ActivateSignal(output5)
   SetVar(1000,1)                              '
  End If                                        
  If OemTrigger1 And GetVar(1000)>0 Then                '
   ActivateSignal(output5)
   SetVar(1000,0)                              
  End If        
  
  End
Hope it helps, (;-) TP