home *** CD-ROM | disk | FTP | other *** search
/ 15 Beaut Aussie Games 1 / BEAUTGAMESV1.iso / pc / Windows / data1.cab / Program_Files / dswmedia / games / canetoad.dcr / gameControl_13.ls < prev    next >
Encoding:
Text File  |  2002-01-01  |  652 b   |  24 lines
  1. on exitFrame
  2.   global gameControl, score, level
  3.   score = (value(field("toad1Score")) * 1) + (value(field("toad2Score")) * 5) + (value(field("toad3Score")) * 25)
  4.   put "$" & value(score) into field "toadTotalScore"
  5.   case gameControl.levelNum of
  6.     1:
  7.       saveIcon(24)
  8.       set the visible of sprite 44 to 0
  9.       set the visible of sprite 45 to 0
  10.     2:
  11.       saveIcon(24)
  12.       saveIcon(25)
  13.       set the visible of sprite 44 to 1
  14.       set the visible of sprite 45 to 0
  15.     3:
  16.       level = 4
  17.       saveIcon(24)
  18.       saveIcon(25)
  19.       saveIcon(26)
  20.       set the visible of sprite 44 to 1
  21.       set the visible of sprite 45 to 1
  22.   end case
  23. end
  24.