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_2.ls < prev    next >
Encoding:
Text File  |  2002-01-01  |  457 b   |  18 lines
  1. on startGame
  2.   global hero, gameControl, background, obstacles, hit, projector, started
  3.   hit = 8
  4.   puppetSprite(hit, 1)
  5.   obstacles = []
  6.   hero = new(script("hero parent"))
  7.   background = new(script("background parent"))
  8.   repeat with i = 12 to 18
  9.     append(obstacles, new(script("obstacles parent"), i))
  10.   end repeat
  11.   if not started then
  12.     gameControl = new(script("gameControl parent"))
  13.     started = 1
  14.   else
  15.     initLevel(gameControl)
  16.   end if
  17. end
  18.