[SAMPLE48] SAMPLE

[ON_COM_GOSUB] を参照して下さい。

COM割り込みルーチン
10 OPEN "com: 38400,n,8,1,x" AS #2
20 OPEN "com5: 38400,n,8,1,x" AS #3
30 SEND$="Hello! Who are you?"
40 ON COM (1) GOSUB 130
70 PRINT "start!"
80 PRINT #3,SEND$
90 INPUT "Push any key!";I
95 COM (1) ON
100 GOTO 100
110 COM(1) OFF
120 END
130 COM(1) OFF:LINE INPUT #2,AS$:PRINT S$:RETURN 110

 1台のパソコンでRS232C(COM)通信をしています。
COM5:ポートはUSB変換コネクター(1方がUSBコネクター、他方がRS232Cコネクター)
により増設したCOMポートです。
 COM1とCOM5は通常の通信ケーブルRS232C Cross(Reverse)ケーブルで接続します。
80行で割り込み許可をし、90行で送信しています。
40行によりCOM1ポートが受信した時点で130行に飛びます。
割り込み処理後は110行に返し、jyobの終了。