U:=V;
A:=SUMBARS(U ,CAPITAL);
A95:SUM(COST(95),A)/A,COLORFF00FF;A80:SUM(COST(80),A)/A,COLORYELLOW;
A60:SUM(COST(60),A)/A;
A20:SUM(COST(20),A)/A,COLORRED;
A10:SUM(COST(10),A)/A,COLORGREEN;
U:=V;
A:=SUMBARS(U ,CAPITAL);
A95:SUM(COST(95),A)/A,COLORFF00FF;A80:SUM(COST(80),A)/A,COLORYELLOW;
A60:SUM(COST(60),A)/A;
A20:SUM(COST(20),A)/A,COLORRED;
A10:SUM(COST(10),A)/A,COLORGREEN;