Serin -> Hserout -> Hserin -> LCDOUT

[thasatelliteguy]

I have been trying for months to get a PIC16f1829 to accept input via Hserin from a PC terminal with zero success. I have discovered that PIC to PIC, it seems to work fine. So my idea is to put another PIC in place to handle the communications. I want to go from the serin to hserout on PIC1, and hserin to variable on PIC2. But no matter how I do it, it gives me random 3 digit numbers like 255,186,204... many times it's the same number for different letters typed. I have tried every combination I have kkkkkkkkkkkkkkkkkkkkkkkk0k ;llll.

[EarlyBird2]

Is this your current code

DEFINE HSER_RCSTA 90h ' Enable serial port & continuous receive
DEFINE HSER_TXSTA 24h ' Enable transmit, BRGH = 1
DEFINE HSER_SPBRG 129 ' 9600 Baud @ 20MHz, 0.16%
DEFINE HSER_CLROERR 1 ' Clear overflow automatically
APFCON0.2 = 1
APFCON0.7 = 1
OPTION_REG.6 = 1

For hardware usart I have never used the last three lines and I am wondering what they do. Any ideas anybody?

[thasatelliteguy]

first two set the rx/tx pins. this pic has two sets. the third is interrupt edge selection... shouldnt affect usart

[EarlyBird2]

first two set the rx/tx pins. this pic has two sets. the third is interrupt edge selection... shouldnt affect usart

Yes there are two eusart one on PortB5/7 and one on PortC4/5. A bit more of your code

stowlight var byte
stowlight = 1
TRISC.6 = 1
DOWN var PORTC.1
TRISC.1 = 0
DOWN = 0
EAST var PORTC.2
TRISC.2 = 0
EAST = 0
WEST var PORTC.5
TRISC.5 = 0
WEST = 0
UP var PORTC.0
TRISC.0 = 0
UP = 0
RX var PORTC.6
TRISC.6 = 1

shows you have RX on Portc.6 and that Portc.5 which is the RX pin is the var WEST. Unless I have read the wrong datasheet.

[EarlyBird2]

After some more thinking time #4 code uses serin not Hserin. Could we see the code using Hserin please?

[thasatelliteguy]

Ive tried it hundreds of ways. It just doesn't work. Or rather, it works fine, but it will not acknowledge input from my terminal on my PC

' Name        : HSERX.pbp
' Compiler    : PICBASIC PRO Compiler 2.6
' Assembler   : PM or MPASM
' Target PIC  : 40-pin 16F877A, 18F452 or similar
' Hardware    : LAB-X1 Experimenter Board
' Oscillator  : 4MHz external crystal
' Keywords    : HSERIN, HSEROUT, LCDOUT
' Description : PICBASIC PRO to send and receive from the hardware
' serial port.
'


' Define LOADER_USED to allow use of the boot loader.
' This will not affect normal program operation.
Define LOADER_USED 1


DEFINE HSER_RCSTA 90h ' Enable serial port & continuous receive
DEFINE HSER_TXSTA 24h ' Enable transmit, BRGH = 1
DEFINE HSER_SPBRG 77 ' 9600 Baud @ 20MHz, 0.16%
DEFINE HSER_CLROERR 1 ' Clear overflow automatically
APFCON0.2 = 1    'TX Pin Select -  0 = Pin B7  1 = Pin C4
APFCON0.7 = 1    'RX Pin Select -  0 = Pin B5  1 = Pin C5
OPTION_REG.6 = 1


#CONFIG
    __config _CONFIG1, _FOSC_HS & _WDTE_OFF & _PWRTE_OFF & _MCLRE_ON & _CP_OFF & _CPD_OFF & _BOREN_OFF &  _CLKOUTEN_OFF & _IESO_OFF
    __config _CONFIG2, _PLLEN_OFF & _LVP_OFF
#ENDCONFIG


DEFINE OSC 8
 
ANSELA = 0
ANSELB = 0
ANSELC = 0




DEFINE LCD_DREG PORTB
DEFINE LCD_DBIT 4
DEFINE LCD_RSREG PORTA
DEFINE LCD_RSBIT 0
DEFINE LCD_EREG PORTA
DEFINE LCD_EBIT 1
DEFINE LCD_BITS 4
DEFINE LCD_LINES 2
DEFINE LCD_COMMANDUS 1500
DEFINE LCD_DATAUS 44
LED var PORTC.7
high LED




char Var word       ' Storage for serial character
col  Var Byte       ' Keypad column
row  Var Byte       ' Keypad row
key  Var Byte       ' Key value
lastkey Var Byte    ' Last key storage
bklt var PORTC.7
TRISC.7 = 0
bklt = 1


   ADCON1 = 7       ' Set PORTA and PORTE to digital
   Pause 500	    ' Wait for LCD to startup


   OPTION_REG.7 = 0 ' Enable PORTB pullups


   key = 0          ' Initialize vars
   lastkey = 0
   Lcdout $fe, 1    ' Initialize and clear LCD display
   lcdout $FE, $01, "LCD IS WORKING"
   lcdout $FE, $C0, "LINE 2 WORKS 2"
   pause 5000
   LCdout $FE, $01
   
mainloop:
   Lcdout $FE, $01, "..."
   lcdout dec char             ' Send char to display
   Hserin [char] ' Get a char from serial port
   
   
Goto mainloop            ' Do it all over again




   End

[thasatelliteguy]

I (think) have had a EUREKA moment! Look, my problem in a nutshell is that I cannot get serin data thru to my pic while hard interrupts are firing at 50hz. This means I can't get the data thru to tell my dish to stop. And I cannot prioritize the serial data over the interrupts because it'll miss pulses and get lost. Hserin/Hserout seems much better but I cannot get hserin to respond, except from another pic. I did not, however, have this problem when it was all in one piece and I was sending button presses as commands instead of data streams. Even with fast interrupts going, it'll still realize a pin has gone high, and respond accordingly. So... since I was going to add a low-end pic like 628A to sit around and wait for serin commands and send out hserout commands to the main pic anyway, I'm just going to have it send simulated button presses instead. I'll run the TX from the BT to the 628A, and it'll sit around waiting for serial data from the handheld in a serin command, and I'll run the RX from the BT straight to the 1829, so that the handheld can receive responses and confirmations via hserout commands. Then I'll program the 1829 just as if I had physical buttons hooked up to control it, but it will in fact be the 628A "pressing the buttons". Since my handheld device only has 4 buttons on it anyway, it'll even be fairly easy to program and keep it straight in my head because the 1st pic is simply going to receive "A" "B" "C" or "D" (via serin) from the pic in the handheld (probably another 628A) and forward a "button press" to the 1829. Since the 628A will have no other task in life, it should be ultra-reliable.


Any input on this idea?

So far I think this'll be my best bet to get the "walking" and "gum chewing" without the "crashing into S***".....