home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1997 December / WPCDEC97.ISO / DXRS / INTWDEC.DXR / 00008_IFLDisplay.ls < prev    next >
Encoding:
Text File  |  1997-10-13  |  7.3 KB  |  197 lines
  1. on IFLDisplay
  2.   global IFLINTARTList, IFLINTGTSList, IFLINTFAEList, IFLINTHANList, IFLINTGROList, IFLINTGESList, IFLINTREFList, IFLINTRESList, IFLINTMGIList, IFLGone, IFLLeaveIntro, IFLMovieNameList
  3.   case rollOver() of
  4.     39:
  5.       IFLCursorSet()
  6.       puppetSound("click.aif")
  7.       updateStage()
  8.       repeat with t = 1 to count(IFLINTREFList)
  9.         set the castNum of sprite getAt(getAt(IFLINTREFList, t), 1) to the number of member getAt(getAt(IFLINTREFList, t), 2)
  10.         set the loc of sprite getAt(getAt(IFLINTREFList, t), 1) to point(getAt(getAt(IFLINTREFList, t), 3), getAt(getAt(IFLINTREFList, t), 4))
  11.       end repeat
  12.       updateStage()
  13.       repeat while rollOver(39)
  14.         if the mouseDown then
  15.           set IFLLeaveIntro to 1
  16.           set IFLWhichPOS to 1
  17.           exit repeat
  18.         end if
  19.       end repeat
  20.       repeat with t = 1 to count(IFLINTREFList)
  21.         set the castNum of sprite getAt(getAt(IFLINTREFList, t), 1) to 86
  22.       end repeat
  23.       updateStage()
  24.     44:
  25.       IFLCursorSet()
  26.       puppetSound("click.aif")
  27.       updateStage()
  28.       repeat with t = 1 to count(IFLINTGESList)
  29.         set the castNum of sprite getAt(getAt(IFLINTGESList, t), 1) to the number of member getAt(getAt(IFLINTGESList, t), 2)
  30.         set the loc of sprite getAt(getAt(IFLINTGESList, t), 1) to point(getAt(getAt(IFLINTGESList, t), 3), getAt(getAt(IFLINTGESList, t), 4))
  31.       end repeat
  32.       updateStage()
  33.       repeat while rollOver(44)
  34.         if the mouseDown then
  35.           set IFLLeaveIntro to 1
  36.           set IFLWhichPOS to 6
  37.           exit repeat
  38.         end if
  39.       end repeat
  40.       repeat with t = 1 to count(IFLINTGESList)
  41.         set the castNum of sprite getAt(getAt(IFLINTGESList, t), 1) to 86
  42.       end repeat
  43.       updateStage()
  44.     41:
  45.       IFLCursorSet()
  46.       puppetSound("click.aif")
  47.       updateStage()
  48.       repeat with t = 1 to count(IFLINTRESList)
  49.         set the castNum of sprite getAt(getAt(IFLINTRESList, t), 1) to the number of member getAt(getAt(IFLINTRESList, t), 2)
  50.         set the loc of sprite getAt(getAt(IFLINTRESList, t), 1) to point(getAt(getAt(IFLINTRESList, t), 3), getAt(getAt(IFLINTRESList, t), 4))
  51.       end repeat
  52.       updateStage()
  53.       repeat while rollOver(41)
  54.         if the mouseDown then
  55.           set IFLLeaveIntro to 1
  56.           set IFLWhichPOS to 3
  57.           exit repeat
  58.         end if
  59.       end repeat
  60.       repeat with t = 1 to count(IFLINTRESList)
  61.         set the castNum of sprite getAt(getAt(IFLINTRESList, t), 1) to 86
  62.       end repeat
  63.       updateStage()
  64.     42:
  65.       IFLCursorSet()
  66.       puppetSound("click.aif")
  67.       updateStage()
  68.       repeat with t = 1 to count(IFLINTGROList)
  69.         set the castNum of sprite getAt(getAt(IFLINTGROList, t), 1) to the number of member getAt(getAt(IFLINTGROList, t), 2)
  70.         set the loc of sprite getAt(getAt(IFLINTGROList, t), 1) to point(getAt(getAt(IFLINTGROList, t), 3), getAt(getAt(IFLINTGROList, t), 4))
  71.       end repeat
  72.       updateStage()
  73.       repeat while rollOver(42)
  74.         if the mouseDown then
  75.           set IFLLeaveIntro to 1
  76.           set IFLWhichPOS to 4
  77.           exit repeat
  78.         end if
  79.       end repeat
  80.       repeat with t = 1 to count(IFLINTGROList)
  81.         set the castNum of sprite getAt(getAt(IFLINTGROList, t), 1) to 86
  82.       end repeat
  83.       updateStage()
  84.     43:
  85.       IFLCursorSet()
  86.       puppetSound("click.aif")
  87.       updateStage()
  88.       repeat with t = 1 to count(IFLINTFAEList)
  89.         set the castNum of sprite getAt(getAt(IFLINTFAEList, t), 1) to the number of member getAt(getAt(IFLINTFAEList, t), 2)
  90.         set the loc of sprite getAt(getAt(IFLINTFAEList, t), 1) to point(getAt(getAt(IFLINTFAEList, t), 3), getAt(getAt(IFLINTFAEList, t), 4))
  91.       end repeat
  92.       updateStage()
  93.       repeat while rollOver(43)
  94.         if the mouseDown then
  95.           set IFLLeaveIntro to 1
  96.           set IFLWhichPOS to 5
  97.           exit repeat
  98.         end if
  99.       end repeat
  100.       repeat with t = 1 to count(IFLINTFAEList)
  101.         set the castNum of sprite getAt(getAt(IFLINTFAEList, t), 1) to 86
  102.       end repeat
  103.       updateStage()
  104.     40:
  105.       IFLCursorSet()
  106.       puppetSound("click.aif")
  107.       updateStage()
  108.       repeat with t = 1 to count(IFLINTHANList)
  109.         set the castNum of sprite getAt(getAt(IFLINTHANList, t), 1) to the number of member getAt(getAt(IFLINTHANList, t), 2)
  110.         set the loc of sprite getAt(getAt(IFLINTHANList, t), 1) to point(getAt(getAt(IFLINTHANList, t), 3), getAt(getAt(IFLINTHANList, t), 4))
  111.       end repeat
  112.       updateStage()
  113.       repeat while rollOver(40)
  114.         if the mouseDown then
  115.           set IFLLeaveIntro to 1
  116.           set IFLWhichPOS to 2
  117.           exit repeat
  118.         end if
  119.       end repeat
  120.       repeat with t = 1 to count(IFLINTHANList)
  121.         set the castNum of sprite getAt(getAt(IFLINTHANList, t), 1) to 86
  122.       end repeat
  123.       updateStage()
  124.     45:
  125.       IFLCursorSet()
  126.       puppetSound("click.aif")
  127.       updateStage()
  128.       repeat with t = 1 to count(IFLINTGTSList)
  129.         set the castNum of sprite getAt(getAt(IFLINTGTSList, t), 1) to the number of member getAt(getAt(IFLINTGTSList, t), 2)
  130.         set the loc of sprite getAt(getAt(IFLINTGTSList, t), 1) to point(getAt(getAt(IFLINTGTSList, t), 3), getAt(getAt(IFLINTGTSList, t), 4))
  131.       end repeat
  132.       updateStage()
  133.       repeat while rollOver(45)
  134.         if the mouseDown then
  135.           set IFLLeaveIntro to 1
  136.           set IFLWhichPOS to 7
  137.           exit repeat
  138.         end if
  139.       end repeat
  140.       repeat with t = 1 to count(IFLINTGTSList)
  141.         set the castNum of sprite getAt(getAt(IFLINTGTSList, t), 1) to 86
  142.       end repeat
  143.       updateStage()
  144.     46:
  145.       IFLCursorSet()
  146.       puppetSound("click.aif")
  147.       updateStage()
  148.       repeat with t = 1 to count(IFLINTARTList)
  149.         set the castNum of sprite getAt(getAt(IFLINTARTList, t), 1) to the number of member getAt(getAt(IFLINTARTList, t), 2)
  150.         set the loc of sprite getAt(getAt(IFLINTARTList, t), 1) to point(getAt(getAt(IFLINTARTList, t), 3), getAt(getAt(IFLINTARTList, t), 4))
  151.       end repeat
  152.       updateStage()
  153.       repeat while rollOver(46)
  154.         if the mouseDown then
  155.           set IFLLeaveIntro to 1
  156.           set IFLWhichPOS to 8
  157.           exit repeat
  158.         end if
  159.       end repeat
  160.       repeat with t = 1 to count(IFLINTARTList)
  161.         set the castNum of sprite getAt(getAt(IFLINTARTList, t), 1) to 86
  162.       end repeat
  163.       updateStage()
  164.     47:
  165.       IFLCursorSet()
  166.       puppetSound("click.aif")
  167.       updateStage()
  168.       repeat with t = 1 to count(IFLINTMGIList)
  169.         set the castNum of sprite getAt(getAt(IFLINTMGIList, t), 1) to the number of member getAt(getAt(IFLINTMGIList, t), 2)
  170.         set the loc of sprite getAt(getAt(IFLINTMGIList, t), 1) to point(getAt(getAt(IFLINTMGIList, t), 3), getAt(getAt(IFLINTMGIList, t), 4))
  171.       end repeat
  172.       updateStage()
  173.       repeat while rollOver(47)
  174.         if the mouseDown then
  175.           set IFLLeaveIntro to 1
  176.           set IFLWhichPOS to 9
  177.           exit repeat
  178.         end if
  179.       end repeat
  180.       repeat with t = 1 to count(IFLINTMGIList)
  181.         set the castNum of sprite getAt(getAt(IFLINTMGIList, t), 1) to 86
  182.       end repeat
  183.       updateStage()
  184.   end case
  185.   if IFLLeaveIntro = 1 then
  186.     set the locH of sprite 2 to 2000
  187.     set the locH of sprite 6 to 2000
  188.     set the locH of sprite 30 to 2000
  189.     set the locH of sprite 38 to 2000
  190.     puppetSound(0)
  191.     updateStage()
  192.     unloadMember(11, 126)
  193.     updateStage()
  194.     go(1, getAt(IFLMovieNameList, IFLWhichPOS))
  195.   end if
  196. end
  197.