gDoStep
    movlw   .50
    call     DEMORA       ;0.25ms en Activacion Previa
 
    movlw    poOFF        ;Doy Paso Medio         -> Hasta Aqui han pasado 22us.
    movwf    PORTB
    movf    dpoPosMed,W
    movwf    PORTB
 
    movlw   .150
    call     DEMORA       ;0.75ms en Doble Activacion
 
    movlw    poOFF        ;Doy Paso Actual
    movwf    PORTB
    movf    dpoPosAct,W
    movwf    PORTB
 
    movlw   .8            ;8x0.25ms=2ms
    call    DEMORA1       ;2ms como Maximo en Simple Activacion 
 
gD1RetH
    movlw    poOFF       ;Activo Freno
    movwf    PORTB
    movlw    poBrkN
    movwf    PORTB
 
gWaitEL    isPinLj    piEnab
    goto    gWaitEL
    goto    gWaitP