//****************KILL SETTLERS**********************
trigger 'WW2PBEM_NoSettlersAlive' when (unit.built && unit.type == UnitType("UNIT_SETTLER")) {
	KillUnit(unit);
}

//****************DATE BUTTON**********************
trigger 'TInitVars' when (g.player || unit.selected) {
	initial_year = g.year;
	last_checked_year = g.year;
	year = 1941;
	month = 12;
	Message(g.player, 'The Date');
	oilCount = 0;
	while(aCity < player.cities) {
		SetCityByIndex(1, g.player, aCity);
        oilCount = oilCount + CityCollectingGood(city.1,5);
		aCity = aCity + 1;
	}
	Message(g.player, 'Oil Count');
	DisableTrigger('TInitVars');
}

trigger 'WW2PBEM_Date' when (IsHumanPlayer(g.player)) {
	
	if(g.year > last_checked_year && g.year > initial_year) {
		if(month < 12)
		{
			month = month + 1;
		} elseif(month == 12) {
			month = 1;
			year = year + 1;
		}
		last_checked_year = g.year;
	}
	Message(g.player, 'The Date');
}

messagebox 'The Date' {
	if(month == 1) {
		SetString(1,ID_JANUARY);
	} elseif(month == 2) {
		SetString(1,ID_FEBRUARY);
	} elseif(month == 3) {
		SetString(1,ID_MARCH);
	} elseif(month == 4) {
		SetString(1,ID_APRIL);
	} elseif(month == 5) {
		SetString(1,ID_MAY);
	} elseif(month == 6) {
		SetString(1,ID_JUNE);
	} elseif(month == 7) {
		SetString(1,ID_JULY);
	} elseif(month == 8) {
		SetString(1,ID_AUGUST);
	} elseif(month == 9) {
		SetString(1,ID_SEPTEMBER);
	} elseif(month == 10) {
		SetString(1,ID_OCTOBER);
	} elseif(month == 11) {
		SetString(1,ID_NOVEMBER);
	} elseif(month == 12) {
		SetString(1,ID_DECEMBER);
	}
	
	if(year == 1941 || year == 0) {
		Title(ID_REAL_DATE_FO);
	} elseif(year == 1942) {
		Title(ID_REAL_DATE_FT);
	} elseif(year == 1943) {
		Title(ID_REAL_DATE_FTR);
	} elseif(year == 1944) {
		Title(ID_REAL_DATE_FF);
	} elseif(year == 1945) {
		Title(ID_REAL_DATE_FFI);
	}
	
	MessageType("INFECT_CITY");
	Show();
}

//****************OIL COUNT**********************

Trigger 'OilisGood' when (IsHumanPlayer(g.player)) {
	aCity = 0;
	oilCount = 0;
	while(aCity < player.cities) {
		SetCityByIndex(1, g.player, aCity);
        oilCount = oilCount + CityCollectingGood(city.1,5);
		aCity = aCity + 1;
	}
	Message(g.player, 'Oil Count');
	
	tCount = UnitCount(g.player, UnitType("UNIT_TANK"));
	tDifference = tCount - (20 * oilCount);
	if((20 * oilCount) < tCount) {
		aUnits = 0;
		while(aUnits < player.totalunits) {
			SetUnitByIndex(1, g.player, aUnits);
			if(unit.type == unitType("UNIT_TANK")) {
				if(tDifference < 10) { 
					AddMovement(unit.1, -100);
				} elseif(tDifference < 20) { 
					AddMovement(unit.1, -200);
				} elseif(tDifference < 30) { 
					AddMovement(unit.1, -300);
					DamageUnit(unit.1, Random(3));
				} elseif(tDifference < 40) { 
					AddMovement(unit.1, -400);
					DamageUnit(unit.1, Random(6));
				} elseif(tDifference < 50) { 
					AddMovement(unit.1, -500);
					DamageUnit(unit.1, Random(12)); 
				} elseif(tDifference >= 50) { 
					AddMovement(unit.1, -550);
					DamageUnit(unit.1, Random(24)); 
				}
			}
			aUnits = aUnits + 1;
		}
		Message(g.player,'Warning');
	}
}

messagebox 'Oil Count' {

	if(oilCount == 0) {
		Text(ID_OIL_ZERO);
	} elseif(oilCount == 1) {
		Text(ID_OIL_ONE);
	} elseif(oilCount == 2) {
		Text(ID_OIL_TWO);
	} elseif(oilCount == 3) {
		Text(ID_OIL_THREE);
	} elseif(oilCount == 4) {
		Text(ID_OIL_FOUR);
	} elseif(oilCount == 5) {
		Text(ID_OIL_FIVE);
	} elseif(oilCount == 6) {
		Text(ID_OIL_SIX);
	} elseif(oilCount == 7) {
		Text(ID_OIL_SEVEN);
	} elseif(oilCount == 8) {
		Text(ID_OIL_EIGHT);
	} elseif(oilCount == 9) {
		Text(ID_OIL_NINE);
	} elseif(oilCount >= 10) {
		Text(ID_OIL_MAX);
	}
	Title(ID_OIL_SUPPORT);
	MessageType("BOMB_CABINET");
}

messagebox 'Warning' {
	if(tDifference < 10) { 
		Text(ID_WARN_A);
	} elseif(tDifference < 20) { 
		Text(ID_WARN_B);
	} elseif(tDifference < 30) { 
		Text(ID_WARN_C);
	} elseif(tDifference < 40) { 
		Text(ID_WARN_D);
	} elseif(tDifference < 50) { 
		Text(ID_WARN_E); 
	} elseif(tDifference >= 50) { 
		Text(ID_WARN_F); 
	}
	Title(ID_WARNING);
	MessageType("BOMB_CABINET");
	Show();
}