home *** CD-ROM | disk | FTP | other *** search
/ Knitting Made Easy / Knitting.iso / App / Patterns.dxr / behaviors_101_rollsquare.ls < prev    next >
Encoding:
Text File  |  2002-04-18  |  1.4 KB  |  38 lines
  1. property standardImage, alternateImage, nextCM
  2.  
  3. on mouseEnter me
  4.   temp = the currentSpriteNum + 1
  5.   set the member of sprite temp to me.alternateImage
  6. end
  7.  
  8. on mouseLeave me
  9.   temp = the currentSpriteNum + 1
  10.   set the member of sprite temp to me.standardImage
  11. end
  12.  
  13. on beginSprite me
  14.   temp = the currentSpriteNum + 1
  15.   me.standardImage = the member of sprite temp
  16.   if nextCM = 1 then
  17.     memref = the member of sprite temp
  18.     castLibNum = memref.castLibNum
  19.     alternateImage = member(memref.memberNum + 1, castLibNum)
  20.   end if
  21. end
  22.  
  23. on getPropertyDescriptionList
  24.   if the currentSpriteNum = 0 then
  25.     memdefault = 0
  26.   else
  27.     memref = the member of sprite the currentSpriteNum
  28.     castLibNum = memref.castLibNum
  29.     memdefault = member(memref.memberNum + 1, castLibNum)
  30.   end if
  31.   p_list = [#nextCM: [#comment: "Use Next Member:", #format: #boolean, #default: 1], #alternateImage: [#comment: "Rollover Cast Member:", #format: #graphic, #default: memdefault]]
  32.   return p_list
  33. end
  34.  
  35. on getBehaviorDescription
  36.   return "Change the sprite's cast member when the mouse rolls over the current sprite." & RETURN & "PARAMETERS:" & RETURN & "ΓÇó Use Next Member - Turn this option on to automatically display the next cast member in the cast when mouse rolls over the sprite." & RETURN & "ΓÇó Rollover Cast Member - Choose a specific cast member to appear when the mouse rolls over the sprite. This setting is ignored if Use Next Member is on."
  37. end
  38.