home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 22 / cdrt22.iso / pc / bugbook / home.dir / 00277_Script_277 < prev    next >
Text File  |  1995-06-27  |  975b  |  35 lines
  1. on mouseDown
  2.   global currBut,currButDistance,currV,currH,theFrame,localDir,AnsonHelp,ansonHintAll
  3.   global toFrame, helpPhrases, ansonHelpAll
  4.   put the mouseV into currV
  5.   put the mouseH into currH
  6.   
  7.   repeat with x = 1 to 4
  8.     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
  9.       --playSound ("back")
  10.       exit repeat
  11.     end if
  12.   end repeat
  13.   
  14.   if x = 1 then 
  15.     playSound ("back")
  16.     go "help"
  17.   end if
  18.   
  19.   
  20.   if x=2 then 
  21.     put the frame into toFrame
  22.     puppetSprite 36,TRUE
  23.     
  24.     set helpPhrases=getAt(ansonHelpAll,8)
  25.     
  26.     go "ansonTalk"
  27.   end if
  28.   
  29.   if x=3 then ScreenButActive()
  30.     
  31.     
  32.     if x=4 then go movie localDir&"bottles.dir"
  33.     
  34. end
  35.