打印本文
關閉窗口
指標公式源碼分析及使用說明:
?
?
源碼：
?
1 融合了cl.dll和bfd.dll兩個分筆劃分的優點{纏論分筆分段XFBFD.DLL，綁定TDXDLL1}XD:=TDXDLL1(1,H,L,DATE);BG:=TDXDLL1(2,H,L,DATE);{輸出筆高低}BD:=TDXDLL1(3,H,L,DATE);{輸出筆高}ZG:=TDXDLL1(4,H,L,DATE);ZD:=TDXDLL1(5,H,L,DATE);ZSKS:=TDXDLL1(6,H,L,DATE);ZSJS:=TDXDLL1(7,H,L,DATE);FBI:=TDXDLL1(18,H,L,DATE) NODRAW; {輸出筆}{筆}XBGD:=IF(FBI=1,BG,IF(FBI=-1,BD,0));XBI:=TDXDLL1(19,XBGD,L,1),NODRAW;{纏論CL.DLL，綁定TDXDLL3}KX:=TDXDLL3(1,H,L,C);{解決包含K線的問題};BI:=TDXDLL3(4,H,L,C) NODRAW;{BI類型}KXG:=TDXDLL3(2,H,L,C);{高點}KXD:=TDXDLL3(3,H,L,C);{低點}{綜合二者優化筆}SHOULDHAVEBI:=MIN(233,COUNT(C!=0,-1)),NODRAW;SHOULDHAVEDUAN:=MIN(288,COUNT(C!=0,-1)),NODRAW;NEXTUBI:=REFX(BARSNEXT(BI=1 OR FBI=1),1)+1,NODRAW;NEXTDBI:=REFX(BARSNEXT(BI=-1 OR FBI=-1),1)+1,NODRAW;GBI1:=IF(FBI=1 OR FBI=-1,FBI,IF(BI=1 OR BI=-1,BI,0)) NODRAW;LGBI2:=IF(COUNT(GBI1!=0,SHOULDHAVEBI)<1,-1,BARSLAST(GBI1)),NODRAW;LGBI1:=IF(LGBI2=0 AND COUNT(GBI1!=0,SHOULDHAVEBI)>1,REF(LGBI2,1)+1,LGBI2),NODRAW;UBCANCEL1:=NEXTUBI<NEXTDBI AND HHV(H,4)<REFX(HHV(H,4),NEXTUBI),NODRAW;UBCANCEL2:=NEXTUBI>NEXTDBI AND (NEXTUBI-NEXTDBI)<3 AND REFX(NOT((COUNT(L>1.035*REF(H,1),LGBI1)>0 OR COUNT(L>1.01*REF(H,1),LGBI1)>1) AND REF(L,LGBI1)<0.8*H),NEXTUBI),NODRAW;UBCANCEL3:=REF(GBI1,LGBI1)=1 AND REF(UBCANCEL1 OR UBCANCEL2,LGBI1)=0 AND LGBI1>0,NODRAW;UBCANCEL4:=REF(GBI1,LGBI1)=-1 AND NEXTDBI<2,NODRAW;DBCANCEL1:=NEXTUBI>NEXTDBI AND LLV(L,4)>REFX(LLV(L,4),NEXTDBI),NODRAW;DBCANCEL2:=NEXTUBI<NEXTDBI AND (NEXTDBI-NEXTUBI)<3 AND REFX(NOT((COUNT(REF(L,1)>1.035*H,LGBI1)>0 OR COUNT(REF(L,1)>1.01*H,LGBI1)>1) AND REF(H,LGBI1)>1.2*L),NEXTDBI),NODRAW;DBCANCEL3:=REF(GBI1,LGBI1)=-1 AND REF(DBCANCEL1 OR DBCANCEL2,LGBI1)=0 AND LGBI1>0,NODRAW;DBCANCEL4:=REF(GBI1,LGBI1)=1 AND REF(UBCANCEL1 OR UBCANCEL2,LGBI1),NODRAW;GBI:=IF(GBI1=1 AND (UBCANCEL1 OR UBCANCEL2 OR UBCANCEL3 OR UBCANCEL4),0, IF(GBI1=-1 AND (DBCANCEL1 OR DBCANCEL2 OR DBCANCEL3 OR DBCANCEL4),0,GBI1)) NODRAW;LGBI3:=IF(COUNT(GBI!=0,SHOULDHAVEBI)<1,-1,BARSLAST(GBI));LGBI:=IF(LGBI3=0 AND COUNT(GBI!=0,SHOULDHAVEBI)>1,REF(LGBI3,1)+1,LGBI3),NODRAW;{上一筆的距離}GBIH:=HHV(H,MIN(5,LGBI));GBIL:=LLV(L,MIN(5,LGBI));DRAWLINE(GBI=1,GBIH,GBI=-1,GBIL,0),COLORLIGREEN;DRAWLINE(GBI=-1,GBIL,GBI=1,GBIH,0),COLORLIGREEN;2 在優化筆gbi的基礎上，依據纏論中樞定義，制定了兩類共八種筆中樞的》》 規則，依據規則畫中樞。結果基本可用。 不足之處是，限于指標編寫語言和作者水平的限制，沒有完全解決筆包含的問題。具體的請看圖吧。{程序化交易 www.weiqiv.net.cn }
{程序化交易 www.weiqiv.net.cn }
{程序化交易 www.weiqiv.net.cn }
{程序化交易 www.weiqiv.net.cn }
{程序化交易 www.weiqiv.net.cn }
看到一些纏論指標的帖子，以纏論股票池（cl.dll）和分筆分段（fbfd試用.dll，zslx試用.dll）為基礎的為多。在試用過之后，發現，這兩個纏論的分筆基本可以用，但是分段和中樞 離實用 還有距離。于是，寫了一個帖子，纏論股票池的優化探討分享優化的指標要點說明：1 融合了cl.dll和bfd.dll兩個分筆劃分的優點{纏論分筆分段XFBFD.DLL，綁定TDXDLL1}XD:=TDXDLL1(1,H,L,DATE);BG:=TDXDLL1(2,H,L,DATE);{輸出筆高低}BD:=TDXDLL1(3,H,L,DATE);{輸出筆高}ZG:=TDXDLL1(4,H,L,DATE);ZD:=TDXDLL1(5,H,L,DATE);ZSKS:=TDXDLL1(6,H,L,DATE);ZSJS:=TDXDLL1(7,H,L,DATE);FBI:=TDXDLL1(18,H,L,DATE) NODRAW; {輸出筆}{筆}XBGD:=IF(FBI=1,BG,IF(FBI=-1,BD,0));XBI:=TDXDLL1(19,XBGD,L,1),NODRAW;{纏論CL.DLL，綁定TDXDLL3}KX:=TDXDLL3(1,H,L,C);{解決包含K線的問題};BI:=TDXDLL3(4,H,L,C) NODRAW;{BI類型}KXG:=TDXDLL3(2,H,L,C);{高點}KXD:=TDXDLL3(3,H,L,C);{低點}{綜合二者優化筆}SHOULDHAVEBI:=MIN(233,COUNT(C!=0,-1)),NODRAW;SHOULDHAVEDUAN:=MIN(288,COUNT(C!=0,-1)),NODRAW;NEXTUBI:=REFX(BARSNEXT(BI=1 OR FBI=1),1)+1,NODRAW;NEXTDBI:=REFX(BARSNEXT(BI=-1 OR FBI=-1),1)+1,NODRAW;GBI1:=IF(FBI=1 OR FBI=-1,FBI,IF(BI=1 OR BI=-1,BI,0)) NODRAW;LGBI2:=IF(COUNT(GBI1!=0,SHOULDHAVEBI)<1,-1,BARSLAST(GBI1)),NODRAW;LGBI1:=IF(LGBI2=0 AND COUNT(GBI1!=0,SHOULDHAVEBI)>1,REF(LGBI2,1)+1,LGBI2),NODRAW;UBCANCEL1:=NEXTUBI<NEXTDBI AND HHV(H,4)<REFX(HHV(H,4),NEXTUBI),NODRAW;UBCANCEL2:=NEXTUBI>NEXTDBI AND (NEXTUBI-NEXTDBI)<3 AND REFX(NOT((COUNT(L>1.035*REF(H,1),LGBI1)>0 OR COUNT(L>1.01*REF(H,1),LGBI1)>1) AND REF(L,LGBI1)<0.8*H),NEXTUBI),NODRAW;UBCANCEL3:=REF(GBI1,LGBI1)=1 AND REF(UBCANCEL1 OR UBCANCEL2,LGBI1)=0 AND LGBI1>0,NODRAW;UBCANCEL4:=REF(GBI1,LGBI1)=-1 AND NEXTDBI<2,NODRAW;DBCANCEL1:=NEXTUBI>NEXTDBI AND LLV(L,4)>REFX(LLV(L,4),NEXTDBI),NODRAW;DBCANCEL2:=NEXTUBI<NEXTDBI AND (NEXTDBI-NEXTUBI)<3 AND REFX(NOT((COUNT(REF(L,1)>1.035*H,LGBI1)>0 OR COUNT(REF(L,1)>1.01*H,LGBI1)>1) AND REF(H,LGBI1)>1.2*L),NEXTDBI),NODRAW;DBCANCEL3:=REF(GBI1,LGBI1)=-1 AND REF(DBCANCEL1 OR DBCANCEL2,LGBI1)=0 AND LGBI1>0,NODRAW;DBCANCEL4:=REF(GBI1,LGBI1)=1 AND REF(UBCANCEL1 OR UBCANCEL2,LGBI1),NODRAW;GBI:=IF(GBI1=1 AND (UBCANCEL1 OR UBCANCEL2 OR UBCANCEL3 OR UBCANCEL4),0, IF(GBI1=-1 AND (DBCANCEL1 OR DBCANCEL2 OR DBCANCEL3 OR DBCANCEL4),0,GBI1)) NODRAW;LGBI3:=IF(COUNT(GBI!=0,SHOULDHAVEBI)<1,-1,BARSLAST(GBI));LGBI:=IF(LGBI3=0 AND COUNT(GBI!=0,SHOULDHAVEBI)>1,REF(LGBI3,1)+1,LGBI3),NODRAW;{上一筆的距離}GBIH:=HHV(H,MIN(5,LGBI));GBIL:=LLV(L,MIN(5,LGBI));DRAWLINE(GBI=1,GBIH,GBI=-1,GBIL,0),COLORLIGREEN;DRAWLINE(GBI=-1,GBIL,GBI=1,GBIH,0),COLORLIGREEN;2 在優化筆gbi的基礎上，依據纏論中樞定義，制定了兩類共八種筆中樞的》》 規則，依據規則畫中樞。結果基本可用。nbsp;
公式導入教程: 【通達信公式源碼導入方法教程】 【同花順公式源碼導入方法教程】 【大智慧新一代公式源碼導入方法教程】
?