share/hedgewars/Data/Maps/ClimbHome/map.lua
changeset 11067 c632b47b8ff0
parent 10824 acbbd49f8274
child 11618 66880a42c2d7
child 12373 1e7a50e91d0c
equal deleted inserted replaced
11066:f10a4bdfa0f4 11067:c632b47b8ff0
    86     end
    86     end
    87     if showWaterStats or scaleGraph then
    87     if showWaterStats or scaleGraph then
    88         dummyHog = AddHog(" ", 0, 1, "NoHat")
    88         dummyHog = AddHog(" ", 0, 1, "NoHat")
    89         HH[dummyHog] = nil
    89         HH[dummyHog] = nil
    90         totalHedgehogs = totalHedgehogs - 1
    90         totalHedgehogs = totalHedgehogs - 1
    91         if not showWaterStats then
    91         teams[GetHogTeamName(dummyHog)] = nil
    92             SendStat(siClanHealth, tostring(32640), " ")
       
    93         end
       
    94         SendStat(siClanHealth, tostring(32640), " ")
    92         SendStat(siClanHealth, tostring(32640), " ")
    95     end
    93     end
    96 end
    94 end
    97 
    95 
    98 function onGearAdd(gear)
    96 function onGearAdd(gear)
   110         AddCaption("Once you set off the proximity trigger, Mr. Mine is not your friend",0xffffff,0)
   108         AddCaption("Once you set off the proximity trigger, Mr. Mine is not your friend",0xffffff,0)
   111         MrMine = nil
   109         MrMine = nil
   112     elseif gear == Cake then
   110     elseif gear == Cake then
   113         Cake = nil
   111         Cake = nil
   114     elseif GetGearType(gear) == gtHedgehog then
   112     elseif GetGearType(gear) == gtHedgehog then
       
   113 	onGameTick20()
       
   114 	onGearDamage(gear, 0)
   115         HH[gear] = nil
   115         HH[gear] = nil
   116     end
   116     end
   117 end
   117 end
   118 
   118 
   119 function onGameStart()
   119 function onGameStart()
   593     if actualHeight > 1500 then
   593     if actualHeight > 1500 then
   594         SendStat(siCustomAchievement, string.format(text, RecordHeightHogName, actualHeight))
   594         SendStat(siCustomAchievement, string.format(text, RecordHeightHogName, actualHeight))
   595     else
   595     else
   596         SendStat(siCustomAchievement, string.format(text, RecordHeightHogName))
   596         SendStat(siCustomAchievement, string.format(text, RecordHeightHogName))
   597     end
   597     end
       
   598     SendStat(siPointType, loc("points"))
   598     SendStat(siPlayerKills, actualHeight, loc(GetHogTeamName(CurrentHedgehog)))
   599     SendStat(siPlayerKills, actualHeight, loc(GetHogTeamName(CurrentHedgehog)))
   599     EndGame()
   600     EndGame()
   600 end
   601 end
   601 
   602 
   602 function makeMultiPlayerLoserStat(gear)
   603 function makeMultiPlayerLoserStat(gear)
   627     local loser = ranking[1]
   628     local loser = ranking[1]
   628     SendStat(siGameResult, string.format(loc("%s wins!"), winner.name))
   629     SendStat(siGameResult, string.format(loc("%s wins!"), winner.name))
   629     SendStat(siGraphTitle, string.format(loc("Team’s best heights per round")))
   630     SendStat(siGraphTitle, string.format(loc("Team’s best heights per round")))
   630     
   631     
   631     if winner.score < 1500 then
   632     if winner.score < 1500 then
   632         SendStat(siCustomAchievement, string.format(loc("This round’s award for ulitmate disappointment goes to: Everyone!")))
   633         SendStat(siCustomAchievement, string.format(loc("This round’s award for ultimate disappointment goes to: Everyone!")))
   633     else
   634     else
   634         if winner.score > 30000 then text = loc("%s (%s) reached for the sky and beyond with a height of %d!")
   635         if winner.score > 30000 then text = loc("%s (%s) reached for the sky and beyond with a height of %d!")
   635         elseif winner.score > 24750 then text = loc("%s (%s) was certainly not afraid of heights: Peak height of %d!")
   636         elseif winner.score > 24750 then text = loc("%s (%s) was certainly not afraid of heights: Peak height of %d!")
   636         elseif winner.score > 16500 then text = loc("%s (%s) does not have to feel ashamed for their best height of %d.")
   637         elseif winner.score > 16500 then text = loc("%s (%s) does not have to feel ashamed for their best height of %d.")
   637         elseif winner.score > 8250 then text = loc("%s (%s) reached a decent peak height of %d.")
   638         elseif winner.score > 8250 then text = loc("%s (%s) reached a decent peak height of %d.")