home *** CD-ROM | disk | FTP | other *** search
/ Seeker / Seeker.iso / files_w / libraly.dir / 00083.ls < prev    next >
Encoding:
Text File  |  1994-12-03  |  835 b   |  33 lines
  1. on mouseDown
  2.   global getpoints, getitems, getpieces
  3.   if getAt(getpoints, 2) then
  4.     if getAt(getpoints, 3) then
  5.       if getAt(getpoints, 5) then
  6.         if getAt(getpoints, 4) then
  7.           if getAt(getpoints, 6) then
  8.             if getAt(getpoints, 7) and (getpieces = [1, 1, 1, 1, 1, 1, 1, 1, 1, 1]) then
  9.               repeat with i = 1 to 37
  10.                 set the cursor of sprite i to 0
  11.               end repeat
  12.               set the cursor of sprite 7 to [243, 244]
  13.               go("toENDING")
  14.             else
  15.               play frame "MAN_6"
  16.             end if
  17.           else
  18.             play frame "MAN_5"
  19.           end if
  20.         else
  21.           play frame "MAN_4"
  22.         end if
  23.       else
  24.         play frame "MAN_3"
  25.       end if
  26.     else
  27.       play frame "MAN_2"
  28.     end if
  29.   else
  30.     play frame "MAN_1"
  31.   end if
  32. end
  33.