通达信多空相抵源码附图
{多空相抵}
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.guhai.com.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<REF(MS,1),MS,REF(MS,1),2,0),COLORCYAN;
