home *** CD-ROM | disk | FTP | other *** search
/ Reflux 1: The Becoming / Reflux.iso / shared.dxr / 00848_RARROW01.BMP.ls < prev    next >
Encoding:
Text File  |  1995-05-01  |  600 b   |  21 lines

  1. on mouseDown
  2.   global gPageNumber, gPage, gLocalPage
  3.   puppetSprite(43, 1)
  4.   puppetSprite(46, 1)
  5.   puppetSprite(47, 1)
  6.   repeat while the mouseDown
  7.     set the castNum of sprite 43 to the number of cast "rarrow02.bmp"
  8.     updateStage()
  9.   end repeat
  10.   if gPageNumber < 20 then
  11.     set gPageNumber to gPageNumber + 1
  12.     if gLocalPage <> (gPageNumber + 1) then
  13.       set gPage to gPage + 1
  14.     end if
  15.   end if
  16.   set the castNum of sprite 43 to the number of cast "rarrow01.bmp"
  17.   set the castNum of sprite 46 to gPageNumber + 468
  18.   set the castNum of sprite 47 to gPageNumber + 496
  19.   updateStage()
  20. end
  21.