FOR I=1 TO PRGSIZE(1) PRGEDIT 1,I　←プログラム取得先設定 MPSEND PRGGET$() ←プログラム送信 @W 　　MPRECV OUT M,DT$ IF DT$!="" THEN @W ←受信完了待ち NEXT