home *** CD-ROM | disk | FTP | other *** search
/ 100 Plus Great Games 2 / 100PLUSV2.BIN / games / SphereShift.dxr / Internal_23.ls < prev    next >
Encoding:
Text File  |  2002-01-25  |  551 b   |  20 lines
  1. global grid, points, currentStage, levelIndicator, pScore, ScoreTotal, pScoreBox, pScoreBoxTotal, CLRS
  2.  
  3. on prepareFrame me
  4.   CLRS = [#red: 0, #orange: 0, #blue: 0, #green: 0, #yellow: 0, #purple: 0]
  5.   points = 125
  6.   pScore = 0
  7.   pScoreBox.text = string(pScore)
  8.   pScoreBoxTotal.text = string(ScoreTotal)
  9.   currentStage = "stage 5"
  10.   grid = []
  11.   cC = currentStage.char.count
  12.   levelIndicator.text = currentStage.char[cC]
  13.   repeat with o = 1 to 11
  14.     grid.add([])
  15.     repeat with s = 1 to 13
  16.       grid[o].add([#empty])
  17.     end repeat
  18.   end repeat
  19. end
  20.