home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / BakersGame.dxr / 00071_hotspot2.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  1.4 KB  |  41 lines
  1. on beginSprite me
  2.   sprite(me.spriteNum).blendLevel = 0
  3.   sprite(me.spriteNum).loc = sprite(me.spriteNum - 8).loc
  4. end
  5.  
  6. on mouseEnter me
  7.   global equalvalue, hotcard, foundation
  8.   if foundation[symbol(string(me.spriteNum - 8))].cards.count > 0 then
  9.     if (the clickOn <> 0) and (the clickOn <> (me.spriteNum - 8)) and (the clickOn <> me.spriteNum) then
  10.       if (sprite(the clickOn).visible = 1) and (sprite(the clickOn).moveableSprite = 1) then
  11.         xybaby = gethotcardtwo(the clickOn)
  12.         if foundation[symbol(string(me.spriteNum - 8))].cards[foundation[symbol(string(me.spriteNum - 8))].cards.count].compare_suit(xybaby) = 1 then
  13.           if foundation[symbol(string(me.spriteNum - 8))].cards[foundation[symbol(string(me.spriteNum - 8))].cards.count].rankvalue = (xybaby.rankvalue - 1) then
  14.             equalvalue = 1
  15.             hotcard = me.spriteNum - 8
  16.           end if
  17.         end if
  18.       end if
  19.     end if
  20.   else
  21.     if (the clickOn <> 0) and (the clickOn <> me.spriteNum) then
  22.       if (sprite(the clickOn).visible = 1) and (sprite(the clickOn).moveableSprite = 1) then
  23.         if chars(member(sprite(the clickOn).memberNum).name, 1, 3) = "ace" then
  24.           equalvalue = 1
  25.           hotcard = me.spriteNum - 8
  26.         else
  27.           equalvalue = 0
  28.           hotcard = 0
  29.         end if
  30.       end if
  31.     end if
  32.   end if
  33. end
  34.  
  35. on mouseLeave
  36.   global equalvalue, hotcard
  37.   checkwin()
  38.   equalvalue = 0
  39.   hotcard = 0
  40. end
  41.