0 Members and 1 Guest are viewing this topic.
:If Y-Q/8=1 and (Q>0):Q-1→Q:Vertical +{^r}:RecallPic :Y/8*W+(X/8)→C:For(A,0,11:Pt-Off(A*8,{-}(Q^8),{C+A+GDB1}*8+Pic110:End:StorePic :End::If Y-Q/8≥6 and (Q/8+7<H):Q+1→Q:Vertical -{^r}:RecallPic :Y/8+6*W+(X/8)→C:For(A,0,11:Pt-Off(A*8,64-(Q^8),{C+A+GDB1}*8+Pic110:End:StorePic :End
Nice! btw, this is not really an RPG since it not really overhead, right?