ndVType
(Library)
Designates the protocol for communication with an external device (RS232C output).
ndVType (<2-digit integer>)
This statement designates the communication protocol for ndVis, ndJf, ndVset, ndVrst, ndVput, and ndVcom. The initial value of each library is set in the new protocol.
(Old protocol = 0/new protocol = 1)
|
#include <Pacman.h>
|
|
|
PROGRAM PRO1
|
|
|
DEFINT JF_VAL = 0
|
|
|
FLUSH
|
|
|
CALL ndVType(1)
|
'Sets the protocol (Conventional = 0/ New = 1).
|
|
CALL ndVrst
|
'Initializes the external device.
|
|
CALL ndVset(0)
|
'Clears the received data (VDT) to 0.
|
|
CALL ndVis(3)
|
'Starts up the external device (Sends 03).
|
|
CALL ndJf(3,JF_VAL)
|
'Obtains a response result from the external device
'(Sends 03).
|
|
IF JF_VAL = TRUE THEN
|
'Receives data, if the response is OK (TRUE).
|
|
CALL ndVset(3)
|
'Receives 10 data from the external device (Sends 03).
|
|
CALL ndVdt(pacPOS,1)
|
'Assigns the data received from the external device
'to variable (P1).
|
|
CALL ndVdt(pacJNT,1)
|
'Assigns the data received from the external device
'to variable (J1).
|
|
CALL ndVdt(pacTRN,1)
|
'Assigns the data received from the external device
'to variable (T1).
|
|
END IF
|
|
|
END
|
|