home *** CD-ROM | disk | FTP | other *** search
/ Better Homes & Gardens: …oking for Today - Chicken / Image.iso / pc / chooser.dxr / 00005.ls < prev    next >
Encoding:
Text File  |  1995-11-20  |  782 b   |  25 lines
  1. on mouseDown
  2.   global gCurrentOrAll, gRecipesAvailableList, gMyRecipesList, gSearchList
  3.   set whichV to the mouseV
  4.   set whichH to the mouseH
  5.   if (whichV < 445) and (whichV > 423) then
  6.     set the castNum of sprite the clickOn to the castNum of sprite the clickOn + 1
  7.     clearChooser()
  8.     set the castNum of sprite the clickOn to the castNum of sprite the clickOn - 1
  9.   else
  10.     if (whichV < 475) and (whichV > 453) then
  11.       if (whichH > 24) and (whichH < 145) then
  12.         set the castNum of sprite the clickOn to 81
  13.         searchAll()
  14.         updateStage()
  15.       else
  16.         if (whichH > 152) and (whichH < 273) then
  17.           set the castNum of sprite the clickOn to 83
  18.           searchCurrent()
  19.           updateStage()
  20.         end if
  21.       end if
  22.     end if
  23.   end if
  24. end
  25.