[ruby-list:42121] ＲＳ２３２Ｃによるパソコン間の通信の不具合（質問）

ノートパソコンと電子コンパスをＲＳ２３２Ｃで接続し、データを取得するプログラ
ムを検討しています。ところが、Rubyで簡単なプログラムを作成し、２台のＰＣ間の
通信状態を確認しようとしたものの、動作が不安定で、かつ動かない理由が不明で
す。
その理由がおわかりであれば、どなたか是非ご教示ください。MS-DOＳ時代は、何ら
問題無かった簡単な内容ですが、現在は、手こずり困っています。

以下に設定条件、問題点、検討したことを列記するとともに、簡易なプログラムを参
考に例示します。

　　　　　　　　　　　　　　　記

前提条件１　PC１（ＩＢＭデスクトップ）とPC２（IBMノート；USB-RS232C変換）共
に、それぞれ電子コンパスとＲＳ２３２Ｃを通じて、付属ソフトで順調に通信する。
すなわち、ＲＳ２３２Ｃケーブル等の機器設定は問題ないと思われる。

問題点１　ＰＣ１を受信状態にして、ＰＣ２から送信しても、ＰＣ１は反応しない。
　ＰＣ２を再実行し、再度送信すると、最初の実行による５０個のデータを受信後、
８個の途中まで受信する。　反応が中途半端である。

問題点２　ＰＣ１とＰＣ２の送受信を逆に変えると、ＰＣ１から一気に送信し、終了
するが、ＰＣ２では受信せず待機状態のままとなる。

検討１　　Perlで作成したプログラムでは、ＰＣ２から送信してＰＣ１で受信する
と、間違いなく送受信され、順調である。ただし、このPerlを使用しても、問題点２
の現象を示す。

Rubyでの受信
port = open("com1","r+")
i=0
while i<500
i+=1
c = port.read(1)
print c
end
port.close
----------------------
Rubyでの送信
port = open("com1","r+")
i=0
while i<50
i+=1
port.write "#{i} ==> xyz\n"
print "#{i} ==> xyz\n"
end
port.close
==================
Perlでの受信
print "====INflow===\n";
open PORT, "+<COM1";
while ($i<500){
$i++;
$a=<PORT>;
print "($i) ====>  $a";
}
close PORT;
----------------------
Perlでの送信
print "====OUTflow===\n";
open PORT, "+<COM1";
while ($i<50){
        $i++;
        print PORT "==$i =yes \n";
        print "==$i =yes \n";
}
close PORT;

矢幡 久