]:+=====>
Приветсвую Лидеров рас!
> Big_0603 2 460,82 2,89
У меня 2480.46 0.43
> Asteroid_0602 0,54 5,80
2.83 2.13 Поздравляю! Тебе тут повезло :)
Сумма: 38791.97
Писал вот такой макрос ГКОММ:
---
Macro PlanetS(R);
var sz, i;
begin
sz:= 0;
for i:=0 to Planet.count do
Planet.current(i);
if (Planet.Race = R) or (Planet.Pop = 0) then
sz:= sz + Planet.Size;
endif;
endfor;
result:= sz;
end;
---
Мож кто лучше что сделал, а то я не читал документацию по макросам. Вышлите,
если не сложно.
С уважением, Правитель EViruSian
]:+=====>
|