Search content:

 

Personal Menu
Username:
Password:
Save password

Become a member

Forgot Password?

 

Don't miss these
get and set a mp3's ID3tag I !
Wait For Media Ready
Effector Set I for Alphamania
Get the computer name of user
Find all occurances of a string in a Text member
Real Time Vector Editor
Frogger by J.R.D.R.
Popup Score
Set Screen Size
Word Wrangler Xtra
MediaMacros Xtras Mall
 

 

 

Behavior Wait for explode to finish

Added on 5/20/2000

 

Compatibilities:
behavior D6_5 D7 D8 Mac PC Shockwave

This item has not yet been rated

Author: Noisecrime

Part of the Xploding Text behaviors. Full set includes Xploding Text Prepare Movie, De-Xplode Text position relative, De-Xplode Random, Xplode Text, De-Xplode Button, and Wait for Xplode to finish.

Download PC Source    Download Mac Source
-- Xplodingtext by Noisecrime 14 Sept 1999 @ NOISECRIME PRODUCTIONS

-- EMAIL: simtek@dircon.co.uk

-- THIS BEHAVIOUR IS FREE TO USE
-- IF YOU USE ALL OR ANY PART OF THESE BEHAVIOURS, YOU MUST LEAVE IN THE ACKNOWLEDGEMENT TO NOISECRIME PRODUCTIONS WITHIN THE BEHAVIOURS
-- ALSO YOU MUST ACKNOWLEDGE ADDITIONAL PROGRAMING BY NOISECRIME IN THE CREDITS


-- updated to allow for words to explode then de-xplode

on getBehaviorDescription me
  return ("This behaviour written by NoiseCrime 14 sept 1999" & RETURN & "Waits for explode to finish then jumps to next frame" )
end

property NCletterStart
property NCletterEnd

global theNextJumpIs

on getPropertyDescriptionList me
  set description = [:]  
  addprop description, #NCletterStart, [#comment: "Enter START sprite of ALL WORDS",#format:  #integer , #default: 1]  
  addprop description, #NCletterEnd, [#comment: "Enter END sprite of ALL WORDS",#format:  #integer , #default: 1]  
  return description
end


on exitframe me
  set tcount to 1
  
  repeat with k = NCletterStart to NCletterEnd
    set thischeck to (sendSprite (k, #checkArrived))
    if voidp(thischeck)  then next repeat
    
    if thischeck = 0 then
      set tcount to 0
      exit repeat
    end if
    
  end repeat
  
  if tcount = 1 then
    if voidP(theNextJumpIs) then
      alert  "Error: No frame to jump to"
      exit
    end if
    
    go to theNextJumpIs  -- this is used if weve used a button
  end if
end

 


Upload Provided by ABCUpload ASP

Contact

MMI
22 West Court Sq
Suite 2C
Newnan, GA 30263
USA

Fax - (206) 339-5833

Send e-mail