User's Manual
8>&&&&&)0,5*))0,5&)55,*)&LM
tag % ! ! !$
len 16-bit integer$ " " !
GET func P C - PREAD PWRIT$ len
" "!( (
! )" $ bufr !$
bufr 9 ("$ # " bufz
!$ % ! # )" !
)" PWRIT$ 9 ! !
(" ($ + POPEN' PREAD'
PCONT )"' (" "!$ <
PWRIT )"' bufr " !
bufz$ len " 2
(" (# !$ ! '
" ! !"
(# ! " len bufz$
bufz 16-bit integer$ 9 (" 2 bufr$
% ( (" GET "
PWRIT PREAD $ : PWRIT ' bufr buf !
!# ( "$ : bufr GET "' buf ACEPT " ( "$ +
PREAD ' # bufr ACEPT " ( "$
,7!&8A 2% ,.* ,!!
len @GET A bufr @GET A buf @ACEPT A bufz @GET A
/
/
$ bufr GET
len >
bufz
,7!&88A ,.* ,!!
len @GET A bufr @GET A buf @ACEPT A bufz @GET A
$
& len
&
7 ! ! ! ! )" ( GET
$
ACEPT(tag,err[,buf])
tag % ( " ! !$ : PREAD
)"' " (" ( "
( !$
err 16-bit integer$ , "$
buf 9 (" ( PREAD
""" )" # PWRIT )"$