home *** CD-ROM | disk | FTP | other *** search
/ Professor Iris' Fun Field Trip - Animal Safari / Iris.iso / pc / discover / page6.dir / 00413.ls < prev    next >
Encoding:
Text File  |  1995-03-14  |  898 b   |  11 lines
  1. if the mouseDown then
  2.   set mv to the mouseV
  3.   set mh to the mouseH
  4.   StopAllSound()
  5.   CloseLangBar()
  6.   PoemReset()
  7.   set gWhichFrame to "MM"
  8.   startTimer()
  9.   go(string((1 * ((mh > gHot1H) and (mh < (gHot1H + gHot1W)) and ((mv > gHot1V) and (mv < (gHot1V + gHot1T))))) + (2 * ((mh > gHot2H) and (mh < (gHot2H + gHot2W)) and ((mv > gHot2V) and (mv < (gHot2V + gHot2T))))) + (3 * ((mh > gHot3H) and (mh < (gHot3H + gHot3W)) and ((mv > gHot3V) and (mv < (gHot3V + gHot3T))))) + (4 * ((mh > gHot4H) and (mh < (gHot4H + gHot4W)) and ((mv > gHot4V) and (mv < (gHot4V + gHot4T))))) + (5 * ((mh > gHot5H) and (mh < (gHot5H + gHot5W)) and ((mv > gHot5V) and (mv < (gHot5V + gHot5T))))) + (6 * ((mh > gHot6H) and (mh < (gHot6H + gHot6W)) and ((mv > gHot6V) and (mv < (gHot6V + gHot6T))))) + (7 * ((mh > gHot7H) and (mh < (gHot7H + gHot7W)) and ((mv > gHot7V) and (mv < (gHot7V + gHot7T))))) & "Hot"))
  10. end if
  11.