降龙伏魔之剑通达信公式 副图 源码附图

N:=6;

N1:=10;

TR1:=EXPMEMA(MAX(MAX(H-L,ABS(H-REF(C,1))),ABS(REF(C,1)-L)),12);

HD1:=H-REF(H,1);

LD1:=REF(L,1)-L;

LC:=REF(CLOSE,1);

RSI5:=((SMA(MAX((CLOSE-LC),0),5,1)/SMA(ABS((CLOSE-LC)),5,1))*100);

VARD1:=EXPMEMA(IF(HD1>0&&HD1>LD1,HD1,0),12)*100/TR1;

VARD2:=EXPMEMA(IF(LD1>0&&LD1>HD1,LD1,0),12)*100/TR1;

TR2:=SUM(MAX(MAX((HIGH-LOW),ABS((HIGH-REF(CLOSE,1)))),ABS((LOW-REF(CLOSE,1)))),10);

VARD3:=VARD1>65 AND VARD1>REF(VARD1,1);

VARD4:=LLV(VARD1,0);

HD:=(HIGH-REF(HIGH,1));

LD:=(REF(LOW,1)-LOW);

VARD5:=BARSLAST(VARD4=VARD1);

VARD6:=(0-REF(VARD2,4))/(VARD4-REF(VARD2,VARD5))>2;

DMP:=SUM(IF(((HD>0) AND (HD>LD)),HD,0),10);

DMM:=SUM(IF(((LD>0) AND (LD>HD)),LD,0),10);

VARD7:=VARD1>REF(VARD1,1);

VARD8:=VOL>2*MA(VOL,30);

PDI:=((DMP*100)/TR);

MDI:=((DMM*100)/TR);

VARD9:=EXPMEMA(ABS(VARD2-VARD1)/(VARD2+VARD1)*100,6);

VARDA:=EXPMEMA(VARD3,6);

ADX:=MA(((ABS((MDI-PDI))/(MDI+PDI))*100),5);

AV:=(RSI5+ADX);

VARDB:=CLOSE>MA(CLOSE,30) AND CLOSE<MA(CLOSE,30)*1.04;

VARDC:=MA(CLOSE,30)>REF(MA(CLOSE,30),1);

DXR:=(((ADX+REF(ADX,5))/2)+RSI5);

0,COLORFF00FF;

VARDD:=BARSLAST(CROSS(MA(CLOSE,5),MA(CLOSE,

10)))<BARSLAST(CROSS(MA(CLOSE,10),MA(CLOSE,5)));

VARDE:=0-(EMA(CLOSE,7)-EMA(CLOSE,21));

WR10:=((100*(HHV(HIGH,10)-CLOSE))/(HHV(HIGH,10)-LLV(LOW,10)));

NEWVOL:=(RSI5-WR10);

VARDF:=TROUGHBARS(3,15,1)<4;

VARD10:=EMA(CLOSE,30)>REF(EMA(CLOSE,30),2);

阶段底部:=(AV+NEWVOL);

STICKLINE((阶段底部 >= 0),0,阶段底部,0.3,1),LINETHICK2,COLORCC6600;

STICKLINE((阶段底部<0),0,阶段底部,0.8,1),LINETHICK6,COLORRED;

VARD11:=IF(VARDF=1,50,0);

VARD12:=CROSS(VARD2,VARD1) AND CROSS(VARDA,VARD9);

趋势线:LLV(阶段底部,1),COLORFFFFFF;

STICKLINE((趋势线>230),250,趋势线,0.8,1),LINETHICK6,COLORFF00FF;

VARD13:=CROSS(VARD2,VARD1) AND CROSS(VARD9,VARDA);

VARD14:=VARDB AND VARDC AND VARDD AND VARD10 AND VARD6 AND VARD7 AND VARD8*50;

230,COLORFFFFFF;

VAR1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1);

VAR2:=SMA(ABS(LOW-VAR1),13,1)/SMA(MAX(LOW-VAR1,0),10,1);

VARD15:=BARSLAST(CROSS(VARD2,VARD1)=1);

VARD16:=BARSLAST(CROSS(VARD1,VARD2)=1);

VARD17:=HHV(VARD1,VARD16);

VARD18:=BARSLAST(VARD1=VARD17);

VAR3:=EMA(VAR2,10);

VAR4:=LLV(LOW,33);

VAR5:=EMA(IF(LOW<=VAR4,VAR3,0),3);

多空:EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3),COLORWHITE;

主力进场:IF(VAR5>REF(VAR5,1),VAR5,0),COLORYELLOW,NODRAW;

STICKLINE(0=0,0,0,1500,1),COLORRED;

STICKLINE(FILTER(VARDF=1,5) AND 多空<-10,50,0,10,0),COLORF00FF0;

STICKLINE(FILTER(VARDF=1,5),50,0,5,0),COLORYELLOW;

STICKLINE(VAR5>REF(VAR5,1),0,VAR5,3,0 ),COLORYELLOW;

VARD19:=VARD3 OR VARD12 OR VARD13*100;

VARD1A:=VARD13*100;

洗盘:IF(VAR5<REF(VAR5,1),VAR5,0),COLORGREEN,NODRAW;

DRAWTEXT(FILTER(VARDF=1,3),25,'降龙伏魔之剑'),COLORRED;

STICKLINE(VAR5<REF(VAR5,1),0,VAR5,3,0),COLORGREEN;

STICKLINE(多空<-10,0,多空,0.85,0),COLORYELLOW;

STICKLINE(多空>10,0,多空,0.95,0),COLORRED;

原理解析：
N赋值:6
N1:=10
TR1赋值:EXPMEMA(MAX(MAX(H-L,H-1日前的C的绝对值),ABS(1日前的C-L)),12)
HD1赋值:H-1日前的H
LD1赋值:1日前的L-L
LC赋值:1日前的收盘价
RSI5赋值:((SMA(MAX((收盘价-LC),0),5,1)/SMA((收盘价-LC的绝对值),5,1))*100)
如果HD1>0&&HD1>LD1返回HD1否则返回0
如果LD1>0&&LD1>HD1返回LD1否则返回0
TR2赋值:SUM(MAX(MAX((最高价-最低价),(最高价-1日前的收盘价的绝对值)),ABS((最低价-1日前的收盘价))),10)
VARD3赋值:VARD1>65 AND VARD1>1日前的VARD1
VARD4赋值:0日内VARD1最低值
HD赋值:(最高价-1日前的最高价)
LD赋值:(1日前的最低价-最低价)
VARD5赋值:上次VARD4=VARD1距今天数
VARD6赋值:(0-4日前的VARD2)/(VARD4-VARD5日前的VARD2)>2
DMP赋值:SUM(IF(((HD>0) AND (HD>LD)),HD,0),10)
DMM赋值:SUM(IF(((LD>0) AND (LD>HD)),LD,0),10)
VARD7赋值:VARD1>1日前的VARD1
VARD8赋值:成交量>2*成交量的30日简单移动平均
PDI赋值:((DMP*100)/TR)
MDI赋值:((DMM*100)/TR)
VARD9赋值:EXPMEMA(VARD2-VARD1的绝对值/(VARD2+VARD1)*100,6)
VARDA赋值:EXPVARD3的6日平滑移动平均
ADX赋值:MA((((MDI-PDI的绝对值)/(MDI+PDI))*100),5)
AV赋值:(RSI5+ADX)
VARDB赋值:收盘价>收盘价的30日简单移动平均 AND 收盘价<收盘价的30日简单移动平均*1.04
VARDC赋值:收盘价的30日简单移动平均>REF(收盘价的30日简单移动平均,1)
DXR赋值:(((ADX+5日前的ADX)/2)+RSI5)
0,COLORFF00FF
VARDD赋值:上次CROSS(收盘价的5日简单移动平均,收盘价的
10日简单移动平均距今天数) VARDE赋值:0-(收盘价的7日指数移动平均-收盘价的21日指数移动平均)
WR10赋值:((100*(10日内最高价最高值-收盘价))/(10日内最高价最高值-10日内最低价最低值))
NEW成交量:=(RSI5-WR10)
VARDF赋值:TROUGHBARS(3,15,1)<4
VARD10:=收盘价的30日指数移动平均>2日前的收盘价的30日指数移动平均
阶段底部赋值:(AV+NEW成交量)
STICKLINE((阶段底部 >= 0),0,阶段底部,0.3,1),LINETHICK2,COLORCC6600
STICKLINE((阶段底部<0),0,阶段底部,0.8,1),LINETHICK6,画红色
如果VARDF=1返回50否则返回0
VARD12:=VARD2上穿VARD1 AND VARDA上穿VARD9
输出趋势线:1日内阶段底部最低值,COLORFFFFFF
STICKLINE((趋势线>230),250,趋势线,0.8,1),LINETHICK6,COLORFF00FF
VARD13:=VARD2上穿VARD1 AND VARD9上穿VARDA
VARD14:=VARDB AND VARDC AND VARDD AND VARD10 AND VARD6 AND VARD7 AND VARD8*50
230,COLORFFFFFF
VAR1赋值:REF((最低价+OPEN+收盘价+最高价)/4,1)
VAR2赋值:SMA(最低价-VAR1的绝对值,13,1)/SMA(最低价-VAR1和0较大值,10,1)
VARD15:=上次VARD2上穿VARD1=1距今天数
VARD16:=上次VARD1上穿VARD2=1距今天数
VARD17:=VARD16日内VARD1最高值
VARD18:=上次VARD1=VARD17距今天数
VAR3赋值:VAR2的10日指数移动平均
VAR4赋值:33日内最低价最低值
如果最低价<=VAR4返回VAR3否则返回0
输出多空:EMA((收盘价-MA((2*收盘价+最高价+最低价)/4,30))/MA((2*收盘价+最高价+最低价)/4,30)*100,3),画白色
输出主力进场:IF(VAR5>1日前的VAR5,VAR5,0),画黄色,NODRAW
当满足条件0=0时,在0和0之间画柱状线
STICKLINE(VARDF=1的5过滤 AND 多空<-10,50,0,10,0),COLORF00FF0
STICKLINE(VARDF=1的5过滤,50,0,5,0),画黄色
STICKLINE(VAR5>1日前的VAR5,0,VAR5,3,0 ),画黄色
VARD19:=VARD3 OR VARD12 OR VARD13*100
VARD1A:=VARD13*100
输出洗盘:IF(VAR5<1日前的VAR5,VAR5,0),COLORGREEN,NODRAW
DRAWTEXT(VARDF=1的3过滤,25,'降龙伏魔之剑'),画红色
STICKLINE(VAR5<1日前的VAR5,0,VAR5,3,0),COLORGREEN
当满足条件多空<-10时,在0和多空之间画柱状线
当满足条件多空>10时,在0和多空之间画柱状线