[通达信] 通达信 主图 自动画线【源码---贴图---公式】
{画线主图 TDXN:1,100,8K:0,2,0P:0,1,0}{参数 N3=90010115012311080918}{小/大/缺省}
{P2=9001011501231 1080925}{小/大/缺省}
{短期压力支持 N1 1 1005}
ZGD:=HHV(H,60);
ZGD2:=CONST(ZGD);
ZDD:=LLV(L,60);
ZDD2:=CONST(ZDD);
GJ:=(C+H+L+O)/4;
嫡阻力:=L+(GJ-L)+(C-L);
嫡支持:=L+(C-GJ);
KOH:=L>REF(H,1);
KOL:=HREF(H,BARSLAST(KOH)+1);
NHIF:=LN3,代价,1),NODRAW,COLOR40FF00{颈线};
颈线A:STICKLINE(颈线,颈线,颈线,0.5,1),COLOR40FF00;
代价2:=REF(中央价,DATE=(P2+1));
颈线B: DRAWLINE(DATE=P2,中央价,DATE>N3,代价2,1),NODRAW,COLOR8000FF;
颈B: STICKLINE(颈线B,颈线B,颈线B,0.5,1),COLOR8000FF;
{立桩量}
V2:=IF(CURRBARSCOUNT=1,VOL*240/FROMOPEN/REF(VOL,1)-1,VOL/REF(VOL,1)-1);
VVOL:=IF(CURRBARSCOUNT=1 AND PERIOD=5,V*240/FROMOPEN,DRAWNULL);
量比:=IF(CURRBARSCOUNT=1,VVOL,VOL)/REF(MA(VOL,5),1);
SAT:=(AMOUNT/C)/(HHV(AMOUNT,20)/HHV(C,20));
饱和:=IF(SAT>1,1,SAT)*100;
立桩:=量比>2 AND 饱和=100;
立桩量:=(V2>=1 OR 立桩) AND C>O;
STICKLINE(立桩量 ,O,C,1.8,0),COLORFF80FF;
STICKLINE(立桩量,O,C,0.7,0),COLOR8000FF;
{涨停标示}
AAK:=CLOSE/REF(C,1)>=1.097 AND C=H;
STICKLINE(AAK,C,O,1.8,0),COLORRED;
STICKLINE(AAK,O,C,0.2,0),COLOR0000FF;
{涨跌停标示}
C3:=REF(C,1);
涨停:=IF((C-C3)*100/C3>=(10-0.01*100/C3),1,0);
跌停:=IF((C3-C)*100/C3>=(10-0.01*100/C3),1,0);
STICKLINE(跌停,OPEN,CLOSE,1,0),COLORFF0000;
{画线B}
HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;
AAR:=REF(H,HIGHN)=HHV(H,2*HIGHN+1);
QYQ:=BACKSET(AAR,HIGHN+1);
CCQ:=FILTER(QYQ,HIGHN) AND H=HHV(H,HIGHN+1);
DDDQQ:=BARSLAST(CCQ);
GDTSQ:=IF(CCQ,CURRBARSCOUNT,0);
DINGBU:=IF(DDDQQ,REF(H,DDDQQ),H);{顶部}
DINGBUTSQ:=IF(DDDQQ,REF(GDTSQ,DDDQQ),GDTSQ);
DINGBU1:=REF(DINGBU,DDDQQ+1);
GDCS1Q:=CONST(DINGBUTSQ);
DINGBUTS1Q:=REF(DINGBUTSQ,DDDQQ+1);
GDCS2Q:=CONST(DINGBUTS1Q);
DINGBU2:=REF(DINGBU1,DDDQQ+1);
MM:=IF(CURRBARSCOUNT>GDCS2Q,0,1);
高点压力2:DRAWLINE(CURRBARSCOUNT=GDCS2Q,H,CURRBARSCOUNT=GDCS1Q,H,1) COLORGREEN,LINETHICK1;
AA1Q:=REF(L,LOWN)=LLV(L,2*LOWN+1);
QY1Q:=BACKSET(AA1Q,LOWN+1);
CC1Q:=FILTER(QY1Q,LOWN) AND L=LLV(L,LOWN+1);
DD1Q:=BARSLAST(CC1Q);
DDTSQ:=IF(CC1Q,CURRBARSCOUNT,0);
YDB:=IF(DD1Q,REF(L,DD1Q),L);
DDTS1Q:=IF(DD1Q,REF(DDTSQ,DD1Q),DDTSQ);
DDCS1Q:=CONST(DDTS1Q);
ZDB:=REF(YDB,DD1Q+1);
DDTS2Q:=REF(DDTS1Q,DD1Q+1);
DDCS2Q:=CONST(DDTS2Q);
低点支持2:DRAWLINE(CURRBARSCOUNT=DDCS2Q,L,CURRBARSCOUNT=DDCS1Q,L,1),COLORFF00FF,LINETHICK1;
页:
[1]