home *** CD-ROM | disk | FTP | other *** search
/ MacFormat 2003 June / macformat-130.iso / mac / Reviewed⁄Demos / Spearhead Demo / demota / pak1.pk3 / global / loopanim.scr < prev    next >
Encoding:
Text File  |  2002-10-21  |  1.2 KB  |  53 lines
  1. //-------------------------------------------------------------------
  2. //    LoopAnim.Scr
  3. //    Jeff Legget
  4. //    7/22/2002
  5. //
  6. //    Script to simplify looping animations....
  7. //-------------------------------------------------------------------
  8.  
  9. //-------------------------------------------------------------------
  10. LoopAnim local.anim:
  11. //-------------------------------------------------------------------
  12.  
  13.     self waitthread LoopAnimStop
  14.  
  15.     self.loop_anim_thread = local
  16.  
  17.     while (1)
  18.     {
  19.         self anim local.anim
  20.         self waittill animdone
  21.     }
  22.  
  23.     End
  24.  
  25. //-------------------------------------------------------------------
  26. LoopAnimStop:
  27. //-------------------------------------------------------------------
  28.  
  29.     if ( self.loop_anim_thread!=NULL && self.loop_anim_thread!=NIL)
  30.     {
  31.         self.loop_anim_thread delete
  32.         self.loop_anim_thread = NULL
  33.     }
  34.  
  35.     End
  36.  
  37.  
  38. //-------------------------------------------------------------------
  39. LoopAnim2 local.anim:
  40. //-------------------------------------------------------------------
  41.  
  42.     self waitthread LoopAnimStop
  43.  
  44.     self.loop_anim_thread = local
  45.  
  46.     while (1)
  47.     {
  48.         self anim_attached local.anim
  49.         self waittill animdone
  50.     }
  51.  
  52.     End
  53.