home *** CD-ROM | disk | FTP | other *** search
/ Mind Games (Tessera) / MindGames.iso / mind_games / Files / differences.dxr / Internal_5_ClickOnImage.ls < prev    next >
Encoding:
Text File  |  2002-11-22  |  604 b   |  26 lines
  1. property mySpriteNum, mySprite, myStartMember
  2. global gKrataTime, gxronos, gKiniseis, gExtraTime, gWrongClick_flag, gMaxTime, gPoints, gLevelsVisibility_flag
  3.  
  4. on beginSprite me
  5.   initMyVars(me)
  6. end
  7.  
  8. on mouseUp me
  9.   if not gLevelsVisibility_flag then
  10.     wrongClick(me, 3)
  11.   end if
  12. end
  13.  
  14. on initMyVars me
  15.   mySpriteNum = me.spriteNum
  16.   mySprite = sprite(mySpriteNum)
  17.   myStartMember = mySprite.member
  18. end
  19.  
  20. on wrongClick me, timePenalty
  21.   gKiniseis = gKiniseis + 1
  22.   gWrongClick_flag = 1
  23.   gExtraTime = gMaxTime - gxronos + timePenalty - (gKrataTime + (the timer / 60))
  24.   gPoints = gPoints - timePenalty
  25. end
  26.