サーバー券クライアントの場合、ボタンか何かでサーバーになって待つか、クライアントになって繋ぎに行くかを決めれるようにしないと。

　具体的に間違いを指摘すると、サブルーチンの*conect内で、「sockmake 0,port」までは合っているんだけど、次に「sockopen 1,adr,port」っていうのが間違い。
　サーバーはsockmakeのあとsockwait命令で、クライアントからのsockopen命令による着信を待たないといけないわけ。「mes "接続しました"」って出してるけど、実はまだ接続(連結)していなかったり。

　…サンプル書いたほうが早いかな。