property pOrigcode, pSprite, pPopulated, pOrigh, pOrigV, pOrigfontsize, pOrigHeight, pOrigWidth

on beginsprite me
  pSprite = me.spritenum
  pOrigcode = sprite(pSprite).member.text
  pOrigfontsize = sprite(pSprite).member.fontsize
  pOrigHeight = sprite(pSprite).member.height
  pOrigWidth = sprite(pSprite).member.width
  sprite(pSprite).member.text = " "
  sprite(pSprite).pPopulated = 0
  sprite(pSprite).pOrigh = sprite(pSprite).loch
  sprite(pSprite).pOrigv = sprite(pSprite).locv
  
  
end

on resetcode me
  sprite(pSprite).member.text = pOrigcode
  
end

on resetfontsize me
  sprite(pSprite).member.fontsize = pOrigfontsize
  sprite(pSprite).member.height = pOrigHeight
  sprite(pSprite).member.height = pOrigWidth
end


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


on mousedown me
  if sprite(pSprite).pPopulated = 0 then
    resetcode me
    sprite(pSprite).pPopulated = 1
  else
    pass
  end if
end
