REPEATはTRUEになったら終わるので、 UNTIL MPGET(1,1) と UNTIL MPGET(MPHOST,1) じゃないですか？