Mitsubishi FR-S500 Instruction Manual page 156

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
20 COMST1,1,1:COMST1,2,1
30 ON COM(1)GOSUB*REC
40 COM(1)ON
50 D$="01FB10000"
60 S=0
70 FOR I=1 TO LEN(D$)
80 A$=MID$(D$,I,1)
90 A=ASC(A$)
100 S=S+A
110 NEXT I
120 D$=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
40
50
Send data processing
Data setting
to
Sum code calculation
140
Data send
setting
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