Problem with WHILE - WEND

[Russ Kincaid]

I compared the .ASM files: If it is true that lines starting with semicolon are comments, and if lines starting at the far left edge are wraparound from the previous comment, then there are no differences in the files. Otherwise, there are significant differences. So, if the .ASM files are the same, why would the .HEX files be different?

[Acetronics2]

Hi,Russ

May be Osc is Xtal for me ...

The first line gives config word ... in fact the HEX files decoding is quite simple ...

Alain

[Russ Kincaid]

I programmed my PIC using your .HEX file. Even tho my .HEX file is different, the operation is the same: Oscillator starts with power up, RENCA is low, nothing happens when FOOTSW goes low, but oscillator stops when RENCA goes high. This is my circuit:

[Acetronics2]

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

[Russ Kincaid]

I have learned a lot, working on this problem, but the problem was that I had all my configuration fuses enabled (except protection). Thanks to ?wumpus (I forget his handle), I disabled low voltage programming and all is well now.