$regfile = "m169def.dat"
$crystal = 8000000
$baud = 9600

DIM State As Byte

'------[ Pin Change ]-------------------------------------------------------------
'
'PortE and PortB have alternate pin change interrupt functions... pcint15 through pcint0

SET EIMSK.6 '<-- this is the pin change interrupt enable bit for PortE (PCInt7 through PCInt0)

'the following sets PortE.0 as a source for pin change interrupt
PCMSK0 = &B00000001

ON PCINT0 pin_change0_isr

Enable Interrupts

'
'------[ Main ]----------------------------------------------------------------
'

Do
  'something
Loop

'
'------[ Interrupt service routines ]-------------------------------------------
'

pin_change0_isr:

 State = PinE.0

 PRINT "Interrupt sensed on PinE.0 transition to "; State

Return