そのSET_ARRAYに引数MAを入れる DEF SET_ARRAY POS,NUM,MA IF CHKVAR(BUF)==0 THEN VAR BUF[MA] BUF[POS]=NUM END