抓板资金监控，和谐源码分享（通达信副图 源码 测试图）

{公式名称: 抓板资金监控

画线方法: 副图}

VAR1:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);

VAR2:=REF(EMA(VAR1,3),1);

VAR3:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));

VAR4:=IF(CLOSE>OPEN,VAR3*(HIGH-LOW),IF(CLOSE<OPEN,VAR3*(HIGH-OPEN+(CLOSE-LOW)),VOL/2))+IF(CLOSE>OPEN,0-VAR3*(HIGH-CLOSE+(OPEN-LOW)),IF(CLOSE<OPEN,0-VAR3*(HIGH-LOW),0-VOL/2));

VAR5:=VOL/CAPITAL;

VAR6:=IF(VAR5>10,10,VAR5);

VAR7:=VAR4/20/1.15;

VAR8:=VAR7*0.55+REF(VAR7,1)*0.33+REF(VAR7,2)*0.22;

VAR9:=EMA(VAR8,8);

VAR10:=EMA(VAR8,3);

STICKLINE(VAR7*0.4>=0,VAR7*0.4+VAR10,0,3,0),COLORYELLOW;

STICKLINE(VAR7*0.4<0,VAR7*0.4+VAR10,0,3,0),COLORGREEN;

VAR11:=IF(VAR7*0.4+VAR10>0,VAR7*0.4+VAR10,DRAWNULL);

VAR12:=IF(VAR7*0.4+VAR10<0,VAR7*0.4+VAR10,DRAWNULL);

VAR13:=VAR7*0.4+VAR10;

VAR14:=AMOUNT/10000;

资金净进出:IF(VAR7*0.4+VAR10>0,VAR11,VAR12),POINTDOT,COLORWHITE;

进出比例%:IF(VAR7*0.4+VAR10>0,VAR11/VAR14*100,VAR12/VAR14*100),COLORYELLOW;

VAR15:=VAR10;{分析家公式网 WWW.zbsir.COM 整理}

STICKLINE(VAR15>0,VAR15,0,3,0),COLORRED;

STICKLINE(VAR15<0,VAR15,0,3,0),COLORFF3300;

VAR16:=REF(VAR12,1)<0 AND VAR11>30 AND CLOSE>OPEN AND CLOSE>REF(CLOSE,1) AND CLOSE>MA(CLOSE,3);

VAR17:=(3*CLOSE+2*LOW+OPEN+HIGH)/7;

VAR18:=(20*VAR17+19*REF(VAR17,1)+18*REF(VAR17,2)+17*REF(VAR17,3)+16*REF(VAR17,4)+15*REF(VAR17,5)+14*REF(VAR17,6)+13*REF(VAR17,7)+12*REF(VAR17,8)+11*REF(VAR17,9)+10*REF(VAR17,10)+9*REF(VAR17,11)+8*REF(VAR17,12)+7*REF(VAR17,13)+6*REF(VAR17,14)+5*REF(VAR17,15)+4*REF(VAR17,16)+3*REF(VAR17,17)+2*REF(VAR17,18)+REF(VAR17,20))/210;

VAR19:=VAR11>300 AND CROSS(CLOSE,VAR18);

DRAWTEXT(VAR16,(-30),13),COLORMAGENTA;