/*-------------------------------------------------
Moc obliczona na ATR-ach
-------------------------------------------------*/
makro string ATRRoz
int I;
float F, P;
string S;
{
	P = 0;
	I = ZnajdzGal("ROZ-A1");
	if( I>0 )
		P = P + Bra[I].P;
	endif
	I = ZnajdzGal("ROZ-A2");
	if( I>0 )
		P = P + Bra[I].P;
	endif

	S = sprintf("%3.0f", P);
	I = return S;
}