Hi, Russ

Having a look to your scheme, I was at the end able to discover you work with inverted I/Os ...

so ... that gives

'device: 16F627A master clear is on pin#4 (RA5)


PORTA = 0
CMCON = 7 'PortA inputs to be DIGITAL
TRISA = %00010000 ' port A all outputs, except MCLR is input

PORTB = %11100000
TRISB = %00111111 'PORT B ALL INPUT, EXCEPT 6 & 7 OUTPUT

option_REG = %01111111 'enable weak pullups on port B
INTCON = %10001000 'Enable Interrupts on PORTB.4-7


FOOTSW var portb.5 'Foot switch OR CCREADY must be high
READY var portb.4 'at start

'FOOTSW var portb.4 '************ On Alan's testboard **************
'READY var portb.3 ' ************ " **************

T var word
J VAR WORD


RENCA var portb.7 'FREQUENCY OUTPUT TO J1 PIN 13
EJECT var portb.6 '100 mS PULSE TO J1 PIN 21

on interrupt goto poo


START:
High RENCA : High EJECT

WHILE READY = 0

'zzzzzzzzzzzzzzzzzzzz ... waiting !!!
WEND

GOTO Start 'GOTO what to do if not ready ???




DISABLE INTERRUPT

poo:

IF FOOTSW THEN false 'we are looking for a Portb.5 interrupt ... not PortB.4 or else

T = 1' 000 '1mS AT 4 mHZ ...........Note: 1000 for MPSIM or testboard , 1 for real


freq: ' Note : I Use a blinking Led on my testboard ....

TOGGLE RENCA
PAUSE T 'frequency should be 500 Hz (2mS period)

GOTO freq

false:

RESUME
ENABLE INTERRUPT

end



> Renca and Eject have to be initialised to "1" ( not zero ...)

" IF FOOTSW THEN false 'we are looking for a Portb.5 interrupt ... not PortB.4 or else "

> The test must work ( jump around 500 Hz generating ) if START is on the "1" State ... not Zero.


Try to understand what the program does, instead of Copiying it rudely as is ...

I know it is not so easy ... but try.

Alain