Wait for explode to finish

 

Compatibilities:

This item has not yet been rated

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