USART with INTERRUPTS

[skimask]

Thanks for correcting my code but at 9600 baud (BRGH=31 for 20MHz)

If you're using SEROUT2 to send characters back to the PC, you need to go back and read the PBP manual on how to use it. And, you have to set up a few more registers to get the UART receive port working correctly. Read the UART section in the datasheet for a bit and come back with your results...

And which version of PBP are you using?

[skimask]

So, all you're really trying to do right now is get a 'loop back' to work?

@ device hs_OSC, wdt_on, pwrt_on, protect_off
define osc 20
Include "modedefs.bas"
trisc.6=0:trisc.7=1:trisd.0=0:serialdata var byte : counter var word : counter2 var word
main:
counter=counter+1 : portd.0 = counter.1 'toggle led on portd.0 each time thru the loop
serialdata=0:serin portc.7, n9600, serialdata:if serialdata=0 then goto main 'get serial data, if none, restart loop
counter2 = counter2 + 1:serout portc.6, n9600, [ dec counter2 , ":" , serialdata , 13 , 10 ]:goto main
end

[crhomberg]

Thanks SkiMask,

I have used and tested SEROUT2 many times without a hitch, it is sending test values just as I send them.
As far as reading the USART manual, I have been reading it for the last 2 days.
I am getting square eyes but seem to have missed something.

You saw how I used SEROUT2 in my code (is it wrong?)

Maybe I should just use HERIN instead

Regards

Chris

[crhomberg]

Yes, just a loopback

[skimask]

Yes, just a loopback

See post 6. Are you using a max232 or the resistors like in the manual?

AND WHICH VERSION OF PBP ARE YOU USING?

[crhomberg]

I tried the tester as below (cut & paste except the range) but just a a list of ascii garbage. I am monitoring using the microcode studeo serial communicator and have tried receiving at various speeds.
The output is via a 1K resistor.

Regards

Chris

´*********************************

@ device hs_OSC, wdt_on, pwrt_on, protect_off
define osc 20

DEFINE HSER_RCSTA 90h ' Enable serial port & continuous receive
DEFINE HSER_TXSTA 20h ' Enable transmit, BRGH = 0
DEFINE HSER_SPBRG 64 ' 2400 Baud @ 4MHz, 0.17%
DEFINE HSER_CLROERR 1 ' Clear overflow automatically

Pause 500

Start:
FOR SPBRG=15 to 100
HSEROUT ["SPBRG=",#SPBRG]
PAUSE 50
NEXT
stop 'put this in to do it only once
GOTO Start

[crhomberg]

By the way,

I am using PBP version 2.46

Regards

Chris

[Charles Linquis]

If you are using HSERIN/HSEROUT, you can't simply use a resistor. The data is inverted compared to what it needs to be in order to communicate with any normal serial device (such as a PC).

A MAX232 (or equivalent), not only changes the voltage swings and levels, it inverts the signals as well.