存在しない端末番号を処理しようとするとエラーが出ます。
今、4人の変数を全て別名を使用されていますが、配列にした方がいかもです。
DIM PM[4]
というのを事前に書いておいて、
IPB→PM[0]
IIPB→PM[1]
IIIPB→PM[2]
IVPB→PM[3]
に変更します。
そして、
FOR I=0 TO MPCOUNT-1
PM[I]=BUTTON(0,I)
NEXT
とすればエラーは出ないはず。
DIM文はループの外で実行してください。2回以上実行するとエラーになります。(プログラムの一番最初に書いたりする事が多いです。)
251~260行目は、
FOR I=0 TO MPCOUNT-1
PM[I]=BUTTON(0,I)
NEXT
の3行だけでOKです。
FOR アイイコールゼロ TO MPCOUNTマイナスいち
PM[アイ]=BUTTON(ゼロ,アイ)
NEXT
です。