[r4]: / trunk / SM3_Drive_RaspiStepper / SM3_Drive_RaspiStepper / Functions / TaskCallStepperControl / svnobj  Maximize  Restore  History

Download this file

15 lines (14 with data), 2.3 kB 

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
FUNCTION INTERNAL TaskCallStepperControl : BOOL
VAR_INPUT
    parameter : IEC_CYCLE_STRUCT;
END_VAR
VAR
    pInstance : POINTER TO StepperControl;
    pTaskInfo : POINTER TO Task_Info2;
    udiState : UDINT;
pTaskInfo := parameter.pTaskInfo;
pInstance := pTaskInfo^.pszExternalEvent; (* !! *)
udiState := parameter.pApplication^.udiState;
IF udiState <> AS_STOP THEN
    pInstance^();
END_IF