home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / PyramidPoker.dxr / Internal_21_assmun.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  821 b   |  42 lines
  1. property pSprite, spriteNum
  2. global gScoreSprites
  3.  
  4. on beginSprite me
  5.   pSprite = sprite(spriteNum)
  6.   pSprite.visible = 0
  7.   gScoreSprites.addProp(pSprite.member.name.symbol, pSprite)
  8. end
  9.  
  10. on huloff me
  11.   pSprite.visible = 1
  12.   s = the ticks + 15
  13.   repeat while the ticks < s
  14.     updateStage()
  15.   end repeat
  16.   pSprite.visible = 0
  17.   s = the ticks + 15
  18.   repeat while the ticks < s
  19.     updateStage()
  20.   end repeat
  21.   pSprite.visible = 1
  22.   s = the ticks + 15
  23.   repeat while the ticks < s
  24.     updateStage()
  25.   end repeat
  26.   pSprite.visible = 0
  27.   s = the ticks + 15
  28.   repeat while the ticks < s
  29.     updateStage()
  30.   end repeat
  31.   pSprite.visible = 1
  32.   s = the ticks + 15
  33.   repeat while the ticks < s
  34.     updateStage()
  35.   end repeat
  36.   pSprite.visible = 0
  37.   s = the ticks + 15
  38.   repeat while the ticks < s
  39.     updateStage()
  40.   end repeat
  41. end
  42.