DATA4 VALUE (LL)

SIGNED LONG VALUE = ALARM HI

$85 - LAL Setpoint ------------------------------------------------------------------------

TX

DATA1

VALUE (HH)

 

DATA2

VALUE (H)

 

DATA3

VALUE (L)

 

DATA4

VALUE (LL)

 

SIGNED LONG VALUE = ALARM LO

 

$86 - Tag ID selection--------------------------------------------------------------------

TX

DATA1

Tag ID (0=Tag0, 1=TagA, 2=TagB,.....,19=TagS)

 

DATA2

-

 

DATA3

-

 

DATA4

-

 

$87 - Tag description --------------------------------------------------------------------

TX

DATA1

Char position (0÷7)

 

DATA2

'X' (ASCII CODE)

 

DATA3

-

 

DATA4

-

 

15.3.3Communication programs

In this paragraph are illustrated two examples of communication programs between the OSP and an IBM or IBM compatible PC.

Example A:

Data transfer from OSP to PC

Connect OSP through adapter BB530001 (TTL-RS232 converter), to personal computer communication port COM1. You will read temperature value.

Example B:

PC instructions to OSP

Connect OSP through adapter BB530001 (TTL-RS232 converter), to personal computer communication port COM1. You will set emissivity to 0,80.

Example A:

1Ø CHAR = Ø

2Ø IDNAME = 1

3Ø INSTRUCTION = 0

35 OPEN "COM1: 96ØØ, N,8,1,CD,CS,DS,RS" FOR RANDOM AS # 1

4Ø PRINT #1, CHR$ (IDNAME);:REM TRANSMIT IDNAME TO OSP

5Ø WHILE LOC (1) = Ø: WEND: REM WAIT RECEIVING IDNAME FROM OSP

6Ø IDNAME = ASC (INPUT$ (1, 1)): REM READ RECEIVED IDNAME FROM OSP 7Ø PRINT #1, CHR$ (INSTRUCTION);

8Ø WHILE LOC (1) = Ø: WEND

9Ø INSTRUCTION = ASC (INPUT$ (1, 1)) 1ØØ PRINT #1, CHR$ (CHAR);

11Ø WHILE LOC (1) = Ø: WEND

12Ø DATA 1 = ASC (INPUT$ (1, 1)) 13Ø PRINT #1, CHR$ (CHAR); 14Ø WHILE LOC (1) = Ø: WEND 15Ø DATA 2 = ASC (INPUT$ (1, 1)) 16Ø PRINT #1, CHR$ (CHAR); 17Ø WHILE LOC (1) = Ø: WEND 18Ø DATA 3 = ASC (INPUT$ (1, 1)) 19Ø PRINT #1, CHR$ (CHAR); 2ØØ WHILE LOC (1) = Ø: WEND 21Ø DATA 4 = ASC (INPUT$ (1, 1)) 22Ø PRINT #1, CHR$ (CHAR); 231Ø WHILE LOC (1) = Ø: WEND 24Ø CHKSUM = ASC (INPUT$ (1, 1))

25Ø IF CHKSUM <> ((DATA1 + DATA2 + DATA3 + DATA4) AND &HFF) THEN PRINT "Error": END 26Ø VALUE = DATA3 * 256 + DATA4

27Ø IF VALUE > 32767 THEN VALUE =VALUE - 65536: REM 2'S COMPLEMENT

50

Page 50
Image 50
Omega OSP SERIES manual Communication programs, Example a Data transfer from OSP to PC, Example B PC instructions to OSP