通達信龍啟動主圖指標 源碼 貼圖 有未來

A:=(3*CLOSE+LOW+OPEN+HIGH)/6;
HJX21:=(21*A+20*REF(A,1)+19*REF(A,2)+18*REF(A,3)+17*REF(A,4)+16*REF(A,5)+
15*REF(A,6)+14*REF(A,7)+13*REF(A,8)+12*REF(A,9)+11*REF(A,10)+
10*REF(A,11)+9*REF(A,12)+8*REF(A,13)+7*REF(A,14)+6*REF(A,15)+
5*REF(A,16)+4*REF(A,17)+3*REF(A,18)+2*REF(A,19)+
REF(A,21))/231;
HJX3:=(3*A+2*REF(A,1)+REF(A,2))/6;
DC1:EMA(HJX3,4),COLORLIMAGENTA;
DC2:EMA(DC1,3),COLORRED;
DC3:EMA(DC1,7),COLORRED;
DC4:EMA(HJX21,6),COLORYELLOW,LINETHICK2;
DC5:EMA(HJX21,16),COLORGREEN,LINETHICK2;
DC6:EMA(HJX21,34),COLORBLUE,LINETHICK2;
RSV:=(CLOSE-LLV(LOW,6))/(HHV(HIGH,6)-LLV(LOW,6))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=3*K-2*D;
YX2:=D>REF(D,1);
YX3:=DC4>DC6 AND DC5>DC6;
YX4:=CLOSE>DC4 AND CLOSE/DC4<1.1;
YX5:=DC1>DC2 AND DC2>DC3;
XG:=YX2 AND YX3 AND YX4;
神飛:=XG AND COUNT(XG,10)=1 AND COUNT(YX5,10)<5;
DRAWTEXT(神飛,LOW*0.98,'神'),COLORFFFFFF;
DIFF:=EMA(CLOSE,12) - EMA(CLOSE,26);
DEA:=EMA(DIFF,9);
MACD:=2*(DIFF-DEA);
XG0:=CROSS(MACD,0);
XG1:=CROSS(CLOSE,DC1) AND CROSS(CLOSE,DC2) AND CROSS(CLOSE,DC3) AND BARSLAST(XG0)<=5
AND CLOSE<DC4 ;
DRAWTEXT(XG1,LOW*0.98,'疊彩'),COLORFF00FF;
HJX:=EMA(HJX21,12);
ZF:=100*(CLOSE-REF(CLOSE,1))/REF(CLOSE,1);
TTUP:=HJX+2*STD(CLOSE,20);
TTDOWN:=HJX-2*STD(CLOSE,20);
HUP:=EMA(TTUP,3);
HDOWN:=EMA(TTDOWN,3);
LBRISE:=HUP/REF(HUP,1)>1.0035;
MIDRISE:=HJX>REF(HJX,1);
LBDOWN:=HDOWN<REF(HDOWN,1);
CLB1:=LOW/HUP<1.01 AND CLOSE/HUP>0.99 AND (OPEN+LOW)/2.1<HUP ;
KXT:=CLOSE>OPEN AND ((HIGH-CLOSE)+(OPEN-LOW))/(CLOSE-OPEN)<1.2 AND HIGH/CLOSE<1.035;
TDKD:=100*(HUP-HDOWN)/HJX;
TDXT:=TDKD<15 AND LLV(TDKD,8)<10;
XGG:=LBRISE AND MIDRISE AND CLB1 AND KXT AND TDXT;
CXG:=COUNT(XGG,20);
喇叭開口:=XGG AND CXG=1 AND COUNT(LBRISE,10)<10 AND HIGH/HHV(HIGH,5)>0.98;
DRAWTEXT(喇叭開口,LOW*0.99,'喇叭'),COLORFFFF00;
DRAWICON(CROSS(DC1,DC2),LOW*0.99,5);
DRAWICON(神飛,LOW*0.970,9);
DRAWICON(喇叭開口,LOW,2),COLORFFFF00;
{漲停表示}{股票下載網www.theworldvictor.com}
LA:=BARSLAST(C>REF(C,1)*1.098);
LC:=REF(CLOSE,LA);
LO:=REF(OPEN,LA);
LAL:=REF(L,LA);
LAH:=REF(H,LA);
一漲停:=EVERY(C/REF(C,1)>=1.097 AND C=H,1);
雙漲停:=EVERY(C/REF(C,1)>=1.097 AND C=H,2);
三漲停:=EVERY(C/REF(C,1)>=1.097 AND C=H,3) AND H>L;
策略1A:=EXIST((C/REF(C,2)-1)*100>20,2) AND COUNT(LC>LO,3)>=1 AND O<REF(C,1) AND C<REF(C,1) AND C>O AND C>REF(O,1) AND REF(C,1)>REF(C,2) ;
策略1B:=EXIST(雙漲停,3) AND COUNT(LC>LO,4)>=1 AND O<REF(C,1) AND C<REF(C,1) AND C>O AND C>REF(O,1) AND REF(C,1)>REF(C,2) ;
DRAWTEXT(策略1A,LOW,'①'),COLORYELLOW;
DRAWTEXT(策略1B,LOW,'①'),COLORYELLOW;
{策略2:=EXIST(三漲停,5) AND C>中 AND L<中*1.01618 AND C/REF(C,1)<1.05 AND HHV(H,5)/C>1.14;
DRAWTEXT(策略2,LOW,'②'),COLORYELLOW;}
角度:=ATAN((MA(C,5)/REF(MA(C,5),1)-1)*100)*57.3;
持有:=EXIST(一漲停,5) AND 角度>75 AND C>REF(C,1);
突破:=角度>75 AND C>REF(C,1) {AND (H/C)<1.038};
DRAWTEXT(持有,LOW,'龍'),COLORYELLOW;
STICKLINE(突破,O,C,1,0),COLORMAGENTA;