share/hedgewars/Data/Maps/ClimbHome/map.lua
changeset 13755 110d6c1e817f
parent 13691 3651c63f3c84
child 14469 ead8928a59f8
equal deleted inserted replaced
13754:0e8db74ec585 13755:110d6c1e817f
    84     if params["nocake"] ~= nil then addCake = false end
    84     if params["nocake"] ~= nil then addCake = false end
    85 end
    85 end
    86 
    86 
    87 function onGameInit()
    87 function onGameInit()
    88     -- Ensure people get same map for same theme
    88     -- Ensure people get same map for same theme
    89     TurnTime = cMaxTurnTime
    89     TurnTime = MAX_TURN_TIME
    90     CaseFreq = 0
    90     CaseFreq = 0
    91     Explosives = 0
    91     Explosives = 0
    92     MineDudPercent = 0
    92     MineDudPercent = 0
    93     EnableGameFlags(gfOneClanMode)
    93     EnableGameFlags(gfOneClanMode)
    94     DisableGameFlags(gfBottomBorder+gfBorder)
    94     DisableGameFlags(gfBottomBorder+gfBorder)
   346      end
   346      end
   347     
   347     
   348 
   348 
   349     if CurrentHedgehog ~= nil and TurnTimeLeft > 0 and band(GetState(CurrentHedgehog),gstHHDriven) ~= 0 then
   349     if CurrentHedgehog ~= nil and TurnTimeLeft > 0 and band(GetState(CurrentHedgehog),gstHHDriven) ~= 0 then
   350         if MaxHeight < delayHeight and
   350         if MaxHeight < delayHeight and
   351            TurnTimeLeft<(cMaxTurnTime-delayTime) and
   351            TurnTimeLeft<(MAX_TURN_TIME-delayTime) and
   352             MaxHeight > 286 and WaterLine > 286 then
   352             MaxHeight > 286 and WaterLine > 286 then
   353             if waterAccel ~= 0 then
   353             if waterAccel ~= 0 then
   354                 SetWaterLine(WaterLine-(baseWaterSpeed+div(getActualHeight(MaxHeight)*100,waterAccel)))
   354                 SetWaterLine(WaterLine-(baseWaterSpeed+div(getActualHeight(MaxHeight)*100,waterAccel)))
   355             else
   355             else
   356                 SetWaterLine(WaterLine-baseWaterSpeed)
   356                 SetWaterLine(WaterLine-baseWaterSpeed)