通达信多空相抵源码附图

{多空相抵}

CB:=IF(CAPITAL>1,AMOUNT/VOL/100,(HIGH+LOW+2*CLOSE)/4);

空1:=IF((HIGH-LOW)>0 AND CLOSE>CB, ((HIGH-CLOSE)/(HIGH-CB))*((HIGH-CLOSE)/(HIGH-CB))*((HIGH-CB)/(HIGH-LOW)*VOL),0);

多1:=IF((HIGH-LOW)>0 AND CLOSE>CB, VOL-空1 ,0);

多2:=IF((HIGH-LOW)>0 AND CLOSE<=CB, ((CLOSE-LOW)/(CB-LOW))*((CLOSE-LOW)/(CB-LOW))*((CB-LOW)/(HIGH-LOW)*VOL),0);

DRAWTEXT_FIX(1=1,0,0,0,'www.9m8.cn免费提供'),COLORWHITE;

空2:=IF((HIGH-LOW)>0 AND CLOSE<=CB, VOL-多2 ,0);

多3:=IF((HIGH-LOW)=0 AND CLOSE>REF(CLOSE,1), VOL,0);

空3:=IF((HIGH-LOW)=0 AND CLOSE<=REF(CLOSE,1), VOL,0);

多方量:多1+多2+多3,NODRAW,COLORRED;

空方量:空1+空2+空3,NODRAW,COLORGREEN;

多空相抵:多方量-空方量,NODRAW;

MS:=SUM(多空相抵,5);

M20:EMA(SLOPE(MS,21)*20+MS,55)*1,COLORYELLOW,LINETHICK3;

M20B:MA(M20,5),COLORLIMAGENTA,LINETHICK3;

DRAWBAND(M20,RGB(90,0,0),M20B,RGB(0,20,0));

STICKLINE(多空相抵>0,多空相抵,0,2,0),COLORMAGENTA;

STICKLINE(多空相抵<0,0,ABS(多空相抵),2,0),COLORGREEN;

STICKLINE(CURRBARSCOUNT<6,MS,REF(MS,1),2,1),COLORRED;

STICKLINE(CURRBARSCOUNT<6 AND MS