Thanks for all the help!
I got it to work with this code. now i have to get the status and turn right
fShiftedBase = $NULLFRAME ; init to all 0s
fShiftFrame = $NULLFRAME ; init to all 0s
FOR nXCounter = nXMin to nXMax
FOR nYCounter = nYMin TO nYMax
fShiftFrame.X = nXCounter * rXSize
fShiftFrame.Y = nYCounter * rYSize
; activate shifted Base
BASE_Data[1] = BASE_DATA[32] : fShiftFrame
POS
ENDFOR
ENDFOR