DIM文はループの外で実行してください。2回以上実行するとエラーになります。(プログラムの一番最初に書いたりする事が多いです。) 251~260行目は、 FOR I=0 TO MPCOUNT-1  PM[I]=BUTTON(0,I) NEXT の3行だけでOKです。 FOR アイイコールゼロ TO MPCOUNTマイナスいち  PM[アイ]=BUTTON(ゼロ,アイ) NEXT です。