5 REM *** 10 REM Example Communication Program for F2-CP128 15 REM 20 REM This is a generic example showing how to read data 25 REM from a serial device (scale, bar code, etc), parse numeric 30 REM data from the string and write the numeric data to the PLC 35 REM 40 REM This example assumes that the data is in the following format: 45 REM ##########CRLF 50 REM *** 55 STRING 2551,254 : REM Allocate String Space 10*254 Strings 60 SETPORT 1,9600,N,8,1,N : REM Programming/Monitoring 65 SETPORT 2,9600,N,8,1,N : REM Scale 70 SETINPUT 1,1,10,0,1000,20 : REM Define how INPUT will work 75 REM --- 80 PRINT1 "Waiting for Data" 85 REM --- 90 REM INPUT2 ,$(0) : REM Input Data to String 0 ($(0)) 95 $(0)="1234567890" 100 REM IF INPLEN=0 THEN PRINT1 "Device Timed Out" : GOTO 130 105 XHI=VAL(MID$($(0),1,2)) : REM Get High Word 106 XMD=VAL(MID$($(0),3,4)) : REM Get Mid Word 107 XLO=VAL(MID$($(0),7,4)) : REM Get Low Word 110 S205_VB(2002)=XHI 111 S205_VB(2001)=XMD 112 S205_VB(2000)=XLO 145 REM --- 150 REM GOTO 130 : REM Loop