share/hedgewars/Data/Scripts/Multiplayer/Continental_supplies.lua
changeset 13748 d09366ca4d7b
parent 13743 d7b72ea8d136
child 13986 f0dea2b88cf8
equal deleted inserted replaced
13747:52959f686082 13748:d09366ca4d7b
  1637 		local vg = AddVisualGear(GetX(gear), GetY(gear), vgtSmokeWhite, 0, false)
  1637 		local vg = AddVisualGear(GetX(gear), GetY(gear), vgtSmokeWhite, 0, false)
  1638 		SetVisualGearValues(vg, nil, nil, nil, nil, nil, nil, nil, nil, nil, 0xFF8080B0)
  1638 		SetVisualGearValues(vg, nil, nil, nil, nil, nil, nil, nil, nil, nil, 0xFF8080B0)
  1639 	end
  1639 	end
  1640 end
  1640 end
  1641 
  1641 
  1642 function ShowContinentLabel()
  1642 function ShowContinentLabel(continent)
  1643 	if CS.TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)] == 0 then
  1643 	if not continent then
       
  1644 		continent = CS.TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]
       
  1645 	end
       
  1646 	if continent == 0 then
  1644 		AddCaption(loc("Random continent"), GetClanColor(GetHogClan(CurrentHedgehog)), capgrpAmmoinfo)
  1647 		AddCaption(loc("Random continent"), GetClanColor(GetHogClan(CurrentHedgehog)), capgrpAmmoinfo)
  1645 	else
  1648 	else
  1646 		AddCaption(CS.CONTINENT_INFORMATION[CS.TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]][1], GetClanColor(GetHogClan(CurrentHedgehog)), capgrpAmmoinfo)
  1649 		AddCaption(CS.CONTINENT_INFORMATION[CS.TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]][1], GetClanColor(GetHogClan(CurrentHedgehog)), capgrpAmmoinfo)
  1647 	end
  1650 	end
  1648 end
  1651 end
  1680 	end
  1683 	end
  1681 	if CS.CONFIRM_CONTINENT_SELECTION == 0 then
  1684 	if CS.CONFIRM_CONTINENT_SELECTION == 0 then
  1682 		CS.SELECT_CONTINENT_CHECK=false
  1685 		CS.SELECT_CONTINENT_CHECK=false
  1683 		EndTurnCS(0)
  1686 		EndTurnCS(0)
  1684 		PlaySound(sndPlaced)
  1687 		PlaySound(sndPlaced)
  1685 		ShowContinentLabel()
  1688 		if(CurrentHedgehog and CS.TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]==0)
       
  1689 		then
       
  1690 			CS.TEAM_CONTINENT[GetHogTeamName(CurrentHedgehog)]=GetRandom(table.maxn(CS.CONTINENT_INFORMATION))+1
       
  1691 			SetContinentWeapons()
       
  1692 			HideMission()
       
  1693 			ShowContinentLabel(0)
       
  1694 		else
       
  1695 			ShowContinentLabel()
       
  1696 		end
  1686 		CS.CONFIRM_CONTINENT_SELECTION = -1
  1697 		CS.CONFIRM_CONTINENT_SELECTION = -1
  1687 	end
  1698 	end
  1688 
  1699 
  1689 	if GameTime % 600 == 0 then
  1700 	if GameTime % 600 == 0 then
  1690 		runOnGears(SabotageSmokeInactive)
  1701 		runOnGears(SabotageSmokeInactive)