CBW60:(COST(80)-COST(20))/COST(20)*100,COLORWHITE;
JW60:=(C-COST(20))/(COST(80)-COST(20))*100;
NOTEXT60上:=IF(CBW60 REF(CBW60,1) AND JW60 80,CBW60,DRAWNULL),COLORFF80FF,POINTDOT,LINETHICK6;
NOTEXT60下:IF(CBW60 REF(CBW60,1) AND JW60 5,CBW60,DRAWNULL),COLORLIBLUE,POINTDOT,LINETHICK6;
CBW70:(COST(85)-COST(15))/COST(15)*100,COLORWHITE;
JW70:=(C-COST(15))/(COST(85)-COST(15))*100;
NOTEXT70上:IF(CBW70 REF(CBW70,1) AND JW70 80,CBW70,DRAWNULL),COLORFF80FF,POINTDOT,LINETHICK6;
NOTEXT70下:IF(CBW70 REF(CBW70,1) AND JW70 5,CBW70,DRAWNULL),COLORLIBLUE,POINTDOT,LINETHICK6;
CBW90:(COST(95)-COST(5))/COST(5)*100,COLORWHITE;
JW90:=(C-COST(5))/(COST(95)-COST(5))*100;
NOTEXT90上:IF(CBW90 REF(CBW90,1) AND JW90 80,CBW90,DRAWNULL),COLORFF80FF,POINTDOT,LINETHICK6;
NOTEXT90下:IF(CBW90 REF(CBW90,1) AND JW90 5,CBW90,DRAWNULL),COLORLIBLUE,POINTDOT,LINETHICK6;
CB96比:=CBW90/CBW60-1,NODRAW;
S:=CBW60 REF(CBW60,1) AND JW60 80 AND CBW70 REF(CBW70,1) AND JW70 80 AND CBW90 REF(CBW90,1) AND JW90
X:=CBW60 REF(CBW60,1) AND JW60 5 AND CBW70 REF(CBW70,1) AND JW70 5 AND CBW90 REF(CBW90,1) AND JW90
NOTEXT上1:IF(S,CBW60,DRAWNULL),COLORRED,POINTDOT,LINETHICK6;
NOTEXT上2:IF(S,CBW70,DRAWNULL),COLORRED,POINTDOT,LINETHICK6;
NOTEXT上3:IF(S,CBW90,DRAWNULL),COLORRED,POINTDOT,LINETHICK6;
NOTEXT下1:IF(X,CBW60,DRAWNULL),COLORGREEN,POINTDOT,LINETHICK6;
NOTEXT下2:IF(X,CBW70,DRAWNULL),COLORGREEN,POINTDOT,LINETHICK6;
NOTEXT下3:IF(X,CBW90,DRAWNULL),COLORGREEN,POINTDOT,LINETHICK6;
