以下是通达信麟龙指标套二(指标 主图+副图贴图)源码和截图
通达信麟龙指标套二(指标 主图+副图贴图)源码：
EXP12:=EXPMA(C,12);
EXP50:=EXPMA(C,50);
中期方向线:EXP12-EXP50,NODRAW;
DRAWBAND(中期方向线,RGB(190,0,0),0,RGB(0,160,0));
MB:=EXPMA(中期方向线,20),COLORWHITE;
超买线:MB+1.96*STD(中期方向线,20),COLORYELLOW;
超卖线:MB-1.96*STD(中期方向线,20),COLORCYAN;
MA1:=EMA(C,12);
MA2:=EMA(C,50);
MA3:=EMA(C,34);
MA4:=EMA(C,7);
MA5:=EMA(C,20);
MA6:=EMA(C,10);
DIFF:=EMA(CLOSE,30)-EMA(CLOSE,120);
DEA:=EMA(DIFF,9);
M1:MA(CLOSE,5),COLORRED,LINETHICK;
M2:EMA(CLOSE,12),COLORRED,LINETHICK;
M3:EMA(CLOSE,50),COLORRED,LINETHICK;
X:=BARSLAST(REF(CROSS(C,MA(C,120)),1))ANDCROSS(MA(C,20),MA(C,120));
IF(M3 REF(M3,1),M3,DRAWNULL),COLORGREEN,LINETHICK;
STICKLINE(C =MA1ANDC =MA2ANDDIFF =DEA,H,L-0.01,0,0),COLORRED;
STICKLINE(C =MA1ANDC =MA2ANDDIFF =DEA,O,C,2.5,0),COLORRED;
STICKLINE(C =MA1ANDC =MA2ANDDIFF =DEA,O,C,2,0),COLORRED;
STICKLINE(C =MA1ANDC =MA2ANDDIFF =DEA,O,C,1,0),COLORRED;
STICKLINE(C =MA1ANDC =MA2ANDDIFF =DEA,O,C,0,0),COLORRED;
STICKLINE(C MA1ANDC =MA2ANDDIFF DEA,H,L-0.008,0,0),COLORGREEN;
STICKLINE(C MA1ANDC =MA2ANDDIFF DEA,O,C,2.5,0),COLORGREEN;
STICKLINE(C MA1ANDC =MA2ANDDIFF DEA,O,C,2,0),COLORGREEN;
STICKLINE(C MA1ANDC =MA2ANDDIFF DEA,O,C,1,0),COLORGREEN;
STICKLINE(C MA1ANDC =MA2ANDDIFF DEA,O,C,0,0),COLORGREEN;
STICKLINE(C MA1ANDC =MA2ANDDIFF =DEA,H,L-0.008,0,0),COLORYELLOW;
STICKLINE(C MA1ANDC =MA2ANDDIFF =DEA,O,C,2.5,0),COLORYELLOW;
STICKLINE(C MA1ANDC =MA2ANDDIFF =DEA,O,C,2,0),COLORYELLOW;
STICKLINE(C MA1ANDC =MA2ANDDIFF =DEA,O,C,1,0),COLORYELLOW;
STICKLINE(C MA1ANDC =MA2ANDDIFF =DEA,O,C,0,0),COLORYELLOW;
STICKLINE(C =MA1ANDC =MA2ANDDIFF DEA,H,L-0.008,0,0),COLORRED;
STICKLINE(C =MA1ANDC =MA2ANDDIFF DEA,O,C,2.5,0),COLORRED;
STICKLINE(C =MA1ANDC =MA2ANDDIFF DEA,O,C,2,0),COLORRED;
STICKLINE(C =MA1ANDC =MA2ANDDIFF DEA,O,C,1,0),COLORRED;
STICKLINE(C =MA1ANDC =MA2ANDDIFF DEA,O,C,0,0),COLORRED;
STICKLINE(C MA1ANDC MA2ANDDIFF DEA,H,L-0.008,0,0),COLORGREEN;
STICKLINE(C MA1ANDC MA2ANDDIFF DEA,O,C,3,0),COLORGREEN;
STICKLINE(C MA1ANDC MA2ANDDIFF DEA,O,C,2.5,0),COLORGREEN;
STICKLINE(C MA1ANDC MA2ANDDIFF DEA,O,C,2,0),COLORGREEN;
STICKLINE(C MA1ANDC MA2ANDDIFF DEA,O,C,1,0),COLORGREEN;
STICKLINE(C MA1ANDC MA2ANDDIFF DEA,O,C,0,0),COLORGREEN;
STICKLINE(C MA1ANDC MA2ANDDIFF =DEA,H,L-0.008,0,0),COLORYELLOW;
STICKLINE(C MA1ANDC MA2ANDDIFF =DEA,O,C,2.5,0),COLORYELLOW;
STICKLINE(C MA1ANDC MA2ANDDIFF =DEA,O,C,2,0),COLORYELLOW;
STICKLINE(C MA1ANDC MA2ANDDIFF =DEA,O,C,1,0),COLORYELLOW;
STICKLINE(C MA1ANDC MA2ANDDIFF =DEA,O,C,0,0),COLORYELLOW;
STICKLINE(C =MA1ANDC MA2ANDDIFF =DEA,H,L-0.008,0,0),COLORRED;
STICKLINE(C =MA1ANDC MA2ANDDIFF =DEA,O,C,2.5,0),COLORRED;
STICKLINE(C =MA1ANDC MA2ANDDIFF =DEA,O,C,2,0),COLORRED;
STICKLINE(C =MA1ANDC MA2ANDDIFF =DEA,O,C,1,0),COLORRED;
STICKLINE(C =MA1ANDC MA2ANDDIFF =DEA,O,C,0,0),COLORRED;
STICKLINE(C =MA1ANDC MA2ANDDIFF DEA,H,L-0.008,0,0),COLORMAGENTA;
STICKLINE(C =MA1ANDC MA2ANDDIFF DEA,O,C,2.5,0),COLORMAGENTA;
STICKLINE(C =MA1ANDC MA2ANDDIFF DEA,O,C,2,0),COLORMAGENTA;
STICKLINE(C =MA1ANDC MA2ANDDIFF DEA,O,C,1,0),COLORMAGENTA;
STICKLINE(C =MA1ANDC MA2ANDDIFF DEA,O,C,0,0),COLORMAGENTA;
金牛判势
DRAWGBK(C O,RGB(60,0,0),RGB(0,0,0),1,2,1);
DRAWTEXT_FIX(1,0.88,5,0,'~☆~七色光~☆~'),COLORBLUE;
Z1:=STRCAT(HYBLOCK,'');
Z2:=STRCAT(Z1,DYBLOCK);
Z3:=STRCAT(Z2,'');
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z3,GNBLOCK)),COLORRED;
金牛:(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1+XMA(XMA(H,25),25),DOTLINE,COLORYELLOW;
金钻:XMA(XMA(L,25),25)-(XMA(XMA(H,25),25)-XMA(XMA(L,25),25))*1,LINETHICK2,COLORRED;
金牛2:EMA(金钻趋势,25)COLORCYAN,LINETHICK2;
DRAWBAND(金钻趋势,RGB(55,0,0),金牛2,RGB(0,91,0));
DRAWKLINE(H,O,L,C);
STICKLINE(金钻趋势 LOWAND金钻趋势 HIGH,金钻趋势,MIN(MIN(OPEN,CLOSE),金钻趋势),2,0),COLORYELLOW;
STICKLINE(金钻趋势 MIN(C,O)AND金钻趋势 MAX(C,O),金钻趋势,MIN(OPEN,CLOSE),2,0),COLORYELLOW;
STICKLINE(金钻趋势 HIGH,OPEN,CLOSE,2,0),COLORYELLOW;
STICKLINE(金钻趋势 HIGH,HIGH,LOW,0,0),COLORYELLOW;
VAR23:=100*XMA(XMA((C-REF(C,1)),6),6)/XMA(XMA(ABS((C-REF(C,1))),6),6);
回调买:=LLV(VAR23,2)=LLV(VAR23,7)ANDCOUNT(VAR23 0,2)ANDCROSS(VAR23,MA(VAR23,2));
XG:=金钻趋势 HIGHAND回调买ANDL =金钻趋势;
DRAWTEXT(XG,L,'▲买入'),COLORRED;
JJ:=(HIGH+LOW+CLOSE)/3;
QJ0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;
V2:=SMA(IF(C =REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=CURRBARSCOUNT=1ANDC REF(C,1);
DY2:=REF(V2,1)-DY;
XG2:=C OANDDY2 0.02ANDMA(C,5) MA(C,60)ANDC/REF(C,1) =1.02ANDH
{DRAWTEXT(XG2,L,'▲抓牛'),COLORYELLOW;}
DRAWTEXT(XG2ANDL 金钻趋势,L,'↖金钻起涨'),COLORMAGENTA;
{总股本}
DRAWTEXT_FIX(1 0,0,0.05,0,'■总股本(亿)'),COLORFFBF00;
DRAWNUMBER_FIX(1 0,0,0.1,0,FINANCE(1)/100000000),COLORFFBF00;
{流通盘}
DRAWTEXT_FIX(1 0,0.08,0.05,0,'■流通盘(亿)'),COLORD0E040;
DRAWNUMBER_FIX(1 0,0.08,0.1,0,FINANCE(7)/100000000),COLORD0E040;
{流通市值}
流通市值:=C*FINANCE(7)/100000000;
DRAWTEXT_FIX(1 0,0.16,0.05,0,'■流通市值'),COLORD4FF7F;
DRAWNUMBER_FIX(1 0,0.16,0.1,0,流通市值),COLORD4FF7F;
{市净率}
市净率:=C/FINANCE(34);
DRAWTEXT_FIX(1 0,0.25,0.05,0,'■市净率'),COLORD0E040;
DRAWNUMBER_FIX(1 0,0.25,0.1,0,市净率),COLORD0E040;
超牛KDJ
DRAWGBK(C O,RGB(60,0,0),RGB(0,0,0),1,2,1);
DRAWTEXT_FIX(1,0.88,5,0,'~☆~七色光~☆~'),COLORBLUE;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:SMA(RSV,P1,1),COLORYELLOW;
D:SMA(K,P2,1),COLOR00DD00;
J:3*K-2*D,COLORRED;
{KDJ日周死叉}
周K:="KDJ.K#WEEK"(9,3,3);
周D:="KDJ.D#WEEK"(9,3,3);
周J:="KDJ.J#WEEK"(9,3,3);
周金叉:=CROSS(周K,周D);
日金叉:=FILTER(CROSS(K,D)ANDK 20,4);
DRAWTEXT(周金叉,D,'★'),COLORYELLOW;
DRAWTEXT(周金叉,D*0.93,'KD周金叉'),COLORYELLOW;
DRAWTEXT(CROSS(周D,周K),D*0.95,'KD周死叉'),COLOR00DDBB;
DRAWICON(日金叉,K,1);
DRAWTEXT(日金叉,D,'低位金叉'),COLOR00CCCC;
KDB:=BARSLAST(REF(CROSS(K,D),1));
KDDB:=REF(CLOSE,KDB+1) CLOSEANDREF(K,KDB+1) KANDCROSS(K,D);
K底背:=IF(FILTER(KDDB 0,5),1,0);
DRAWTEXT(K底背=1,D*0.98,'底'),COLORRED;
KDD:=BARSLAST(REF(CROSS(D,K),1));
K顶背:=REF(CLOSE,KDD+1) CLOSEANDREF(K,KDD+1) KANDCROSS(D,K);
DRAWTEXT(FILTER(K顶背 0,5),D+8,'顶背离'),COLORFFAA22;
超牛MACD
DRAWGBK(C O,RGB(60,0,0),RGB(0,0,0),1,2,1);
DRAWTEXT_FIX(1,0.88,5,0,'~☆~七色光~☆~'),COLORBLUE;
DIFF:EMA(CLOSE,12)-EMA(CLOSE,26);
DEA:EMA(DIFF,9);
MACD:2*(DIFF-DEA),LINETHICK0;
连续走强:LAST(MACD REF(MACD,1)ANDMACD 0,9,3),LINETHICK0,COLOR0030FF;{天}
强势回调:LAST(MACD REF(MACD,1)ANDMACD 0,7,3),LINETHICK0,COLOR0030FF;{天}
连续走弱:LAST(MACD REF(MACD,1)ANDMACD 0,9,5),LINETHICK0,COLOR00FF30;{天};
连续反弹:LAST(MACD REF(MACD,1)ANDMACD 0,5,3),LINETHICK0,COLOR00FF30;{天};
STICKLINE(MACD =0,MACD,0,2,1),COLORF00FF0;
STICKLINE(MACD 0,MACD,0,2,1),COLORWHITE;
STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,2.2,0),COLOR00CCFF;
STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,1.65,0),COLOR00DDFF;
STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,1.1,0),COLOR00EEFF;
STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,0.55,0),COLOR00FFFF;
STICKLINE(MACD =REF(MACD,1)ANDMACD 0,0,MACD,2.2,0),COLOR0022CC;
STICKLINE(MACD =REF(MACD,1)ANDMACD 0,0,MACD,1.65,0),COLOR0033DD;
STICKLINE(MACD =REF(MACD,1)ANDMACD 0,0,MACD,1.1,0),COLOR0044EE;
STICKLINE(MACD =REF(MACD,1)ANDMACD 0,0,MACD,0.55,0),COLOR0055FF;
STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,2.2,0),COLORCC22BB;
STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,1.65,0),COLORDD33BB;
STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,1.1,0),COLOREE44BB;
STICKLINE(MACD REF(MACD,1)ANDMACD 0,0,MACD,0.55,0),COLORFF55BB;
STICKLINE(MACD =REF(MACD,1)ANDMACD 0,0,MACD,2.2,0),COLORFFCC22;
STICKLINE(MACD =REF(MACD,1)ANDMACD 0,0,MACD,1.65,0),COLORFFDD33;
STICKLINE(MACD =REF(MACD,1)ANDMACD 0,0,MACD,1.1,0),COLORFFEE44;
STICKLINE(MACD =REF(MACD,1)ANDMACD 0,0,MACD,0.55,0),COLORFFFF55;
IF(DIFF 0,DIFF,0),COLORRED,LINETHICK1;
IF(DIFF 0,0,DIFF),COLORYELLOW,LINETHICK1;
IF(DIFF DEA,DIFF,DEA),COLOR00FF00,LINETHICK1;
IF(DIFF DEA,DEA,DEA),COLORBLUE,LINETHICK1;
低位金叉:=CROSS(DIFF,DEA)ANDDIFF -0.1;
STICKLINE(低位金叉,0,-0.10,6,0),COLORYELLOW;
DRAWTEXT(低位金叉,-0.05,'低位金叉'),COLORYELLOW;
JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA =0));
二次金叉:=CROSS(DIFF,DEA)ANDDEA 0ANDCOUNT(JCCOUNT=2,21)=1;
STICKLINE(二次金叉,0,-0.10,6,0),COLORFF00FF;
DRAWICON(二次金叉,DEA*1.04,13);
DRAWTEXT(二次金叉,-0.08,'二次金叉'),COLORFF00FF;
A11:=BARSLAST(REF(CROSS(DIFF,DEA),1));
底背离:=REF(CLOSE,A11+1) CLOSEANDDIFF REF(DIFF,A11+1)ANDCROSS(DIFF,DEA);
STICKLINE(底背离,0,0.13,6,0),COLORRED;
DRAWTEXT(底背离,DEA,'底背离'),COLORRED;
A22:=BARSLAST(REF(CROSS(DEA,DIFF),1));
顶背离:=REF(CLOSE,A22+1) CLOSEANDREF(DIFF,A22+1) DIFFANDCROSS(DEA,DIFF);
DRAWTEXT(顶背离,DEA,'顶背离'),COLORGREEN;
A1:=DIFF 0ANDDEA
A2:=A1 REF(A1,1);
A3:=BARSLAST(A2);
A4:=COUNT(DEA 0ANDDIFF 0,A3)=0;
A5:=CROSS(DIFF,DEA);{金叉}
A6:=BARSLAST(A5);
A7:=REF(A6,A6+1)+A6;
A8:=(DIFF+DEA)/2;
A9:=(HIGH+LOW)/2;
A10:=A5ANDA7REF(A8,A7)ANDA9 REF(A9,A7)ANDMACD
DRAWTEXT(A10,DIFF*0.95,'★金叉介入'),COLORYELLOW;
N1:=3;N2:=6;
ZG:=ma(HIGH,5);
ZD:=MA(LOW,5);
ZJ:=MA(CLOSE,5);
YG:=MA(HIGH,20);
YD:=MA(LOW,20);
YJ:=MA(CLOSE,20);
LC:=REF(CLOSE,1);
1:SMA(MAX(CLOSE-LC,0),N1,1)/SMA(Abs(CLOSE-LC),N1,1)*100,COLOR00FF00,LINETHICK1;
RSI2:SMA(MAX(CLOSE-LC,0),N2,2)/SMA(ABS(CLOSE-LC),N2,1)*100,COLORFFFFFF,LINETHICK1;
MID:=MA(RSI1,10);
CMSS:=1.03*SQRT(MA(POW((RSI1-MID),2),10));
UPPER:MID+CMSS,LINETHICK1,COLOR00FFFF;
LOWER:MID-CMSS,LINETHICK1,COLORFFFF00;
周LC:=REF(ZJ,5);
周RSI1:SMA(MAX(ZJ-周LC,0),N1*5,1)/SMA(ABS(ZJ-周LC),N1*5,1)*100,LINETHICK0;
周RSI2:SMA(MAX(ZJ-周LC,0),N2*5,1)/SMA(ABS(ZJ-周LC),N2*5,1)*100,LINETHICK0;
月LC:=REF(YJ,20);
月RSI1:SMA(MAX(YJ-月LC,0),N1*20,1)/SMA(ABS(YJ-月LC),N1*20,1)*100,LINETHICK0;
月RSI2:SMA(MAX(YJ-月LC,0),N2*20,1)/SMA(ABS(YJ-月LC),N2*20,1)*100,LINETHICK0;
stICKLINE(周RSI1 =REF(周RSI1,1),周RSI1,周RSI2,8,0),COLOR0000FF;
STICKLINE(周RSI1 REF(周RSI1,1),周RSI1,周RSI2,8,0),COLOR00FF00;
STICKLINE(月RSI1 =REF(月RSI1,1),月RSI1,月RSI2,1,0),COLOR00FFFF;
STICKLINE(月RSI1 REF(月RSI1,1),月RSI1,月RSI2,1,0),COLORFFFF00;
通达信麟龙指标套二(指标 主图+副图贴图)截图
