home *** CD-ROM | disk | FTP | other *** search
/ What PC? 1996 August / WPCAUG96.ISO / file.exe / file.dxr / 00095_IFLSkipBut.ls < prev    next >
Encoding:
Text File  |  1996-06-17  |  745 b   |  24 lines
  1. on IFLSkipBut
  2.   global IFLSkipList, IFLGone
  3.   if rollOver(20) then
  4.     set the castNum of sprite 20 to 174
  5.     if the mouseDown then
  6.       repeat with t = 1 to count(IFLSkipList)
  7.         set the locH of sprite getAt(getAt(IFLSkipList, t), 1) to getAt(getAt(IFLSkipList, t), 2)
  8.         set the locV of sprite getAt(getAt(IFLSkipList, t), 1) to getAt(getAt(IFLSkipList, t), 3)
  9.       end repeat
  10.       set the locH of sprite 15 to 2000
  11.       set the locH of sprite 20 to 2000
  12.       set the locH of sprite 11 to 2000
  13.       set the locH of sprite 12 to 2000
  14.       set the locH of sprite 13 to 2000
  15.       updateStage()
  16.       set IFLGone to 1
  17.       go("IntroFrame")
  18.     end if
  19.   else
  20.     set the castNum of sprite 20 to 173
  21.   end if
  22.   updateStage()
  23. end
  24.