home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Magazine 28 Bonus / CDRomMagazine-SoftKey-ArtPassion-FrenchVersion-Win31Mac.bin / data / shared.dir / 03014_Script_GENERAL < prev    next >
Text File  |  1996-06-21  |  3KB  |  93 lines

  1. -- ---------------------------------------------------------------
  2. -- Handler getLastWords returns words firstWord to the last of the
  3. -- given item.
  4.  
  5. on getLastWords firstWord, whichItem
  6.   return word firstWord to numWords(whichItem) of whichItem
  7. end 
  8.  
  9. -- ---------------------------------------------------------------
  10. -- Handler removeFromStage 
  11.  
  12. on removeFromStage whichSprite
  13.   set the locV of sprite whichSprite = 1000
  14.   updateStage
  15. end
  16.  
  17. -- ---------------------------------------------------------------
  18. -- Handler changeCast 
  19.  
  20. on changeCast whichSprite, castName
  21.   set the castNum of sprite whichSprite = the number of cast castName
  22.   updateStage
  23. end
  24.  
  25. -- ---------------------------------------------------------------
  26. -- Handler numWords returns the number of words in the given item.
  27.  
  28. on numWords theItem
  29.   return the number of words in theItem
  30. end
  31.  
  32. -- ---------------------------------------------------------------
  33. -- Handler goMovie goes to the given movie. If a frame name is
  34. -- given, it goes to the given frame of the given movie.
  35.  
  36. on goMovie toMovie, toFrame
  37.   sound stop 1
  38.   sound stop 2
  39.   if voidP(toFrame) or (toFrame = "") then
  40.     go movie toMovie
  41.   else if (toMovie = the movieName) then
  42.     go toFrame
  43.   else
  44.     go frame toFrame of movie toMovie
  45.   end if
  46. end
  47.  
  48. -- ---------------------------------------------------------------
  49. -- Handler goFrameTransition goes to the frame with the given name
  50. -- while performing the given transition.
  51.  
  52. on goFrameTransition whichFrame, whichTransition, time, chunkSize
  53.   resetSpriteCursors
  54.   doTransition whichTransition, time, chunkSize
  55.   go frame whichFrame
  56. end
  57.  
  58. -- ---------------------------------------------------------------
  59. -- Handler goFrame goes to the frame with the given name.
  60.  
  61. on goFrame whichFrame, whichTransition, time, chunkSize
  62.   resetSpriteCursors
  63.   doTransition whichTransition, time, chunkSize
  64.   go frame whichFrame
  65. end
  66.  
  67. -- ---------------------------------------------------------------
  68. -- Handler rectLeft returns the left value of the given rect.
  69.  
  70. on rectLeft aRect
  71.   return getAt(aRect,1)
  72. end
  73.  
  74. -- ---------------------------------------------------------------
  75. -- Handler rectTop returns the top value of the given rect.
  76.  
  77. on rectTop aRect
  78.   return getAt(aRect,2)
  79. end
  80.  
  81. -- ---------------------------------------------------------------
  82. -- Handler rectRight returns the right value of the given rect.
  83.  
  84. on rectRight aRect
  85.   return getAt(aRect,3)
  86. end
  87.  
  88. -- ---------------------------------------------------------------
  89. -- Handler rectBottom returns the bottom value of the given rect.
  90.  
  91. on rectBottom aRect
  92.   return getAt(aRect,4)
  93. end