home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / SnowFight.dxr / 00005_PlayerSelection.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  1.3 KB  |  45 lines

  1. property spriteNum
  2. global gPlayer1, gPlayer2, gPlayer3, gTheMouseDownSprite, gSelectedSprite, gPath
  3.  
  4. on rightMouseDown me
  5.   if (spriteNum = 5) and ((gSelectedSprite = 50) or (gSelectedSprite = 51) or (gSelectedSprite = 52)) then
  6.     case gSelectedSprite of
  7.       50:
  8.         pathFind(gPlayer1.getAntPositionX() / 22, gPlayer1.getAntPositionY() / 22, mouseH() / 22, mouseV() / 22)
  9.         gPlayer1.setDaPath(gPath)
  10.       51:
  11.         pathFind(gPlayer2.getAntPositionX() / 22, gPlayer2.getAntPositionY() / 22, mouseH() / 22, mouseV() / 22)
  12.         gPlayer2.setDaPath(gPath)
  13.       52:
  14.         pathFind(gPlayer3.getAntPositionX() / 22, gPlayer3.getAntPositionY() / 22, mouseH() / 22, mouseV() / 22)
  15.         gPlayer3.setDaPath(gPath)
  16.     end case
  17.   end if
  18. end
  19.  
  20. on mouseDown me
  21.   gTheMouseDownSprite = spriteNum
  22. end
  23.  
  24. on mouseUp me
  25.   if not (spriteNum = gTheMouseDownSprite) then
  26.     exit
  27.   end if
  28.   gPlayer1.setAntDeSelected()
  29.   gPlayer2.setAntDeSelected()
  30.   gPlayer3.setAntDeSelected()
  31.   gSelectedSprite = spriteNum
  32.   case gSelectedSprite of
  33.     50:
  34.       gPlayer1.setAntSelected()
  35.     51:
  36.       gPlayer2.setAntSelected()
  37.     52:
  38.       gPlayer3.setAntSelected()
  39.     otherwise:
  40.       sprite(16).blend = 0
  41.       gSelectedSprite = 0
  42.   end case
  43.   sprite(16).loc = sprite(gSelectedSprite).loc
  44. end
  45.