home *** CD-ROM | disk | FTP | other *** search
/ Internet 1996 World Exposition / park.org.s3.amazonaws.com.7z / park.org.s3.amazonaws.com / Japan / Panasonic- / funcity / paris / wave / OPEN.dcr / 00012_Page Change.ls < prev    next >
Encoding:
Text File  |  2017-09-21  |  562 b   |  23 lines
  1. global gonext
  2.  
  3. on mouseDown
  4.   set mh to the mouseH
  5.   set mv to the mouseV
  6.   if (mh > 356) and (mh < 386) and (mv > 198) and (mv < 228) then
  7.     if the castNum of sprite 2 = 2 then
  8.       set gonext to 1
  9.     end if
  10.   end if
  11.   if the castNum of sprite 2 = 1 then
  12.     if (mh > 360) and (mh < 376) and (mv > 237) and (mv < 253) then
  13.       puppetSprite(2, 1)
  14.       set the castNum of sprite 2 to 2
  15.     end if
  16.   else
  17.     if (mh > 18) and (mh < 34) and (mv > 36) and (mv < 52) then
  18.       puppetSprite(2, 1)
  19.       set the castNum of sprite 2 to 1
  20.     end if
  21.   end if
  22. end
  23.