Thread rs232 abfrage... leidiges thema (0 answers)
Opened by popcorn5 at 2005-10-17 19:26

popcorn5
 2005-10-17 19:26
#58959 #58959
User since
2003-09-24
60 Artikel
BenutzerIn
[default_avatar]
hallo,

ich habe ein problem mit einer rs232 abfrage bei einer cnc-maschine etwas älteren baujahres. ich übermittele einen string an einen pc (rs232 9600 baud geht leider nicht schneller) und erwarte einen längeren text zurück. dieser text ist meist zwischen 1 und 60kb gross. mein problem liegt darin, dass mein script nicht wartet bis alles übermittelt wurde, sondern bricht vorher ab :(

mit der suche kam ich nicht weiter und die doku von win32:serialport bzw. API gab auch nicht viel her.
Uns sonst scheinen wohl alle leute ihre rs232 nur zur ansteuerung von lcd's zu nutzen :/


hier ein paar codeschnipsel:

Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
my $ob = Win32::SerialPort->new ($port1) || die "Can't open $port1:$!";
$ob->baudrate (9600) || die "fail setting baudrate";
$ob->parity ("even") || die "fail setting parity";
$ob->databits (7) || die "fail setting databits";
$ob->stopbits (1) || die "fail setting stopbits";
$ob->handshake ("xoff") || die "fail setting handshake";
$ob->write_settings || die "no settings";

my $tx="L1234567890 -k .033 -0 -8.516,0 -7 .0025%\r";

$ob->write("$tx") or die ("Could not write to PC: $!");

sleep 3;

my $return;
$return = $ob->input;
undef $ob;


das ist die kurzfassung, ist aber alles relevante dabei.
vielleicht fällt jemandem was ein, danke

View full thread rs232 abfrage... leidiges thema