home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / BoxKite.dxr / Untitled-1_6_character.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  433 b   |  18 lines
  1. property obj, spriteNum, firstframe, secondframe
  2.  
  3. on beginSprite me
  4.   obj = sprite(spriteNum)
  5.   firstframe = member(obj.member.name.char[1] & "1")
  6.   secondframe = member(obj.member.name.char[1] & "2")
  7.   obj.member = firstframe
  8.   timeout("animate" & spriteNum.string).new(1000, #animatemember, me)
  9. end
  10.  
  11. on animatemember me
  12.   if obj.member = firstframe then
  13.     obj.member = secondframe
  14.   else
  15.     obj.member = firstframe
  16.   end if
  17. end
  18.