通达信买点顶底主力资金指标(源码)

AA:=REF(CLOSE,1);
BBB:=SMA(MAX(CLOSE-AA,0),21,1)/SMA(ABS(CLOSE-AA),21,1)*1000;
HHH:=BBB-LLV(BBB,27);
CCC:=LLV(BBB,27)-BBB;
QQ:(MA(HHH,2)*3+HHH*13)/16,COLORRED,LINETHICK2;
SS:(MA(CCC,2)*3+CCC*13)/16,COLORFF00FF,LINETHICK1;
GG:MA(HHH,5),LINETHICK2,COLORGREEN;
MM:MA(CCC,5),LINETHICK1,COLORGREEN;
WW:IF(QQ<GG ,SS,MM),LINETHICK1, COLORCYAN;
EE:IF(SS<MM ,GG,QQ),COLORFFFFCC,LINETHICK1;
S:0,COLORRED;
买:IF(EE-WW<5.6,100,0),LINETHICK2;
DRAWICON(EE-WW<5.6,60,23);
ZZ:=(HHV(H,3)+LLV(L,3))/2;
A:=IF(C>ZZ,VOL,0);
B:=IF(C<ZZ,VOL,0);
总0:=(A-B);
BBD:EMA(总0,3)/SUM(VOL,5)*100,LINETHICK;
STICKLINE(BBD>=0,0,BBD,3,0),COLOR000088;
STICKLINE(BBD>=0,0,BBD,1.5,0),COLOR0000AA;
STICKLINE(BBD>=0,0,BBD,0.7,0),COLOR0000CC;
STICKLINE(BBD>=0,0,BBD,0.1,0),COLOR0000FF;
STICKLINE(BBD<0,0,BBD,3,0),COLOR888800;
STICKLINE(BBD<0,0,BBD,1.5,0),COLORAAAA00;
STICKLINE(BBD<0,0,BBD,0.7,0),COLORCCCC00;
STICKLINE(BBD<0,0,BBD,0.1,0),COLORFFFF00;
XH1:=REF(BBD,1)<REF(BBD,2) AND REF(BBD,1)<-10 AND BBD>REF(BBD,1) AND BBD>0;
XH2:=REF(BBD,1)>=REF(BBD,2) AND REF(BBD,1)>8 AND BBD<REF(BBD,1) AND BBD<0;
DRAWICON(XH1,-20,23);
DRAWICON(XH2,20,2);
B1:=(HHV(H,9)-C)/(HHV(H,9)-LLV(LOW,9))*100- 70;
B2:=SMA(B1,9,1)+100;
B3:=(C-LLV(L,9))/(HHV(H,9)- LLV(L,9))*100;
B4:=SMA(B3,3,1);
B5:=SMA(B4,3,1)+100;
B6:=B5-B2;
B7:=IF(B6>60,B6-60,0);
TJ01:=LAST(B7<REF(B7,1),5,1);
TJ02:=REF(B7,1)<B7;
TJ:=TJ01 AND TJ02;
STICKLINE(TJ,0,50,4,0),COLOR0000FF;
SL1:=LAST(B7>REF(B7,1),5,1);
SL2:=REF(B7,1)>B7;
SL:=SL1 AND SL2;
STICKLINE(SL,0,-50,4,0),COLOR00FF00;