通达信极品指标主图源码 贴图
RC1:=REF(C,1);
AA:=REF(H,8)=HHV(H,2*8+1); AA1:=REF(L,8)=LLV(L,2*8+1);
QY:=BACKSET(AA,8+1); QY1:=BACKSET(AA1,8+1);
CC2:=FILTER(QY,8) AND H=HHV(H,8+1); CC1:=FILTER(QY1,8) AND L=LLV(L,8+1);
DDD:=BARSLAST(CC2); DD1:=BARSLAST(CC1);
GDTS:=IF(CC2,CURRBARSCOUNT,0); DDTS:=IF(CC1,CURRBARSCOUNT,0);
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS); DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
GDCS1:=CONST(DINGBUTS); DDCS1:=CONST(DDTS1);
GDCS13:=CONST(REF(H,GDCS1-1)); DDCS13:=CONST(REF(L,DDCS1-1));
DINGBUTS1:=REF(DINGBUTS,DDD+1); DDTS2:=REF(DDTS1,DD1+1);
GDCS2:=CONST(DINGBUTS1); DDCS2:=CONST(DDTS2);
GDCS23:=CONST(REF(H,DINGBUTS1-1)); DDCS23:=CONST(REF(L,DDTS2-1));
XG1:=BACKSET(ISLASTBAR,GDCS1); XD1:=BACKSET(ISLASTBAR,DDCS1);
XG2:=BACKSET(ISLASTBAR,DINGBUTS1); XD2:=BACKSET(ISLASTBAR,DDTS2);
M:=INTPART(3*8/5);
AAA:=REF(H,M)=HHV(H,2*M+1);
QYY:=BACKSET(AAA,M+1);
CCC:=FILTER(QYY,M) AND H=HHV(H,M+1);
DDDD:=BARSLAST(CCC),NODRAW;
GDTSS:=IF(CCC,CURRBARSCOUNT,0);
DINGBUTSS:=IF(DDDD,REF(GDTSS,DDDD),GDTSS);
GDCS11:=CONST(DINGBUTSS);
DINGBUTS11:=REF(DINGBUTSS,DDDD+1);
GDCS22:=CONST(DINGBUTS11);
AA11:=REF(L,M)=LLV(L,2*M+1);
QY11:=BACKSET(AA11,M+1);
CC11:=FILTER(QY11,M) AND L=LLV(L,M+1);
DD11:=BARSLAST(CC11);
DDTSS:=IF(CC11,CURRBARSCOUNT,0);
DDTS11:=IF(DD11,REF(DDTSS,DD11),DDTSS);
DDCS11:=CONST(DDTS11);
DDTS22:=REF(DDTS11,DD11+1);
DDCS22:=CONST(DDTS22);
AA1F:=REF(H,5)=HHV(H,2*5+1);
B1:=FILTER(AA1F,5);
CH:=BACKSET(B1,5+1);
D1:=FILTER(CH,5);
R11:=BACKSET(ISLASTBAR,BARSLAST(D1)+1); S11:=R11>REF(R11,1);
AA2:=REF(L,5)=LLV(L,2*5+1);
B2:=FILTER(AA2,5);
C12:=BACKSET(B2,5+1);
D2:=FILTER(C12,5);
T11:=BACKSET(ISLASTBAR,BARSLAST(D2)+1); U11:=T11>REF(T11,1);
HIGHN:=10;LOWN:=10;
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);
DINGBUTSQ:=IF(DDDQQ,REF(GDTSQ,DDDQQ),GDTSQ);
GDCS1Q:=CONST(DINGBUTSQ);
DINGBUTS1Q:=REF(DINGBUTSQ,DDDQQ+1);
GDCS2Q:=CONST(DINGBUTS1Q);
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);
DDTS1Q:=IF(DD1Q,REF(DDTSQ,DD1Q),DDTSQ);
DDCS1Q:=CONST(DDTS1Q);
DDTS2Q:=REF(DDTS1Q,DD1Q+1);
DDCS2Q:=CONST(DDTS2Q);
TJ2:=BACKSET(ISLASTBAR,SUMBARS(V,CAPITAL));
TJ3:=TJ2>REF(TJ2,1);
上:DRAWLINE(CURRBARSCOUNT=GDCS22,H,CURRBARSCOUNT=GDCS11,H,1),COLORGRAY,LINETHICK1;
下:DRAWLINE(CURRBARSCOUNT=DDCS22,L,CURRBARSCOUNT=DDCS11,L,1) COLORGRAY,LINETHICK1;
IF(XG2,GDCS23,DRAWNULL),COLORC0C0C0,POINTDOT;
IF(XG1,GDCS13,DRAWNULL),COLORC0C0C0,POINTDOT;
IF(XD2,DDCS23,DRAWNULL),COLORC0C0C0,POINTDOT;
IF(XD1,DDCS13,DRAWNULL),COLORC0C0C0,POINTDOT;
短压:DRAWLINE(D1,H,S11,H,1),COLOR808000;
短撑:DRAWLINE(D2,L,U11,L,1),COLOR808000;
高压:DRAWLINE(CURRBARSCOUNT=GDCS2Q,H,CURRBARSCOUNT=GDCS1Q,H,1) COLORMAGENTA,LINETHICK1;
低撑:DRAWLINE(CURRBARSCOUNT=DDCS2Q,L,CURRBARSCOUNT=DDCS1Q,L,1),COLORMAGENTA,LINETHICK1;
{以上为趋势线自动划线}
Z1:=STRCAT(HYBLOCK,' ');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,' ');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORLIRED;
DRAWTEXT_FIX(ISLASTBAR,0,0.03,0,EXTERNSTR(0,3)),COLORWHITE;
DRAWTEXT_FIX(ISLASTBAR,0,0.06,0,EXTERNSTR(0,6)),COLORLIBLUE;
DRAWTEXT_FIX(ISLASTBAR,0,0.09,0,EXTERNSTR(0,12)),COLORLIGREEN;{老王}
DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,FGBLOCK),COLORLIMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0,0.12,0,EXTERNSTR(0,1)),COLORYELLOW;{融胜}
主力成本线:EMA(COST(9),250),COLORBROWN,DOTLINE;
{牛马线买点公式升级版}
MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
牛线:WMA(MID,20),COLORRED;
马线:MA(牛线,5),COLORWHITE;
DRAWICON( FILTER(CROSS(牛线,马线),20),马线-0.002 ,1);
DRAWTEXT(CROSS(牛线,马线),LOW*0.984,'买'),COLORRED,LINETHICK2;
止损价:H*0.95,LINETHICK0.5,COLORRED;
庄家:牛线,COLORRED;
IF(庄家>=REF(庄家,1),庄家,DRAWNULL),COLORRED,LINETHICK4;
IF(庄家<=REF(庄家,1),庄家,DRAWNULL),COLORGREEN,LINETHICK2;
DRAWBAND(牛线,RGB(255,87,22),马线,RGB(0,30,255));
N1:=10;
TK:=CONST(HHVBARS(V,10)),COLOR0000FF,LINETHICK1;
量能平台:IF(CURRBARSCOUNT<=N1+3,CONST(IF(TK=0,C,REF(C,TK))),DRAWNULL),COLORGRAY,LINETHICK2;
{NOTEXT_新量能点:IF(CURRBARSCOUNT=TK+1,量能平台,DRAWNULL),CIRCLEDOT,COLORFFFFFF,LINETHICK5;}
DRAWTEXT(ISLASTBAR,量能平台,'量能平台'),COLORGRAY;
{稳涨}
红轨道:=MA(MA(CLOSE,3),1),LINETHICK1,COLORYELLOW;
轨道:MA(MA(CLOSE,3),3),COLOR32CD32,LINETHICK2;
NOTEXT_升:IF(红轨道>=轨道,轨道,DRAWNULL),COLORMAGENTA,LINETHICK2;
机构:(L2_VOL(0,0) - L2_VOL(0,1))*10000/FINANCE(7),NODRAW,COLORRED;
大户:(L2_VOL(1,0) - L2_VOL(1,1))*10000/FINANCE(7),NODRAW,COLORMAGENTA;
主力:机构+大户,NODRAW,COLORYELLOW;
STICKLINE(主力>0,O,C,1.5,1),COLORRED;
STICKLINE(主力<0,O,C,1.5,1),COLORCYAN;
- 上一篇公式:通达信葫芦侦探选股源码 贴图
- 下一篇公式:简单明了选股 成功率85%以上 运用恰当年收益50%以上