Serin serout problem

[lerameur]

Well here is the program that works:
but changing portb.2 to porte.2
it do not work.


INCLUDE "modedefs.bas"
@ DEVICE PIC16F877a , HS_OSC , WDT_OFF , PWRT_ON , BOD_ON , LVP_OFF , PROTECT_OFF
'HS 20mhz, watchdog off, powerup timer on, mclr external, brown out detect on, low volt program off , code protect off

DEFINE OSC 20 'use external 20mhz crystal

DEFINE LCD_DREG PORTD ' Set LCD Data port
DEFINE LCD_DBIT 4 ' Set starting Data bit (0 or 4) if 4-bit bus
DEFINE LCD_RSREG PORTC ' Set LCD Register Select port
DEFINE LCD_RSBIT 6 ' Set LCD Register Select bit
DEFINE LCD_EREG PORTC ' Set LCD Enable port
DEFINE LCD_EBIT 7 ' Set LCD Enable bit ' Set LCD Enable bit
DEFINE LCD_BITS 4 ' Set LCD bus size (4 or 8 bits)
DEFINE LCD_LINES 2 ' Set number of lines on LCD
DEFINE LCD_COMMANDUS 2500
DEFINE LCD_DATAUS 250
DEFINE CHAR_PACING 2000

Pause 2000 ' Wait 2 second

TRISA = %11111111 ' Set PORTA to all input
TRISB = %00111111
TRISC = %00010000
TRISD = %00000000
TRISE = %00000111

right var byte : left var byte
temp var word : counter var byte
rightold var word : leftold var word : speedright var byte : speedleft var byte

'************************************************* ***************************************
loop:

portb.7 =1
pause 100
portb.6 =1
pause 100

waitfor55:
serin portb.2 , n2400 , temp : if temp <> $55 then goto waitfor55
waitforaa:
serin portb.2 , n2400 , temp : if temp <> $aa then goto waitforaa

serin portb.2, n2400, rightold.LowBYTE : serin portb.2, n2400, rightold.HighBYTE
serin portb.2, n2400, leftold.LowBYTE : serin portb.2, n2400, leftold.HighBYTE

For counter=0 TO 7 'decoding
right.0[counter]=rightold.0[counter*2]
left.0[counter]=leftold.0[counter*2]
Next counter
Lcdout $fe, 1 'Clear screen
Lcdout "Left: ", Dec left
Lcdout $fe, $C0, "Right: ", Dec right
Pause 100
goto loop
end

[skimask]

Well here is the program that works:
but changing portb.2 to porte.2
it do not work.

Wow, that should work...
How about e.0 or e.1? Do they work?

[lerameur]

no does not work
I tried other B port and they work.
I tried the analog ports like porta.0 and does not work.
Should all the analog ports be used just for analog ?

k

[mister_e]

Should all the analog ports be used just for analog ?

Unless you disable the analog capability... yes

As far as i remind of this chip PORTE<2:0> have multiplex analog stuff on that you have to disable first

ADCON1=7
CMCON=7

those will help... but better if you refer to the datasheet to make sure of everything.

[lerameur]

that would include port e too?
I will need to use the analog port of portA later on too...
wouldn't that disable them ? Or do I need to find anothe rport for my serin command ?
I gues i have to play around with adcon (bit 0 to 3 )

[mister_e]

Yes indeed!

4.5 PORTE and TRISE Register
PORTE has three pins (RE0/RD/AN5, RE1/WR/AN6
and RE2/CS/AN7) which are individually configurable
as inputs or outputs. These pins have Schmitt Trigger
input buffers.
The PORTE pins become the I/O control inputs for the
microprocessor port when bit PSPMODE (TRISE<4>) is
set. In this mode, the user must make certain that the
TRISE<2:0> bits are set and that the pins are configured
as digital inputs. Also, ensure that ADCON1 is configured
for digital I/O. In this mode, the input buffers are
TTL.
Register 4-1 shows the TRISE register which also
controls the Parallel Slave Port operation.
PORTE pins are multiplexed with analog inputs. When
selected for analog input, these pins will read as ‘0’s.
TRISE controls the direction of the RE pins, even when
they are being used as analog inputs. The user must
make sure to keep the pins configured as inputs when
using them as analog inputs.

Note: On a Power-on Reset, these pins are
configured as analog inputs and read as ‘0’.

[lerameur]

yes yes yes not so big, ADCON1=2 works good for me
thanks
k

[mister_e]

I will need to use the analog port of portA later on too...
wouldn't that disable them ? Or do I need to find anothe rport for my serin command ?
I gues i have to play around with adcon (bit 0 to 3 )

Datasheet section 11, register 11-2, PDF page 130

Yes you got it !

[skimask]

Datasheet section 11, register 11-2, PDF page 130

Yes you got it !

DOH! I missed that too... jeez...somedays your on, somedays your off....
I'm a big Logic ZERO today... I think I'll go invert myself for a few hours...