HELP! HSER issues from old to new

[wdmagic]

Ok I found a way around to get my code to show up right, I could really use some help getting this to work.
I have a project that needs this interface and I want to get it running by the 28th before I get back home.

define OSC 4

DEFINE ADC_BITS 16 ' A/D number of bits
DEFINE ADC_CLOCK 3 ' Uses A/D internal RC clock
DEFINE ADC_SAMPLEUS 50 ' Set sampling time in us

define HSER_BAUD 9600
DEFINE HSER_BITS 8
DEFINE HSER_CLROERR 1
DEFINE HSER_RCSTA 90h
DEFINE HSER_TXSTA 20h
DEFINE HSER_SPBRG 25
DEFINE HSER_SPBRGH 0

A VAR WORD 'Stores 16 Bit Analog Reading
B VAR byte 'Temp Holder
Switch VAR PORTA.5 'Controls External FET or LED on pin 2
Switch = 0

mainloop: 
ADCIN 2, A   'Grab analog input from Pin 3

Hserout [A]		' Send char out serial port
pause 100

HSERIN [B]
if B = 5 then switch = 1 else switch = 0	
pause 100

goto mainloop		' Do it all over again

[Archangel]

Hi WD,
I am not sure which part you are having trouble with, and am presently unable to work on HSER*** but I played with your code using a 16F690 demo board and debug and pretty well got it to function, accuracy notwithstanding . . .

@ __config _INTRC_OSC_NOCLKOUT & _WDT_ON & _MCLRE_ON & _CP_OFF
; DEFINE LOADER_USER 1   ' Boot-Loader is being used
DEFINE OSC 4          ' Change to your chip
DEFINE DEBUG_MODE  0         ' Debug sending True serial data
DEFINE DEBUG_REG_PORTA       ' Debug Port = PortA as required by PICKIT2 serial Monitor
DEFINE DEBUG_BIT 0           ' Debug.bit = PortA.0
DEFINE DEBUG_BAUD 9600       ' Default baud rate = 9600
DEFINE DEBUGIN_REG PORTA     ' Debug Port = PortA as required by PICKIT2 serial Monitor 
DEFINE DEBUGIN_BIT 1         ' Debugin bit PortA.1
DEFINE DEBUGIN_BAUD 9600     ' Default baud rate = 9600
DEFINE DEBUGIN_MODE 0        ' Debugin receiving data true = 0 inverted = 1

;DEFINE HSER_BAUD	9600	' override the default of 2400
ANSEL  = 0                   ' 
ANSELH = 0       
ADCON0 = %00001011
led	VAR portc.1		' change if needed				

TrisC = %00000000
TrisA = %00000010
A VAR word 'Stores 16 Bit Analog Reading
B0 VAR byte 'Temp Holder
a=0
b0=0
Switch VAR byte
;portC = %00000000
mainloop: 
ADCIN 2, A   'Grab analog input from RA2

;
pause 100

Debugin [B0]
    IF B0 = "5" THEN
         led = 1
         Debug " high fives"
         
    else
        led = 0
        Debug " still low"
        
 
	
pause 100
Debug B0		' Send char out serial port
endif
A = a + 48
debug A

goto mainloop		' Do it all over again

Maybe something useful in there.
JS