Contents
Articles
Behaviors
Books
Director News
Director Web Sites
FAQ
Games
Mailing Lists
News Groups
Project Examples
Reviews
Software
Tools
Useful Web Sites
Utilities
Xtras

Don't miss these
Behavior Writer
Testing CPU speed
Go To The Frame - Blog about Lingo
Buddy API
Sprite Blender - Time
XAdKey xtra
f3Export
Billenium Transitions Xtra v2
Popup Score
Cut Behavior (Ctrl + X)
 

 

 

Behavior Shiver With Sound

Added on 1/5/2001

 

Compatibilities:
behavior D6_5 D7 D8 Mac PC Shockwave

Rating:

Author: HasanKazmi (website)

This makes a sprite shiver on mousewithin, with selected sound. Attach with any Graphic sprite.Too simple to be a behaviour , but may be of some use to someone.

--786
--Behaviour: Shiver me
--Hasan Yasar Kazmi
--Hamdard uNiversity Islamabad Pakistan
--Dated: 30/11/2000

--This makes a sprite shiver on mousewithin
--Attach with any Graphic sprite

property spritenum,amount,Cskew,Whichsound,whichChannel

on getpropertydescriptionlist me
  
  set shiver = [:]
  
  addprop shiver,#amount,[#comment:"Amount of Shivering",#default:1,#format:#integer,#range:[min:1,max:100]]
  addprop shiver,#Whichsound,[#comment:"Sound on Shiver",#default:"",#format:#Sound]
  addprop shiver,#WhichChannel,[#comment:"Sound Channel While Shivering",#default:1,#format:#integer]
  
  return shiver
end

on beginsprite me
  spritenum = the spritenum of me
  CSkew = sprite(spritenum).skew
  
end

on mousewithin me
  
  sprite(spritenum).skew = integer(sprite(spritenum).skew + amount) mod 360
  updatestage
  sprite(spritenum).skew = integer(sprite(spritenum).skew - amount) mod 360
  puppetsound(WhichChannel,Whichsound)
  updatestage
  
end

on mouseleave me
  
  sprite(spritenum).skew = 0
  puppetsound(WhichChannel,0)
  updatestage
end

 


Contact

MMI
36 South Court Sq
Suite 300
Newnan, GA 30263
USA

Send e-mail