Tabla de contenido
031B 0C0812 BRSET
031E 80
RTI
;********************************************************
;Respuesta a la interrupción TOF.
;Decrementa PWMCoarse, cuando 0...
;Compara PWMFine con TCR. Cuando TCR pasa PWMFine borra
;el pin de salida PWM y desactiva futuras TOF. Rehabilita RTI.
031F
TOFInt
031F 3AC1
0321 260A
0323 B6C2
TOFInt1
0325 B109
CmpMore
0327 22FC
0329 1F00
032B 1B08
032D 1608
ExitTOF
TOF
032F 80
;********************************************************
;Respuesta a la interrupción RTIF – Pone el pin PWM en alto,
;y habilita TOF. Hace PWMCoarse y PWMFine desde DesiredPWM
;
0330
RTIInt
0330 1408
0332 B6C0
0334 2719
0336 1E00
0338 A1FF
033A 2713
033C 5F
033D 48
033E 59
033F 48
0340 59
0341 48
0342 59
0343 48
0344 59
0345 B7C2
0347 BFC1
RTIInt1
0349 27D8
034B 1608
034D 1A08
034F 80
RTIInt2
07F8
07F8 0318
07FA 0300
07FC 0300
07FE 0300
RTIF,TSCR,RTIInt
EQU
*
DEC
PWMCoarse
BNE
ExitTOF
LDA
PWMFine
CMPA
TCR
BHI
CmpMore
BCLR
PWM,PORTA
BCLR
TOIE,TSCR
BSET
TOFR,TSCR
RTI
EQU
*
BSET
RTIFR,TSCR
LDA
DesiredPWM
BEQ
RTIInt2
BSET
PWM,PORTA
CMPA
#Percent100 ;¿Nivel deseado de PWM 100%?
BEQ
RTIInt2
CLRX
LSLA
ROLX
LSLA
ROLX
LSLA
ROLX
LSLA
ROLX
STA
PWMFine
STX
PWMCoarse
BEQ
TOFInt1
BSET
TOFR,TSCR
BSET
TOIE,TSCR
RTI
ORG
Vectors
FDB
TimerInt
FDB
Start
FDB
Start
FDB
Start
102
;¿interrupción RTI?
;¿PWMCoarse = 0?
;No. Borra TOF y vuelve a
;comparar los 4 más altos de TCR
;Bucle hasta PWMFine <= TCR
;Pone la salida PWM a 0 (0V)
;Deshabilita la interrupción TOF
;Reset el Flag de interrupción
;Vuelve al programa principal
;Borra el Flag de interrupción RT
;¿Conseguido el nivel deseado
;de PWM. =0?
;Si. Deja la salida PWM en bajo
;No. Pone la salida PWM en alto
;Si. Deja la salida PWM en alto
;No. Pone los 4 bits más altos
;de DesiredPWM en 4 bits bajos
;de A y 4 bits más bajos
;de DesiredPWM en los 4 bits
;más bajos de x.
;Guarda resultado en PWMFine.
;Guarda resultado en PWMCoarse.
;Si PWMCoarse=0, ir a la segunda
;mitad de la rutina TOF
;Borra el Falg de desbordamiento
;del Timer.
;Rehabilita la interrupción TOF
;Vuelve de la interrupción RTIF
;Vectores de interrupción/reset.
;Rutina interrupción del Timer.
;Vector de IRQ (no usado)
;Vector de SWI (no usado)
;Vector de Reset.
Tabla de contenido
