最新改進之波神凱線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.tumamayizhan.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;

?

公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】

?