list p = 16F84A
include < P16F84A.inc >
__CONFIG _XT_OSC & _WDT_OFF & _PWRTE_OFF & _CP_OFF
cblock 0x20
delay_cnt
step_index
endc
; Define las fases del motor
steps DE $$0x09$$, $$0x0C$$, $$0x06$$, $$0x03$$
ORG $$0x00$$; Reset vector
GOTO main
ORG $$0x04$$; Interrupción vector
RETFIE
main:
BSF STATUS, RP0; Selecciona Bank1
CLRF TRISB; Configura PORTB como salida
BCF STATUS, RP0; Selecciona Bank0