Table of Contents
Advertisement
11 INSTRUCTIONS AND FUNCTIONS
400 ZRECEIVE #CH%,0,TBL2%( ),CTBL%( )
410 LOCATE 0,15
420 PRINT "RECEIVE CHARACTER =";TBL2%(1)
430 FOR I%=0 TO WOR%-1
440 LOCATE 0,16+I%
450 PRINT "RECEIVE DATA =&H";HEX$(CTBL%(I%))
460 NEXT I%
470 RETURN 310
480 '
490 '***** ERROR ROUTINE *****
500 ERTYPE%=ERR:ERLINE%=ERL
510 IF ERTYPE%=17 THEN PRINT "ZOPEN ERROR!!"
520 PRINT "ERROR CODE =";ERTYPE%
530 PRINT "ERROR LINE =";ERLINE%
540 RESUME 310
11 - 159
:
' Executes the reception operation
:
' Displays the number of received
characters
: ' Displays the data received
:
' Stores the error occurred, and the line
:
' Notifies if it is a Z-related error
:
' Displays the error code
:
' Displays the line where the error occurred
:
' Returns the operation to line 310
MELSEC-Q
11 - 159
Advertisement
Table of Contents
