home *** CD-ROM | disk | FTP | other *** search
/ HYPE / HYPE.ISO / city.dxr / 00234.ls < prev    next >
Encoding:
Text File  |  1996-09-05  |  1.7 KB  |  73 lines
  1. on exitFrame
  2.   repeat while (the mouseH > 249) and (the mouseH < 409) and ((the mouseV > 259) and (the mouseV < 342))
  3.     cursor(3)
  4.     set the locH of sprite 15 to 330
  5.     puppetSound("diid.wav")
  6.     updateStage()
  7.     startTimer()
  8.     repeat while the timer < 5
  9.       set the locH of sprite 10 to 253
  10.       updateStage()
  11.       if the mouseDown then
  12.         go("st_expl")
  13.         abort()
  14.       end if
  15.     end repeat
  16.     set the locH of sprite 10 to -500
  17.     updateStage()
  18.     startTimer()
  19.     repeat while the timer < 5
  20.       set the locH of sprite 11 to 309
  21.       updateStage()
  22.       if the mouseDown then
  23.         go("st_expl")
  24.         abort()
  25.       end if
  26.     end repeat
  27.     set the locH of sprite 11 to -500
  28.     updateStage()
  29.     startTimer()
  30.     repeat while the timer < 5
  31.       set the locH of sprite 12 to 363
  32.       updateStage()
  33.       if the mouseDown then
  34.         go("st_expl")
  35.         abort()
  36.       end if
  37.     end repeat
  38.     set the locH of sprite 12 to -500
  39.     updateStage()
  40.     startTimer()
  41.     repeat while the timer < 5
  42.       set the locH of sprite 13 to 407
  43.       updateStage()
  44.       if the mouseDown then
  45.         go("st_expl")
  46.         abort()
  47.       end if
  48.     end repeat
  49.     set the locH of sprite 13 to -500
  50.     updateStage()
  51.     startTimer()
  52.     repeat while the timer < 5
  53.       set the locH of sprite 14 to 329
  54.       updateStage()
  55.       if the mouseDown then
  56.         go("st_expl")
  57.         abort()
  58.       end if
  59.     end repeat
  60.     set the locH of sprite 14 to -500
  61.     updateStage()
  62.     updateStage()
  63.     if the mouseDown then
  64.       go("st_expl")
  65.       abort()
  66.     end if
  67.   end repeat
  68.   cursor(-1)
  69.   cleft("91", 0, 100, 200, 400, 80, 350)
  70.   cright("109", 540, 640, 200, 400, 560, 350)
  71.   go(the frame)
  72. end
  73.