I'm trying to learn DT's Interrupt, from the original I modify a little. I added 2 buttons to trigger the external interrupt.. but don't know how, it works only on Button 1.
Code:
INCLUDE "modedefs.bas"
INCLUDE "DT_INTS-14.bas" ; Base Interrupt System
INCLUDE "ReEnterPBP.bas" ; Include if using PBP interrupts
TrisB = %00000111
PortB = %00000000
LED1 VAR PORTB.6
x var byte
x=0
ASM
INT_LIST macro ; IntSource, Label, Type, ResetFlag?
INT_Handler INT_INT, _ToggleLED1, PBP, yes
endm
INT_CREATE ; Creates the interrupt processor
ENDASM
@ INT_ENABLE INT_INT ; enable external (INT) interrupts
Main:
PAUSE 1
High PortB.7
pause 20
low PortB.7
Pause 20
GOTO Main
'---[INT - interrupt handler]---------------------------------------------------
ToggleLED1:
serout 5,2400, [$FE, 1]
serout 5,2400,[254,192]
SEROUT 5,2400,[" Val ",#x] ' Send x value to LCD
TOGGLE LED1
x=x+1
@ INT_RETURN
Can any one tell me what I'm missing?
thanks in advance
Bookmarks