もう遅いかもしれませんが、作って見ました。 DEF ARY_RVS A VAR L%=LEN(A)-1 VAR I%=L%>>1 IF I%>0 THEN REPEAT SWAP A[I%],A[L%-I%] I%=I%-1 UNTIL I%<0 ENDIF END ２０万件の整数配列の場合、旧３ＤＳで６２フレームかかります^^;