SEROUT Just Garbage!

[Kman]

I Think your Oscal might be off or Lost!
Try this code below to see.

'Lost oscal recover program
' Use Hyper_Term settings "9600 N,8,1"
'
@ DEVICE pic12F675
@ DEVICE pic12F675, INTRC_OSC_NOCLKOUT
@ DEVICE pic12F675, WDT_OFF
@ DEVICE pic12F675, MCLR_OFF
@ DEVICE pic12F675, CPD_OFF
@ DEVICE pic12F675, BOD_OFF
@ DEVICE pic12F675, PWRT_ON
@ DEVICE pic12F675, PROTECT_OFF
SO VAR GPIO.0 ' serial out pin

ANSEL = 0 ' disable converters
CMCON = 7 ' disable comparators

OSCCAL = 0 ' starting value

Pause 2000

loop:
OSCCAL = OSCCAL + $10 ' increment calibration value
SerOut2 SO,16468,[HEX2 OSCCAL, " This is a close OSC Value!",10,13] ' Display the hex value

Pause 750 ' give time to read the value
GoTo loop ' do it forever

[geckogrotto]

Ok I had to make a chane to get it to compile mine doesn't like how you did the defines but here it is
@ __CONFIG _INTRC_OSC_NOCLKOUT & _WDT_ON & _PWRTE_ON & _MCLRE_OFF & _BODEN_ON & _CP_OFF & _CPD_OFF

SO VAR GPIO.0 ' serial out pin

ANSEL = 0 ' disable converters
CMCON = 7 ' disable comparators

OSCCAL = 0 ' starting value

Pause 2000

loop:
OSCCAL = OSCCAL + $10 ' increment calibration value
SerOut2 SO,16468,[HEX2 OSCCAL, " This is a close OSC Value!",10,13] ' Display the hex value

Pause 750 ' give time to read the value
GoTo loop ' do it forever

I setup hyperterm with the settings you said and then set it to vt100 as well? its running now will let you know how it does.

[geckogrotto]

Also I should be using pin 2 on serial as the input? and pin 5 to ground?

[Kman]

The Gpio.0 ---->1k resistor---->pin 2 on a DB9 "rxpin" --->computer

[geckogrotto]

Ok cool I left it running for a while and got
80
90
A0
B0
all close so how do I program that into the chip?
I mean permanitly because I think I lost it on a number of chips when I very first started.
Using Pic Kit 1 I don't see a way to manually set it.

[geckogrotto]

Also could I get a sample of using SERIN?
I have tried this and it outputs the hello world and then waits there and never loops. So I can only assume that its not getting the "A" char when I try and send it.

InputSig var GPIO.0

loop:
SerOut Inputsig,N2400,["Hello World",13,10]
Serin InputSig,N2400,["A"]
Pause 200
GoTo loop

[mister_e]

SerOut Inputsig............
Serin InputSig............

must be a copy/paste error...