|
Да, в ГКомме в стандартной поставке есть макрос DMass, который считает оценку массы, производимой за прошлый ход. Его удобно использовать в качестве значения пользовательской колонки в таблице рас. Но эта формула не учитывала потери из-за бомбинга. К тому же была применима только для линейных технологий. Ниже приводится код, на который нужно заменить описание макроса DMass в файле gcomm.mac для рассчёта по формулам, используемым в утилите gmass.
Macro Pow2(x);
begin
result := exp(ln(2)*x);
end;(* Оценка прироста массы кораблей за этот ход *)
Macro DMass;
begin
result := (Ind+(Pop-Ind+DInd)/4)*DTurn;
if DPop>0
then
result := result-DPop/4*DTurn;
endif;
if DInd>0
then
result := result-DInd*DTurn-5*DInd;
endif;
result := result-5000*(DDrv+DWpn+DShld+DCrg);
result := result/10;
end; (* Оценка прироста массы кораблей за этот ход в случае турботехнологий *)
Macro DMass2;
begin
result := (Ind+(Pop-Ind+DInd)/4)*DTurn;
if DPop>0
then
result := result-DPop/4*DTurn;
endif;
if DInd>0
then
result := result-DInd*DTurn-5*DInd;
endif;
result := result-1500*(pow2(Drv)*(1-pow2(-DDrv))+pow2(Wpn)*(1-pow2(-DWpn))+pow2(Shld)*(1-pow2(-DShld))+pow2(Crg)*(1-pow2(-DCrg)));
result := result/10;
end;
Для нелинейных технологий используется макрос DMass2.Учтите, что оценка приближённая и работает лишь при наличии в истории данных за предыдущий ход. Оценка может оуазаться отрицательной, это значит, что произошла выгрузка капы, это компенсация оценки для предыдущих ходов, когда эта капа была произведена и ошибочно учтена как производство массы. В отличие от утилиты gmass этот макрос оценивает производство только за последний ход и совсем не учитывает потери на производство маты. Вероятно подобный макрос (или плагин) можно написать и для ГВНГ, и даже более удобный, автоматически учитывающий стоимость исследований (линейная/нелинейная), сумму за несколько ходов.
*** Edited 17.11.2007 7:30:07 UTC by gegMOPO3***
http://uplanet.ru | http://pbem.uplanet.ru | http://galaxylegend.ru | http://duelserver.ru | http://www.galaxyclub.ru |
http://galaxylegend.ru/press/pz | http://www.orioner.ru/racelist | http://forum.galaxylegend.ru | http://pbem.eu.org/B-on/logs/html
|