home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / BakersGame.dxr / 00069_cells.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  1.9 KB  |  51 lines
  1. on beginSprite me
  2.   global ccount, cell
  3.   if ccount = 1 then
  4.     sprite(me.spriteNum).loc = point(65, 45)
  5.     cell.addProp(string(me.spriteNum).symbol, new(script("cellobj"), []))
  6.   else
  7.     sprite(me.spriteNum).loc = sprite(me.spriteNum - 1).loc + point(sprite(me.spriteNum).width + 12, 0)
  8.     cell.addProp(string(me.spriteNum).symbol, new(script("cellobj"), []))
  9.   end if
  10.   sprite(me.spriteNum).member = "grayback"
  11.   ccount = ccount + 1
  12. end
  13.  
  14. on mouseDown me
  15.   global equalvalue, hotcard
  16.   hotcard = 0
  17.   equalvalue = 0
  18.   if member(sprite(me.spriteNum).memberNum).name <> "grayback" then
  19.     puppetSound(3, "pickcard")
  20.     sprite(me.spriteNum).moveableSprite = 1
  21.     sprite(me.spriteNum).loc = the mouseLoc
  22.     sprite(me.spriteNum).locZ = me.spriteNum + 1000
  23.   end if
  24. end
  25.  
  26. on mouseUp me
  27.   global equalvalue, hotcard, cell, foundation
  28.   if me.spriteNum = the clickOn then
  29.     if (sprite(me.spriteNum).visible = 1) and (sprite(me.spriteNum).moveableSprite = 1) then
  30.       if (equalvalue = 1) and (hotcard <> 0) then
  31.         puppetSound(3, "pickcard")
  32.         godlist = gethotcard(hotcard)
  33.         sprite(me.spriteNum).moveableSprite = 0
  34.         sprite(me.spriteNum).locZ = me.spriteNum
  35.         sprite(hotcard).locZ = hotcard
  36.         sprite(hotcard).visible = 1
  37.         sprite(me.spriteNum).loc = cell[symbol(string(me.spriteNum))].cards[cell[symbol(string(me.spriteNum))].cards.count].location
  38.         sprite(hotcard).member = sprite(the clickOn).member
  39.         cell[symbol(string(the clickOn))].cards.deleteAt(cell[symbol(string(the clickOn))].cards.count)
  40.         sprite(me.spriteNum).member = "grayback"
  41.         godlist.addcards(hotcard, new(script("card"), hotcard))
  42.         addpoints(hotcard)
  43.       else
  44.         puppetSound(3, "dropcard")
  45.         sprite(me.spriteNum).locZ = me.spriteNum
  46.         sprite(me.spriteNum).loc = cell[symbol(string(me.spriteNum))].cards[cell[symbol(string(me.spriteNum))].cards.count].location
  47.       end if
  48.     end if
  49.   end if
  50. end
  51.