tests/lua/hellfire_burns.lua
changeset 10381 d263e0abcd7c
parent 10380 07ae8fd1d7d4
child 10421 87e47843018e
equal deleted inserted replaced
10380:07ae8fd1d7d4 10381:d263e0abcd7c
    87 	player = AddHog("Hunter", 0, 1, "NoHat")
    87 	player = AddHog("Hunter", 0, 1, "NoHat")
    88 	-- place it on how spawn platform
    88 	-- place it on how spawn platform
    89 	SetGearPosition(player, 10, 10)
    89 	SetGearPosition(player, 10, 10)
    90 end
    90 end
    91 
    91 
    92 
    92 function onNewTurn()
    93 function onGameTick20(gear)
       
    94 	if not TestRectForObstacle(300, 1500, 400, 1900, true) then
    93 	if not TestRectForObstacle(300, 1500, 400, 1900, true) then
    95 		WriteLnToConsole('HOLE DETECTED')
    94 		WriteLnToConsole('HOLE DETECTED')
    96 		EndLuaTest(TEST_SUCCESSFUL)
    95 		EndLuaTest(TEST_SUCCESSFUL)
       
    96 	else
       
    97 		WriteLnToConsole('FIRE DID NOT BURN THROUGH!')
       
    98 		EndLuaTest(TEST_FAILED)
    97 	end
    99 	end
    98 end
       
    99 
       
   100 function onNewTurn()
       
   101 	WriteLnToConsole('FIRE DID NOT BURN HOLE!')
       
   102 	EndLuaTest(TEST_FAILED)
       
   103 end
   100 end
   104 
   101 
   105 
   102 
   106 function onGameStart()
   103 function onGameStart()
   107 	AddGear(350, 1500, gtHellishBomb, 0, 0, 0, 0)
   104 	AddGear(350, 1500, gtHellishBomb, 0, 0, 0, 0)