On Int0 GoSub label
On Int1 GoSub label
On Int2 GoSub label
On Int3 GoSub label
This command must be called before accepting external interrupts. Cubloc has 4 external interrupt pins. The interrupt pins can be set to sense input on the rising edge, falling edge, or both.
The Set OnIntx command must be used with this command in order for the interrupt to work.
* The CB220 has no external interrupt inputs.
Dim A As Integer On Int0 GoSub GETINT0 Set Int0 0 'Falling Edge Input Do Loop GETINT0: A=A+1 'Record number of interrupts Return