MODULE Module1
     VAR socketdev socket_cl;

    PROC Main()
        IF DO10_2=1 THEN
            Set DI10_15;
        ENDIF

    ENDPROC

    PROC Fill()
        Set DO10_2;
        WaitTime 0.5;
        Reset DO10_2;
    ENDPROC

    PROC Pickup()
        Set DO10_3;
        WaitTime 2;
    ENDPROC

    PROC Release()
        Reset DO10_3;
    ENDPROC

    PROC Shoot()
        Reset DO10_3;
        Set DO10_2;
        WaitTime 0.5;
        Reset DO10_2;
    ENDPROC

ENDMODULE