property porigh, porigv, psprite

on beginsprite me
  psprite = me.spritenum
  sprite(pSprite).pOrigh = sprite(pSprite).loch
  sprite(pSprite).pOrigv = sprite(pSprite).locv
  
end

on reposition me
  sprite(pSprite).loch = pOrigh
  sprite(pSprite).locv = pOrigV
end
