以下是通达信麟龙指标套二(指标 主图+副图贴图)源码和截图
通达信麟龙指标套二(指标 主图+副图贴图)源码：
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<0;
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>0;
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);
rsi1: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;
通达信麟龙指标套二(指标 主图+副图贴图)截图
评论(0)