danke,
ich will einen rs485 treiber verwenden. natürlich mit control port. senden geht aber ich empfange nichts obwohl die steuerleitung low ist.
SerPort2 = 9600, Stop1; // do not change baudrate at runtime
// Choose port and pin for RS485 line driver
SerCtrl2 = PortB, 2, Positive;
RxBuffer2 = 64, iData;
TxBuffer2 = 64, iData;
Serport = 19200, Stop2; {Baud, StopBits|Parity}
RxBuffer = 64, iData;
TxBuffer = 64, iData;
begin
InitPorts;
// portd.5 := TRUE;
// pca9555Init;
mdelay(50);
EnableInts;
loop
WATCHDOGTRIG;
sendRxBuf;
MDELAY(100);
if SerStat2 = true then
x := SerInp2;
serout(x);
endif;
endloop;
This Message Was Entirely Written Using Recycled Electrons