Witam, czy ktos jest w stanie mi pomoc?
Potrzebuje program do obslugi RS-232, ma dzialac na zasadzie "gg" miedzy dwoma komputerami. Do podlaczenia zrobilem kabel: RS232-RS232 z wykorzystaniem 3 linii (GND, oraz RxD1-TxD2, TxD1-RxD2). Z tego co wiem kabel jest OK. Mam problem z programem, bo musi byc napisany w C:( oto jego tresc w pascalu, choc i tak nie wiem czy to napewno jest dobrze:/
=========
program portycom;
uses crt,uart;
var
port:word;
znak:char;
begin
repeat
writeln('Wybierz port:');
writeln('1 = COM1');
writeln('2 = COM2');
readln(znak);
until (znak='1') or (znak='2');
case znak of
'1':port:=COM1;
'2':port:=COM2;
end;
repeat
writeln('Co chcesz robic?');
writeln('(W)ysylac tekst');
writeln('(O)dbierac tekst');
readln(znak);
until (znak='W')or(znak='w')or(znak='o')or(znak='O');
cominit(port,1200);
if (znak='W') or (znak='w') then
begin
repeat
znak:=readkey;
comsend(port,ord(znak));
write(znak);
until ord(znak)=27;{ klawisz escape }
end
else
begin
repeat
if comdataready(port) then
begin
znak:=char(comrcvd(port));
write(znak);
end;
if keypressed then znak:=readkey;
until ord(znak)=27;
end;
end.
==========
Czy ktos jest w stanie mi pomoc?