home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 22 / cdrt22.iso / pc / bugbook / map.dir / 00313_Script_313 < prev    next >
Text File  |  1995-06-26  |  1KB  |  31 lines
  1. on mouseDown
  2.   global currBut,currButDistance,currV,currH,localDir, lastMapRandom,homeDir,helpBack,lastMapRandom
  3.   put the mouseV into currV
  4.   put the mouseH into currH
  5.   
  6.   repeat with x = 1 to 4
  7.     if currV>(the locV of getAt(currBut,x)-the locV of getAt(currButDistance,x)) and currV<(the locV of getAt(currBut,x)+the locV of getAt(currButDistance,x)) and currH>(the locH of getAt(currBut,x)-the locH of getAt(currButDistance,x)) and currH<(the locH of getAt(currBut,x)+the locH of getAt(currButDistance,x)) then
  8.       exit repeat
  9.     end if
  10.   end repeat
  11.   
  12.   if x = 1 then 
  13.     questionDown()
  14.     set helpBack=[("LeavesReturn"),(the pathName&the movieName)]
  15.     go "Habitat" of movie homeDir&"helpme.dir"
  16.     
  17.     
  18.   else if x=3 then 
  19.     ScreenButActive(lastMapRandom&".AnsonHint",lastMapRandom&".Return")
  20.   else if x=4 then 
  21.     backDown()
  22.     
  23.     screenButNotActive()
  24.     go "map"
  25.     set the cursor of sprite 42 to 0
  26.   else
  27.    -- screenButNotActive()
  28.     
  29.   end if
  30.   
  31. end