通达信主力建仓封板分时指标公式主图源码

VR1:=1270915;
VR2:=1270920;
VR3:=IF(1>VR1,IF(CLOSE< 80,1,0),0);
VR4:=IF(1>VR2,1,VR3);
X_2R:=AMOUNT/VOL/100;
X_3R:=SUM(CLOSE*VOL,0)/SUM(VOL,0);
X_4R:=(SETCODE=0 OR SETCODE=1) AND CLOSE< 500;
最强主力W:=IF(X_4R,X_3R,X_3R),COLORYELLOW;
HHJ:IF(SETCODE>=0 AND CONST(BARSSINCE(CLOSE))< 900,CONST(IF(BARSSINCE(C>0)< 30,HHV(CLOSE,0),SUM(IF(BARSSINCE(C>0)=30,1,0)*HHV(CLOSE,0),0))),DRAWNULL),DOTLINE,COLORBLUE;
LLJ:IF(SETCODE>=0 AND CONST(BARSSINCE(CLOSE))< 900,CONST(IF(BARSSINCE(C>0)< 30,HHV(CLOSE,0),SUM(IF(BARSSINCE(C>0)=30,1,0)*LLV(CLOSE,0),0))),DRAWNULL),DOTLINE,COLORBLUE;
STICKLINE((BARSSINCE(C>0)=1 OR BARSSINCE(C>0)=30) AND VR4<>1,HHJ,LLJ,1,0),COLORFF0000;
AF1:=1;
TT:=BARSLAST(HOUR=9 AND MINUTE=(30+AF1))+1;
最强主力:=SUM(V*C,0)/SUM(V,0);
牛股价位:=C,COLORWHITE,LINETHICK4;
牛股盘整:=IF(HOUR>9 AND RANGE(HHV(C,60)/LLV(C,60),1,1.02),C,DRAWNULL),COLORRED,LINETHICK2;
V1:=V;
HH:=C>REF(C,1) AND C/最强主力>(1+0.03);
LL:=C< REF(C,1) AND C/最强主力< (1-0.03);
HH1:=CROSS(SUM(HH,0),0.5);
LL1:=CROSS(SUM(LL,0),0.5);
SS1:=SUM(HH1,0)*CROSS(COUNT(C< REF(C,1),BARSLAST(HH1)),0.5);
BB1:=SUM(LL1,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(LL1)),0.5);
CS1:CONST(SUM(IF(SS1,REF(C,1),DRAWNULL),0))DOTLINE,COLORGREEN,LINETHICK1;
CB1:CONST(SUM(IF(BB1,REF(C,1),DRAWNULL),0))DOTLINE,COLORMAGENTA,LINETHICK1;
HH2:=CROSS(SUM(HH AND C>CS1*1.03,0),0.5);
LL2:=CROSS(SUM(LL AND C< CB1*0.97,0),0.5);
SS2:=SUM(HH2,0)*CROSS(COUNT(C< REF(C,1),BARSLAST(HH2)),0.5);
BB2:=SUM(LL2,0)*CROSS(COUNT(C>REF(C,1),BARSLAST(LL2)),0.5);
CS2:CONST(SUM(IF(SS2,REF(C,1),DRAWNULL),0))DOTLINE,COLORGREEN,LINETHICK1;
CB2:CONST(SUM(IF(BB2,REF(C,1),DRAWNULL),0))DOTLINE,COLORMAGENTA,LINETHICK1;
DRAWICON(BB1 OR BB2,REF(C,1)*0.999,44);
DRAWICON(SS1 OR SS2,REF(C,1)*1.00,45);
牛股启动:=EMA(CLOSE,34)-EMA(CLOSE,888);
主力抄底:=EMA(牛股启动,888);
DRAWICON(CROSS(牛股启动,主力抄底),C,25);
主力建仓:=(VOL/CLOSE)/3;
A2:=SUM((IF(((主力建仓>0.20) AND (CLOSE>(REF(CLOSE,1)))),主力建仓,0)),0);
A3:=SUM((IF(((主力建仓>0.20) AND (CLOSE< (REF(CLOSE,1)))),主力建仓,0)),0);
A6:=A2+A3;
DD1:=1;
比:=A2/A3;
AAA1:=STRCAT(STRCAT('买= ',CON2STR((100*A2)/A6,0)),'%');
AAA2:=STRCAT(STRCAT('卖= ',CON2STR((100*A3)/A6,0)),'%');
AAA3:=STRCAT(STRCAT('差= ',CON2STR((100*(A2-A3))/A6,0)),'%');
DRAWTEXT_FIX(DD1=1,0,0.04,0,AAA1),COLORRED;
DRAWTEXT_FIX(DD1=1,0,0.12,0,AAA2),COLORGREEN;
DRAWTEXT_FIX(DD1=1,0,0.20,0,AAA3),COLOR00FFFF;
DRAWTEXT_FIX(比>2,0,0.40,0,'涨'),COLORCYAN;
DRAWTEXT_FIX(比>2,0,0.48,0,'停'),COLORMAGENTA;
DRAWTEXT_FIX(比>2,0,0.56,0,'板'),COLORRED;
中期线:=EMA(-100*(HHV(HIGH,34)-CLOSE)/(HHV(HIGH,34)-LLV(LOW,34)),4)+100;