home *** CD-ROM | disk | FTP | other *** search
/ Internet 1996 World Exposition / park.org.s3.amazonaws.com.7z / park.org.s3.amazonaws.com / Japan / CSK / hyakki / adv_all / movie / Scene5.dcr / 00120.ls < prev    next >
Encoding:
Text File  |  2017-09-21  |  1.6 KB  |  56 lines
  1. on exitFrame
  2.   global glist
  3.   endframe()
  4.   if rollOver(1) then
  5.     go("8to4")
  6.   else
  7.     if rollOver(2) then
  8.       go("8to12")
  9.     else
  10.       if rollOver(3) then
  11.         nothing()
  12.       else
  13.         if rollOver(4) then
  14.           go("8to7")
  15.         else
  16.           if rollOver(5) then
  17.             if (((the timer > 3600) and (the timer < 7200)) or (the timer > 10800)) and (getOne(glist, 54) = 0) then
  18.               go(the frame + 1)
  19.             else
  20.               puppetSprite(15, 1)
  21.               set i to random(6) * 25
  22.               set j to random(4) * 25
  23.               set the type of sprite 15 to 1
  24.               set the ink of sprite 15 to 8
  25.               set the castNum of sprite 15 to the number of cast "doro1"
  26.               set the foreColor of sprite 15 to 255
  27.               set the locH of sprite 15 to 234 - i
  28.               set the locV of sprite 15 to 275 + j
  29.               updateStage()
  30.               wait(10)
  31.               set the locH of sprite 15 to 240 - i
  32.               set the locV of sprite 15 to 269 + j
  33.               updateStage()
  34.               wait(10)
  35.               set the castNum of sprite 15 to the number of cast "doro2"
  36.               updateStage()
  37.               wait(30)
  38.               set the castNum of sprite 15 to the number of cast "doro1"
  39.               updateStage()
  40.               wait(20)
  41.               set the locH of sprite 15 to 234 - i
  42.               set the locV of sprite 15 to 275 + j
  43.               updateStage()
  44.               wait(10)
  45.               puppetSprite(15, 0)
  46.             end if
  47.           else
  48.             nothing()
  49.           end if
  50.         end if
  51.       end if
  52.     end if
  53.   end if
  54.   go(the frame)
  55. end
  56.