//speech recognition example
//load the file "srsample.wvr" into the speech4winplc program
//then click the "LOAD COMMANDS" in that program
VAR1 = 0
TimeStep ON
TIMESTEP = 1000
CLEARALLIO
//main loop
LABEL WINPLC
IF VAR1 = 0000 Then
//invert IO channel 13 every second
INVERTIO 13
END IF
GOTO WINPLC
//Subroutine INTERRUPT_FLASHING: called when STOP was said
SUB INTERRUPT_FLASHING
Timestep OFF
CLEARIO 13
//var1 = 1 means: no flashing
VAR1 = 1
TimeStep ON
END SUB
//Subroutine CONTINUE_FLASHING: called when START was said
SUB CONTINUE_FLASHING
//var1 = 0 means: flashing enabled
VAR1 = 0
END SUB
