Mitsubishi Electronics FR-S500 Program example, General flowchart, On COM1GOSUB*REC, Return

Communication parameters

(7) Program example

To change the operation mode to computer link operation

Program

Line number

10 OPEN"COM1:9600,E,8,2,HD"AS #1

20COMST1,1,1:COMST1,2,1

30ON COM(1)GOSUB*REC

40COM(1)ON

50 D$="01FB10000"

60 S=0

70FOR I=1 TO LEN(D$)

80A$=MID$(D$,I,1)

90A=ASC(A$)

100S=S+A

110NEXT I

120D$=CHR$(&H5)+D$+RIGHT$(HEX$(S),2)

130 PRINT#1,D$

140 GOTO 50

1000 *REC

1010 IF LOC(1)=0 THEN RETURN

1020 PRINT"RECEIVE DATA"

1030 PRINT INPUT$(LOC(1),#1)

1040 RETURN

General flowchart

Line number

10	I/O file initial
to
	setting
40
50
	Send data processing
to	Data setting
	Sum code calculation
140
	Data send

Initial setting of I/O file

Opening the communication file

ON/OFF setting of circuit control signals (RS, ER)

Interrupt definition for data receive

Interrupt enable Send data setting

Sum code calculation

Addition of control and sum codes Data send

Interrupt data receive

Interrupt occurrence during data receive

1000

Receive data processing

Interrupt to Data import

Screen display

1040

146