通达信负压动能线指标(源码)

CN1:=HHV(V,5);
CN2:=O>C;
CN02:=C>O;
CN03:=C=O;
CN04:=((SUM(V,5)/CN1));
CN05:=IF(CN04>0.3,1,0);
CN06:=IF(CN2 AND CN05,V,0);
CN07:=IF(CN02 AND CN05,V,0);
CN08:=IF(CN03 AND CN05,V,0);
AD:=SUM(CN07,3)*0.001;
负压:SUM(CN06,3)*0.001;
动能线:(AD-负压),COLOR0000FF;
AF:=动能线=AD=1;
力量冲压:IF(AF=1,动能线,DRAWNULL),COLORBLUE,LINETHICK2;
力量高压:IF(动能线>负压,动能线,DRAWNULL),COLORGREEN,LINETHICK1;
AX:=AD*0.6;
惯性区:BETWEEN(动能线,AD,AX),COLORLIMAGENTA;
0,COLORGRAY;
50,DOTLINE;