home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1997 December / WPCDEC97.ISO / DXRS / INTWDEC.DXR / 00006_IFLAnimateGreyLines.ls < prev    next >
Encoding:
Text File  |  1997-10-13  |  4.8 KB  |  152 lines
  1. on IFLAnimateGreyLines
  2.   global IFLSkipList
  3.   repeat with t = 1 to 3
  4.     set the castNum of sprite 1 to the castNum of sprite 1 + 1
  5.     updateStage()
  6.   end repeat
  7.   set the locH of sprite 1 to 2000
  8.   updateStage()
  9.   set the castNum of sprite 30 to the number of member "IFLFullLogoTWO"
  10.   updateStage()
  11.   set the castNum of sprite 3 to the number of member "IFLOne"
  12.   set the castNum of sprite 4 to the number of member "IFLTwo"
  13.   set the castNum of sprite 5 to the number of member "IFLThree"
  14.   repeat with t = 3 to 5
  15.     set the locH of sprite t to -300
  16.     set the locV of sprite t to 271
  17.   end repeat
  18.   repeat with t = 3 to 5
  19.     repeat while the locH of sprite t < 284
  20.       set the locH of sprite t to the locH of sprite t + 40
  21.       updateStage()
  22.     end repeat
  23.   end repeat
  24.   repeat with t = 3 to 5
  25.     set the locH of sprite t to 325
  26.   end repeat
  27.   updateStage()
  28.   set the castNum of sprite 6 to the number of member "IFLFive"
  29.   set the castNum of sprite 7 to the number of member "IFLSix"
  30.   set the castNum of sprite 8 to the number of member "IFLSeven"
  31.   set the castNum of sprite 9 to the number of member "IFLEight"
  32.   set the castNum of sprite 10 to the number of member "IFLNine"
  33.   set the castNum of sprite 11 to the number of member "IFLTen"
  34.   repeat with t = 6 to 7
  35.     set the locH of sprite t to 325
  36.     set the locV of sprite t to -200
  37.   end repeat
  38.   repeat with t = 6 to 7
  39.     repeat while the locV of sprite t > 250
  40.       set the locV of sprite t to the locV of sprite t - 20
  41.       updateStage()
  42.     end repeat
  43.   end repeat
  44.   repeat with t = 6 to 7
  45.     set the locV of sprite t to 271
  46.   end repeat
  47.   updateStage()
  48.   repeat with t = 8 to 9
  49.     set the locH of sprite t to 325
  50.     set the locV of sprite t to -200
  51.   end repeat
  52.   repeat with t = 8 to 9
  53.     repeat while the locV of sprite t > 250
  54.       set the locV of sprite t to the locV of sprite t - 20
  55.       updateStage()
  56.     end repeat
  57.   end repeat
  58.   repeat with t = 8 to 9
  59.     set the locV of sprite t to 271
  60.   end repeat
  61.   updateStage()
  62.   repeat with t = 10 to 11
  63.     set the locH of sprite t to 325
  64.     set the locV of sprite t to -200
  65.   end repeat
  66.   repeat with t = 10 to 11
  67.     repeat while the locV of sprite t > 250
  68.       set the locV of sprite t to the locV of sprite t - 20
  69.       updateStage()
  70.     end repeat
  71.   end repeat
  72.   repeat with t = 10 to 11
  73.     set the locV of sprite t to 271
  74.   end repeat
  75.   updateStage()
  76.   set the castNum of sprite 12 to the number of member "IFLFour"
  77.   set the locH of sprite 12 to 325
  78.   set the locV of sprite 12 to 271
  79.   updateStage()
  80.   set the castNum of sprite 13 to the number of member "IFLEleven"
  81.   set the castNum of sprite 14 to the number of member "IFLTwelve"
  82.   repeat with t = 13 to 14
  83.     set the locH of sprite t to -500
  84.     set the locV of sprite t to 271
  85.   end repeat
  86.   repeat while the locH of sprite 13 < 301
  87.     set the locH of sprite 13 to the locH of sprite 13 + 20
  88.     updateStage()
  89.   end repeat
  90.   set the locH of sprite 13 to 325
  91.   updateStage()
  92.   repeat while the locH of sprite 14 < 301
  93.     set the locH of sprite 14 to the locH of sprite 14 + 20
  94.     updateStage()
  95.   end repeat
  96.   set the locH of sprite 14 to 325
  97.   updateStage()
  98.   set the castNum of sprite 15 to the number of member "IFLThirteen"
  99.   set the castNum of sprite 16 to the number of member "IFLFourteen"
  100.   set the castNum of sprite 17 to the number of member "IFLfiveteen"
  101.   repeat with t = 15 to 17
  102.     set the locH of sprite t to 325
  103.     set the locV of sprite t to -300
  104.   end repeat
  105.   repeat while the locV of sprite 15 > 249
  106.     set the locV of sprite 15 to the locV of sprite 15 + 20
  107.     updateStage()
  108.   end repeat
  109.   set the locV of sprite 15 to 271
  110.   updateStage()
  111.   repeat while the locV of sprite 16 > 249
  112.     set the locV of sprite 16 to the locV of sprite 16 + 20
  113.     updateStage()
  114.   end repeat
  115.   set the locV of sprite 16 to 271
  116.   updateStage()
  117.   repeat while the locV of sprite 17 > 249
  118.     set the locV of sprite 17 to the locV of sprite 17 + 20
  119.     updateStage()
  120.   end repeat
  121.   set the locV of sprite 17 to 271
  122.   updateStage()
  123.   set the blend of sprite 1 to 100
  124.   set the castNum of sprite 1 to 1000
  125.   set the locH of sprite 1 to 325
  126.   set the locV of sprite 1 to 271
  127.   repeat with t = 3 to 17
  128.     set the locV of sprite t to 2000
  129.   end repeat
  130.   updateStage()
  131.   cursor(-1)
  132.   updateStage()
  133.   repeat with t = 1 to count(IFLSkipList)
  134.     set the locH of sprite getAt(getAt(IFLSkipList, t), 1) to getAt(getAt(IFLSkipList, t), 2)
  135.     set the locV of sprite getAt(getAt(IFLSkipList, t), 1) to getAt(getAt(IFLSkipList, t), 3)
  136.   end repeat
  137.   repeat with t = 10 to 18
  138.     set the locH of sprite t to 2000
  139.   end repeat
  140.   set the castNum of sprite 6 to 87
  141.   set the loc of sprite 6 to point(200, 200)
  142.   set the castNum of sprite 1 to 1000
  143.   set the loc of sprite 1 to point(325, 271)
  144.   set the castNum of sprite 38 to 69
  145.   set the loc of sprite 38 to point(325, 271)
  146.   updateStage()
  147.   puppetSound(0)
  148.   go("IntroFrame")
  149.   updateStage()
  150.   cursor(-1)
  151. end
  152.