通达信神波段主图未加密选股指标公式源码

通达信神波段主图未加密选股指标公式源码

源码正文：

流通盘:FInaNCE( 7)/10000, NODRAW{XG51};
A1A:=ema(CLOSE, 9){XG51};
A1B:=((A1A - Ema(CLOSE, 5)) < 0){XG51};
A1C:=((A1A - EMA(CLOSE, 5)) > 0){XG51};
A1D:=BArslAst(A1B){XG51};
A1E:=BARSLAST(A1C){XG51};
A1F:=IF((A1E > 0),(CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100,0){XG51};
A20:=SUM(A1F,0){XG51};
A21:=IF((A1D > 0),(0 - 2),0){XG51};
A22:=IF((A1E > 0),SUM((CLOSE - REF(CLOSE, 1)) / REF(CLOSE, 1) * 100,A1E),0){XG51};
A23:=A22 / A1E{XG51};
A25:=EMA(EMA(EMA(CLOSE, 3), 3), 3){XG51};
多方:((A25 - REF(A25, 1)) + A25)COLOR0000FF,LINETHICK2{XG51};
K2:=BacKSET(多方<REF(多方,1),2){XG51};
IF(K2,多方,DRAWNULL),COLOR00A600,LINETHICK2{XG51};
空方:MA(多方, 15)COLORFF49FF{XG51};
K1:=BACKSET(空方<REF(空方,1),2){XG51};
IF(K1,空方,DRAWNULL),COLOR00A600,LINETHICK2{XG51};
IF(多方>REF(多方,1),多方,DRAWNULL),COLORFFFFCC,LINETHICK4,POINTDOT{XG51};
IF(空方>REF(空方,1),空方,DRAWNULL),COLOR00FFFF,LINETHICK4,POINTDOT{XG51};
STICKLINE((多方 > 空方),空方,多方, 0, 0)COLOR00FFFF{XG51};
STICKLINE((空方 > 多方),多方,空方, 0, 0)COLORFF0000{XG51};
DRAWTEXT(crOSS(空方,多方),多方 * 1.01,'↓卖')COLOR00FF00{XG51};
DRAWTEXT(CROSS(多方,空方),空方 * 0.99,'↑买')COLOR0000FF{XG51};
DRAWICON(((REF(A21, 1) = (0 - 2)) AND (A21 = 0)),LOW, 5){XG51};
DRAWICON(((REF(A1E, 1) > 0) AND (A1E = 0)),HIGH, 6);

{X_G_5-1_C_N_{}

通达信macd+kdJ日周月顶背离底背离未加密选股指标公式源码

源码正文：

DRAWGBK(C>0, RGB(1,1,1),RGB(1,1,1),0,'0',0){XG51};
dif:ema(CLOSE,12) - Ema(CLOSE,26),LINETHICK0{XG51};
DEA:EMA(DIF,9),LINETHICK0{XG51};
A1:=BArslAst(REF(crOSS(DIF,DEA),1)){XG51};
B1:=REF(C,A1+1)>C AND REF(DIF,A1+1)<DIF AND CROSS(DIF,DEA){XG51};
A2:=BARSLAST(REF(CROSS("kdj.K"(9,3,3),"kdJ.D"(9,3,3)),1)){XG51};
B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS
("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)){XG51};
A3:=BARSLAST(REF(CROSS("rsi.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)),1)){XG51};
B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(6,12,24),A3+1)<"RSI.RSI1"(6,12,24) AND CROSS
("RSI.RSI1"(6,12,24),"RSI.RSI2"(6,12,24)){XG51};
C1:=BARSLAST(REF(CROSS(DEA,DIF),1)){XG51};
D1:=REF(C,C1+1)<C AND REF(DIF,C1+1)>DIF AND CROSS(DEA,DIF){XG51};
C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1)){XG51};
D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS
("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)){XG51};
C3:=BARSLAST(REF(CROSS("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)),1)){XG51};
D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(6,12,24),C3+1)>"RSI.RSI1"(6,12,24) AND CROSS
("RSI.RSI2"(6,12,24),"RSI.RSI1"(6,12,24)){XG51};
STICKLINE(B1>0,110,100,3,0),COLORWHITE{XG51};
DRAWTEXT((B1>0),104.5,' macd底背离'),COLORWHITE{XG51};
STICKLINE(D1>0,110,100,3,0),COLORFF8000{XG51};
DRAWTEXT((D1>0),104.5,' MacD顶背离'),COLORFF8000{XG51};
STICKLINE(B2>0,0,-10,3,0),COLORFA00FA{XG51};
DRAWTEXT((B2>0),-6,' KDJ底背离'),COLORFA00FA{XG51};
STICKLINE(D2>0,0,-10,3,0),COLORCYAN{XG51};
DRAWTEXT((D2>0),-6,' KDJ顶背离'),COLORCYAN{XG51};
STICKLINE(B3>0,-20,-10,3,0),COLORBLUE{XG51};
DRAWTEXT((B3>0),-15,' RSI底背离'),COLORBLUE{XG51};
STICKLINE(D3>0,-20,-10,3,0),COLORGREEN{XG51};
DRAWTEXT((D3>0),-15,' RSI顶背离'),COLORGREEN{XG51};
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100{XG51};
K:SMA(RSV,9,3),LINETHICK0{XG51};
D:SMA(K,9,3),LINETHICK0{XG51};
J:3*K-2*D,LINETHICK0{XG51};
A:=CROSS(DIF,DEA) AND CROSS(K,D) AND CROSS(J,D){XG51};
STICKLINE(A,0,100,3,0),COLORBLUE{XG51};
DRAWICON(A,92,25);DRAWICON(A,42,25){XG51};
DRAWTEXT(A,93,' ★MACD_KDJ金叉共振'),COLORBLUE{XG51};
DRAWTEXT(A,43,' ★KDJ_MACD金叉共振'),COLORBLUE{XG51};
日DIF:="MACD.DIF#DAY"{XG51};
日DEA:="MACD.DEA#DAY"{XG51};
日死叉:STICKLINE(日DIF<日DEA,80,85,3,0),COLORFF8000{XG51};
日金叉:STICKLINE(日DIF>日DEA,80,85,3,0),COLORWHITE{XG51};
DRAWTEXT(ISLASTBAR,82,'__日MACD'),COLORBLUE{XG51};
周DIF:="MACD.DIF#WEEK"(12,26,9){XG51};
周DEA:="MACD.DEA#WEEK"(12,26,9){XG51};
周死叉:STICKLINE(周DIF<周DEA,70,75,3,0),COLORFF8064{XG51};
周金叉:STICKLINE(周DIF>周DEA,70,75,3,0),COLOR3232FF{XG51};
DRAWTEXT(ISLASTBAR,72,'__周MACD'),COLORBLUE{XG51};
月DIF:="MACD.DIF#MONTH"(12,26,9){XG51};
月DEA:="MACD.DEA#MONTH"(12,26,9){XG51};
月死叉:STICKLINE(月DIF<月DEA,60,65,3,0),COLORFF808C;
月金叉:STICKLINE(月DIF>月DEA,60,65,3,0),COLOR5032FF;
DRAWTEXT(ISLASTBAR,62,'__月MACD'),COLORBLUE{XG51};
N:=1{XG51};
月K:KDJ.K#MONTH,NODRAW,COLORRED,LINETHICK0{XG51};
月D:KDJ.D#MONTH,NODRAW,COLORBLUE,LINETHICK0{XG51};
月J:KDJ.J#MONTH,NODRAW,COLORLIMAGENTA,LINETHICK0{XG51};
周K:KDJ.K#WEEK,NODRAW,COLORRED,LINETHICK0{XG51};
周D:KDJ.D#WEEK,NODRAW,COLORBLUE,LINETHICK0{XG51};
周J:KDJ.J#WEEK,NODRAW,COLORLIMAGENTA,LINETHICK0{XG51};
日K:KDJ.K,NODRAW,COLORRED,LINETHICK0{XG51};
日D:KDJ.D,NODRAW,COLORBLUE,LINETHICK0{XG51};
日J:KDJ.J,NODRAW,COLORLIMAGENTA,LINETHICK0{XG51};
K日金叉:=CROSS(日K,日D) AND (日D<40 OR 日D>60){XG51};
K周金叉:=CROSS(周K,周D) AND (周D<40 OR 周D>60){XG51};
K月金叉:=CROSS(月K,月D) AND (月D<40 OR 月D>60){XG51};
共振KDJ:=(K周金叉 AND K日金叉) OR (K周金叉 AND K月金叉) OR (K日金叉 AND K月金叉)OR (K日金叉 AND
K周金叉 AND K月金叉){XG51};
STICKLINE(共振KDJ,0,50,3,0),COLORBLUE{XG51};
DRAWICON(共振KDJ,42,25){XG51};
DRAWTEXT((K周金叉 AND K日金叉) OR (K周金叉 AND K月金叉) OR (K日金叉 AND K月金叉)OR (K日金叉 AND
K周金叉 AND K月金叉),42,' ★KDJ(日/周/月)共振'),COLORBLUE{XG51};
NOTEXT月K:IF(N=3,月K,DRAWNULL),COLORRED,LINETHICK0{XG51};
NOTEXT月D:IF(N=3,月D,DRAWNULL),COLORBLUE,LINETHICK0{XG51};
NOTEXT月J:IF(N=3,月J,DRAWNULL),COLORLIMAGENTA,LINETHICK0{XG51};
NOTEXT周K:IF(N=2,周K,DRAWNULL),COLORRED,LINETHICK0{XG51};
NOTEXT周D:IF(N=2,周D,DRAWNULL),COLORBLUE,LINETHICK0{XG51};
NOTEXT周J:IF(N=2,周J,DRAWNULL),COLORLIMAGENTA,LINETHICK0{XG51};
NOTEXT日K:IF(N=1,日K,DRAWNULL),COLORRED,LINETHICK0{XG51};
NOTEXT日D:IF(N=1,日D,DRAWNULL),COLORBLUE,LINETHICK0{XG51};
NOTEXT日J:IF(N=1,日J,DRAWNULL),COLORLIMAGENTA,LINETHICK0{XG51};
STICKLINE(日K>=日D,30,35,3,0),COLOR8000FF{XG51};
STICKLINE(日K< 日D,30,35,3,0),COLOR009600{XG51};
DRAWTEXT(ISLASTBAR,27,'__日KDJ'),COLORRED{XG51};
STICKLINE(周K>=周D,20,25,3,0),COLOR803CFF{XG51};
STICKLINE(周K< 周D,20,25,3,0),COLOR3C9600{XG51};
DRAWTEXT(ISLASTBAR,17,'__周KDJ'),COLORRED{XG51};
STICKLINE(月K>=月D,10,15,3,0),COLOR8050FF{XG51};
STICKLINE(月K< 月D,10,15,3,0),COLOR649600{XG51};
DRAWTEXT(ISLASTBAR,7,'__月KDJ'),COLORRED{XG51};
0,LINETHICK1,DOTLINE,COLORRED{XG51};
50,LINETHICK1,COLORRED{XG51};
100,LINETHICK1,DOTLINE,COLORRED{XG51};
DRAwrECTREL(0,0,180,990,RGB(250,0,250)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.111,0.03,0,'KDJ(日/周/月)'),COLOR00FFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.101,0.18,0,'日K='),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.140,0.18,0,日K),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.101,0.31,0,'日D='),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.140,0.31,0,日D),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.101,0.44,0,'周K='),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.140,0.44,0,周K),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.101,0.57,0,'周D='),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.140,0.57,0,周D),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.101,0.70,0,'月K= '),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.140,0.70,0, 月K),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.101,0.83,0,'月D='),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.140,0.83,0,月D),COLORFFFFFF{XG51};
DRAWRECTREL(0,0,90,990,RGB(220,0,0)){XG51};
DRAWTEXT_FIX(ISLASTBAR,0.023,0.03,0,'MACD(日/周/月)'),COLOR00FFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.18,0,'日DIF='),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.18,0,日DIF),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.31,0,'日DEA='),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.31,0,日DEA),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.44,0,'周DIF='),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.44,0,周DIF),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.57,0,'周DEA='),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.57,0,周DEA),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.70,0,'月DIF= '),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.70,0, 月DIF),COLORFFFFFF{XG51};
DRAWTEXT_FIX(ISLASTBAR,0.01,0.83,0,'月DEA='),COLORFFFFFF{XG51};
DRAWNUMBER_FIX(ISLASTBAR,0.05,0.83,0,月DEA),COLORFFFFFF{X_G~5!1_C_N_{};