相關標簽:

?

纏論之于股市，猶如玄學之于大學士，實在是高深莫測。苦修纏論者眾矣，然股市發跡者少之又少，絕大多數還得以買書講學度日。何故如此？避實就虛，陶醉于學問之中，不能自拔者也！把炒股作為學問來研究，應該交給學者去做。普通股民只要一招半式，幾套指標，加一點盤感就夠了。突破找頂主圖把纏論的精確筆和分型進行技術化處理，著力點上著力，找頂線上定買點。不提纏論，卻源于纏論，不提理論，只看買點和理由，便于操作。突破找頂主圖的黃虛線是趨勢向上線，白虛線是趨勢向下線，反應了股票的基本走勢。所謂“勢”，指的是趨勢和走勢，不是定勢和必然。紅線是找底線（又叫地線），是前低點的水平延長線；綠線是找頂線（又叫天線），是前高點的水平延長線。找底線和找頂線的距離是前面階段跌幅的三分之一以下，并且當日K線突破找頂線，有成交量增量和MACD兩日在零軸線上面圓滑上升的配合，出買入信號（紅箭頭）?！菊f明】1.指標用到未來函數，這是畫線用的，不會產生漂移和數據失真現象。不喜勿噴?。。?.指標不適應于新股和次新股，因為新股和次新股沒有走出高點和低點，有的雖然有高低點，但沒有得到確認。

?

原理解析：
DIF(1,100,12) DEA(1,100,26) MID(1,100,9) VAR1賦值:收盤價-最低價 VAR2賦值:最高價-最低價 VAR3賦值:收盤價-最高價 VAR4賦值:如果最高價>最低價,返回(VAR1/VAR2+VAR3/VAR2)*成交量(手),否則返回0 HPTP賦值:VAR4的10日累和/10000,COLORSTICK TKXL賦值:(DIF-DEA)*2 XVYO賦值:最近1日TKXL連漲 G賦值:收盤價的5日簡單移動平均 D賦值:收盤價的10日簡單移動平均 HH賦值:5日前的最高價=11日內最高價的最高值 LL賦值:5日前的最低價=11日內最低價的最低值 FG01賦值:若HH則將最近6周期置為1>若HH則將最近5周期置為1 FD01賦值:若LL則將最近6周期置為1>若LL則將最近5周期置為1 當滿足條件成交量(手)/1日前的成交量(手)>2時,在開盤價和收盤價位置之間畫柱狀線,寬度為1,0不為0則畫空心柱.,COLOR00FFFF FG02賦值:如果上次FG01距今天數=上次FD01距今天數ANDG>D,返回FG01,否則返回如果上次FD01距今天數>上次FG01距今天數,返回FG01,否則返回0 FD02賦值:如果上次FG01距今天數=上次FD01距今天數ANDD>G,返回FD01,否則返回如果上次FG01距今天數>上次FD01距今天數,返回FD01,否則返回0 FG0賦值:FG02 AND 最高價=上次FD02距今天數日內最高價的最高值 FD0賦值:FD02 AND 最低價=上次FG02距今天數日內最低價的最低值 GQ賦值:最低價>1日前的最高價 AND 日不等于1日前的日 DQ賦值:最高價<1日前的最低價 AND 日不等于1日前的日 FGH賦值:上次FG0距今天數日前的最高價 FGL賦值:上次FG0距今天數日前的最低價 FGH1賦值:上次FG0距今天數+1日前的最高價 FGL1賦值:上次FG0距今天數+1日前的最低價 FGL2賦值:上次FG0距今天數+2日前的最低價 FDH2賦值:上次FD0距今天數+2日前的最高價 FDH賦值:上次FD0距今天數日前的最高價 FDL賦值:上次FD0距今天數日前的最低價 FDH1賦值:上次FD0距今天數+1日前的最高價 FDL1賦值:上次FD0距今天數+1日前的最低價 FGZL賦值:如果FGH1<FGL,返回FGL,否則返回如果FGL<=FGL1,返回FGL2,否則返回FGL1 FDZH賦值:如果FDL1>FDH,返回FDH,否則返回如果FDH>=FDH1,返回FDH2,否則返回FDH1 FG1賦值:FGH>FDZH AND FG0 FD1賦值:FDL<FGZL AND FD0 FG賦值:FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL FD賦值:FD1 AND FDL<FGL AND FDH<FGH AND FDH1<FGH BH0賦值:(最高價<=1日前的最高價 AND 最低價>=1日前的最低價) OR (最高價>=1日前的最高價 AND 最低價<=1日前的最低價) BHG賦值:統計上次FD0距今天數日中滿足BH0的天數 BHD賦值:統計上次FG0距今天數日中滿足BH0的天數 BGQ賦值:統計上次FD0距今天數日中滿足GQ的天數 BDQ賦值:統計上次FG0距今天數日中滿足DQ的天數 BK0賦值:如果BHG>0,返回BHG+2,否則返回如果BHD,返回BHD+2,否則返回3 BK賦值:如果BGQ,返回BK0-BGQ,否則返回如果BDQ,返回BK0-BDQ,否則返回BK0 G1X賦值:(FG AND 上次FD距今天數>BK) D1X賦值:(FD AND 上次FG距今天數>BK) G1賦值:(FG0 AND 上次FG0距今天數日前的最高價>=上次G1X距今天數日前的最高價 AND 上次D1X距今天數>上次G1X距今天數)OR (FG1 AND 統計上次FD1距今天數日中滿足GQ的天數>0 AND 上次FG1距今天數日前的最高價>上次G1X距今天數日前的最高價) D1賦值:(FD0 AND 上次FD0距今天數日前的最低價<=上次D1X距今天數日前的最低價 AND 上次G1X距今天數>上次D1X距今天數)OR (FD1 AND 統計上次FG1距今天數日中滿足DQ的天數>0 AND 上次FD1距今天數日前的最低價<上次D1X距今天數日前的最高價) G1H賦值:如果上次D1距今天數>上次G1距今天數,返回上次G1距今天數日前的最高價,否則返回上次D1距今天數日前的最高價 D1L賦值:如果上次G1距今天數>上次D1距今天數,返回上次D1距今天數日前的最低價,否則返回上次G1距今天數日前的最低價 G2賦值:G1 AND 最高價=上次D1距今天數+1日內G1H的最高值 AND 最高價>1日前的最高價 AND 上次D1距今天數>上次G1距今天數 D2賦值:D1 AND 最低價=上次G1距今天數+1日內D1L的最低值 AND 最低價<1日前的最低價 AND 上次G1距今天數>上次D1距今天數 NN賦值:G2 OR (FG0 AND 上次FG0距今天數日前的最高價>上次G2距今天數日前的最高價 AND 上次D2距今天數>上次G2距今天數) UU賦值:D2 OR (FD0 AND 上次FD0距今天數日前的最低價<上次D2距今天數日前的最低價 AND 上次G2距今天數>上次D2距今天數) 輸出趨勢向上:當滿足條件UU時,在最低價位置畫直線起點，當滿足條件NN時,在最高價位置畫直線終點,0表示是否延長.,畫黃色,DOTLINE 輸出趨勢向下:當滿足條件NN時,在最高價位置畫直線起點，當滿足條件UU時,在最低價位置畫直線終點,0表示是否延長.,畫白色,DOTLINE 輸出找頂線:當滿足條件NN時,在最高價位置畫直線起點，當滿足條件1日前的NN時,在1日前的最高價位置畫直線終點,1表示是否延長.,畫綠色 輸出找底線:當滿足條件UU時,在最低價位置畫直線起點，當滿足條件1日前的UU時,在1日前的最低價位置畫直線終點,1表示是否延長.,畫紅色 當滿足條件UU時,在最低價*0.995位置書寫數字 當滿足條件NN時,在最高價*1.01位置書寫數字 輸出XG:收盤價上穿找頂線 AND 找頂線>0 AND HPTP AND XVYO,NODRAW 當滿足條件XG時,在最低價位置畫1號圖標 突破找頂選股公式如下：DIF(1,100,12) DEA(1,100,26) MID(1,100,9) VAR1賦值:收盤價-最低價 VAR2賦值:最高價-最低價 VAR3賦值:收盤價-最高價 VAR4賦值:如果最高價>最低價,返回(VAR1/VAR2+VAR3/VAR2)*成交量(手),否則返回0 HPTP賦值:VAR4的10日累和/10000 TKXL賦值:(DIF-DEA)*2 XVYO賦值:最近1日TKXL連漲 G賦值:收盤價的5日簡單移動平均 D賦值:收盤價的10日簡單移動平均 HH賦值:5日前的最高價=11日內最高價的最高值 LL賦值:5日前的最低價=11日內最低價的最低值 FG01賦值:若HH則將最近6周期置為1>若HH則將最近5周期置為1 FD01賦值:若LL則將最近6周期置為1>若LL則將最近5周期置為1 FG02賦值:如果上次FG01距今天數=上次FD01距今天數ANDG>D,返回FG01,否則返回如果上次FD01距今天數>上次FG01距今天數,返回FG01,否則返回0 FD02賦值:如果上次FG01距今天數=上次FD01距今天數ANDD>G,返回FD01,否則返回如果上次FG01距今天數>上次FD01距今天數,返回FD01,否則返回0 FG0賦值:FG02 AND 最高價=上次FD02距今天數日內最高價的最高值 FD0賦值:FD02 AND 最低價=上次FG02距今天數日內最低價的最低值 GQ賦值:最低價>1日前的最高價 AND 日不等于1日前的日 DQ賦值:最高價<1日前的最低價 AND 日不等于1日前的日 FGH賦值:上次FG0距今天數日前的最高價 FGL賦值:上次FG0距今天數日前的最低價 FGH1賦值:上次FG0距今天數+1日前的最高價 FGL1賦值:上次FG0距今天數+1日前的最低價 FGH2賦值:上次FG0距今天數+2日前的最高價 FGL2賦值:上次FG0距今天數+2日前的最低價 FDH賦值:上次FD0距今天數日前的最高價 FDL賦值:上次FD0距今天數日前的最低價 FDH1賦值:上次FD0距今天數+1日前的最高價 FDL1賦值:上次FD0距今天數+1日前的最低價 FDH2賦值:上次FD0距今天數+2日前的最高價 FDL2賦值:上次FD0距今天數+2日前的最低價 FGZL賦值:如果FGH1<FGL,返回FGL,否則返回如果FGL<=FGL1,返回FGL2,否則返回FGL1 FDZH賦值:如果FDL1>FDH,返回FDH,否則返回如果FDH>=FDH1,返回FDH2,否則返回FDH1 FG1賦值:FGH>FDZH AND FG0 FD1賦值:FDL<FGZL AND FD0 FG賦值:FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL FD賦值:FD1 AND FDL<FGL AND FDH<FGH AND FDH1<FGH BH0賦值:(最高價<=1日前的最高價 AND 最低價>=1日前的最低價) OR (最高價>=1日前的最高價 AND 最低價<=1日前的最低價) BHG賦值:統計上次FD0距今天數日中滿足BH0的天數 BHD賦值:統計上次FG0距今天數日中滿足BH0的天數 BGQ賦值:統計上次FD0距今天數日中滿足GQ的天數 BDQ賦值:統計上次FG0距今天數日中滿足DQ的天數 BK0賦值:如果BHG>0,返回BHG+2,否則返回如果BHD,返回BHD+2,否則返回3 BK賦值:如果BGQ,返回BK0-BGQ,否則返回如果BDQ,返回BK0-BDQ,否則返回BK0 G1X賦值:(FG AND 上次FD距今天數>BK) D1X賦值:(FD AND 上次FG距今天數>BK) G1賦值:(FG0 AND 上次FG0距今天數日前的最高價>=上次G1X距今天數日前的最高價 AND 上次D1X距今天數>上次G1X距今天數)OR (FG1 AND 統計上次FD1距今天數日中滿足GQ的天數>0 AND 上次FG1距今天數日前的最高價>上次G1X距今天數日前的最高價) D1賦值:(FD0 AND 上次FD0距今天數日前的最低價<=上次D1X距今天數日前的最低價 AND 上次G1X距今天數>上次D1X距今天數)OR (FD1 AND 統計上次FG1距今天數日中滿足DQ的天數>0 AND 上次FD1距今天數日前的最低價<上次D1X距今天數日前的最高價) G1H賦值:如果上次D1距今天數>上次G1距今天數,返回上次G1距今天數日前的最高價,否則返回上次D1距今天數日前的最高價 D1L賦值:如果上次G1距今天數>上次D1距今天數,返回上次D1距今天數日前的最低價,否則返回上次G1距今天數日前的最低價 G2賦值:G1 AND 最高價=上次D1距今天數+1日內G1H的最高值 AND 最高價>1日前的最高價 AND 上次D1距今天數>上次G1距今天數 D2賦值:D1 AND 最低價=上次G1距今天數+1日內D1L的最低值 AND 最低價<1日前的最低價 AND 上次G1距今天數>上次D1距今天數 G3賦值:G2 OR (FG0 AND 上次FG0距今天數日前的最高價>上次G2距今天數日前的最高價 AND 上次D2距今天數>上次G2距今天數) 找頂線賦值:當滿足條件G3時,在最高價位置畫直線起點，當滿足條件1日前的G3時,在1日前的最高價位置畫直線終點,1表示是否延長. 輸出XG:收盤價上穿找頂線 AND 找頂線>0 AND HPTP AND XVYO 當滿足條件收陽線時,在橫軸0.01縱軸0.9位置書寫文字,畫紅色 當滿足條件收陽線時,在橫軸1縱軸1位置書寫文字,畫紅色

?

?來源:程序化99（ www.weiqiv.net.cn ）

源碼：

?

?

DIF(1,100,12);DEA(1,100,26);MID(1,100,9);VAR1:=CLOSE-LOW;VAR2:=HIGH-LOW;VAR3:=CLOSE-HIGH;VAR4:=IF(HIGH>LOW,(VAR1/VAR2+VAR3/VAR2)*VOL,0);HPTP:=SUM(VAR4,10)/10000,COLORSTICK;TKXL:=(DIF-DEA)*2;XVYO:=UPNDAY(TKXL,1);G:=MA(C,5);D:=MA(C,10);HH:=REF(H,5)=HHV(H,11);LL:=REF(L,5)=LLV(L,11);FG01:=BACKSET(HH,6)>BACKSET(HH,5);FD01:=BACKSET(LL,6)>BACKSET(LL,5);STICKLINE(V/REF(V,1)>2,OPEN,CLOSE,1,0),COLOR00FFFF;FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>D,FG01,IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0));FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>G,FD01,IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0));FG0:=FG02 AND H=HHV(H,BARSLAST(FD02));FD0:=FD02 AND L=LLV(L,BARSLAST(FG02));GQ:=L>REF(H,1) AND DAY!=REF(DAY,1);DQ:=H<REF(L,1) AND DAY!=REF(DAY,1);FGH:=REF(H,BARSLAST(FG0));FGL:=REF(L,BARSLAST(FG0));FGH1:=REF(H,BARSLAST(FG0)+1);FGL1:=REF(L,BARSLAST(FG0)+1);FGL2:=REF(L,BARSLAST(FG0)+2);FDH2:=REF(H,BARSLAST(FD0)+2);FDH:=REF(H,BARSLAST(FD0));FDL:=REF(L,BARSLAST(FD0));FDH1:=REF(H,BARSLAST(FD0)+1);FDL1:=REF(L,BARSLAST(FD0)+1);FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1));FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));FG1:=FGH>FDZH AND FG0;FD1:=FDL<FGZL AND FD0;FG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL;FD:=FD1 AND FDL<FGL AND FDH<FGH AND FDH1<FGH;BH0:=(H<=REF(H,1) AND L>=REF(L,1)) OR (H>=REF(H,1) AND L<=REF(L,1));BHG:=COUNT(BH0,BARSLAST(FD0));BHD:=COUNT(BH0,BARSLAST(FG0));BGQ:=COUNT(GQ,BARSLAST(FD0));BDQ:=COUNT(DQ,BARSLAST(FG0));BK0:=IF(BHG>0,BHG+2,IF(BHD,BHD+2,3));BK:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0));G1X:=(FG AND BARSLAST(FD)>BK);D1X:=(FD AND BARSLAST(FG)>BK);G1:=(FG0 AND REF(H,BARSLAST(FG0))>=REF(H,BARSLAST(G1X)) AND BARSLAST(D1X)>BARSLAST(G1X))OR (FG1 AND COUNT(GQ,BARSLAST(FD1))>0 AND REF(H,BARSLAST(FG1))>REF(H,BARSLAST(G1X)));D1:=(FD0 AND REF(L,BARSLAST(FD0))<=REF(L,BARSLAST(D1X)) AND BARSLAST(G1X)>BARSLAST(D1X))OR (FD1 AND COUNT(DQ,BARSLAST(FG1))>0 AND REF(L,BARSLAST(FD1))<REF(H,BARSLAST(D1X)));G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1)));D1L:=IF(BARSLAST(G1)>BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1)));G2:=G1 AND H=HHV(G1H,BARSLAST(D1)+1) AND H>REF(H,1) AND BARSLAST(D1)>BARSLAST(G1);D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) AND L<REF(L,1) AND BARSLAST(G1)>BARSLAST(D1);NN:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));UU:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));趨勢向上:DRAWLINE(UU,L,NN,H,0),COLORYELLOW,DOTLINE;趨勢向下:DRAWLINE(NN,H,UU,L,0),COLORWHITE,DOTLINE;找頂線:DRAWLINE(NN,H,REF(NN,1),REF(H,1),1),COLORGREEN;找底線:DRAWLINE(UU,L,REF(UU,1),REF(L,1),1),COLORRED;DRAWNUMBER(UU,L*0.995,L);DRAWNUMBER(NN,H*1.01,H);XG:CROSS(C,找頂線) AND 找頂線>0 AND HPTP AND XVYO,NODRAW;DRAWICON(XG,LOW,1);突破找頂選股公式如下：DIF(1,100,12);DEA(1,100,26);MID(1,100,9);VAR1:=CLOSE-LOW;VAR2:=HIGH-LOW;VAR3:=CLOSE-HIGH;VAR4:=IF(HIGH>LOW,(VAR1/VAR2+VAR3/VAR2)*VOL,0);HPTP:=SUM(VAR4,10)/10000;TKXL:=(DIF-DEA)*2;XVYO:=UPNDAY(TKXL,1);G:=MA(C,5);D:=MA(C,10);HH:=REF(H,5)=HHV(H,11);LL:=REF(L,5)=LLV(L,11);FG01:=BACKSET(HH,6)>BACKSET(HH,5);FD01:=BACKSET(LL,6)>BACKSET(LL,5);FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND G>D,FG01,IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0));FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) AND D>G,FD01,IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0));FG0:=FG02 AND H=HHV(H,BARSLAST(FD02));FD0:=FD02 AND L=LLV(L,BARSLAST(FG02));GQ:=L>REF(H,1) AND DAY!=REF(DAY,1);DQ:=H<REF(L,1) AND DAY!=REF(DAY,1);FGH:=REF(H,BARSLAST(FG0));FGL:=REF(L,BARSLAST(FG0));FGH1:=REF(H,BARSLAST(FG0)+1);FGL1:=REF(L,BARSLAST(FG0)+1);FGH2:=REF(H,BARSLAST(FG0)+2);FGL2:=REF(L,BARSLAST(FG0)+2);FDH:=REF(H,BARSLAST(FD0));FDL:=REF(L,BARSLAST(FD0));FDH1:=REF(H,BARSLAST(FD0)+1);FDL1:=REF(L,BARSLAST(FD0)+1);FDH2:=REF(H,BARSLAST(FD0)+2);FDL2:=REF(L,BARSLAST(FD0)+2);FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1));FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));FG1:=FGH>FDZH AND FG0;FD1:=FDL<FGZL AND FD0;FG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL;FD:=FD1 AND FDL<FGL AND FDH<FGH AND FDH1<FGH;BH0:=(H<=REF(H,1) AND L>=REF(L,1)) OR (H>=REF(H,1) AND L<=REF(L,1));BHG:=COUNT(BH0,BARSLAST(FD0));BHD:=COUNT(BH0,BARSLAST(FG0));BGQ:=COUNT(GQ,BARSLAST(FD0));BDQ:=COUNT(DQ,BARSLAST(FG0));BK0:=IF(BHG>0,BHG+2,IF(BHD,BHD+2,3));BK:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0));G1X:=(FG AND BARSLAST(FD)>BK);D1X:=(FD AND BARSLAST(FG)>BK);G1:=(FG0 AND REF(H,BARSLAST(FG0))>=REF(H,BARSLAST(G1X)) AND BARSLAST(D1X)>BARSLAST(G1X))OR (FG1 AND COUNT(GQ,BARSLAST(FD1))>0 AND REF(H,BARSLAST(FG1))>REF(H,BARSLAST(G1X)));D1:=(FD0 AND REF(L,BARSLAST(FD0))<=REF(L,BARSLAST(D1X)) AND BARSLAST(G1X)>BARSLAST(D1X))OR (FD1 AND COUNT(DQ,BARSLAST(FG1))>0 AND REF(L,BARSLAST(FD1))<REF(H,BARSLAST(D1X)));G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1)));D1L:=IF(BARSLAST(G1)>BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1)));G2:=G1 AND H=HHV(G1H,BARSLAST(D1)+1) AND H>REF(H,1) AND BARSLAST(D1)>BARSLAST(G1);D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) AND L<REF(L,1) AND BARSLAST(G1)>BARSLAST(D1);G3:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));找頂線:=DRAWLINE(G3,H,REF(G3,1),REF(H,1),1);XG:CROSS(C,找頂線) AND 找頂線>0 AND HPTP AND XVYO;DRAWTEXT_FIX(C>O,0.01,0.9,0,' www.weiqiv.net.cn '),COLORRED;
DRAWTEXT_FIX(C>O,1,1,0,'程序化交易模型'),COLORRED;

?

?

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

?