通达信麟龙指标套二(指标 主图+副图贴图)-通达信指标公式

以下是通达信麟龙指标套二(指标 主图+副图贴图)源码和截图

通达信麟龙指标套二(指标 主图+副图贴图)源码：

   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;

通达信麟龙指标套二(指标 主图+副图贴图)截图