通达信驭龙阁股市主图指标 源码 贴图

N1:=STRCAT(CON2STR(YEAR,0),' 年 ');
Y1:=STRCAT(CON2STR(MONTH,0),' 月 ');
R:=STRCAT(CON2STR(DAY,0),' 日 ');
SJ:=STRCAT(STRCAT(N1,Y1), R);
DRAWTEXT_FIX(C>0,0.05,0,0,SJ),COLORYELLOW;
A1:EXPMA(C,4);
A2:EXPMA(C,8);
A3:EXPMA(C,12);
A4:EXPMA(C,16);
A5:EXPMA(C,20);
A6:EXPMA(C,47);
{驭龙阁主图}
DRAWTEXT_FIX(1,0.05,0.1,0,'制作：风口寻妖驭龙阁主'),COLORYELLOW,LINETHICK8;
{题材数据}
DRAWTEXT_FIX(ISLASTBAR,0,0,0,CODE),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0,0.05,0,STKNAME),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0,0.1,0,HYBLOCK),COLORCYAN;
DRAWTEXT_FIX(ISLASTBAR,0,0.15,0,DYBLOCK),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0,0.2,0,GNBLOCK),COLORGREEN;
DRAWTEXT_FIX(ISLASTBAR,0,0.25,0,FGBLOCK),COLORWHITE;
{风口寻妖}
月DIF:="MACD.DIF#MONTH";
月DEA:="MACD.DEA#MONTH",;
周DIF:="MACD.DIF#WEEK";
周DEA:="MACD.DEA#WEEK",;
日DIF:="MACD.DIF";
日DEA:="MACD.DEA";
日金叉:=CROSS(日DIF,日DEA);
周金叉:=CROSS(周DIF,周DEA);
月金叉:=CROSS(月DIF,月DEA);
共振A:= ( 周DIF>周DEA AND 日金叉) OR ( 日DIF>日DEA AND 周金叉) OR (日金叉 AND 周金叉 ) ;
共振B:= 日DIF>0 AND MACD>0 AND C/REF(C,1)>1.08 ;
MA_1:= IF(4 > 1, MA(CLOSE,4), 1);
MA_2:= IF(8 > 1, MA(CLOSE,8), MA_1);
MA_3:= IF(12 > 1, MA(CLOSE,12), MA_1);
MA_4:= IF(16 > 1, MA(CLOSE,16), MA_1);
MA_5:= IF(20 > 1, MA(CLOSE,20), MA_1);
MAX_MA:= MAX(MA_1,MAX(MA_2,MAX(MA_3,MAX(MA_4,MA_4))));
MIN_MA:= MIN(MA_1,MIN(MA_2,MIN(MA_3,MIN(MA_4,MA_5))));
爆发点: (MAX_MA - MIN_MA) / MIN_MA * 100,NODRAW;
上攻力度:ATAN((MA_1/REF(MA_1,1)-1) * 100)*180/3.1415926,NODRAW;
共振C:=上攻力度<85;{WWW.GPXIAZAI.COM}
共振:=共振A AND 共振B AND 共振C;
STICKLINE(共振 AND C/REF(C,1)>1.092,C,REF(C,1)*1.05,3,0),COLOR000099;
STICKLINE(共振 AND C/REF(C,1)>1.092,C,REF(C,1)*1.05,2.2,0),COLOR0000CC;
STICKLINE(共振 AND C/REF(C,1)>1.092,C,REF(C,1)*1.05,1.5,0),COLOR0000FF;
STICKLINE(共振 AND C/REF(C,1)>1.092,C,REF(C,1)*1.05,0.5,0),COLORCC66FF;
STICKLINE(共振 AND C/REF(C,1)>1.092,REF(C,1)*1.05,C,0.5,0),COLORYELLOW;
DRAWTEXT(共振 AND C/REF(C,1)>1.092,REF(C,1)*1.058,'↖驭龙'),COLORYELLOW;