ndVrst
(Library)
Initializes an external device (RS232C input/output).
ndVrst
This statement provides a similar function to a VRST instruction in the conventional language.
It also directs the external device to initialize.
|
#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
|
|