home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1997 December / WPCDEC97.ISO / DXRS / MGIWDEC.DXR / 00022_MGIStarTurn.ls < prev    next >
Encoding:
Text File  |  1997-10-13  |  1.2 KB  |  39 lines
  1. on MGIStarTurn
  2.   global MGIRotateRCounter, MGIStoneyCounter, MGISTONEON
  3.   if the castNum of sprite 7 <> the number of member "endStar" then
  4.     set the castNum of sprite 7 to the castNum of sprite 7 + 1
  5.     updateStage()
  6.   else
  7.     set the castNum of sprite 7 to the number of member "StartStar"
  8.     updateStage()
  9.   end if
  10.   if the castNum of sprite 8 <> the number of member "StartStar" then
  11.     set the castNum of sprite 8 to the castNum of sprite 8 - 1
  12.     updateStage()
  13.   else
  14.     set the castNum of sprite 8 to the number of member "endStar"
  15.     updateStage()
  16.   end if
  17.   case MGIRotateRCounter of
  18.     1:
  19.       if the castNum of sprite 9 <> the number of member "EndR" then
  20.         set the castNum of sprite 9 to the castNum of sprite 9 + 1
  21.         updateStage()
  22.       else
  23.         set the castNum of sprite 9 to the number of member "StartR"
  24.         updateStage()
  25.       end if
  26.       set MGIRotateRCounter to 0
  27.   end case
  28.   set MGIRotateRCounter to 1 + MGIRotateRCounter
  29.   if MGISTONEON = 1 then
  30.     if the locH of sprite 12 < 870 then
  31.       set the locH of sprite 12 to the locH of sprite 12 + 2
  32.       updateStage()
  33.     else
  34.       set the locH of sprite 12 to -292
  35.       updateStage()
  36.     end if
  37.   end if
  38. end
  39.