【通达信】原创通达信版-缠论分笔分段公式(附：缠论公式编写教程,打造自己的缠论体系)
通达信缠中说禅趋势力度、平均力度的公式，可以看MACD和均线面积
通达信缠中说禅趋势力度、平均力度的公式，可以看MACD和均线面积我编制的通达信公式是这样的：参数：short 默认是12，范围你自己定（下同）long默认是26；mid默认是9；K默认是0，范围0-1，0是显示均线面积，1是显示macd面积MA1:=MA(CLOSE,5);MA2:=MA(CLOSE,10);DIF:=EMA(CLOSE,SHORT)-EMA(CLOSE,LONG);DEA:=EMA(DIF,MID);MACD:=(DIF-DEA)*2,COLORSTICK;DIFF:=SUM(MA1-MA2,0);SUMMACD:=SUM(MACD,0);W1:=BARSLAST(CROSS(MA2,MA1))+1;W2:=BARSLAST(CROSS(MA1,MA2))+1;W3:=BARSLAST(CROSS(MACD,0))+1;W4:=BARSLAST(CROSS(-MACD,0))+1;趋势力度:IF(K,SUMMACD-REF(SUMMACD,MIN(W3,W4)),DIFF-REF(DIFF,MIN(W1,W2)));趋势平均力度:趋势力度/IF(K,(MIN(W3,W4)+1)/20,(MIN(W1,W2)+1)/20),COLORSTICK;MAX趋势平均力度:HHV(趋势平均力度,34);MIN趋势平均力度:LLV(趋势平均力度,34);想看均线的面积你就把K调成0，趋势力度就指的均线的面积，平均力度就很明显了想看macd的面积就把K调成1，趋势力度就指的是macd的面积了。
后面两个值是最近的趋势平均力度的最大最小值，后面的34你看着定，做成一个参数也成例图：。
目前最准确的通达信缠论分笔公式
目前最准确的通达信缠论分笔公式缠论是一种市场行为分析方法，由国内知名分析师缠中说禅所创立。
它基于对价格走势的观察和理解，通过综合分析市场行为模式和技术指标，来预测市场的走势。
其中的分笔公式是分析分笔走势的工具，用于确定市场的买卖点位。
1.缠论趋势判断公式：缠论认为，市场的走势可以分为趋势段、盘整段和反趋势段。
趋势段由包含关系的K线构成，盘整段由价格在一个区间内震荡运行，反趋势段为趋势段的结束。
在分析趋势的时候，可以使用缠论的趋势判断公式。
公式为：连续三笔同一向上（向下）不破前笔最高点（最低点），即为趋势上（下）。
2.分笔买卖点位判断公式：缠论通过观察分笔走势来预测市场的买卖点位。
分笔是指在走势段中，价格上升或下降时的单笔价格变化。
缠论将分笔分为买卖两类，使用不同的公式进行判断。
买分笔的公式为：上升四分笔不跌破前一分笔最低价，即为买点。
卖分笔的公式为：下跌四分笔不涨破前一分笔最高价，即为卖点。
3.分笔运用扩展公式：在实际运用分笔公式进行分析时，可以结合其它技术指标和图形形态来确认分笔的准确性。
比如，可以结合移动平均线等指标来进行确认。
此外，还可以观察分笔走势的震荡幅度、分笔数量等，来判断市场的力度和趋势的稳定性。
总之，缠论分笔公式是一种基于价格走势和市场行为的分析方法，其准确性主要取决于对市场走势的观察和理解能力，以及对技术指标和形态的熟练运用。
只有在不断研究和实践的基础上，才能提高对分笔走势的判断准确性。
此外，市场行情的变化是多变的，任何公式都无法百分之百准确。
因此，在进行分析和决策时，还需综合考虑其它因素，并灵活调整策略。
目前最准确的通达信缠论分笔公式
目前最准确的通达信缠论分笔公式-CAL-FENGHAI.-(YICAI)-Company One1目前见到的最准确的通达信缠论分笔公式参数：老笔＝1，使用老笔定义，默认为0，使用新笔定义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));GP:IF(FG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;DP:IF(FD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;GQ:=L>REF(H,1) AND DAY!=REF(DAY,1);DQ:=H<REF(L,1) AND DAY!=REF(DAY,1);GQL:=REF(L,BARSLAST(GQ));DQH:=REF(H,BARSLAST(DQ));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);FGZH:=IF(FGL<=FGL1,FGH2,FGH1);FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1));FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));FDZL:=IF(FDH>=FDH1,FDL2,FDL1);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 ANDREF(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 ANDREF(L,BARSLAST(FD1))<REF(H,BARSLAST(D1X)));G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D 1))),;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) ANDBARSLAST(G1)>BARSLAST(D1);G3:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));D3:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));GPB:IF(G1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;DPB:IF(D1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;{画线}NN:=G3;UU:=D3;L1:DRAWLINE(UU,L,NN, H,0),COLORLIGREEN;L2:DRAWLINE(NN,H,UU,L,0),COLORLIGREEN;{标示端点数值}{DRAWNUMBER(L1 AND L2 AND NN ,H,H),COLORLIRED;DRAWNUMBER(L1 AND L2 AND UU ,L,L),COLORLIMAGENTA;};。
缠中说禅中枢和笔公式通达信版
{通达信MA+中枢＋分笔公式} {M1，M２参数自己定，可选５,10} ＭＡ1：MＡ(ＣＬＯSＥ,5); ＭA２:MＡ(ＣLOＳE,10); {Ｎ１:1,１0０,10；N2:1,10０,10;DISP：＝1，3，２}; N1:=1０；N2:=10；DISP:=2; K:＝ＩF（ＰEＲIOＤ=5，1,{日｝IＦ(PＥＲＩＯＤ=６，１，{周｝IF(PＥRIOD=7,1,｛月} IＦ(PEＲIOD=8,１,{多分钟} IＦ(PEＲIＯD=9,1，{多日}IＦ(PERIOＤ＝10,1，{季} IF(ＰEＲＩOD＝11,2,{年｝IF(PER ＩOD=4，1,{６0Ｆ}IF（ＰERIOD=３，1,{3０F} ＩF(PERI ＯD=2,1，｛15Ｆ} IF(PERIＯD＝1，1{5Ｆ｝，1{1F｝）))）））))))）/10；P1:＝PEＡＫ(１，Ｋ＊N1,1); Ｐ２:＝ＰＥＡK（１,K*N1,２）; WP1:=PEＡKBARＳ(１,K＊N1，１); WP2:=PEAKBARS（１,K*N1,２）；T1:=TROUGH(2，Ｋ*N2,1); Ｔ2：=TＲOＵＧＨ（2,Ｋ＊N2，2); WT1：=TＲOＵＧＨBARS(２，K＊Ｎ2,１); WT2:＝TROUGHBＡRS(2,K*Ｎ2,２）；TJ１：=P1>Ｔ１AND P２＞T2 ; ZD:=MAX(T1，T2);ＺＧ:=MIN(Ｐ1,P2）; ＬL:=MIＮ(Ｔ1,T2); HH:=MAX(P１,Ｐ2）; TJ2:＝FILTＥR(ZG>ZD,2); ＴＪ3:=ＺG＝REF(ZG，BARSLAST（TJ2）)OR ZD=REＦ（ZD,BＡRＳLAＳＴ(TJ2)); TＪ4：＝TJ1＆&TJ2&＆ＮＯT(TJ3); ＴＪ5：=BETW ＥEN（ZD,REF(ZD，REF(BＡＲSLAST(ＴＪ4），1)),REF(ＺG,REF(BARSLAST(TJ4),1)));TJ６:=BETWEEN(ＺG,REF(ＺD,ＲＥF（ＢARＳLAＳT（TＪ４）,1)),ＲEF(ZG,REF(BＡRSLASＴ(ＴＪ4),1))); TＪ7:=ＺG＞RＥF(ZG,ＲEF(ＢAＲＳLAST(ＴJ4),１）)＆&ZDRＥF（HHV(H,4),1)，4); 局部高点预选B：＝ＢACKSEＴ(局部高点预选A＝0 A ＮＤREＦ（局部高点预选A,1)＝1,2); 局部高点预选C：＝IＦ(局部高点预选B=１AND RＥF(局部高点预选B,1)=0,１,0); 缺口判断:=ＩF(L>REF(H，１），1,IF（ＨREＦ(距前低天,1) AND LLV(Ｌ,距前高天+1)=４OＲLLV(缺口判断,距前高天)=-1 OR LLV(Ｌ,距前低天+2)ＲEF(小值周期，距前低天+1) ＡNＤ大值周期>RＥF（小值周期,距前低天) AND 大值周期＞REF（大值周期，距前高天),１,0)；高保留A:=IF(局部高点预选Ｃ=１AND REＦ(距前低天，１)>ＲEF(距前高天,1)AND HHV(Ｈ,距前低天＋１)＞REF(HHV(H,距前低天+1),1),1,０);高保留Ｂ:=IF(局部高点预选C=1 ANＤREF(距前低天，1)<=REF(距前高天,1) AND RＥF(低保留S,距前低天)=-1 AND （距前低天>=4 ＯR HH Ｖ（缺口判断,距前低天)=1),1,０)；高保留：=IF((高保留A=1 OR 高保留B=1 OＲ判断=1)AND H>REF（L,距前低天+1）,1,0);预判A:=IF((距前高天<４AND HHV(缺口判断,距前高天）!=1)OR REF(高保留,距前高天)=0,1,0); 判断A:=ＩF(局部低点预选C=-1 ANＤREＦ(距前高天,1)＜=REF(距前低天,1)AND 预判A=1AND小值周期>R ＥF(大值周期,距前高天＋1) AND 小值周期＞REF（大值周期,距前高天) ANＤ小值周期>REF(小值周期, 距前低天),-1,０); 低保留A：＝IF(局部低点预选Ｃ=-１AＮＤＲEF(距前高天,1)>REF(距前低天，１) ANDＬLV(L,距前高天+1)＝4 OR ＬLV(缺口判断，距前高天)=-1 ＯR判断A=－1)，-1,０); 低保留:=IF(（低保留Ａ=-1OＲ低保留B=-1）AND LREF(小值周期,距前低天A+1）ＡＮD 大值周期>ＲＥF(小值周期,距前低天A) AＮD 大值周期＞ＲＥＦ（大值周期，距前高天A),1,0）; 高保留XＡ:=IF(局部高点预选C＝1 AND ＲEF(距前低天A,1)>ＲEF(距前高天A,1) ANDＨHV(H,距前低天A+1)>REＦ（ＨHＶ(H,距前低天Ａ+1),1）,1，０）; 高保留ＸB：＝ＩF(局部高点预选Ｃ=1 AＮＤRＥF(距前低天A,1)<＝REF(距前高天A，１）ＡND ＲＥＦ（低保留,距前低天A)=-1 AＮD (距前低天Ａ>＝４OＲＨＨV(缺口判断,距前低天A）=1)，1,0); 高保留Ｘ：=IF((高保留ＸA=１OR高保留XＢ=1OR判断X＝1) AND H>RＥF （L,距前低天A+1),１,0); 预判XＡ:=ＩＦ((距前高天A<4 AND HＨV(缺口判断,距前高天A)!=１) ＯR ＲEF（高保留ＸA,距前高天A)=0,１,０）; 判断XA:=IＦ(局部低点预选C=-1 AND REＦ(距前高天A，1)<=RＥF(距前低天A,１）ＡND 预判ＸA=１ＡND 小值周期>REF(大值周期,距前高天A＋1) ＡND 小值周期＞REF(大值周期,距前高天A) AN Ｄ小值周期>REF(小值周期,距前低天A),-1，０); 低保留XＡ:＝IF（局部低点预选Ｃ=-1AND REF(距前高天Ａ，１)>REＦ（距前低天A,1) AＮＤLＬV(L，距前高天Ａ+１)=4OＲLLV(缺口判断,距前高天Ａ）=-1 OR 判断XＡ＝-1),－1,0）；低保留X:=IＦ（（低保留ＸA=－1 ＯR 低保留XB=-1) ANＤＬREF(小值周期,距前低天YA+１) ＡND 大值周期>REF（小值周期,距前低天ＹA) ＡND大值周期＞ＲＥF(大值周期,距前高天YA),1,０);高保留YXＡ:＝IF （局部高点预选C＝１ＡＮD ＲＥF(距前低天YA，1)＞REF(距前高天YA,1) AＮD HＨV(H,距前低天YA+1)>REF(ＨHV(H，距前低天YA+1),1),1,0)；高保留YXB：＝IF（局部高点预选C=1 ＡNDＲEF（距前低天YA，1）<=REF（距前高天YA,1）AND REF(低保留Ｘ,距前低天ＹA)=－1ＡＮD（距前低天ＹA＞=４OR ＨHV（缺口判断，距前低天ＹA)=１）,1,0);高保留ＹX:=IF((高保留YＸA=1ＯR 高保留YXB=１OR 判断YX＝１) AND H>REF(Ｌ,距前低天YＡ＋1),1,0)；预判YXA:=IF((距前高天ＹA<4 ＡＮD HHV(缺口判断,距前高天YA）!＝1) OR REF(高保留YＸＡ,距前高天YA）=0,1,０); 判断YＸA:＝I Ｆ(局部低点预选C=－1 ＡND RＥF（距前高天YA，1)＜=REF(距前低天ＹA，1) AND预判YXA=1 AＮＤ小值周期>RＥF(大值周期,距前高天YA+1) ＡND 小值周期>ＲＥF(大值周期,距前高天YA）AND 小值周期>REＦ(小值周期，距前低天ＹA）,-1,0);低保留YＸＡ：＝IF(局部低点预选C＝－１AND ＲＥF(距前高天ＹA,1)>REF(距前低天YA,1) AND LＬV(Ｌ,距前高天YA+１)=4 OＲＬLＶ（缺口判断,距前高天ＹＡ）=-1OR 判断YXA=-１),-１,0); 低保留ＹX：=ＩF((低保留YXA＝－1 OR 低保留ＹＸB=-1)A ＮD ＬREF(H,RＥF(距前高天YA，1)+2）,1,IF（高保留YX ＝1 AND 低保留YX=-１AND L。
缠论分笔公式
缠论分笔公式分笔1KU1:=IF(HIGH=HHV(HIGH,3),1,0);KD1:=IF(LOW=LLV(LOW,3),1,0);UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0AND KU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1AND REF(KU1,1)=0 AND KU1=0)));DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0AND KD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1AND REF(KD1,1)=0 AND KD1=0)));HV:=H>UL AND H>REF(H,1) ;LV:=L<DL AND L<REF(L,1) ;GP:=BARSLAST(HV);DP:=BARSLAST(LV);IP:=IF(GP=0,DP,GP)>3;HV1:=HV AND IP AND H>=HHV(H,BARSLAST(LV));LV1:=LV AND IP AND L<=LLV(L,BARSLAST(HV));DRAWLINE(LV1,LOW,HV1, HIGH,0),COLORYELLOW,LINETHICK2;DRAWLINE(HV1,HIGH,LV1, LOW,0),COLORMAGENTA,LINETHICK2;分笔2局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2); 局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2); 局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);局部极点A:=局部低点预选C+局部高点预选C;局部极点B:=IF(局部低点预选C=-1,-1,IF(局部高点预选C=1,1,0));缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));距前高天:=BARSLAST(局部极点A=1);距前低天:=BARSLAST(局部极点A=-1);高保留A:=IF(局部极点A=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);高保留B:=IF(局部极点A=1 AND REF(距前低天,1)<REF(距前高天,1) AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);低保留A:=IF(局部极点A=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);低保留B:=IF(局部极点A=-1 AND REF(距前高天,1)<REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1),-1,0);极点保留:=低保留A+低保留B+高保留A+高保留B;局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW; DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0)COLORLIRED LINETHICK2; DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0)COLORYELLOW LINETHICK2;分笔3{N1:1,100,10;N2:1,100,10;DISP:=1,3,2};N1:=10;N2:=10;DISP:=2;K:=IF(PERIOD=5,1,{日}IF(PERIOD=6,1,{周}IF(PERIOD=7,1,{月}IF(PERIOD=8,1,{多分钟}IF(PERIOD=9,1,{多日}IF(PERIOD=10,1,{季}IF(PERIOD=11,2,{年}IF(PERIOD=4,1,{60F}IF(PERIOD=3,1,{30F}IF(PERIOD=2,1,{15F}IF(PERIOD=1,1{5F},1{1F})))))))))))/10;P1:=PEAK(1,K*N1,1);P2:=PEAK(1,K*N1,2);WP1:=PEAKBARS(1,K*N1,1);WP2:=PEAKBARS(1,K*N1,2);T1:=TROUGH(2,K*N2,1);T2:=TROUGH(2,K*N2,2);WT1:=TROUGHBARS(2,K*N2,1);WT2:=TROUGHBARS(2,K*N2,2);TJ1:=P1>T1 AND P2>T2 ;ZD:=MAX(T1,T2);ZG:=MIN(P1,P2);LL:=MIN(T1,T2);HH:=MAX(P1,P2);TJ2:=FILTER(ZG>ZD,2);TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));TJ4:=TJ1&&TJ2&&NOT(TJ3);TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,REF(BARSLAST(TJ4),1)));TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF(BARSLAST(TJ4),1)); TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);ZSD:=IF(TJ8,ZD,DRAWNULL);ZSG:=IF(TJ8,ZG,DRAWNULL);ZSH:=IF(TJ8,HH,DRAWNULL);ZSL:=IF(TJ8,LL,DRAWNULL);STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;DRAWTEXT(DISP=2,ZSH,'中枢'),COLORRED;中枢高:PLOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CROSSDOT,COLORLIRED;中枢低:PLOYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CROSSDOT,COLORLIGREEN;中枢最高:PLOYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLORRED;中枢最低:PLOYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLORGREEN;趋势高:PLOYLINE(DISP=3,ZIG(1,K*N1)),COLORLIBLUE;趋势低:PLOYLINE(DISP=3,ZIG(2,K*N2)),COLORLIBLUE;局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));距前高天:=BARSLAST(局部高点预选C=1);距前低天:=BARSLAST(局部低点预选C=-1);小值周期:=LOWRANGE(L);大值周期:=TOPRANGE(H);低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天)AND 大值周期>REF(大值周期,距前高天),1,0);高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0);判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);距前高天A:=BARSLAST(高保留=1);距前低天A:=BARSLAST(低保留=-1);预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0);高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);距前高天YA:=BARSLAST(高保留X=1);距前低天YA:=BARSLAST(低保留X=-1);预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0);高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0); AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW; DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0)COLORLIRED;DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0)COLORYELLOW;DD1:=BARSLAST(ABS(极点保留)!=1);DRAWTEXT(极点保留=1,局部极点,'卖'),COLORGREEN;DRAWTEXT(极点保留=-1,局部极点,'买'),COLORRED;MA5:MA(CLOSE,5),COLORFF00FF,LINETHICK2;判:IF(MA5<REF(MA5,1),MA5,DRAWNULL),COLORWHITE,LINETHICK2;分笔4五日:=MA(C,5);十三日:=MA(C,13);二十一日:=MA(C,21);五十五日:=MA(C,55);一百四四:=MA(C,144);两百三三:=MA(C,233);局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));距前高天:=BARSLAST(局部高点预选C=1);距前低天:=BARSLAST(局部低点预选C=-1);小值周期:=LOWRANGE(L);大值周期:=TOPRANGE(H);低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0);判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);距前高天A:=BARSLAST(高保留=1);距前低天A:=BARSLAST(低保留=-1);预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0);高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);距前高天YA:=BARSLAST(高保留X=1);距前低天YA:=BARSLAST(低保留X=-1);预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0);高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0); AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW; DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0)COLORLIMAGENTA,LINETHICK1; DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0)COLORLIMAGENTA,LINETHICK1;。
【通达信】原创通达信版－缠论分笔分段公式。（附：缠论公式编写教程，打造自己的缠论体系）
【通达信】原创通达信版－缠论分笔分段公式。
（附：缠论公式编写教程，打造自己的缠论体系）缠论大师很多，在下才疏学浅，不到之处敬请点拔。
另外声明一下，世间没有包赚钱的公式，只有适合的工具。
想通过一个什么包赚钱的价格几万的公式来稳赚不赔，那股市就没有输家了。
如果有缘份的话，本文最后将推出缠师最终没有告知大家的力度公式部分。
真正得缠者，为见相非相，即见如来。
通达信版公式，因为定义不了全局变量、数组，以及没有循环语句等功能，相比大智慧在公式编程方面差了不少。
但通达信的优势还是有的，在此推出一个通达信非DLL版本的缠论分笔公式，并在后续的文章中逐步讲解如何通过程序，将缠论转化公式。
如果缠友仅想得到一公式而已，那就也无所谓细读本文。
但凡得道，靠的是觉悟和缘份，在此也就不细说了。
初学缠论的朋友也可以参考一些网站或专门的书籍，对阅读本文会有较大的帮助。
一、分形。
缠论集道氏、波浪、江恩学派于一体，结合浑沌理论，将K线形态以分形的方式进行规划，并以一套规则定义波浪起始点，以中枢的形式表达三角形调整（旗形、契形、钻石等形态，均是三角形形态的变种），以背驰的理论表述力度的衰竭。
理论指导实战，行之有效。
分形分二种，一是顶分型，另一是底分型。
分型也可以看成是酒田的三山形态，即中间K线高低点均高于二侧的，为顶分型，均低于二侧的，为底分形。
当一根K线高低点均在前一根K线价格之类，或者前一根K线高低点均在本根K线价格之类，称为包含关系。
在程序处理上，被前一根K线包含的，因为不可能作为分形的顶、底点，所以我们可以不进行处理。
如果是后一种包含关系，则观察前一根K线处于什么分形关态，如果前一根是顶分形，则本根向上取值，作为顶分形处理，反之则向下处理为底分形。
但这里有一个特殊情况，在不成笔的情况下，如果这根K线的前一分形状态为低分形，但本K线高点却已经超出了前一个顶分形的顶点，应将这根K线作为顶分形处理，反之亦然。
否则，笔的顶底点将不会处于笔内K线的高低点位置。
自编缠论画中枢和级别的主图指标通达信指标公式源码
自编缠论画中枢和级别的主图指标通达信指标公式源码自编缠论画中枢和级别的主图指标！kx:="chanlun@kxian";kxg:="chanlun@kxg";kxd:="chanlun@kxd";kxfx:="chanlun@kxfx";笔:="chanlun@bi";笔周期:"chanlun@bilast",linethick0, colorff00ff;bilast:="chanlun@bilast";{笔周期};段:="chanlun@duan";段周期:"chanlun@duanlast", linethick0, colorFFffFF;duanlast:="chanlun@duanlast"; {段周期};中枢:="chanlun@zs";zszg:="chanlun@zszg";zszd:="chanlun@zszd";zsgg:="chanlun@zsgg";zsdd:="chanlun@zsdd";zszz:="chanlun@zszz";zsks:="chanlun@zskslast";zsjs:="chanlun@zsjslast";bifx:=-REF(笔,bilast);duanfx:=-REF(段,duanlast);kxqj:="chanlun@kxqj";{画中枢Begin} {以背景方式画}STICKLINE(zszg>zszd AND duanfx=1, zszg, zszd, 10, 1),Color8E236B; STICKLINE(zszg>zszd AND duanfx=-1, zszg, zszd, 10, 1), Color007700; {中枢震荡监视器}DRAWLINE(zsks=1, zszz, zsjs=1, zszz, 0), colorFFFFFF;{画中枢END}{顶底分型}STICKLINE(kx>0, kxg, kxd, 5, 1),Color007700,linethick2; STICKLINE(kx<0, kxg, kxd, 5, 1),Color00ffff,linethick2;{笔段}STICKLINE(笔=1, kxg, kxd, 5, 1), colorgreen, linethick2; STICKLINE(笔=-1, kxg, kxd, 5, 1), colorred, linethick2;STICKLINE(段=1, kxg, kxd, 5, 0), color007700, linethick2; STICKLINE(段=-1, kxg, kxd, 5, 0), color0000cc, linethick2;{画K线END}{画笔段}drawline(笔=1,h,笔=-1,l,0),colorBLUE,linethick2;drawline(笔=-1,l,笔=1,h,0),ColorFF00FF ,linethick2;drawline(段=1,h,段=-1,l,0),color007700, linethick2;drawline(段=-1,l,段=1,h,0),colorRED, linethick2;{笔高低点周期力度提示}DRAWTEXT(笔= 1, h*1.038, ''+h+''), colorffffff, align1, valign1; DRAWTEXT(笔=-1, L*0.96, ''+l+''), colorFFffFF, align1, valign1;VAR3:=LLV(H,240);VAR4:=100*(C-VAR3)/VAR3;VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;VAR7:=0;VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE ,1)),7,1)*100;VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE ,1)),13,1)*100;VAR10:=IF(TROUGHBARS(3,16,1)=0 AND H>L+0.04,4,0);VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);VAR12:=ZIG(3,6)=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) ANDREF(ZIG(3,22),1)<=REF(ZIG(3,22),2) ANDREF(ZIG(3,22),2)<=REF(ZIG(3,22),3);VAR14:=ZIG(3,22)<="" bdsfid="115" p="">REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) ANDREF(ZIG(3,22),2)>=REF(ZIG(3,22),3);VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) ANDREF(ZIG(3,51),1)<=REF(ZIG(3,51),2) ANDREF(ZIG(3,51),2)<=REF(ZIG(3,51),3);VAR16:=ZIG(3,51)<="" bdsfid="122" p="">REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) ANDREF(ZIG(3,51),2)>=REF(ZIG(3,51),3);VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) ANDREF(ZIG(3,72),1)<=REF(ZIG(3,72),2) ANDREF(ZIG(3,72),2)<=REF(ZIG(3,72),3);VAR18:=ZIG(3,72)<="" bdsfid="129" p="">REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) ANDREF(ZIG(3,72),2)>=REF(ZIG(3,72),3);VAR19:=EMA(C,2)-EMA(C,150);买１:=VAR10;买２:=(VAR11+VAR13+VAR15+VAR17);卖１:=(VAR12+VAR14+VAR16+VAR18);DRAWTEXT(买１>0 OR 买２>0,L*0.985,'买'),COLOR00ffff;DRAWTEXT(卖１>0,H*1.01,'卖'),COLOR00ffff;APP:=(VOL)/((H-L)*(2)-ABS(C-O));ZL:=IF((H>O),(APP)*(H-L),IF((L<="" bdsfid="140" p="">SF:=IF((H>O),0-(APP)*(H-C+O-L),IF((L<="" bdsfid="142" p="">库存能量:=MA(ZL+SF,2);库存平均:=MA(ZL+SF,5);GET:ZIG(3,5),COLORYELLOW,LINETHICK3;PL5:=ZIG(3,5);EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) ANDREF(PL5,2)<=REF(PL5,3);EX1:=PL5=REF(PL5,2) ANDREF(PL5,2)>=REF(PL5,3);PL10:=ZIG(3,10);EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) ANDREF(PL10,2)<=REF(PL10,3);EX2:=PL10=REF(PL10,2) ANDREF(PL10,2)>=REF(PL10,3);PL20:=ZIG(3,20);EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) ANDREF(PL20,2)<=REF(PL20,3);EX3:=PL20=REF(PL20,2) ANDREF(PL20,2)>=REF(PL20,3);走强1:=BARSLAST(PL5<ref(pl5,1));< bdsfid="165" p=""></ref(pl5,1));<>走弱1:=BARSLAST(PL5>REF(PL5,1));走强2:=BARSLAST(PL10<ref(pl10,1));< bdsfid="168" p=""></ref(pl10,1));<>走弱2:=BARSLAST(PL10>REF(PL10,1));走强3:=BARSLAST(PL20<ref(pl20,1));< bdsfid="171" p=""></ref(pl20,1));<>走弱3:=BARSLAST(PL20>REF(PL20,1));ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);DTJZ5:=IF(PL10<ref(pl10,1),count(en1,走弱2),0);< bdsfid="176" p=""></ref(pl10,1),count(en1,走弱2),0);<> DTJD5:=IF(PL10<ref(pl10,1),count(ex1,走弱2),0);< bdsfid="178" p=""></ref(pl10,1),count(ex1,走弱2),0);<> ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);DTJZ10:=IF(PL20<ref(pl20,1),count(en2,走弱3),0);< bdsfid="182" p=""></ref(pl20,1),count(en2,走弱3),0);<> DTJD10:=IF(PL20<ref(pl20,1),count(ex2,走弱3),0);< bdsfid="184" p=""></ref(pl20,1),count(ex2,走弱3),0);<> DRAWTEXT(EN2 AND DTJZ10=1,L*0.96,'[类二买]'),COLORFFffFF; DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'[一买]'),COLORFF00ff; DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.04,'[二卖]'),LINETHICK2,COLORFFff00;DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.94,'[二买]'),LINETHICK2,COLORFFFF00;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.03,'[一卖]'),LINETHICK3,COLOR00FF00; DRAWTEXTABS(620,-55,'历史最高价:'+HHV(HIGH,0)),Colorff00ff,LAYER0; DRAWTEXTABS(620,-37,'历史最低价:'+LLV(LOW,0)),ColorAFFF00,LAYER0; DRAWTEXTABS(750,-55,'20日最高价:'+HHV(HIGH,20)),Colorred,LAYER0; DRAWTEXTABS(750,-37,'20日最低价:'+LLV(LOW,20)),ColorAFFF00,LAYER0;。
缠论分型分笔指标副图源码图解通达信股票公式股票软件公式
缠论分型分笔指标副图源码图解通达信股票公式股票软件公式顶:=BBI+3*STD(BBI,13),COLOR004AFF;底:=BBI-3*STD(BBI,13),COLOR67FF00;DRAWBAND(BBI,RGB(97,95,00),顶,RGB(97,95,00));DRAWBAND(BBI,RGB(25,75,150),底,RGB(25,75,250));{MA1:MA(CLOSE,M1);MA2:MA(CLOSE,M2),COLORGREEN;MA3:MA(CLOSE,M3),COLORRED;MA4:MA(CLOSE,M4),COLORYELLOW;}KU1:=IF(HIGH=HHV(HIGH,3),1,0);KD1:=IF(LOW=LLV(LOW,3),1,0);UL:=IF(REF(KU1,2)=1 AND REF(KU1,1)=0ANDKU1=0,REF(HIGH,2),REF(HIGH,2+BARSLAST(REF(KU1,2)=1 AND REF(KU1,1)=0 AND KU1=0)));DL:=IF(REF(KD1,2)=1 AND REF(KD1,1)=0ANDKD1=0,REF(LOW,2),REF(LOW,2+BARSLAST(REF(KD1,2)=1 AND REF(KD1,1)=0 AND KD1=0)));HV:=H>UL AND H>REF(H,1) ;LV:=L<DL AND L<REF(L,1) ;GP:=BARSLAST(HV);DP:=BARSLAST(LV);IP:=IF(GP=0,DP,GP)>3;HHV1:=HV AND IP AND H>=HHV(H,BARSLAST(LV));LV1:=LV AND IP AND L<=LLV(L,BARSLAST(HV));DRAWLINE(LV1,LOW,HHV1,HIGH,0),COLORYELLOW,LINETHICK2;DRAWLINE(HHV1,HIGH,LV1,LOW,0),COLORMAGENTA,LINETHICK2;{缠论分型分笔}STICKLINE(CLOSE>REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORRED;STICKLINE(CLOSE>REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR000055;STICKLINE(CLOSE>REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR000077;STICKLINE(CLOSE>REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR000099;STICKLINE(CLOSE>REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLOR0000BB;STICKLINE(CLOSE>REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLOR0000DD;STICKLINE(CLOSE>REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLOR0000FF;STICKLINE(CLOSE=REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORWHITE;STICKLINE(CLOSE=REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR555555;STICKLINE(CLOSE=REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLOR777777;STICKLINE(CLOSE=REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLOR999999;STICKLINE(CLOSE=REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORBBBBBB;STICKLINE(CLOSE=REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORDDDDDD;STICKLINE(CLOSE=REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORFFFFFF;STICKLINE(CLOSE<REF(CLOSE,1) ,HIGH,LOW,0,1 ),COLORCYAN;STICKLINE(CLOSE<REF(CLOSE,1) ,OPEN,CLOSE,3,0 ),COLOR990000;STICKLINE(CLOSE<REF(CLOSE,1) ,OPEN,CLOSE,2.7,0 ),COLORCC0000;STICKLINE(CLOSE<REF(CLOSE,1) ,OPEN,CLOSE,2.1,0 ),COLORFF4400;STICKLINE(CLOSE<REF(CLOSE,1) ,OPEN,CLOSE,1.5,0 ),COLORFF8800;STICKLINE(CLOSE<REF(CLOSE,1) ,OPEN,CLOSE,0.9,0 ),COLORFFCC00;STICKLINE(CLOSE<REF(CLOSE,1) ,OPEN,CLOSE,0.3,0 ),COLORCYAN;{笔底分型选股预警确保向下笔成立后的底分型}V00:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);V01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);V02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);V03:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);V04:= REF(HIGH,2) < HIGH AND REF(LOW,2) < LOWAND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) < REF(LOW,1);V1:= COUNT(V00,6)>=3 AND COUNT(V01 OR V02,5)=0 AND LLVBARS(LOW,6) = 1 ANDHHVBARS(HIGH,6) >= 5 AND V03;V2:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 2 ANDHHVBARS(HIGH,7) >= 6 AND V04;V3:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 1 ANDHHVBARS(HIGH,7) >= 6 AND V03;V4:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 2 ANDHHVBARS(HIGH,8) >= 7 AND V04;V5:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 1 ANDHHVBARS(HIGH,8) >= 7 AND V03;V6:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 2 ANDHHVBARS(HIGH,9) >= 8 AND V04;V7:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 1 ANDHHVBARS(HIGH,9) >= 8 AND V03;V8:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 2 ANDHHVBARS(HIGH,10) >= 9 AND V04;V9:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 1 ANDHHVBARS(HIGH,10) >= 9 AND V03;V10:= COUNT(V00,11)>=3 AND COUNT(V01 OR V02,10)<=5 AND LLVBARS(LOW,11) = 2 ANDHHVBARS(HIGH,11) >= 10 AND V04;XG:= V1 OR V2 OR V3 OR V4 OR V5 OR V6 OR V7 OR V8 OR V9 OR V10;DRAWICON(FILTER(XG=1,5),L*0.97,1);{笔顶分型选股预警确保向上笔成立后的顶分型}HV00:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);HV01:= HIGH<REF(HIGH,1) AND LOW>REF(LOW,1);HV02:= HIGH>REF(HIGH,1) AND LOW<REF(LOW,1);HV03:= HIGH<REF(HIGH,1) AND LOW<REF(LOW,1);HV04:= REF(HIGH,2) > HIGH AND REF(LOW,2) > LOW AND REF(HIGH,2) > REF(HIGH,1) ANDREF(LOW,2) < REF(LOW,1);HV1:= COUNT(HV00,6)>=3 AND COUNT(HV01 OR HV02,5)=0 AND HHVBARS(HIGH,6) = 1 ANDLLVBARS(LOW,6) >= 5 AND HV03;HV2:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 2 ANDLLVBARS(LOW,7) >= 6 AND HV04;HV3:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 1 ANDLLVBARS(LOW,7) >= 6 AND HV03;HV4:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 AND HHVBARS(HIGH,8) = 2 ANDLLVBARS(LOW,8) >= 7 AND HV04;HV5:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 AND HHVBARS(HIGH,8) = 1 ANDLLVBARS(LOW,8) >= 7 AND HV03;HV6:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 AND HHVBARS(HIGH,9) = 2 ANDLLVBARS(LOW,9) >= 8 AND HV04;HV7:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 AND HHVBARS(HIGH,9) = 1 ANDLLVBARS(LOW,9) >= 8 AND HV03;HV8:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 AND HHVBARS(HIGH,10) = 2AND LLVBARS(LOW,10) >= 9 AND HV04;HV9:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 AND HHVBARS(HIGH,10) = 1AND LLVBARS(LOW,10) >= 9 AND HV03;HV10:= COUNT(HV00,11)>=3 AND COUNT(HV01 OR HV02,10)<=5 AND HHVBARS(HIGH,11) = 2AND LLVBARS(LOW,11) >= 10 AND HV04;HXG:=HV1 OR HV2 OR HV3 OR HV4 OR HV5 OR HV6 OR HV7 OR HV8 OR HV9 OR HV10;DRAWICON(FILTER(HXG=1,3),H*1.01,2);。
通达信缠论指标公式----“缠中套利”
通达信缠论指标公式----“缠中套利”老笔:=1;XA_1:=MA(CLOSE,5);XA_2:=MA(CLOSE,10);XA_3:=REF(HIGH,5)=HHV(HIGH,11);XA_4:=REF(LOW,5)=LLV(LOW,11);XA_5:=BACKSET(XA_3,6)>BACKSET(XA_3,5);XA_6:=BACKSET(XA_4,6)>BACKSET(XA_4,5);XA_7:=IF(BARSLAST(XA_5)=BARSLAST(XA_6) AND XA_1>XA_2,XA_5,IF(BARSLAST(XA_6)>BARSLAST(XA_5),XA_5,0));XA_8:=IF(BARSLAST(XA_5)=BARSLAST(XA_6) AND XA_2>XA_1,XA_6,IF(BARSLAST(XA_5)>BARSLAST(XA_6),XA_6,0));XA_9:=XA_7 AND HIGH=HHV(HIGH,BARSLAST(XA_8));XA_10:=XA_8 AND LOW=LLV(LOW,BARSLAST(XA_7));GP:IF(XA_9,HIGH,DRAWNULL),CIRCLEDOT,COLORCYAN;DP:IF(XA_10,LOW,DRAWNULL),CIRCLEDOT,COLORCYAN;XA_11:=LOW>REF(HIGH,1) AND DAY!=REF(DAY,1);XA_12:=HIGH<REF(LOW,1) AND DAY!=REF(DAY,1);XA_13:=REF(LOW,BARSLAST(XA_11));XA_14:=REF(HIGH,BARSLAST(XA_12));XA_15:=REF(HIGH,BARSLAST(XA_9));XA_16:=REF(LOW,BARSLAST(XA_9));XA_17:=REF(HIGH,BARSLAST(XA_9)+1);XA_18:=REF(LOW,BARSLAST(XA_9)+1);XA_19:=REF(HIGH,BARSLAST(XA_9)+2);XA_20:=REF(LOW,BARSLAST(XA_9)+2);XA_21:=REF(HIGH,BARSLAST(XA_10));XA_22:=REF(LOW,BARSLAST(XA_10));XA_23:=REF(HIGH,BARSLAST(XA_10)+1);XA_24:=REF(LOW,BARSLAST(XA_10)+1);XA_25:=REF(HIGH,BARSLAST(XA_10)+2);XA_26:=REF(LOW,BARSLAST(XA_10)+2);XA_27:=IF(XA_16<=XA_18,XA_19,XA_17);XA_28:=IF(XA_17<XA_16,XA_16,IF(XA_16<=XA_18,XA_20,XA _18));XA_29:=IF(XA_24>XA_21,XA_21,IF(XA_21>=XA_23,XA_25,XA _23));XA_30:=IF(XA_21>=XA_23,XA_26,XA_24);XA_31:=XA_15>XA_29 AND XA_9;XA_32:=XA_22<XA_28 AND XA_10;XA_33:=XA_31 AND XA_15>XA_21 AND XA_16>XA_22 AND XA_18>XA_22;XA_34:=XA_32 AND XA_22<XA_16 AND XA_21<XA_15 AND XA_23<XA_15;XA_35:=HIGH<=REF(HIGH,1) AND LOW>=REF(LOW,1) OR (HIGH>=REF(HIGH,1) AND LOW<=REF(LOW,1));XA_36:=COUNT(XA_35,BARSLAST(XA_10));XA_37:=COUNT(XA_35,BARSLAST(XA_9));XA_38:=COUNT(XA_11,BARSLAST(XA_10));XA_39:=COUNT(XA_12,BARSLAST(XA_9));XA_40:=IF(XA_36>0,XA_36+2+老笔,IF(XA_37,XA_37+2+老笔,3));XA_41:=IF(XA_38,XA_40-XA_38,IF(XA_39,XA_40-XA_39,XA_40));XA_42:=XA_33 AND BARSLAST(XA_34)>XA_41;XA_43:=XA_34 AND BARSLAST(XA_33)>XA_41;XA_44:=XA_9 AND REF(HIGH,BARSLAST(XA_9))>=REF(HIGH,BARSLAST(XA_42))AND BARSLAST(XA_43)>BARSLAST(XA_42) OR (XA_31 AND COUNT(XA_11,BARSLAST(XA_32))>0 AND REF(HIGH,BARSLAST(XA_31))>REF(HIGH,BARSLAST(XA_42)));XA_45:=XA_10 AND REF(LOW,BARSLAST(XA_10))<=REF(LOW,BARSLAST(XA_43)) AND BARSLAST(XA_42)>BARSLAST(XA_43) OR (XA_32 AND COUNT(XA_12,BARSLAST(XA_31))>0 AND REF(LOW,BARSLAST(XA_32))<REF(HIGH,BARSLAST(XA_43)));XA_46:=IF(BARSLAST(XA_45)>BARSLAST(XA_44),REF(HIGH, BARSLAST(XA_44)),REF(HIGH,BARSLAST(XA_45)));XA_47:=IF(BARSLAST(XA_44)>BARSLAST(XA_45),REF(LOW,B ARSLAST(XA_45)),REF(LOW,BARSLAST(XA_44)));XA_48:=XA_44 AND HIGH=HHV(XA_46,BARSLAST(XA_45)+1) AND HIGH>REF(HIGH,1) AND BARSLAST(XA_45)>BARSLAST(XA_44);XA_49:=XA_45 AND LOW=LLV(XA_47,BARSLAST(XA_44)+1) AND LOW<REF(LOW,1) AND BARSLAST(XA_44)>BARSLAST(XA_45);XA_50:=XA_48 OR (XA_9 AND REF(HIGH,BARSLAST(XA_9))>REF(HIGH,BARSLAST(XA_48)) AND BARSLAST(XA_49)>BARSLAST(XA_48));XA_51:=XA_49 OR (XA_10 AND REF(LOW,BARSLAST(XA_10))<REF(LOW,BARSLAST(XA_49)) AND BARSLAST(XA_48)>BARSLAST(XA_49));GPB:IF(XA_42,HIGH,DRAWNULL),CIRCLEDOT,COLORYELLOW;DPB:IF(XA_43,LOW,DRAWNULL),CIRCLEDOT,COLORYELLOW;XA_52:=XA_50;XA_53:=XA_51;L1:DRAWLINE(XA_53,LOW,XA_52,HIGH,0),COLORYELLOW;L2:DRAWLINE(XA_52,HIGH,XA_53,LOW,0),COLORWHITE;XA_54:=CLOSE;XA_55:=FILTER(BACKSET(FILTER(REF(XA_54,10)=HHV(XA_54, 2*10+1),10),10+1),10);XA_56:=FILTER(BACKSET(FILTER(REF(XA_54,10)=LLV(XA_54,2 *10+1),10),10+1),10);XA_57:=REF(CLOSE,BARSLAST(XA_55));XA_58:=REF(CLOSE,BARSLAST(XA_56));XA_59:=BARSLAST(XA_55)<BARSLAST(XA_56) AND NOT(XA_55);XA_60:=BARSLAST(XA_55)>BARSLAST(XA_56) AND NOT(XA_56);波段顶:IF(XA_59,XA_57,XA_57),POINTDOT,COLORLIGREEN,LINETHICK 4;波段底:IF(XA_60,XA_58,XA_58),POINTDOT,COLORMAGENTA,LINETHI CK4;。
缠中说禅中枢和笔公式通达信版复习过程
{通达信MA+ 中枢+分笔公式} {M1,M2 参数自己定，可选5,10} MA1:MA(CLOSE,5); MA2:MA(CLOSE,10);{N1:1,100,10;N2:1,100,10;DISP:=1,3,2};N1:=10;N2:=10;DISP:=2; K:=IF(PERIOD=5,1,{ 日} IF(PERIOD=6,1,{ 周} IF(PERIOD=7,1,{ 月} IF(PERIOD=8,1,{ 多分钟} IF(PERIOD=9,1,{ 多日}IF(PERIOD=10,1,{ 季} IF(PERIOD=11,2,{ 年} IF(PERIOD=4,1,{60F} IF(PERIOD=3,1,{30F} IF(PERIOD=2,1,{15F} IF(PERIOD=1,1{5F},1{1F})))))))))))/10;P1:=PEAK(1,K*N1,1); P2:=PEAK(1,K*N1,2); WP1:=PEAKBARS(1,K*N1,1); WP2:=PEAKBARS(1,K*N1,2);T1:=TROUGH(2,K*N2,1); T2:=TROUGH(2,K*N2,2);WT1:=TROUGHBARS(2,K*N2,1);WT2:=TROUGHBARS(2,K*N2,2); TJ1:=P1>T1 AND P2>T2 ; ZD:=MAX(T1,T2); ZG:=MIN(P1,P2); LL:=MIN(T1,T2);HH:=MAX(P1,P2); TJ2:=FILTER(ZG>ZD,2);TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) ORZD=REF(ZD,BARSLAST(TJ2));TJ4:=TJ1&&TJ2&&NOT(TJ3);TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF (ZG,REF(BARSLAST(TJ4),1)));TJ6:=BETWEEN(ZG ,REF(ZD,REF(BARSLAST(TJ4),1)),REF( ZG, REF(BARSLAST(TJ4),1)));TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZDREF(HHV (H,4),1),4); 局部高点预选B:=BACKSET( 局部高点预选A=0AND REF(局部高点预选A,1)=1,2);局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);缺口判断:=IF(L>REF(H,1),1,IF(HREF( 距前低天,1) AND LLV(L, 距前高天+1)=4 OR LLV( 缺口判断,距前高天)=-1 OR LLV(L, 距前低天+2)REF( 小值周期,距前低天+1) AND 大值周期>REF(小值周期距前低天)AND大值周期>REF(大值周期，距前高天),1,0); 高保留A:=IF( 局部高点预选C=1 ANDREF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天，1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV( 缺口判断,距前低天)=1),1,0); 高保留:=IF(( 高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L, 距前低天+1),1,0); 预判A:=IF(( 距前高天<4 AND HHV( 缺口判断,距前高天)!=1) OR REF(高保留，距前高天)=0,1,0);判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND预判A=1 AND小值周期>REF（大值周期，距前高天+1） AND小值周期>REF（大值周期，距前高天）AND小值周期>REF（小值周期，距前低天）,-1,0）;低保留A:=IF（局部低点预选C=-1 AND REF（距前高天,1）>REF（距前低天,1） AND LLV （L, 距前高天+1）=4 OR LLV（缺口判断,距前高天）=-1 OR 判断A=-1）,-1,0）; 低保留:=IF（（低保留A=-1 OR 低保留B=-1）AND LREF（小值周期, 距前低天A+1） AND 大值周期>REF（小值周期，距前低天A） AND大值周期>REF（大值周期,距前高天A）,1,0）; 高保留XA:=IF（局部高点预选C=1 AND REF（距前低天A,1）>REF（距前高天A,1） AND HHV（H, 距前低天A+1）>REF（HHV（H, 距前低天A+1）,1）,1,0）; 高保留XB:=IF（局部高点预选C=1 AND REF（距前低天A,1）<=REF（距前高天A,1） AND REF（低保留，距前低天A）=-1 AND （距前低天A>=4 OR HHV（缺口判断,距前低天A）=1）,1,0）; 高保留X:=IF（（高保留XA=1 OR 高保留XB=1 OR 判断X=1） AND H>REF（L, 距前低天A+1）,1,0）; 预判XA:=IF （（距前高天A<4 AND HHV（缺口判断,距前高天A）!=1） OR REF（高保留XA,距前高天A）=0,1,0）;判断XA:=IF（局部低点预选C=-1 AND REF（距前高天A,1）<=REF（距前低天A,1）AND预判XA=1 AND小值周期>REF（大值周期，距前高天A+1）AND小值周期>REF（大值周期，距前高天A） AND小值周期>REF（小值周期, 距前低天A）,-1,0）; 低保留XA:=IF（局部低点预选C=-1 AND REF（距前高天A,1）>REF（距前低天A,1） AND LLV（L, 距前高天A+1）=4 OR LLV（缺口判断,距前高天A）=-1 OR 判断XA=-1）,-1,0）; 低保留X:=IF（（低保留XA=-1 OR 低保留XB=-1） AND LREF （小值周期距前低天YA+1） AND 大值周期>REF（小值周期距前低天YA） AND 大值周期>REF（大值周期距前高天YA）,1,0）; 高保留YXA:=IF（局部高点预选C=1 AND REF（距前低天YA,1）>REF（距前高天YA,1） AND HHV（H, 距前低天YA+1）>REF（HHV（H, 距前低天YA+1）,1）,1,0）; 高保留YXB:=IF（局部高点预选C=1 AND REF（距前低天YA,1）<=REF（距前高天YA,1） AND REF（低保留X,距前低天YA）=-1 AND （距前低天YA>=4 OR HHV（缺口判断,距前低天YA）=1）,1,0）; 高保留YX:=IF（（高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1） AND H>REF（L, 距前低天YA+1）,1,0）; 预判YXA:=IF（（距前高天YA<4 AND HHV（缺口判断，距前高天YA）!=1） OR REF（高保留YXA,距前高天YA）=0,1,0）; 判断YXA:=IF（局部低点预选C=-1 AND REF（距前高天YA,1）<=REF（距前低天YA,1） AND 预判YXA=1 AND 小值周期>REF（大值周期,距前高天YA+1） AND 小值周期>REF（大值周期距前高天YA） AND 小值周期>REF（小值周期,距前低天YA）,-1,0）; 低保留YXA:=IF（局部低点预选C=-1 AND REF（距前高天YA,1）>REF（距前低天YA,1） ANDC A A A A A議sn w >》》》》》LLVr思IfM >H Y A +1H 4 OR L L <霁口卷」雪 Y—卷」晉)」YXA —匕OR吏湘1§Y X B U a AND LREF(H-REF(^t f r w >HY A3+2)A_F(W^B Y X 巴 ANDA A A A A A ^Sf 〉〉〉〉〉〉》。
原创通达信版 缠论K线包含公式
原创通达信版－缠论K线包含公式。
走势K线的包含关系显示，可以从公式中看到，出现包含关系出现时，公式会把相互包含的第二根K线处理成包含处理后的K线区间；向上包含处理时，会把包含形成后的新K线显示为粉红色，向下包含处理时，会把包含形成后的新K线显示为绿色。
图1为指标原图，图2为配合分笔指标使用。
KL:=H<=REF(H,1) AND L>=REF(L,1);{K线左包含}KR:=H>=REF(H,1) AND L<=REF(L,1);{K线右包含}{定义K线方向}MA1:MA(CLOSE,3);XS:=MA1>REF(MA1,1);{K线向上}XX:=MA1<REF(MA1,1);{K线向下}{K线向上左包含}KL1:=IF(KL AND XS,1,0);B1:='┄';DRAWTEXT(KL1,REF(H,1),B1),COLORMAGENTA;DRAWTEXT(KL1,L,B1),COLORMAGENTA;{K线向上右包含}KR1:=IF(KR AND XS,1,0);DRAWTEXT(KR1,H,B1),COLORMAGENTA;DRAWTEXT(KR1,REF(L,1),B1),COLORMAGENTA;{K线向下左包含}KL2:=IF(KL AND XX,1,0);DRAWTEXT(KL2,H,B1),COLORGREEN;DRAWTEXT(KL2,REF(L,1),B1),COLORGREEN;{K线向下右包含}KR2:=IF(KR AND XX,1,0);DRAWTEXT(KR2,REF(H,1),B1),COLORGREEN; DRAWTEXT(KR2,L,B1),COLORGREEN;。
通达信缠论自动画笔指标公式源码
{缠论画笔}黄金柱:=V/REF(V,1)>=1.9;DRAWLINE(黄金柱,L,REF(黄金柱,1),REF(L,1),1),COLORYELLOW;DRAWLINE(黄金柱,H,REF(黄金柱,1),REF(H,1),1),COLORRED;倍缩:=V/REF(V,1)<=0.6;DRAWLINE(倍缩,H,REF(倍缩,1),REF(H,1),1),COLOR1D7300;HH:=REF(H,5)=HHV(H,13);LL:=REF(L,5)=LLV(L,13);FG01:=BACKSET(HH,6)>BACKSET(HH,5) ;FD01:=BACKSET(LL,6)>BACKSET(LL,5) ;FG0:=FG01 AND H=HHV(H,BARSLAST(FD01));FD0:=FD01 AND L=LLV(L,BARSLAST(FG01));J0:=(H+L)/2;FGH:=REF(H,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);FGJ0:=REF(J0,BARSLAST(FG0));FGL:=REF(L,BARSLAST(FG0));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);FDJ0:=REF(J0,BARSLAST(FD0));FGZH:=IF(FGL<FGL1,FGH2,FGH1);FGZL:=IF(FGL<FGL1,FGL2,FGL1);FDZH:=IF(FDH>FDH1,FDH2,FDH1);FDZL:=IF(FDH>FDH1,FDL2,FDL1);FG1:=IF(((FGL>FDH AND FGH>FDZH) OR (FGH>FDH1 AND FDH1>FDH AND FDH>FDH2)),FG0,FG0 AND FGJ0>FDH AND FGH>FDZH);FD1:=IF(((FDH<FGL AND FDL<FGZL) OR (FDL<FGL1 AND FGL1<FGL AND FDL<FGL2)),FD0,FD0 AND FDJ0<FGL AND FDL<FGZL);FG2:=FG1 AND H>=HHV(H,BARSLAST(FD1));FD2:=FD1 AND L<=LLV(L,BARSLAST(FG1));FG:=FG2 AND KDJ.K>40;FD:=FD2 AND KDJ.K<60;BK:=IF((FGL1>=FGL AND FG0) OR (FDH1<=FDH AND FD0),4,3);G1:=FG AND BARSLAST(FD)>BK;D1:=FD AND BARSLAST(FG)>BK;G2:=G1 AND H>=HHV(H,BARSLAST(D1));D2:=D1 AND L<=LLV(L,BARSLAST(G1));G3:=G2 OR (FG0 AND KDJ.J>100);D3:=D2 OR (FD0 AND KDJ.J<0);G4:=G3 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));D4:=D3 OR (FD0 AND REF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));G5:=G4 AND H=HHV(H,BARSLAST(D4));D5:=D4 AND L=LLV(L,BARSLAST(G4));GPB:=IF(G4,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;DPB:=IF(D4,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;NN:=G5;UU:=D5;DRAWLINE(UU,L,NN, H,0),COLORYELLOW,LINETHICK1;DRAWLINE(NN,H,UU, L,0),COLORYELLOW,LINETHICK1;{涨停板}TB:=(C-REF(C,1))/REF(C,1)*100;STICKLINE(TB>9.9,O,C,2.5,1)COLORMAGENTA;STICKLINE(TB<-9.9,O,C,2.5,0)COLOR1D7300;。
目前最好用的缠论画笔线段公式--通达信
目前最好用的缠论画笔线段公式--通达信kxian:="chanlun@kxian"; {初始化}kxg:="chanlun@kxg";kxd:="chanlun@kxd";bi:="chanlun@bi";duan:="chanlun@duan";duanfx:="chanlun@duanfx";{中枢笔构成的中枢}zs:="chanlun@zs";zsgg:="chanlun@zsgg";zsdd:="chanlun@zsdd";zszg:="chanlun@zszg";zszd:="chanlun@zszd";zszz:="chanlun@zszz";zskslast:="chanlun@zskslast";zsjslast:="chanlun@zsjslast";{以直线方式画中枢}{上涨中枢}DRAWLINE(zskslast=1 AND duanfx=1, zszg, zsjslast=1 AND duanfx=1, zszg, 0), colormagenta, linethick2;DRAWLINE(zskslast=1 AND duanfx=1, zszd, zsjslast=1 AND duanfx=1, zszd, 0), colormagenta, linethick2;STICKLINE(zskslast=1 AND duanfx=1, zszg, zszd, 1, -501), colormagenta, linethick2;STICKLINE(zsjslast=1 AND duanfx=1, zszg, zszd, 1, 501), colormagenta, linethick2;{下跌中枢}DRAWLINE(zskslast=1 AND duanfx=-1, zszg, zsjslast=1 ANDduanfx=-1, zszg, 0), colorCyan, linethick2;DRAWLINE(zskslast=1 AND duanfx=-1, zszd, zsjslast=1 AND duanfx=-1, zszd, 0), colorCyan, linethick2;STICKLINE(zskslast=1 AND duanfx=-1, zszg, zszd, 1, -501), colorCyan, linethick2;STICKLINE(zsjslast=1 AND duanfx=-1, zszg, zszd, 1, 501), colorCyan, linethick2;{中枢震荡监视器}DRAWLINE(zskslast=1, zszz, zsjslast=1, zszz, 0), coloryellow;{画中枢END}zslx:="chanlun@zslx"(duan);{走势类型中枢段构成的中枢}zslxzs:="chanlun@zslxzs";zslxzsgg:="chanlun@zslxzsgg";zslxzsdd:="chanlun@zslxzsdd";zslxzszg:="chanlun@zslxzszg";zslxzszd:="chanlun@zslxzszd";zslxzszz:="chanlun@zslxzszz";zslxzskslast:="chanlun@zslxzskslast";zslxzsjslast:="chanlun@zslxzsjslast";{画中枢Begin}DRAWLINE(zslxzskslast=1, zslxzszg, zslxzsjslast=1, zslxzszg, 0), colorGreen, linethick2;DRAWLINE(zslxzskslast=1, zslxzszd, zslxzsjslast=1, zslxzszd, 0), colorGreen, linethick2;STICKLINE(zslxzskslast=1, zslxzszg, zslxzszd, 1, -501), colorGreen, linethick2;STICKLINE(zslxzsjslast=1, zslxzszg, zslxzszd, 1, 501), colorGreen, linethick2;{中枢震荡监视器}DRAWLINE(zslxzskslast=1, zslxzszz, zslxzsjslast=1, zslxzszz, 0), colorGreen;{画中枢End}{高级别走势类型中枢本级别走势构成的中枢}zslxA:="chanlun@zslx"(zslx);zslxzsA:="chanlun@zslxzs";zslxzsggA:="chanlun@zslxzsgg";zslxzsddA:="chanlun@zslxzsdd";zslxzszgA:="chanlun@zslxzszg";zslxzszdA:="chanlun@zslxzszd";zslxzszzA:="chanlun@zslxzszz";zslxzskslastA:="chanlun@zslxzskslast";zslxzsjslastA:="chanlun@zslxzsjslast";{画中枢Begin}DRAWLINE(zslxzskslastA=1, zslxzszgA, zslxzsjslastA=1, zslxzszgA, 0), colorRed, linethick2;DRAWLINE(zslxzskslastA=1, zslxzszdA, zslxzsjslastA=1, zslxzszdA, 0), colorRed, linethick2;STICKLINE(zslxzskslastA=1, zslxzszgA, zslxzszdA, 1, -501), colorRed, linethick2;STICKLINE(zslxzsjslastA=1, zslxzszgA, zslxzszdA, 1, 501), colorRed, linethick2;{中枢震荡监视器}DRAWLINE(zslxzskslastA=1, zslxzszzA, zslxzsjslastA=1, zslxzszzA, 0), colorRed;{画中枢End}{笔段走势类型}drawline(bi=1, kxg, bi=-1, kxd, 0),colorYellow, linethick1;drawline(bi=-1, kxd, bi=1, kxg, 0),colorYellow, linethick1;drawline(duan=1, kxg, duan=-1, kxd, 0),colorBlue, linethick2;drawline(duan=-1, kxd, duan=1, kxg, 0),colorBlue, linethick2;drawline(zslx=1, kxg, zslx=-1, kxd, 0),colorRed, linethick2;drawline(zslx=-1, kxd, zslx=1, kxg, 0),colorRed, linethick2;drawline(zslxA=1, kxg, zslxA=-1, kxd, 0),colorMagenta, linethick2;drawline(zslxA=-1, kxd, zslxA=1, kxg, 0),colorMagenta, linethick2;。
通达信缠论、笔、分型指标公式
通达信缠论、笔、分型指标公式KX:='CHANLUN@KXIAN';KXG:='CHANLUN@KXG';KXD:='CHANLUN@KXD';KXFX:='CHANLUN@KXFX';笔:='CHANLUN@BI';BILAST:='CHANLUN@BILAST';段:='CHANLUN@DUAN';DUANLAST:='CHANLUN@DUANLAST';中枢:='CHANLUN@ZS';ZSZG:='CHANLUN@ZSZG';ZSZD:='CHANLUN@ZSZD';ZSGG:='CHANLUN@ZSGG';ZSDD:='CHANLUN@ZSDD';ZSZZ:='CHANLUN@ZSZZ';ZSKS:='CHANLUN@ZSKSLAST';ZSJS:='CHANLUN@ZSJSLAST';BIFX:=-REF(笔,BILAST);DUANFX:=-REF(段,DUANLAST);KXQJ:='CHANLUN@KXQJ';STICKLINE(ZSZG>ZSZD AND DUANFX=1, ZSZG, ZSZD, 10, 1),COLOR8E236B;STICKLINE(ZSZG>ZSZD AND DUANFX=-1, ZSZG, ZSZD, 10, 1), COLOR007700;DRAWLINE(ZSKS=1, ZSZZ, ZSJS=1, ZSZZ, 0), COLORFFFFFF;STICKLINE(KX>0, KXG, KXD, 5, 1),COLOR007700,LINETHICK2;STICKLINE(KX<0, KXG, KXD, 5, 1),COLOR00FFFF,LINETHICK2;STICKLINE(笔=1, KXG, KXD, 5, 1), colorgreen, LINETHICK2;STICKLINE(笔=-1, KXG, KXD, 5, 1), colorred, LINETHICK2;STICKLINE(段=1, KXG, KXD, 5, 0), COLOR007700, LINETHICK2;STICKLINE(段=-1, KXG, KXD, 5, 0), COLOR0000CC, LINETHICK2;DRAWLINE(笔=1,H,笔=-1,L,0),colorblue,LINETHICK2;DRAWLINE(笔=-1,L,笔=1,H,0),COLORFF00FF ,LINETHICK2;DRAWLINE(段=1,H,段=-1,L,0),COLOR007700, LINETHICK2;DRAWLINE(段=-1,L,段=1,H,0),colorred, LINETHICK2;DRAWTEXT(笔= 1, H*1.038, ''+H+''), COLORFFFFFF;DRAWTEXT(笔=-1, L*0.96, ''+L+''), COLORFFFFFF;VAR3:=LLV(H,240);VAR4:=100*(C-VAR3)/VAR3;VAR5:=(C-LLV(L,528))/(HHV(H,528)-LLV(L,528))*100;VAR6:=(C-LLV(C,530))/(HHV(C,530)-LLV(C,530))*100;VAR7:=0;VAR8:=SMA(MAX(CLOSE-REF(CLOSE,1),0),34,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),7,1)*100;VAR9:=SMA(MAX(CLOSE-REF(CLOSE,1),0),13,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),13,1)*100;VAR10:=IF(TROUGHBARS(3,16,1)=0 AND H>L+0.04,4,0);VAR11:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);VAR12:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);VAR13:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);VAR14:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) ANDREF(ZIG(3,22),2)>=REF(ZIG(3,22),3);VAR15:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);VAR16:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);VAR17:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);VAR18:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);VAR19:=EMA(C,2)-EMA(C,150);买１:=VAR10;买２:=(VAR11+VAR13+VAR15+VAR17);卖１:=(VAR12+VAR14+VAR16+VAR18);DRAWTEXT(买１>0 OR 买２>0,L*0.985,'买'),COLOR00FFFF;DRAWTEXT(卖１>0,H*1.01,'卖'),COLOR00FFFF;APP:=(VOL)/((H-L)*(2)-ABS(C-O));ZL:=IF((H>O),(APP)*(H-L),IF((L<O),(APP)*(H-O+C-L),(VOL)/(2)));SF:=IF((H>O),0-(APP)*(H-C+O-L),IF((L<O),0-(APP)*(H-L),0-(VOL)/(2)));库存能量:=MA(ZL+SF,2);库存平均:=MA(ZL+SF,5);GET:ZIG(3,5),coloryellow,LINETHICK3;PL5:=ZIG(3,5);EN1:=PL5>REF(PL5,1) AND REF(PL5,1)<=REF(PL5,2) AND REF(PL5,2)<=REF(PL5,3);EX1:=PL5<REF(PL5,1) AND REF(PL5,1)>=REF(PL5,2) AND REF(PL5,2)>=REF(PL5,3);PL10:=ZIG(3,10);EN2:=PL10>REF(PL10,1) AND REF(PL10,1)<=REF(PL10,2) AND REF(PL10,2)<=REF(PL10,3);EX2:=PL10<REF(PL10,1) AND REF(PL10,1)>=REF(PL10,2) AND REF(PL10,2)>=REF(PL10,3);PL20:=ZIG(3,20);EN3:=PL20>REF(PL20,1) AND REF(PL20,1)<=REF(PL20,2) AND REF(PL20,2)<=REF(PL20,3);EX3:=PL20<REF(PL20,1) AND REF(PL20,1)>=REF(PL20,2) AND REF(PL20,2)>=REF(PL20,3);走强1:=BARSLAST(PL5<REF(PL5,1));走弱1:=BARSLAST(PL5>REF(PL5,1));走强2:=BARSLAST(PL10<REF(PL10,1));走弱2:=BARSLAST(PL10>REF(PL10,1));走强3:=BARSLAST(PL20<REF(PL20,1));走弱3:=BARSLAST(PL20>REF(PL20,1));ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,走强2),0);ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,走强2),0);DTJZ5:=IF(PL10<REF(PL10,1),COUNT(EN1,走弱2),0);DTJD5:=IF(PL10<REF(PL10,1),COUNT(EX1,走弱2),0);ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,走强3),0);ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,走强3),0);DTJZ10:=IF(PL20<REF(PL20,1),COUNT(EN2,走弱3),0);DTJD10:=IF(PL20<REF(PL20,1),COUNT(EX2,走弱3),0);DRAWTEXT(EN2 AND DTJZ10=1,L*0.93,'[类二买]'),COLORFFFFFF;DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,'[一买]'),COLORFF00FF;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.05,'[二卖]'),LINETHICK2,COLORFFFF00;DRAWTEXT(EN2 AND PL20>REF(PL20,1) AND ZTJZ10=2,L*0.95,'[二买]'),LINETHICK2,COLORFFFF00;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.04,'[一卖]'),LINETHICK3,COLOR00FF00;MA5:MA(CLOSE,5),colorwhite,LINETHICK1;MA10:MA(CLOSE,10),colorgreen,LINETHICK1;MA24:MA(CLOSE,24),colorred,LINETHICK1;趋势:ZIG(3,5);向上:=CROSS(趋势,REF(趋势,1));向下:=CROSS(REF(趋势,1),趋势);上1周期:=SUMBARS(向上,1);上2周期:=SUMBARS(向上,2);上3周期:=SUMBARS(向上,3);下1周期:=SUMBARS(向下,1);下2周期:=SUMBARS(向下,2);下3周期:=SUMBARS(向下,3);A1:=REF(趋势,下1周期);A2:=REF(趋势,下2周期);高点重叠:=MIN(A1,A2);低点重叠:=MAX(REF(趋势,上1周期),REF(趋势,上2周期));高点:=(趋势=高点重叠);连线1:=BARSLAST(高点)>上1周期 OR BARSLAST(高点)>下1周期;连线2:=BARSLAST(高点)<上2周期 OR BARSLAST(高点)<下2周期;低点:=(趋势=低点重叠);高1:=SUMBARS(高点,1);高2:=SUMBARS(高点,2);低1:=SUMBARS(低点,1);低2:=SUMBARS(低点,2);DRAWTEXT(C,高点重叠,'_____'); DRAWTEXT(C,低点重叠,'_____');通达信缠论、笔、分型指标公式的选股公式如下：。
缠论公式（最完美自动画笔公式）主图
缠论公式（最完美自动画笔公式）主图缠中说禅笔定理：任何的当下，在任何时间周期的K线图中，走势必然落在一确定的具有明确方向的笔当中（向上笔或向下笔），而在笔当中的位置，必然只有两种情况：1、在分型构造中。
2、分型构造确认后延伸为笔的过程中。
缠论定义示意图：总结：按照股市中所有走势都是笔于笔的连接，编写的此公式，（公式中也参考了别的同修的成果），应该是网络中最完美的了，本人把5日战法也一块编写了进去，花费了不少精力，希望大家看到也传播出去，希望能帮助到一些人。
有缘得之吧！公式源码：M5:MA(CLOSE,5),COLORRED,LINETHICK3;MA20:MA(CLOSE,20),COLORLIBLUE,LINETHICK1.5;MA60:MA(CLOSE,50),COLORRED,LINETHICK3;M250:MA(CLOSE,200),COLORBLUE,LINETHICK4;IF(C>=M5,M5,DRAWNULL),COLORRED,LINETHICK3;IF(C<>IF(C>=MA60,MA60,DRAWNULL),COLORRED,LINETHICK3;IF(C<>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));GP:IF(FG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;DP:IF(FD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;GQ:=L>REF(H,1) AND DAY!=REF(DAY,1);DQ:=HGQL:=REF(L,BARSLAST(GQ));DQH:=REF(H,BARSLAST(DQ));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);FGZH:=IF(FGL<>FGZL:=IF(FGH1<><>FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));FDZL:=IF(FDH>=FDH1,FDL2,FDL1);FG1:=FGH>FDZH AND FG0;FD1:=FDLFG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL;FD:=FD1 AND FDL<>BH0:=(H<=ref(h,1) and="" l="">=REF(L,1)) OR (H>=REF(H,1) AND L<>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)) ANDBARSLAST(D1X)>BARSLAST(G1X))OR (FG1 AND COUNT(GQ,BARSLAST(FD1))>0 ANDREF(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))<>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) ANDBARSLAST(D1)>BARSLAST(G1);D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) AND LBARSLAST(D1);G3:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) ANDBARSLAST(D2)>BARSLAST(G2));D3:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))BARSLAST(D2));GPB:IF(G1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;DPB:IF(D1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;{画线}NN:=G3;UU:=D3;L1:DRAWLINE(UU,L,NN, H,0),COLORLIGREEN,LINETHICK2;L2:DRAWLINE(NN,H,UU,L,0),COLORYELLOW,LINETHICK4;{标示端点数值}{DRAWNUMBER(L1 AND L2 AND NN ,H,H),COLORLIRED;DRAWNUMBER(L1 AND L2 AND UU ,L,L),COLORLIMAGENTA;};主图效果图：。
通达信缠论分型笔线段主图指标公式
通达信缠论分型笔线段主图指标公式贝加尔湖畔（唯美版）来自定锚00:0003:17源码MA5:MA(CLOSE,5) COLORWHITE,LINETHICK2;MA10:MA(CLOSE,10) COLORMAGENTA,LINETHICK1;MA20:MA(CLOSE,20) COLORBLUE,LINETHICK1;MA60:MA(CLOSE,60) COLORYELLOW,LINETHICK2;MA250:MA(CLOSE,250) COLORRED, LINETHICK1;老笔:=0;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));GP:IF(FG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;DP:IF(FD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;GQ:=L>REF(H,1) AND DAY!=REF(DAY,1);DQ:=HGQL:=REF(L,BARSLAST(GQ));DQH:=REF(H,BARSLAST(DQ));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);FGZH:=IF(FGL<>FGZL:=IF(FGH1<><>FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));FDZL:=IF(FDH>=FDH1,FDL2,FDL1);FG1:=FGH>FDZH AND FG0;FD1:=FDLFG:=FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL;FD:=FD1 AND FDL<>BH0:=(H<=ref(h,1) and="" l="">=REF(L,1)) OR (H>=REF(H,1) AND L<>=ref(h,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 ANDREF(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))=ref(l,barslast(d1x))> OR (FD1 AND COUNT(DQ,BARSLAST(FG1))>0 AND REF(L,BARSLAST(FD1))<>G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G 1)),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 LBARSLAST(D1);G3:=G2 OR (FG0 AND REF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));D3:=D2 OR (FD0 AND REF(L,BARSLAST(FD0))BARSLAST(D2));GPB:IF(G1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;DPB:IF(D1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;DRAWICON(CROSS(MA20,MA60),MA60*0.98,9);DIF:=MA(CLOSE,5)-MA(CLOSE,89);DIFMA:=MA(DIF,36);XG:=CROSS(DIF,DIFMA) AND DIF<>DRAWICON(XG,H*1.03,23);{画线}NN:=G3;UU:=D3;L1:DRAWLINE(UU,L,NN,H,0),COLORLIGREEN;L2:DRAWLINE(NN,H,UU,L,0),COLORLIGREEN;{标示端点数值}DRAWNUMBER(L1 AND L2 AND NN ,H,H),COLORLIRED;DRAWNUMBER(L1 AND L2 AND UU ,L,L),COLORLIMAGENTA;{折扣价}DRAWICON(CURRBARSCOUNT=6,LOW*0.98,24);DRAWNUMBER(CURRBARSCOUNT=6,LOW*0.96,C);DRAWICON(CURRBARSCOUNT=11,LOW*0.98,25);DRAWNUMBER(CURRBARSCOUNT=11,LOW*0.96,C);DRAWICON(CURRBARSCOUNT=21,LOW*0.98,26);DRAWNUMBER(CURRBARSCOUNT=21,LOW*0.96,C);DRAWICON(CURRBARSCOUNT=61,LOW*0.98,27);DRAWNUMBER(CURRBARSCOUNT=61,LOW*0.96,C);DRAWICON(CURRBARSCOUNT=121,LOW*0.98,18);DRAWNUMBER(CURRBARSCOUNT=121,LOW*0.96,C);{量能平台}N250:=250;PT250:=CONST(HHVBARS(V,N250));T250:IF(CURRBARSCOUNT<>IF(CURRBARSCOUNT=PT250+1,T250,DRAWNULL),CIRCLED OT,COLORFF0000,LINETHICK2;DRAWTEXT(CURRBARSCOUNT=N250,T250,'250'),COLOR99 0000;N120:=120;PT120:=CONST(HHVBARS(V,N120));T120:IF(CURRBARSCOUNT<>IF(CURRBARSCOUNT=PT120+1,T120,DRAWNULL),CIRCLED OT,COLORFFFF00,LINETHICK2;DRAWTEXT(CURRBARSCOUNT=N120,T120,'120'),COLORAA AA00;N60:=60;PT60:=CONST(HHVBARS(V,N60));T60:IF(CURRBARSCOUNT<>IF(CURRBARSCOUNT=PT60+1,T60,DRAWNULL),CIRCLEDOT, COLOR00FF00,LINETHICK2;DRAWTEXT(CURRBARSCOUNT=N60,T60,'60'),COLOR00BB0 0;N30:=30;PT30:=CONST(HHVBARS(V,N30));T30:IF(CURRBARSCOUNT<>IF(CURRBARSCOUNT=PT30+1,T30,DRAWNULL),CIRCLEDOT, COLOR0000FF,LINETHICK2;DRAWTEXT(CURRBARSCOUNT=N30,T30,'30'),COLOR0000C C;N20:=20;PT20:=CONST(HHVBARS(V,N20));T20:IF(CURRBARSCOUNT<>IF(CURRBARSCOUNT=PT20+1,T20,DRAWNULL),CIRCLEDOT, COLORFF00FF,LINETHICK2;DRAWTEXT(CURRBARSCOUNT=N20,T20,'20'),COLORDD00 DD;N10:=10;PT10:=CONST(HHVBARS(V,N10));T10:IF(CURRBARSCOUNT<>IF(CURRBARSCOUNT=PT10+1,T10,DRAWNULL),CIRCLEDOT, COLOR00FFFF,LINETHICK2;DRAWTEXT(CURRBARSCOUNT=N10,T10,'10'),COLOR00EEEE;N5:=5;PT5:=CONST(HHVBARS(V,N5));T5:IF(CURRBARSCOUNT<>IF(CURRBARSCOUNT=PT5+1,T5,DRAWNULL),CIRCLEDOT,C OLORFFFFFF,LINETHICK2;DRAWTEXT(CURRBARSCOUNT=N5,T5,'5'),COLORFFFFFF;ND:=10;PTD:=CONST(LLVBARS(V,ND));TDPX:IF(CURRBARSCOUNT<=nd,const(if(ptd=0,o,ref(o,ptd)) ),drawnull),>=nd,const(if(ptd=0,o,ref(o,ptd))),drawnull),> IF(CURRBARSCOUNT=PTD+1,TDPX,DRAWNULL),CIRCLEDOT, COLOR9370DB,LINETHICK2;DRAWTEXT(ISLASTBAR,TDPX,' 地平线10'), COLOR9370DB;检测到未来函数：BACKSET,DRAWLINE,未来函数用于观察行情还是可以的，不可以用于选股翻译输出MA5:收盘价的5日简单移动平均画白色,线宽为2输出MA10:收盘价的10日简单移动平均画洋红色,线宽为1输出MA20:收盘价的20日简单移动平均画蓝色,线宽为1输出MA60:收盘价的60日简单移动平均画黄色,线宽为2输出MA250:收盘价的250日简单移动平均画红色, 线宽为1老笔赋值:0G赋值:收盘价的5日简单移动平均D赋值:收盘价的10日简单移动平均HH赋值:5日前的最高价=11日内最高价的最高值LL赋值:5日前的最低价=11日内最低价的最低值FG01赋值:若HH则将最近6周期置为1>若HH则将最近5周期置为1FD01赋值:若LL则将最近6周期置为1>若LL则将最近5周期置为1FG02赋值:如果上次FG01距今天数=上次FD01距今天数ANDG>D,返回FG01,否则返回如果上次FD01距今天数>上次FG01距今天数,返回FG01,否则返回0FD02赋值:如果上次FG01距今天数=上次FD01距今天数ANDD>G,返回FD01,否则返回如果上次FG01距今天数>上次FD01距今天数,返回FD01,否则返回0FG0赋值:FG02 AND 最高价=上次FD02距今天数日内最高价的最高值FD0赋值:FD02 AND 最低价=上次FG02距今天数日内最低价的最低值输出GP:如果FG0,返回最高价,否则返回无效数,CIRCLEDOT,画青色输出DP:如果FD0,返回最低价,否则返回无效数,CIRCLEDOT,画青色GQ赋值:最低价>1日前的最高价 AND 日不等于1日前的日DQ赋值:最高价<>日前的最低价 AND 日不等于1日前的日GQL赋值:上次GQ距今天数日前的最低价DQH赋值:上次DQ距今天数日前的最高价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日前的最低价FGZH赋值:如果FGL<>返回FGH2,否则返回FGH1FGZL赋值:如果FGH1<>返回FGL,否则返回如果FGL<>返回FGL2,否则返回FGL1FDZH赋值:如果FDL1>FDH,返回FDH,否则返回如果FDH>=FDH1,返回FDH2,否则返回FDH1FDZL赋值:如果FDH>=FDH1,返回FDL2,否则返回FDL1FG1赋值:FGH>FDZH AND FG0FD1赋值:FDLFG赋值:FG1 AND FGH>FDH AND FGL>FDL AND FGL1>FDL FD赋值:FD1 AND FDL<>BH0赋值:(最高价<>日前的最高价AND 最低价>=1日前的最低价) OR (最高价>=1日前的最高价 AND 最低价<>日前的最低价) BHG赋值:统计上次FD0距今天数日中满足BH0的天数BHD赋值:统计上次FG0距今天数日中满足BH0的天数BGQ赋值:统计上次FD0距今天数日中满足GQ的天数BDQ赋值:统计上次FG0距今天数日中满足DQ的天数BK0赋值:如果BHG>0,返回BHG+2+老笔,否则返回如果BHD,返回BHD+2+老笔,否则返回3BK赋值:如果BGQ,返回BK0-BGQ,否则返回如果BDQ,返回BK0-BDQ,否则返回BK0G1X赋值:(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 最低价<>日前的最低价 AND 上次G1距今天数>上次D1距今天数G3赋值:G2 OR (FG0 AND 上次FG0距今天数日前的最高价>上次G2距今天数日前的最高价AND 上次D2距今天数>上次G2距今天数)D3赋值:D2 OR (FD0 AND 上次FD0距今天数日前的最低价上次D2距今天数日前的最低价 AND 上次G2距今天数>上次D2距今天数) 输出GPB:如果G1X,返回最高价,否则返回无效数,CIRCLEDOT,画黄色输出DPB:如果D1X,返回最低价,否则返回无效数,CIRCLEDOT,画黄色当满足条件MA20上穿MA60时,在MA60*0.98位置画9号图标DIF赋值:收盘价的5日简单移动平均-收盘价的89日简单移动平均DIFMA赋值:DIF的36日简单移动平均XG赋值:DIF上穿DIFMA AND DIF<>当满足条件XG时,在最高价*1.03位置画23号图标NN赋值:G3UU赋值:D3输出L1:当满足条件UU时,在最低价位置画直线起点，当满足条件NN时,在最高价位置画直线终点,0表示是否延长.,画淡绿色输出L2:当满足条件NN时,在最高价位置画直线起点，当满足条件UU时,在最低价位置画直线终点,0表示是否延长.,画淡绿色当满足条件L1ANDL2ANDNN时,在最高价位置书写数字,画淡红色当满足条件L1ANDL2ANDUU时,在最低价位置书写数字,画淡洋红色当满足条件到最后交易的周期=6时,在最低价*0.98位置画24号图标当满足条件到最后交易的周期=6时,在最低价*0.96位置书写数字当满足条件到最后交易的周期=11时,在最低价*0.98位置画25号图标当满足条件到最后交易的周期=11时,在最低价*0.96位置书写数字当满足条件到最后交易的周期=21时,在最低价*0.98位置画26号图标当满足条件到最后交易的周期=21时,在最低价*0.96位置书写数字当满足条件到最后交易的周期=61时,在最低价*0.98位置画27号图标当满足条件到最后交易的周期=61时,在最低价*0.96位置书写数字当满足条件到最后交易的周期=121时,在最低价*0.98位置画18号图标当满足条件到最后交易的周期=121时,在最低价*0.96位置书写数字N250赋值:250PT250赋值:N250日内成交量(手)距今天数的最后一日取值设为常数输出T250:如果到最后交易的周期<>返回如果PT250=0,返回收盘价,否则返回PT250日前的收盘价的最后一日取值设为常数,否则返回无效数,COLOR990000如果到最后交易的周期=PT250+1,返回T250,否则返回无效数,CIRCLEDOT,COLORFF0000,线宽为2当满足条件到最后交易的周期=N250时,在T250位置书写文字,COLOR990000N120赋值:120PT120赋值:N120日内成交量(手)距今天数的最后一日取值设为常数输出T120:如果到最后交易的周期<>返回如果PT120=0,返回收盘价,否则返回PT120日前的收盘价的最后一日取值设为常数,否则返回无效数,COLORAAAA00如果到最后交易的周期=PT120+1,返回T120,否则返回无效数,CIRCLEDOT,COLORFFFF00,线宽为2当满足条件到最后交易的周期=N120时,在T120位置书写文字,COLORAAAA00N60赋值:60PT60赋值:N60日内成交量(手)距今天数的最后一日取值设为常数输出T60:如果到最后交易的周期<>返回如果PT60=0,返回收盘价,否则返回PT60日前的收盘价的最后一日取值设为常数,否则返回无效数,COLOR00BB00如果到最后交易的周期=PT60+1,返回T60,否则返回无效数,CIRCLEDOT,COLOR00FF00,线宽为2当满足条件到最后交易的周期=N60时,在T60位置书写文字,COLOR00BB00N30赋值:30PT30赋值:N30日内成交量(手)距今天数的最后一日取值设为常数输出T30:如果到最后交易的周期<>返回如果PT30=0,返回收盘价,否则返回PT30日前的收盘价的最后一日取值设为常数,否则返回无效数,COLOR0000CC如果到最后交易的周期=PT30+1,返回T30,否则返回无效数,CIRCLEDOT,COLOR0000FF,线宽为2当满足条件到最后交易的周期=N30时,在T30位置书写文字,COLOR0000CCN20赋值:20PT20赋值:N20日内成交量(手)距今天数的最后一日取值设为常数输出T20:如果到最后交易的周期<>返回如果PT20=0,返回收盘价,否则返回PT20日前的收盘价的最后一日取值设为常数,否则返回无效数,COLORDD00DD如果到最后交易的周期=PT20+1,返回T20,否则返回无效数,CIRCLEDOT,COLORFF00FF,线宽为2当满足条件到最后交易的周期=N20时,在T20位置书写文字,COLORDD00DDN10赋值:10PT10赋值:N10日内成交量(手)距今天数的最后一日取值设为常数输出T10:如果到最后交易的周期<>返回如果PT10=0,返回收盘价,否则返回PT10日前的收盘价的最后一日取值设为常数,否则返回无效数,COLOR00EEEE如果到最后交易的周期=PT10+1,返回T10,否则返回无效数,CIRCLEDOT,COLOR00FFFF,线宽为2当满足条件到最后交易的周期=N10时,在T10位置书写文字,COLOR00EEEEN5赋值:5PT5赋值:N5日内成交量(手)距今天数的最后一日取值设为常数输出T5:如果到最后交易的周期<>返回如果PT5=0,返回收盘价,否则返回PT5日前的收盘价的最后一日取值设为常数,否则返回无效数,COLORFFFFFF如果到最后交易的周期=PT5+1,返回T5,否则返回无效数,CIRCLEDOT,COLORFFFFFF,线宽为2当满足条件到最后交易的周期=N5时,在T5位置书写文字,COLORFFFFFFND赋值:10PTD赋值:ND日内成交量(手)距今天数的最后一日取值设为常数输出TDPX:如果到最后交易的周期<>返回如果PTD=0,返回开盘价,否则返回PTD日前的开盘价的最后一日取值设为常数,否则返回无效数, COLOR9370DB如果到最后交易的周期=PTD+1,返回TDPX,否则返回无效数,CIRCLEDOT, COLOR9370DB,线宽为2当满足条件是否最后一个周期时,在TDPX位置书写文字, COLOR9370DB缠中说禅：为什么要研究分型、走势类型等东西，其哲学基础是什么？这就是人的贪嗔痴疑慢。
最好的通信达分笔公式
最好的通信达分笔公式公式不是我编的，我也编过没这个好，大家可以从网上搜，这是天堂分笔公式，感谢原创者。
小周期用这个就画笔就行了，不用拘泥对不对，然后根据笔自己画线段。
大周期以此为参考，不正确的笔自己纠正过来。
大智慧的朋友，用缠终缠的公式，飞狐和大交易师的用草帽路飞博客的里的公式。
同花顺的我没有，有的朋友提供一下供大家分享。
悟多的公式也不错，大家可以从网上搜。
这些都是帮助你从繁重的体力劳动中解脱出来，但是的但是，必须掌握分型和笔的概念，否则你无法当下确定一笔。
主图叠加参数最小最大缺省N 0 1 0注：N=0为新笔，N=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));GP:IF(FG0,H,DRAWNULL),CIRCLEDOT,COLORCYAN;DP:IF(FD0,L,DRAWNULL),CIRCLEDOT,COLORCYAN;GQ:=L>REF(H,1) AND DAY!=REF(DAY,1);DQ:=H<REF(L,1) AND DAY!=REF(DAY,1);GQL:=REF(L,BARSLAST(GQ));DQH:=REF(H,BARSLAST(DQ));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);FGZH:=IF(FGL<=FGL1,FGH2,FGH1);FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1));FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));FDZL:=IF(FDH>=FDH1,FDL2,FDL1);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+N,IF(BHD,BHD+2+N,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(G 1)),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));D3:=D2 OR (FD0 ANDREF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));GPB:IF(G1X,H,DRAWNULL),CIRCLEDOT,COLORYELLOW;DPB:IF(D1X,L,DRAWNULL),CIRCLEDOT,COLORYELLOW;{画线}NN:=G3;UU:=D3;L1:DRAWLINE(UU,L,NN,H,0),COLORLIGREEN;L2:DRAWLINE(NN,H,UU,L,0),COLORLIGREEN;{标示端点数值}{DRAWNUMBER(L1 AND L2 AND NN ,H,H),COLORLIRED;DRAWNUMBER(L1 AND L2 AND UU ,L,L),COLORLIMAGENTA;};不会设置的朋友们互相帮忙。
自画中枢缠论指标公式（通达信）已免费开放
自画中枢缠论指标公式（通达信）已免费开放沙发自己占着～～～嘻嘻{N1:1,100,10;N2:1,100,10;DISP:=1,3,2};N1:=10;N2:=10;DISP:=2;K:=IF(PERIOD=5,1,{日}IF(PERIOD=6,1,{周}IF(PERIOD=7,1,{月}IF(PERIOD=8,1,{多分钟}IF(PERIOD=9,1,{多日}IF(PERIOD=10,1,{季}IF(PERIOD=11,2,{年}IF(PERIOD=4,1,{60F}IF(PERIOD=3,1,{30F}IF(PERIOD=2,1,{15F}IF(PERIOD=1,1{5F},1{1F})))))))))))/10;P1:=PEAK(1,K*N1,1);P2:=PEAK(1,K*N1,2);WP1:=PEAKBARS(1,K*N1,1);WP2:=PEAKBARS(1,K*N1,2);T1:=TROUGH(2,K*N2,1);T2:=TROUGH(2,K*N2,2);WT1:=TROUGHBARS(2,K*N2,1);WT2:=TROUGHBARS(2,K*N2,2);TJ1:=P1>T1 AND P2>T2 ;ZD:=MAX(T1,T2);ZG:=MIN(P1,P2);LL:=MIN(T1,T2);HH:=MAX(P1,P2);TJ2:=FILTER(ZG>ZD,2);TJ3:=ZG=REF(ZG,BARSLAST(TJ2)) OR ZD=REF(ZD,BARSLAST(TJ2));TJ4:=TJ1&&TJ2&&NOT(TJ3);TJ5:=BETWEEN(ZD,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,RE F(BARSLAST(TJ4),1)));TJ6:=BETWEEN(ZG,REF(ZD,REF(BARSLAST(TJ4),1)),REF(ZG,RE F(BARSLAST(TJ4),1)));TJ7:=ZG>REF(ZG,REF(BARSLAST(TJ4),1))&&ZD<REF(ZD,REF( BARSLAST(TJ4),1));TJ8:=TJ4&&NOT(TJ5 OR TJ6 OR TJ7);ZSD:=IF(TJ8,ZD,DRAWNULL);ZSG:=IF(TJ8,ZG,DRAWNULL);ZSH:=IF(TJ8,HH,DRAWNULL);ZSL:=IF(TJ8,LL,DRAWNULL);STICKLINE(TJ8,ZSH,ZSL,0,-1),COLORMAGENTA;STICKLINE(TJ8,ZSD,ZSG,IF(DISP=1,3,0),1),COLORMAGENTA;DRAWTEXT(DISP=2,ZSH,'中枢'),COLORRED;中枢高:PLOYLINE(DISP=2,REF(ZSD,BARSLAST(TJ8))),CROSSDOT,COLO RLIRED;中枢低:PLOYLINE(DISP=2,REF(ZSG,BARSLAST(TJ8))),CROSSDOT,COLO RLIGREEN;中枢最高:PLOYLINE(DISP=2,REF(ZSH,BARSLAST(TJ8))),POINTDOT,COLO RRED;中枢最低:PLOYLINE(DISP=2,REF(ZSL,BARSLAST(TJ8))),POINTDOT,COLO RGREEN;趋势高:PLOYLINE(DISP=3,ZIG(1,K*N1)),COLORLIBLUE;趋势低:PLOYLINE(DISP=3,ZIG(2,K*N2)),COLORLIBLUE;局部低点预选A:=BACKSET(LLV(L,5)<REF(LLV(L,4),1),4);局部低点预选B:=BACKSET(局部低点预选A=0 AND REF(局部低点预选A,1)=1,2);局部低点预选C:=IF(局部低点预选B=1 AND REF(局部低点预选B,1)=0,-1,0);局部高点预选A:=BACKSET(HHV(H,5)>REF(HHV(H,4),1),4);局部高点预选B:=BACKSET(局部高点预选A=0 AND REF(局部高点预选A,1)=1,2);局部高点预选C:=IF(局部高点预选B=1 AND REF(局部高点预选B,1)=0,1,0);缺口判断:=IF(L>REF(H,1),1,IF(H<REF(L,1),-1,0));距前高天:=BARSLAST(局部高点预选C=1);距前低天:=BARSLAST(局部低点预选C=-1);小值周期:=LOWRANGE(L);大值周期:=TOPRANGE(H);低保留AA:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);低保留AB:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR LLV(L,距前低天+2)<REF(LLV(L,距前低天+1),1)),-1,0);低保留S:=IF((低保留AA=-1 OR 低保留AB=-1) AND L<REF(H,距前高天+1),-1,0);预判:=IF((距前低天<4 AND HHV(缺口判断,距前低天)!=1) OR REF(低保留S,距前低天)=0,1,0);判断:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND 预判=1 AND 大值周期>REF(小值周期,距前低天+1) AND 大值周期>REF(小值周期,距前低天) AND 大值周期>REF(大值周期,距前高天),1,0);高保留A:=IF(局部高点预选C=1 AND REF(距前低天,1)>REF(距前高天,1) AND HHV(H,距前低天+1)>REF(HHV(H,距前低天+1),1),1,0);高保留B:=IF(局部高点预选C=1 AND REF(距前低天,1)<=REF(距前高天,1) AND REF(低保留S,距前低天)=-1 AND (距前低天>=4 OR HHV(缺口判断,距前低天)=1),1,0);高保留:=IF((高保留A=1 OR 高保留B=1 OR 判断=1) AND H>REF(L,距前低天+1),1,0);预判A:=IF((距前高天<4 AND HHV(缺口判断,距前高天)!=1) OR REF(高保留,距前高天)=0,1,0);判断A:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND 预判A=1 AND 小值周期>REF(大值周期,距前高天+1) AND 小值周期>REF(大值周期,距前高天) AND 小值周期>REF(小值周期,距前低天),-1,0);低保留A:=IF(局部低点预选C=-1 AND REF(距前高天,1)>REF(距前低天,1) AND LLV(L,距前高天+1)<REF(LLV(L,距前高天+1),1),-1,0);低保留B:=IF(局部低点预选C=-1 AND REF(距前高天,1)<=REF(距前低天,1) AND (距前高天>=4 OR LLV(缺口判断,距前高天)=-1 OR 判断A=-1),-1,0);低保留:=IF((低保留A=-1 OR 低保留B=-1) AND L<REF(H,距前高天+1),-1,0);距前高天A:=BARSLAST(高保留=1);距前低天A:=BARSLAST(低保留=-1);预判X:=IF((距前低天A<4 AND HHV(缺口判断,距前低天A)!=1) OR REF(低保留,距前低天A)=0,1,0);判断X:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND 预判X=1 AND 大值周期>REF(小值周期,距前低天A+1) AND 大值周期>REF(小值周期,距前低天A) AND 大值周期>REF(大值周期,距前高天A),1,0);高保留XA:=IF(局部高点预选C=1 AND REF(距前低天A,1)>REF(距前高天A,1) AND HHV(H,距前低天A+1)>REF(HHV(H,距前低天A+1),1),1,0);高保留XB:=IF(局部高点预选C=1 AND REF(距前低天A,1)<=REF(距前高天A,1) AND REF(低保留,距前低天A)=-1 AND (距前低天A>=4 OR HHV(缺口判断,距前低天A)=1),1,0);高保留X:=IF((高保留XA=1 OR 高保留XB=1 OR 判断X=1) AND H>REF(L,距前低天A+1),1,0);预判XA:=IF((距前高天A<4 AND HHV(缺口判断,距前高天A)!=1) OR REF(高保留XA,距前高天A)=0,1,0);判断XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND 预判XA=1 AND 小值周期>REF(大值周期,距前高天A+1) AND 小值周期>REF(大值周期,距前高天A) AND 小值周期>REF(小值周期,距前低天A),-1,0);低保留XA:=IF(局部低点预选C=-1 AND REF(距前高天A,1)>REF(距前低天A,1) AND LLV(L,距前高天A+1)<REF(LLV(L,距前高天A+1),1),-1,0);低保留XB:=IF(局部低点预选C=-1 AND REF(距前高天A,1)<=REF(距前低天A,1) AND (距前高天A>=4 OR LLV(缺口判断,距前高天A)=-1 OR 判断XA=-1),-1,0);低保留X:=IF((低保留XA=-1 OR 低保留XB=-1) AND L<REF(H,距前高天A+1),-1,0);距前高天YA:=BARSLAST(高保留X=1);距前低天YA:=BARSLAST(低保留X=-1);预判YX:=IF((距前低天YA<4 AND HHV(缺口判断,距前低天YA)!=1) OR REF(低保留X,距前低天YA)=0,1,0);判断YX:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND 预判YX=1 AND 大值周期>REF(小值周期,距前低天YA+1) AND 大值周期>REF(小值周期,距前低天YA) AND 大值周期>REF(大值周期,距前高天YA),1,0);高保留YXA:=IF(局部高点预选C=1 AND REF(距前低天YA,1)>REF(距前高天YA,1) AND HHV(H,距前低天YA+1)>REF(HHV(H,距前低天YA+1),1),1,0);高保留YXB:=IF(局部高点预选C=1 AND REF(距前低天YA,1)<=REF(距前高天YA,1) AND REF(低保留X,距前低天YA)=-1 AND (距前低天YA>=4 OR HHV(缺口判断,距前低天YA)=1),1,0);高保留YX:=IF((高保留YXA=1 OR 高保留YXB=1 OR 判断YX=1) AND H>REF(L,距前低天YA+1),1,0);预判YXA:=IF((距前高天YA<4 AND HHV(缺口判断,距前高天YA)!=1) OR REF(高保留YXA,距前高天YA)=0,1,0);判断YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND 预判YXA=1 AND 小值周期>REF(大值周期,距前高天YA+1) AND 小值周期>REF(大值周期,距前高天YA) AND 小值周期>REF(小值周期,距前低天YA),-1,0);低保留YXA:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)>REF(距前低天YA,1) AND LLV(L,距前高天YA+1)<REF(LLV(L,距前高天YA+1),1),-1,0);低保留YXB:=IF(局部低点预选C=-1 AND REF(距前高天YA,1)<=REF(距前低天YA,1) AND (距前高天YA>=4 OR LLV(缺口判断,距前高天YA)=-1 OR 判断YXA=-1),-1,0);低保留YX:=IF((低保留YXA=-1 OR 低保留YXB=-1) AND L<REF(H,距前高天YA+1),-1,0);AAAD:=IF(高保留YX=1 AND 低保留YX=-1 AND H>REF(H,REF(距前高天YA,1)+2),1,IF(高保留YX=1 AND 低保留YX=-1 AND L<REF(L,REF(距前低天YA,1)+2),-1,0));极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL))CIRCLEDOT COLORYELLOW;DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0)COLORLIRED;DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0)COLORYELLOW;DD1:=BARSLAST(ABS(极点保留)!=1);DRAWTEXT(极点保留=1,局部极点,'*'),COLORGREEN;DRAWTEXT(极点保留=-1,局部极点,'*'),COLORRED;MA5:MA(CLOSE,5),COLORFF00FF,LINETHICK2;判:IF(MA5<REF(MA5,1),MA5,DRAWNULL),COLORWHITE,LIN ETHICK2;。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
【通达信】原创通达信版－缠论分笔分段公式（附：缠论公式编写教程，打造自己的缠论体系）一切有为法，如梦幻泡影，如露亦如电，应作如是观。
本文开篇就以《金刚经》的偈语作序吧。
缠论大师很多，在下才疏学浅，不到之处敬请点拔。
另外声明一下，世间没有包赚钱的公式，只有适合的工具。
想通过一个什么包赚钱的价格几万的公式来稳赚不赔，那股市就没有输家了。
如果有缘份的话，本文最后将推出缠师最终没有告知大家的力度公式部分。
真正得缠者，为见相非相，即见如来。
通达信版公式，因为定义不了全局变量、数组，以及没有循环语句等功能，相比大智慧在公式编程方面差了不少。
但通达信的优势还是有的，在此推出一个通达信非DLL 版本的缠论分笔公式，并在后续的文章中逐步讲解如何通过程序，将缠论转化公式。
如果缠友仅想得到一公式而已，那就也无所谓细读本文。
但凡得道，靠的是觉悟和缘份，在此也就不细说了。
初学缠论的朋友也可以参考一些网站或专门的书籍，对阅读本文会有较大的帮助。
一、分形。
缠论集道氏、波浪、江恩学派于一体，结合浑沌理论，将K线形态以分形的方式进行规划，并以一套规则定义波浪起始点，以中枢的形式表达三角形调整（旗形、契形、钻石等形态，均是三角形形态的变种），以背驰的理论表述力度的衰竭。
理论指导实战，行之有效。
分形分二种，一是顶分型，另一是底分型。
分型也可以看成是酒田的三山形态，即中间K线高低点均高于二侧的，为顶分型，均低于二侧的，为底分形。
当一根K线高低点均在前一根K线价格之类，或者前一根K线高低点均在本根K线价格之类，称为包含关系。
在程序处理上，被前一根K线包含的，因为不可能作为分形的顶、底点，所以我们可以不进行处理。
如果是后一种包含关系，则观察前一根K线处于什么分形关态，如果前一根是顶分形，则本根向上取值，作为顶分形处理，反之则向下处理为底分形。
但这里有一个特殊情况，在不成笔的情况下，如果这根K线的前一分形状态为低分形，但本K线高点却已经超出了前一个顶分形的顶点，应将这根K线作为顶分形处理，反之亦然。
否则，笔的顶底点将不会处于笔内K线的高低点位置。
同理，笔有被非笔打破高低点的情况，采取的也是这种办法，即笔的延伸。
段亦如此，段被笔打破的，段仍然延续。
所以，在最简单的顶底分形的处理上，也应如此。
对于本段的公式语句如下：{************************************************** *******BUILD:20141102****};{一、标记所有顶分型及底分型的顶部或底部，以下简称“节点”。
};{11、非包含关系的分型端点预选};分型顶0:=H>REF(H,1) AND L>REF(L,1);分型底0:=L<REF(L,1) AND H<REF(H,1);{12、包含关系的K线处理：凡不符合上述类型的K线，均处于包含关系之中};{包含关系分为二种：一、当前K线包含前一根K线时，需进行合并处理；二、当前K线被前一根K线包含时，因不涉及端点，无需处理。
};分型顶1:=(H>=REF(H,1) AND L<=REF(L,1)) AND (BARSLAST(分型顶0)<BARSLAST(分型底0));分型底1:=(H>=REF(H,1) AND L<=REF(L,1)) AND (BARSLAST(分型底0)<BARSLAST(分型顶0));{13、将前述二种分型节点作为备选分型。
}分型顶2:=分型顶0 OR 分型顶1;分型底2:=分型底0 OR 分型底1;{14、对连续的同向分型节点，取最高点或最低点为本笔分型的节点，并向前过滤掉中间满足条件的分型。
};{注：过滤的目的是仅保留最后一次的最高最低节点分型，确保预选分型节点的唯一性。
}分型顶:=FILTERX(分型顶2 AND H=HHV(H,BARSLAST(分型底2)),BARSLAST(分型底2));分型底:=FILTERX(分型底2 AND L=LLV(L,BARSLAST(分型顶2)),BARSLAST(分型顶2)); 二、笔。
形成笔有三个条件，1：在没有任何包含关系的K线序列中，顶点和低点之间必须有三根K线，即分型之间必须有：右肩+过渡+左肩三根K线。
为什么会有这样的要求，其实这与缠论的趋势是有关系的。
因为在小级别的分时图上，分型起点K线与右肩K线的重合部分构中一个中枢，终点K线与左肩重合部分构成一个中枢，二个中枢形成一个趋势，终点K线的最尾端构成一个背驰。
五根K线组成的一个笔，实际上就是一个最小级别的趋势。
区间套原理，实则就是一个递归原理，整个缠论体系构建于此。
2、按缠师的非严格笔来讲，当有包含关系K线时，只要合并K线后，肩部不共用合并K线，那在满足1的数量情况下，没有过渡K线时，仍可以构成笔。
如果用程序的语言来描述，即无包含关系的K线仍然至少达到三根。
3、这个条件是目前网上的说法，即笔内的K线，必须存在至少有二根K线之间没有价格重合，这一点缠师并没有要求。
但从前述最小趋势的定义来看，没有价格脱离，就没有二个独立的中枢，按理是形成不了最小趋势的。
当然，读者也可以删掉程序中力度的语句，以符合缠师的定义。
下面是第二段代码：{二、对符合形成笔条件的分型节点进行粗选。
};{注：符合笔条件的分型应符合缠论以下条件：1、力度：本笔的起点与终点之间，必须存在最高的低点与最低的高点分离（缠论无要求，可删除）2、包含：无包含关系的K线数量必须达到二根以上，即：右肩+左肩+本笔。
3、数量：本笔所有K线数量，在无包含关系的情况下，除起点K线外，其余数量必须达到三以上，即：右肩+过渡+左肩+本笔。
};{21、以分型顶底为起点形成笔的要求，进行第一次筛选，得到笔的第一类过渡期顶、底。
};UP1:=BARSLAST(分型底);顶力度1:=HHV(L,UP1+1)>LLV(H,UP1+1);顶包含1:=COUNT(L>REF(L,1),UP1)>2 ANDCOUNT(H>REF(H,1),UP1)>2;DN1:=BARSLAST(分型顶);底力度1:=HHV(L,DN1+1)>LLV(H,DN1+1);底包含1:=COUNT(H<REF(H,1),DN1)>2 AND COUNT(L<REF(L,1),DN1)>2;笔顶10:=分型顶AND UP1>3 AND 顶力度1 AND 顶包含1;笔底10:=分型底AND DN1>3 AND 底力度1 AND 底包含1;{211：取同一笔中的最高点或最低点为笔的分型顶、底端}; 笔顶1:=笔顶10 AND H=HHV(H,BARSLAST(笔底10));笔底1:=笔底10 AND L=LLV(L,BARSLAST(笔顶10));（时间关系，今天就到这。
另公式修正了一个小BUG）不好意思，这段时间忙股票去了，所以也没空把文章写完。
由于分笔公式和网上销售的书籍配套的公式还有些不同，所以准备再修正一下放出。
附件: 缠论分笔分段.gif (22.78 KB)2014-11-2 02:33FBFD1.tne (73.52 KB)2014-11-2 20:14, 下载次数: 242 fbfd.png (26.91 KB)2014-11-2 20:18段编写篇。
今天先来聊聊段。
画段其实很简单的，笔的分型则构成二个反向的段，就好比人的三个指头，食指、中指、无名指，中间的笔形成的头，与二侧（左肩和右肩）存在：左肩，高点比高点高，低点比低点高；右肩，高点比高点低，低点比低点低。
段最难处理的就是笔包含或反包含（即笔破坏段）的关系，这里就涉及到级别问题。
实质上，级别和周期是一个概念，但二者还是有区别的。
我们常说的级别是以分钟图，日线图，周月线图来讲的，这实际上是对周期而言的。
以日线图为原始图，那么小级别的分时图是针对小周期来进行观察，而周月线图等，则是针对大周期来进行观察。
级别是相对的，必须选定一个原始图，我们一般则是选择日线图作为原始图。
那么，如何对段被笔破坏的情况进行分段呢？被包含的笔一定就不能成为段吗？前面讲了段是有级别的，而级别只是不同周期的显现，所以，段的划为是分周期的，而不是简单的一个趋势形成一个段，或者破坏段的笔不能归为段，这就是着相了。
本文所讲述的与缠师的段是不同的概念。
定义如下：段，在日线级别下，以贯穿34至377倍均线为段，其他未贯穿的笔形成中枢或上涨（下跌）趋势。
段可以由笔组成，也可由持续的上升或下降走势构成一段。
根据段的组成部分，对于从完全多头排列的头部，下降到完全空头排列的底部，其间，经历过修复MA34均线的中枢，我们以D34为记号，其实修复过MA55均线的，我们以D55为记号，以此类推。
如000799酒鬼酒这个票为例，在D377段中，里面仅有D34和D55级别的中枢，那么它的后级均线修复是一个快速的过程。
这个将在时间分形中论述。
（请图例的以红色为段的画法，淡蓝色组成的中枢，以及如何在相应的周期修复或称协调均衡均线的）。
中枢编写篇。
（2015-3-28）今天难得有空，就来谈谈缠论的中枢吧。
实际上谈中枢，就要重新谈谈分笔分段。
笔是什么？缠论告诉我们的是以顶底分型来连接的一段走势，它有三个基本原则，前面讲了。
但实质上这种画法，对实际操作没有任何意义，因为你不知道什么时候出底分型，也不知道什么时候出顶分型，对过往数据的总结，是不能指导实战的。
那么，什么是笔？笔实质是一个多周期同方向（我称它为正序排列）均线持续的走势，一旦出现杂序排列，那就意味趋势的终结，任何新低或新高，就属于本周期趋势的盘整阶段的顶背驰或底背驰。
这里我要更新一下二个概念，即背离和背驰。
背离，二个相邻的同向趋势之间的力度衰竭，为背离；而同一个趋势中的盘整产生的新高或新低，我称为背驰。
实际上，走势只有二个分类，即趋势+盘整。
趋势：至少三个或以上同向均线发展方向为趋势，盘整：杂序排列为盘整。
盘整就是中枢。
中枢是有级别的，它的级别在于到底有多少个同向均线同向发展。
有些人讲中枢很难画，这里涉及二个问题，一个是软件本身的功能所限，还有一个就是对中枢的定义。
缠论对中枢的定义没有讲到实质，因为你不知道什么时候出分型，也就不知道什么时候趋势终结，也就不可能找到中枢的起点，所有起点错误的中枢，都是不正确的中枢。
只能严格定义趋势的终点，而且是实时的，才能当下画出中枢的起点。
前面讲了，盘整就是中枢，因为趋势终点一旦产生，中枢的起点即告形成，随之而来的盘整就是中枢走势。