home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / Tantrix.dxr / 00005.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  608 b   |  22 lines
  1. global gLevelTime, gTotalScore
  2.  
  3. on exitFrame me
  4.   if (gLevelTime / 60) < 10 then
  5.     timeCount = "0" & string(integer(gLevelTime / 60))
  6.   else
  7.     timeCount = string(integer(gLevelTime / 60))
  8.   end if
  9.   if (gLevelTime mod 60) < 10 then
  10.     timeCount = timeCount & ":" & "0" & string(gLevelTime mod 60)
  11.   else
  12.     timeCount = timeCount & ":" & string(gLevelTime mod 60)
  13.   end if
  14.   member("Time1").text = timeCount
  15.   levelScore = 500 - gLevelTime
  16.   if levelScore < 20 then
  17.     levelScore = 20
  18.   end if
  19.   gTotalScore = gTotalScore + levelScore
  20.   member("Score1").text = "Your Score: " & string(gTotalScore)
  21. end
  22.