(svn r22584) -Add: [NoAI] several functions to AICompany to find out performance information (Morloth)

bin/ai/compat_1.0.nut

@@ -72,3 +72,8 @@ AIAbstractList <- AIList;
 AIList.ChangeItem <- AIList.SetValue;
 
 AIRail.ERR_NONUNIFORM_STATIONS_DISABLED <- 0xFFFF;
+
+AICompany.GetCompanyValue <- function(company)
+{
+	return AICompany.GetQuarterlyCompanyValue(company, AICompany.CURRENT_QUARTER);
+}