home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / PyramidPoker.dxr / Internal_8.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  485 b   |  17 lines
  1. on exitFrame me
  2.   global win, points, scoreBox
  3.   if win = "yes" then
  4.     puppetSound(3, "win")
  5.     member("youwin").text = "You Win!!!"
  6.     member("points").text = "total score:" && scoreBox.text && "pts"
  7.   else
  8.     puppetSound(3, "lose")
  9.     member("youwin").text = "give it another try!"
  10.     if scoreBox.text <> EMPTY then
  11.       member("points").text = "total score:" && scoreBox.text && "pts"
  12.     else
  13.       member("points").text = "total score:" && "0 pts"
  14.     end if
  15.   end if
  16. end
  17.