home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 July / WPCJUL96.ISO / file.exe / MGIFINJ.DXR / 00022_MGIFlashComp,MGIFlashTwoComp.ls < prev    next >
Encoding:
Text File  |  1996-05-15  |  1.1 KB  |  34 lines

  1. on MGIFlashComp
  2.   global MGICompCounter, MGICompOneSprite, MGICompOnStage
  3.   if MGICompOnStage = 1 then
  4.     if MGICompCounter = 3 then
  5.       set the castNum of sprite MGICompOneSprite to the castNum of sprite MGICompOneSprite + 1
  6.       updateStage()
  7.     else
  8.       if MGICompCounter = 6 then
  9.         set MGICompCounter to 0
  10.         set the castNum of sprite MGICompOneSprite to the castNum of sprite MGICompOneSprite - 1
  11.         updateStage()
  12.       end if
  13.     end if
  14.     set MGICompCounter to 1 + MGICompCounter
  15.   end if
  16. end
  17.  
  18. on MGIFlashTwoComp
  19.   global MGICompTwoCounter, MGICompTwoSprite, MGICompTwoOnStage
  20.   if MGICompTwoOnStage = 1 then
  21.     if MGICompTwoCounter = 3 then
  22.       set the castNum of sprite MGICompTwoSprite to the castNum of sprite MGICompTwoSprite + 1
  23.       updateStage()
  24.     else
  25.       if MGICompTwoCounter = 6 then
  26.         set MGICompTwoCounter to 0
  27.         set the castNum of sprite MGICompTwoSprite to the castNum of sprite MGICompTwoSprite - 1
  28.         updateStage()
  29.       end if
  30.     end if
  31.     set MGICompTwoCounter to 1 + MGICompTwoCounter
  32.   end if
  33. end
  34.