home *** CD-ROM | disk | FTP | other *** search
/ Roboty / ROBOTS_CD.iso / CD / main.dxr / 00036_dropdown.ls < prev    next >
Encoding:
Text File  |  2005-05-13  |  836 b   |  46 lines
  1. property spriteNum, Dir, maxframe, newframe, myState
  2.  
  3. on beginSprite me
  4.   Dir = 0
  5.   myState = 2
  6.   maxframe = sprite(spriteNum).member.frameCount
  7.   newframe = 1
  8.   sprite(spriteNum).clickMode = #opaque
  9. end
  10.  
  11. on exitFrame me
  12.   if Dir <> 0 then
  13.     newframe = newframe + Dir
  14.     if newframe < 1 then
  15.       sound(2).stop()
  16.       newframe = 1
  17.       myState = 2
  18.       Dir = 0
  19.     end if
  20.     if newframe > maxframe then
  21.       sound(2).stop()
  22.       newframe = maxframe
  23.       showSubmenu()
  24.       myState = 1
  25.       Dir = 0
  26.     end if
  27.     sprite(spriteNum).frame = newframe
  28.   end if
  29. end
  30.  
  31. on dropDown me, spNum, maxF
  32.   puppetSound(2, "menuSound")
  33.   if spNum = spriteNum then
  34.     Dir = [-1, 1][myState]
  35.     maxframe = maxF
  36.     if myState = 1 then
  37.       tabClosed()
  38.       hideSubmenu()
  39.     end if
  40.   end if
  41. end
  42.  
  43. on mouseUp me
  44.   tabSelect(spriteNum)
  45. end
  46.