通达信龙头大趋势主图指标 源码 贴图

大趋势H1:EMA(CLOSE,8),COLORWHITE;
H2:EMA(大趋势H1,18),COLORYELLOW;
H3:EMA(CLOSE,108),COLORGREEN;
STICKLINE(大趋势H1>H2,大趋势H1,H2,1,1),COLORRED;
A:=(3*CLOSE+LOW+OPEN+HIGH)/6;
D1:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/211;
D2:=EMA(D1,2);
D3:=EMA(D2,2);
FK1:=EMA(D3,2);
买入:=CROSS(D1,FK1);
散户:=100*(HHV(HIGH,55)-CLOSE)/(HHV(HIGH,55)-LLV(LOW,55));
RSV:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
主力:=EMA(J,6);
金叉:=CROSS(主力,散户);
VAR1:=MA(C,5)>REF(MA(C,5),1) AND REF(C>O OR C<O,5) ;
VAR2:=REF(MA(C,5)<REF(MA(C,5),1),1) AND REF(C>O OR C<O,5) AND REF(C>O OR C<O,7);
VAR3:=C>O AND REF(C>O,1) AND REF(C<O,2) AND REF(O/C>1.02,2);
VAR4:=VAR1 AND VAR2 AND VAR3;
VAR5:=COUNT(VAR4,2)>0;
发现龙头:=金叉 AND VAR5 AND 买入 ;
DRAWTEXT(发现龙头,LOW*0.97,'▲发现龙头'),COLORCYAN;
STICKLINE(发现龙头,H,L,1,0),LINETHICK2,COLORWHITE;
STICKLINE(发现龙头,O,C,3,1),LINETHICK2,COLORWHITE;
ZT:=C>REF(C,1)*1.090 AND C<REF(C,1)*1.105;
DT:=C<REF(C,1)*0.901 AND C>REF(C,1)*0.898;
STICKLINE(ZT,C,O,4,0),COLORRED;
STICKLINE(DT,C,O,4,0),COLOR00FF00;
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORYELLOW;
T1:=CONST(LLVBARS(LOW,10));
T1HIGH:=CONST(REF(HIGH,T1));
CC:=CONST(CURRBARSCOUNT);
T2:=CONST(BARSLAST(CURRBARSCOUNT>CC+T1 AND H>T1HIGH));
T2HIGH:=CONST(REF(HIGH,T2));
T3:=CONST(BARSLAST(CURRBARSCOUNT>CC+T2 AND HIGH>T2HIGH));
T3HIGH:=CONST(REF(HIGH,T3));
出击线:DRAWLINE(CURRBARSCOUNT=T3+1,T3HIGH,ISLASTBAR,T3HIGH,1),LINETHICK2,COLOR0000FF;
DRAWTEXT(ISLASTBAR,T3HIGH,'上线买')LINETHICK1,COLOR0000FF;
LT:=LLVBARS(L,60);
LTT:=BARSLAST(CURRBARSCOUNT=CONST(LT)+1);
HT:=FINDHIGHBARS(H,LT+1,60,1);
AA1:DRAWLINE(CURRBARSCOUNT=CONST(HT)+1,H,ISLASTBAR,REF(H,HT),0),COLORYELLOW,LINETHICK2;
TT:=BARSLAST(CURRBARSCOUNT=CONST(HT)+1);
AA:=CROSS(C,CONST(AA1));
TJAA:=COUNT(AA,TT+1)=1 AND AA;
TJ1AA:=COUNT(V<MA(V,277),TT+1) ;
BL:=TJ1AA/(TT+1)*100;
XG:=TJAA AND TT>40 AND BL>70;
XGT:=BARSLAST(CURRBARSCOUNT=CONST(BARSLAST(XG))+1);
ZH:=REF(H,TT);
YL:=REF(L,LTT);
XC:=REF(C,XGT);
YZ:=(XC-YL)/YL*100;
ZBL:=YZ/REF(LTT,XGT);
XGA:=XG AND ZBL<2.95;
DRAWICON(XGA,L*0.95,9);
DRAWTEXT(CURRBARSCOUNT=1,AA1*0.999,STRCAT('------------牛线',CON2STR(AA1,2))),COLORYELLOW;
DRAWTEXT(TT=0,REF(H,TT)*1.0007,VARCAT(VARCAT('牛线突破 : ',VAR2STR(REF(H,TT),2)),'元'))COLORWHITE;
XG11:=COUNT(CROSS(C>=AA1,0.5),TT+1)=1 AND CROSS(C>=AA1,0.5) AND LT>1.5;
DRAWICON(CROSS(C,AA1) AND CURRBARSCOUNT<CONST(TT)+1,L,23);
DRAWTEXT(XG11,(H* 0.999),'过牛线'),COLORYELLOW;
STICKLINE( XG11,C,O,5,1)COLOR8080FF;
STICKLINE( XG11,C,O,0.7,1)COLORYELLOW;
ZNOTEXT1:IF(C>=AA1,AA1,DRAWNULL),LINETHICK5,COLOR8000FF;
IF(C>=AA1,AA1,DRAWNULL),DOTLINE,COLORFFFFFF;
ZNOTEXT2:IF(C<AA1,AA1,DRAWNULL),LINETHICK2,COLORGREEN;
IF(C<AA1,AA1,DRAWNULL),DOTLINE,COLORRED;
A7:=C-REF(C,1);{www.gpxiazai.com}
A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);
SHORT:=7; LONG:=19;
RMA:=EMA(CLOSE,SHORT);
NMA:=EMA(CLOSE,LONG);
UP:=DRAWLINE(L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV(L,BARSLAST(CROSS(NMA,RMA))+1),H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV(H,BARSLAST(CROSS(RMA,NMA))+1),0);
DOWN:=DRAWLINE(H=HHV(H,BARSLAST(CROSS(RMA,NMA))+1),HHV(H,BARSLAST(CROSS(RMA,NMA))+1),L=LLV(L,BARSLAST(CROSS(NMA,RMA))+1),LLV(L,BARSLAST(CROSS(NMA,RMA))+1),0);
买进:=(LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2))) AND REF(DOWN,1)<REF(DOWN,2) AND UP>REF(DOWN,1);
DRAWTEXT(买进 ,LOW*0.96,'捡钱了'),COLOR00FF00;
DRAWICON(买进 ,LOW*0.99,15);
STICKLINE(C/REF(C,1)>1.095,C,O,2,0),COLORYELLOW;