Rollover Ink Change

 

Compatibilities:

This item has not yet been rated

This behavior allows people to create rollover buttons, based on the Ink used.

--Description -------- on getBehaviorDescription   return "Ce comportement crie un Roll Over"&RETURN&"par un effet d"encre" end getBehaviorDescription on getBehaviorToolTip   return "Ce comportement crie un Roll Over"&RETURN&"par un effet d"encre" end getBehaviorToolTip --Code ------- Property MySprite1 Property MyMember1 Property MyMember2 Property MonGestionnaire property MyInk Property SpriteNum on beginsprite   sprite(SpriteNum).ink = 0 end on MouseEnter     case MyInk of     #copy : MyInk2 = 0     #Transparent : MyInk2 = 1     #Reverse : MyInk2 = 2     #Ghost : MyInk2 = 3     #Not_copy : MyInk2 = 4     #Not_transparent : MyInk2 = 5     #Not_reverse : MyInk2 = 6     #Not_ghost : MyInk2 = 7     #Matte : MyInk2 = 8     #Mask : MyInk2 = 9     #Blend : MyInk2 = 32     #Add_pin : MyInk2 = 33     #Add : MyInk2 = 34     #Subtract_pin : MyInk2 = 35     #Background_transparent : MyInk2 = 36     #Lightest : MyInk2 = 37     #Subtrack : MyInk2 = 38     #Darkest : MyInk2 = 39     #Lighten : MyInk2 = 40     #Darken : MyInk2 = 41         end case     sprite(SpriteNum).ink = MyInk2   updatestage end on MouseLeave   sprite(SpriteNum).ink = 0   updatestage end on getPropertyDescriptionList   set pList = [:]   addProp pList, #MyInk, [#comment :"Quel effet d"encre ?", #format : #symbol, #range : [#Copy, #Blend, #Transparent, #Add_pin, #Reverse, #Add, #Ghost, #Subtract_pin, #Not_copy, #Background_transparent, #Not_transparent, #Lightest, #Not_reverse, #Subtract, #Not_ghost, #Darkest, #Matte, #Lighten, #Mask, #Darken], #default : #reverse ]   return pList end getPropertyDescriptionList