home *** CD-ROM | disk | FTP | other *** search
/ A Virtual Reality Guide to Texas / CD.iso / texdata / arcextra / ghost.dir / 00003.ls < prev    next >
Encoding:
Text File  |  1998-05-18  |  431 b   |  20 lines
  1. on mouseDown
  2.   set MC to mouseCast()
  3.   repeat while stillDown() = 1
  4.     if mouseCast() = MC then
  5.       set the castNum of sprite 11 to MC + 1
  6.       updateStage()
  7.       next repeat
  8.     end if
  9.     if mouseCast() <> (MC + 1) then
  10.       set the castNum of sprite 11 to MC
  11.     end if
  12.     updateStage()
  13.   end repeat
  14.   if the mouseCast = (MC + 1) then
  15.     go("StartGame")
  16.   end if
  17.   set the castNum of sprite 11 to MC
  18.   updateStage()
  19. end
  20.