XDEVSNDRCV
XDEVSNDRCV( $cmd , $trm , $maxlen , $regex )
XDEVSNDRCV sendet das Kommando $cmd an das mit XDEVOPN geöffnete device und
wartet auf eine Rückmeldung bis die Zeichenkette $trm erkannt wird oder die maximale Länge $maxlen erreicht wurde.
Die Rückmeldung wird mit dem regulären Ausdruck $regex verglichen und die Ergebnisse in der Systemvariablen $sysmatch zurückgeliefert.
Die Schnittstelle muss zuvor mit XDEVOPN geöffnet werden.
$conf = 'COM(9600,8,N,1)';
XDEVOPN( '/dev/ttyS1' , $conf )
$regex = '~^(ST|US|OL|UL),(GS|NT), *([0-9\.\-]{1,8}),(kg|lb)\r\n~i';
XDEVSNDRCV( "READ\r\n" , "\r\n" , 30 , $regex )
if (empty($syserror))
{
$weight = $sysmatch[3];
$unit = $sysmatch[4];
XLOGW( "$weight $unit" )
}
XDEVCLS( 0 )XDEVCLS
XDEVOPN
XLOGW
$syserror
$sysmatch
