Rac_int

[mel4853]

The interrupt works perfect but if I hold the button down for a little while then let up the interrupt will hang, but if you just wait it will come out of it and start working again.Using a 16F688.

define OSC 4
INCLUDE "DT_INTS-14.bas"     ' Base Interrupt System
include "ReEnterPBP.bas"
@ ERRORLEVEL -306   ; turn off crossing page boundary message

'-----------------------REGISTERS----------------------------------------

TRISA=%111000                                                   ' RA3,RA4,RA5 inputs
ANSEL=%00000000                                                 ' All digital
TRISC=%00000011                                                 ' RC0,RC1, input 
CMCON0=%111                                                     ' Shut off comparators
;OPTION_REG.7=0
WPUA=%111000                                                    ' Weak Pull Ups Enabled
INTCON.7=1         'Enable Global Interrupts
IOCA=%110000       'Enable IOC
'Variables---------------------------------------------------------------------
Forward var PORTC.0
ForwardBut var PORTA.4
Reversed var PORTC.1
ReverseBut var PORTA.5
Led var PORTC.2

ASM
INT_LIST  macro    ; IntSource,        Label,  Type, ResetFlag?
        INT_Handler    RAC_INT,  _Motor,   PBP,  yes
    endm
    INT_CREATE               ; Creates the interrupt processor

    INT_ENABLE   RAC_INT    ; enable ioc
 ENDASM


Main:
 high led
 pause 200
 low led
 pause 200
 goto main

Motor:
 if ForwardBut=0 then
 high forward
 pause 100
 do while ForwardBut=0
 loop 
 low forward
 endif
 
 if ReverseBut=0 then
 high reversed
 pause 100
 do while ReverseBut=0
 loop
 low reversed
 endif
 @ INT_RETURN

[mel4853]

I wasn't clear, if I push the button and release it all works fine. Just when I hold it for say 30 seconds it will freeze up as stated.

[Demon]

I wouldn't pause and loop until the button is released within the interrupt.

I'd set a flag and handle it back in main logic.

Robert