最新改进之波神凯线1.1版[大智慧公式]

相关标签:三角形趋势线指标源码 、 趋势操盘线指标 、 自动画趋势线指标源码 、 文华自动画趋势线指标 、 超赞的自动画趋势线指标 、 如何画趋势线 、 逃顶线趋势线指标 、 黄金趋势线指标 、 股票趋势线 、 mt4趋势线指标下载 、 mt4趋势线报警指标 、 趋势交易法口诀 、

最新改进之波神凯线1.1版

原理解析：
输出INPUT:年(8,0,100),月(1,1,12),日(1,1,31),年2(8,0,100),月2(1,1,12),日2(1,1,31),做多吗(1,0,1),测量(1,1,4) DATE1赋值:年*10000+月*100+日+1000000 DATE2赋值:年2*10000+月2*100+日2+1000000 HH赋值:上次DATE1=日期距今天数日前的最高价 HH2赋值:如果上次DATE1=日期距今天数日前的最高价<上次DATE1=日期距今天数-1日前的最高价,返回上次DATE1=日期距今天数-1日前的最高价,否则返回如果上次DATE1=日期距今天数日前的最高价<上次DATE1=日期距今天数-2日前的最高价,返回上次DATE1=日期距今天数-2日前的最高价,否则返回上次DATE1=日期距今天数-1日前的最高价 LL2赋值:如果上次DATE1=日期距今天数日前的最低价>上次DATE1=日期距今天数-1日前的最低价,返回上次DATE1=日期距今天数-1日前的最低价,否则返回如果上次DATE1=日期距今天数日前的最低价>上次DATE1=日期距今天数-2日前的最低价,返回上次DATE1=日期距今天数-2日前的最低价,否则返回上次DATE1=日期距今天数-1日前的最低价 HH31赋值:上次DATE1=日期距今天数日前的开盘价 HH32赋值:上次DATE1=日期距今天数日前的收盘价 HH3赋值:HH31和HH32的较小值 LL3赋值:HH31和HH32的较大值 HH4赋值:如果做多吗,返回上次日期=DATE2距今天数日前的最高价,否则返回上次日期=DATE1距今天数日前的最高价 LL4赋值:如果做多吗,返回上次日期=DATE1距今天数日前的最低价,否则返回上次日期=DATE2距今天数日前的最低价 LLOW赋值:上次DATE1=日期距今天数日前的最低价 H1赋值:STRTONUM(NUMTOSTR(HH)) L1赋值:STRTONUM(NUMTOSTR(LLOW)) H2赋值:STRTONUM(NUMTOSTR(HH2)) L2赋值:STRTONUM(NUMTOSTR(LL2)) H3赋值:STRTONUM(NUMTOSTR(HH3)) L3赋值:STRTONUM(NUMTOSTR(LL3)) H4赋值:STRTONUM(NUMTOSTR(HH4)) L4赋值:STRTONUM(NUMTOSTR(LL4)) LL1赋值:如果测量=1,返回H1-L1,否则返回如果测量=2AND做多吗=1,返回H2-L1,否则返回如果测量=2AND做多吗不等于1,返回H1-L2,否则返回如果测量=3AND做多吗=1,返回H3-L1,否则返回如果测量=3AND做多吗不等于1,返回H1-L3,否则返回如果测量=4,返回H4-L4,否则返回H4-L4 LL赋值:STRTONUM(NUMTOSTR(LL1)) VERTLINE(日期=DATE1,0),COLORB0B0B0,线宽为2 条件判断 测量=4 THEN VERTLINE(日期=DATE2,1),COLORBBBBBB 输出条件判断 做多吗=1 THENBEGIN多开门:LL*1.508 + L1,画红色,线宽为2 输出一线:L1+LL*2,画白色,DOTLINE 输出二线:L1+LL*2.4,画白色,DOTLINE 输出三线:L1+LL*3.05,COLOR0045FF 输出四线:L1+LL*3.75,画白色,DOTLINE 输出五线:L1+LL*4.15,COLOR00A5FF 输出六线:L1+LL*4.8,画白色,DOTLINE 输出七线:L1+LL*5.5,COLORCBC0FF 输出八线:L1+LL*6.1,画白色,DOTLINE 输出多关门:L1+LL*6.90001,线宽为2 当满足条件数据位置状态=2时,在LL*1.50801+L1位置书写文字,COLORB0B0B0,ALIGN2 当满足条件数据位置状态=2时,在L1+LL*3.05001位置书写文字,COLORB0B0B0,ALIGN2 当满足条件数据位置状态=2时,在L1+LL*4.15001位置书写文字,COLORB0B0B0,ALIGN2 当满足条件数据位置状态=2时,在L1+LL*5.50001位置书写文字,COLORB0B0B0,ALIGN2 当满足条件数据位置状态=2时,在L1+LL*6.90001位置书写文字,COLORB0B0B0,ALIGN2 END 输出条件判断 做多吗不等于1 THENBEGIN空开门:H1-LL*1.508,线宽为2 输出空一线:H1-LL*2,画白色,DOTLINE 输出空二线:H1-LL*2.4,画白色,DOTLINE 输出空三线:H1-LL*3.05,COLORD30094 输出空四线:H1-LL*3.75,画白色,DOTLINE 输出空五线:H1-LL*4.15,COLOR00A5FF 输出空六线:H1-LL*4.8,画白色,DOTLINE 输出空七线:H1-LL*5.5,COLOR104974 输出空八线:H1-LL*6.1,画白色,DOTLINE 输出空关门:H1-LL*6.9,线宽为2 当满足条件数据位置状态=2时,在H1-LL*1.50801位置书写文字,COLORB0B0B0,ALIGN2 当满足条件数据位置状态=2时,在H1-LL*3.05001位置书写文字,COLORB0B0B0,ALIGN2 当满足条件数据位置状态=2时,在H1-LL*5.50001位置书写文字,COLORB0B0B0,ALIGN2 当满足条件数据位置状态=2时,在H1-LL*6.90001位置书写文字,COLORB0B0B0,ALIGN2 END KO赋值:收盘价 KC赋值:1日前的收盘价 当满足条件KO<=KC时,在收盘价和开盘价位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR008800 当满足条件KO<=KC时,在收盘价和开盘价位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLOR009900 当满足条件KO<=KC时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR00AA00 当满足条件KO<=KC时,在收盘价和开盘价位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR00BB00 当满足条件KO<=KC时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR00CC00 当满足条件KO<=KC时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR33DD00 当满足条件KO<=KC时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR00EE00 当满足条件KO<=KC时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR66FF00 当满足条件KO>KC时,在收盘价和开盘价位置之间画柱状线,宽度为8,0不为0则画空心柱.,COLOR000088 当满足条件KO>KC时,在收盘价和开盘价位置之间画柱状线,宽度为7,0不为0则画空心柱.,COLOR000099 当满足条件KO>KC时,在收盘价和开盘价位置之间画柱状线,宽度为6,0不为0则画空心柱.,COLOR0000AA 当满足条件KO>KC时,在收盘价和开盘价位置之间画柱状线,宽度为5,0不为0则画空心柱.,COLOR0000BB 当满足条件KO>KC时,在收盘价和开盘价位置之间画柱状线,宽度为4,0不为0则画空心柱.,COLOR0000CC 当满足条件KO>KC时,在收盘价和开盘价位置之间画柱状线,宽度为3,0不为0则画空心柱.,COLOR0000DD 当满足条件KO>KC时,在收盘价和开盘价位置之间画柱状线,宽度为2,0不为0则画空心柱.,COLOR0000EE 当满足条件KO>KC时,在收盘价和开盘价位置之间画柱状线,宽度为1,0不为0则画空心柱.,COLOR0033FF 当满足条件KO>KC时,在开盘价和最低价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,画红色 当满足条件KO>KC时,在收盘价和最高价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,画红色 当满足条件KO<=KC时,在收盘价和最低价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR66CC33 当满足条件KO<=KC时,在开盘价和最高价位置之间画柱状线,宽度为0.5,0不为0则画空心柱.,COLOR66CC33

 来源:程序化99（ WWW.CXH99.COM ）

源码：

INPUT:年(8,0,100),月(1,1,12),日(1,1,31),年2(8,0,100),月2(1,1,12),日2(1,1,31),做多吗(1,0,1),测量(1,1,4);
DATE1:=年*10000+月*100+日+1000000;
DATE2:=年2*10000+月2*100+日2+1000000;
hh:=ref(h,BARSLAST(DATE1=DATE));
HH2:=IF(ref(h,barslast(DATE1=DATE))<REF(H,BARSLAST(DATE1=DATE)-1),ref(H,BARSLAST(DATE1=DATE)-1),IF(ref(h,barslast(DATE1=DATE))<REF(H,BARSLAST(DATE1=DATE)-2),REF(H,BARSLAST(DATE1=DATE)-2),ref(H,BARSLAST(DATE1=DATE)-1)));
LL2:=IF(ref(l,barslast(DATE1=DATE))>REF(l,BARSLAST(DATE1=DATE)-1),ref(l,BARSLAST(DATE1=DATE)-1),IF(ref(l,barslast(DATE1=DATE))>REF(l,BARSLAST(DATE1=DATE)-2),REF(l,BARSLAST(DATE1=DATE)-2),ref(l,BARSLAST(DATE1=DATE)-1)));
hh31:=ref(o,BARSLAST(DATE1=DATE));
hh32:=ref(c,BARSLAST(DATE1=DATE));
hh3:=min(hh31,hh32);
LL3:=max(hh31,hh32);
HH4:=if(做多吗,ref(h,barslast(DATE=DATE2)),ref(h,barslast(DATE=DATE1)));
LL4:=if(做多吗,ref(L,barslast(DATE=DATE1)),ref(L,barslast(DATE=DATE2)));
LLOW:=ref(LOW,BARSLAST(DATE1=DATE));
H1:=STRTONUM(NUMTOSTR(Hh));
L1:=STRTONUM(NUMTOSTR(LLOW));
H2:=STRTONUM(NUMTOSTR(HH2));
L2:=STRTONUM(NUMTOSTR(LL2));
h3:=STRTONUM(NUMTOSTR(Hh3));
L3:=STRTONUM(NUMTOSTR(LL3));
H4:=STRTONUM(NUMTOSTR(HH4));
L4:=STRTONUM(NUMTOSTR(LL4));
LL1:=if(测量=1,H1-L1,IF(测量=2 AND 做多吗=1,H2-L1,IF(测量=2 AND 做多吗<>1,H1-L2,IF(测量=3 AND 做多吗=1,H3-L1,IF(测量=3 AND 做多吗<>1,H1-L3,IF(测量=4,H4-L4,H4-L4))))));
LL:=STRTONUM(NUMTOSTR(LL1));
VERTLINE(date=date1,0),COLORB0B0B0,LINETHICK2;
IF 测量=4 THEN VERTLINE(date=date2,1),COLORBBBBBB;
if 做多吗=1 then
begin
多开门:LL*1.508 + L1,COLORRED,linethick2;
一线:L1+LL*2,COLORWHITE,dotline;
二线:L1+LL*2.4,COLORWHITE,dotline;
三线:L1+LL*3.05,color0045FF;
四线:L1+LL*3.75,COLORWHITE,dotline;
五线:L1+LL*4.15,color00A5FF;
六线:L1+LL*4.8,COLORWHITE,dotline;
七线:L1+LL*5.5,colorCBC0FF;
八线:L1+LL*6.1,COLORWHITE,dotline;
多关门:L1+LL*6.90001,linethick2;
DRAWTEXT(barstatus=2,LL*1.50801+L1,numtostr(LL*1.508+L1)+'多开门'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*3.05001,numtostr(L1+LL*3.05)+' No:3'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*4.15001,numtostr(L1+LL*4.15)+' No:5'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*5.50001,numtostr(L1+LL*5.5)+' No:7'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,L1+LL*6.90001,numtostr(L1+LL*6.9)+'多关门'),COLORB0B0B0,ALIGN2;
end;
IF 做多吗<>1 THEN
BEGIN
空开门:h1-LL*1.508,linethick2;
空一线:h1-LL*2,COLORWHITE,DOTLINE;
空二线:h1-LL*2.4,COLORWHITE,DOTLINE;
空三线:h1-LL*3.05,colorD30094;
空四线:h1-LL*3.75,COLORWHITE,DOTLINE;
空五线:h1-LL*4.15,color00A5FF;
空六线:h1-LL*4.8,COLORWHITE,DOTLINE;
空七线:h1-LL*5.5,color104974;
空八线:h1-LL*6.1,COLORWHITE,dotline;
空关门:h1-LL*6.9,linethick2;
DRAWTEXT(BARSTATUS=2,h1-LL*1.50801,numtostr(h1-LL*1.508)+'空开门'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,h1-LL*3.05001,numtostr(h1-LL*3.05)+' No:3'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,h1-LL*5.50001,numtostr(h1-LL*5.5)+' No:7'),COLORB0B0B0,ALIGN2;
DRAWTEXT(BARSTATUS=2,h1-LL*6.90001,numtostr(h1-LL*6.9)+'空关门'),COLORB0B0B0,ALIGN2;
END;
{-----------------------------立体K线--------------------------------------}
Ko:=close;
Kc:=ref(close,1);STICKLINE(ko<=kc ,CLOSE ,OPEN,8,0 ),COLOR008800;
STICKLINE(ko<=kc ,CLOSE ,OPEN,7,0 ),COLOR009900;
STICKLINE(ko<=kc ,CLOSE ,OPEN,6,0 ),COLOR00aa00;
STICKLINE(ko<=kc ,CLOSE ,OPEN,5,0 ),COLOR00bb00;
STICKLINE(ko<=kc,CLOSE ,OPEN,4,0 ),COLOR00cc00;
STICKLINE(ko<=kc,CLOSE ,OPEN,3,0 ),COLOR33dd00;
STICKLINE(ko<=kc,CLOSE ,OPEN,2,0 ),COLOR00ee00;
STICKLINE(ko<=kc,CLOSE ,OPEN,1,0 ),COLOR66ff00;STICKLINE(ko>kc,CLOSE,OPEN,8,0 ),COLOr000088;
STICKLINE(ko>kc,CLOSE,OPEN,7,0 ),COLOr000099;
STICKLINE(ko>kc,CLOSE,OPEN,6 ,0 ),COLOR0000aa;
STICKLINE(ko>kc,CLOSE,OPEN,5,0 ),COLOr0000bb;
STICKLINE(ko>kc,CLOSE,OPEN,4,0 ),COLOr0000cc;
STICKLINE(ko>kc,CLOSE,OPEN,3 ,0 ),COLOR0000dd;
STICKLINE(ko>kc,CLOSE,OPEN,2,0 ),COLOr0000ee;
STICKLINE(ko>kc,CLOSE,OPEN,1 ,0 ),COLOR0033ff;STICKLINE(ko>kc,OPEN,LOW,0.5,0 ),COLORred;
STICKLINE(ko>kc,CLOSE,HIGH,0.5 ,0 ),COLORred;
STICKLINE(ko<=kc,CLOSE,LOW,0.5 ,0 ),COLOR66cc33;
STICKLINE(ko<=kc,OPEN,HIGH,0.5 ,0 ),COLOR66cc33;

公式导入教程: 【通达信公式源码导入方法教程】 【同花顺公式源码导入方法教程】 【大智慧新一代公式源码导入方法教程】