Filter
Top Products
86
Computer Link Operation Setting
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$="01FB10002"
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 NEXTI
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
10
40
50
140
1000
1040
: Opening the communication file
: ON/OFF setting of circuit control signals (RS, ER)
: Interrupt definition for data receive
: Interrupt enable
End data setting
Initial setting of I/O file
: Addition of control and sum codes
: Interrupt occurrence during data receive
Sum code calculation
Data send
Interrupt data receive
General sequence
Line number
to
to
I/O file
initial setting
Send data processing
Data setting
Sum code calculation
Data send
Interrupt
to
Receive data processing
Data import
Screen display