ESP_W

On SingleValue do
Let,1,%eventvalue2%
if [VAR#2]<[VAR#1]
Let,3,[VAR#1]-[VAR#2]
Let,4,0
elseif [VAR#2]=0
Let,3,[VAR#1]
Let,4,0
else
Let,3,[VAR#2]-[VAR#1]
Let,4,2
endif
LongPulse,[VAR#4],1,[VAR#3]
Let,2,[VAR#1]
TaskValueSet,10,4,[VAR#2]
TaskValueSet,10,1,%eventvalue%
endon