petern/OpenTTD
1
0
Fork 0
forked from mirror/OpenTTD
Code Pull Requests Activity

(svn r14835) -Change: apply the 'warn if train's income is negative' setting to other vehicle types, too

Browse Source
This commit is contained in:
smatz
2009-01-04 18:34:23 +00:00
parent f1cc20edc0
commit 67bf6a0998
9 changed files with 32 additions and 78 deletions
Download Patch File Download Diff File Expand all files Collapse all files

26
src/vehicle.cpp
View File

@@ -2231,3 +2231,29 @@ void StopAllVehicles()
InvalidateWindow(WC_VEHICLE_DEPOT, v->tile);
}
}
void VehiclesYearlyLoop()
{
Vehicle *v;
FOR_ALL_VEHICLES(v) {
if (v->IsPrimaryVehicle()) {
/* show warning if vehicle is not generating enough income last 2 years (corresponds to a red icon in the vehicle list) */
if (_settings_client.gui.vehicle_income_warn && v->owner == _local_company && v->age >= 730) {
Money profit = v->GetDisplayProfitThisYear();
if (profit < 0) {
SetDParam(0, v->index);
SetDParam(1, profit);
AddNewsItem(
STR_VEHICLE_IS_UNPROFITABLE,
NS_ADVICE,
v->index,
0);
}
}
v->profit_last_year = v->profit_this_year;
v->profit_this_year = 0;
InvalidateWindow(WC_VEHICLE_DETAILS, v->index);
}
}
}