ON INTERRUPT questions

[Acetronics2]

I did just a little try ...16F84A, button on PortB.0, Led on PortB.7

see :

'Test Blink

ON INTERRUPT GOTO Period
DISABLE INTERRUPT


DEFINE LCD_Ebit 1

I var Bit
Periode var Word

Led var Portb.7
Led = 0
Periode = 64


loop:

INTCON.4 = 1

For I = 1 to 1000
Pauseus Periode
Next I

Toggle led

Goto loop


Period:

INTCON = $80

Periode = ( Periode /2 )

IF NOT Periode THEN
Periode = 64
ENDIF


GOTO loop




END


the HEX, now, in the Program Window

Change line 5 ( RETURN ) to ( GOTO 0x54 ) ....

ENJOY !!!

That's all !!!