您的位置：360文档中心› 缠论顶底分型代码

缠论顶底分型代码

合集下载

缠论中的线段划分8种情况

缠论中的线段划分8种情况

缠论中的线段划分现对线段画分的8种情况依次进行详细分析及阐述。

第一种情况（标准的第１种情况）——-———-————----—/\g2———-———-——-——--————--——-——---——---—-/—-\—-—-———---—-—-——-—---——--—-—-—-————-/—---\—-———---—--—---——-——--——-—--——-——-/-——--—\——-—-—g3—----—-——-——-——---------/-—-—-—-—\—--—/\——-—--—-—-—--———--————--/——-——-———-\-—/--\----—-—--——-—--—/\g1——/-—-—-—---——-\/———-\--——--———--—-—/-—\-—/———--—-—-—-———d3—— -\----—----—--/—---\/d2———--————-—--—--—- —\d4-———————/d1---——-—-———--—---—————--—————--—-——--—分段分析：对于g2处的顶分型，其特征序列元素为g1d2、g2d3、g3d4，由于d3低于g1很显然属于标准的第一种情况，因此g2处的顶分型可以确认。

该图是两段，d1—g2是一段，g2—d4是一段。

当下分析：这种情况下，一般会表现为d2g2力度与d1g1盘背。

如果d2g2与d1g1盘背，应该在g2处抛掉半仓（因为不能肯定是否会跌破g1），等g3回试不创新高后再抛光剩余的筹码；如果d2g2与d1g1不背驰，则可以在g3回试不创新高后清仓。

第二种情况（标准的第２种情况之１）----——-—-————-——g6—---——-—-———----——--——g9—--—----—-——-——/\—--—g7--——--—--————/-—-————---—-——--—/--\—-/\——--—---g8- --/——--——-----———-——/----\/——\—————-/\——--/-——-————-—-———-—-/-—-- d7—— \———-/-—\--/--—-—----—-—-——-—/—--—-——-—-——\——/-—-—\/—-—--—-—-—-/\g5--/—--———-----—-—\/———--d9—--—————-/-—\—-/-————-———-—————d8——————--—-——-—-/—-—-\/d6--———--—————-—-———-—-—-—------/d5-———-——--—--——-————-—-—-—————-—-—-——分段分析：图中对于g6处的顶分型，其特征序列元素为g5d6、g6d7、g7d8,由于d7高于g5很显然第一和第二两个元素之间有缺口,属于第二种情况，这时g6的顶分型不能确认。

缠论线段详细图解

缠论线段详细图解

62分型三根K线，第二K线高点是相邻三K线高点中最高的，而低点也是相邻三K线低点中最高的，本ID给一个定义叫顶分型；第二K线低点是相邻三K线低点中最低的，而高点也是相邻三K线高点中最低的。

1. 顶分型2. 底分型对于分型，里面最大的麻烦，就是所谓的前后K线间的包含关系，其次，有点简单的几何思维，根据定义，任何人都可以马上得出以下的一些推论：1、用[di,gi]记号第i根K线的最低和最高构成的区间，当向上时，顺次n个包含关系的K线组，等价于[maxdi,maxgi]的区间对应的K线，也就是说，这n个K线，和最低最高的区间为[maxdi,maxgi]的K线是一回事情；向下时，顺次n个包含关系的K线组，等价于[mindi,mingi]的区间对应的K线。

2、结合律是有关本ID这理论中最基础的，在K线的包含关系中，当然也需要遵守，而包含关系，不符合传递律，也就是说，第1、2根K线是包含关系，第2、3根也是包含关系，但并不意味着第1、3根就有包含关系。

因此在K线包含关系的分析中，还要遵守顺序原则，就是先用第1、2根K线的包含关系确认新的K线，然后用新的K线去和第三根比，如果有包含关系，继续用包含关系的法则结合成新的K线，如果没有，就按正常K线去处理。

3、有人可能还要问，什么是向上？什么是向下？其实，这根本没什么可说的，任何看过图的都知道什么是向上，什么是向下。

当然，本ID的理论是严格的几何理论，对向上向下，也可以严格地进行几何定义，只不过，这样对于不习惯数学符号的人，头又要大一次了。

假设，第n根K线满足第n根与第n+1根的包含关系，而第n根与第n-1根不是包含关系，那么如果gn>=gn-1，那么称第n-1、n、n+1根K线是向上的；如果dn<=dn-1，那么称第n-1、n、n+1根K线是向下的。

有人可能又要问，如果gn<gn-1且dn>dn-1，算什么？那就是一种包含关系，这就违反了前面第n根与第n-1根不是包含关系的假设。

缠论分笔公式代码

缠论分笔公式代码

缠论分笔是一种股票分析方法，基于曲线波动的特点，该方法可以帮助投资者分析股票的价格和趋势。

以下是一个基于Python和Pandas的缠论分笔公式代码示例：import pandas as pdimport numpy as npdef find_segments(data):start = 0segments = []while start < len(data) - 1:i = start + 1while i < len(data) - 1 and (data[i] < data[start] and data[i] < data[start + 1]):i += 1segments.append({"start": start, "end": i})start = ireturn segmentsdef merge_segments(segments, data):i = 0while i < len(segments) - 1:current = segments[i]next = segments[i + 1]has_converged = Falsefor s in range(current["start"], current["end"]):for e in range(next["start"], next["end"]):if (data[s] < data[s + 1] and data[e] < data[e + 1]) or (data[s] > data[s + 1] and data[e] > data[e + 1]):start = current["start"]end = esegments.pop(i)segments.pop(i)segments.insert(i, {"start": start, "end": end})has_converged = Truebreakif has_converged:breakif not has_converged:i += 1return segmentsdef chan_klines(data):segments = find_segments(data)merged_segments = merge_segments(segments, data)klines = []for seg in merged_segments:klines.append(data[seg["start"]])klines.append(data[seg["end"]])return klinesif __name__ == "__main__":stocks = np.array([3.0, 2.0, 1.0, 4.0, 7.0, 2.0, 5.0, 3.0, 6.0, 4.0, 8.0])klines = chan_klines(stocks)print(klines)注意：这个代码仅是一个基本示例，你可以根据需要进行调整或优化。

缠论程序化代码

缠论程序化代码

1.老笔:=1;2.G:MA(C,5);//5均线3.D:MA(C,10);//10均线4.HH:=REF(H,5)=HHV(H,11);//定义HH，5周期前H=11周期内最高价5.LL:=REF(L,5)=LLV(L,11);//定义LL，5周期前L=11周期内最低价6.FG01:=BACKSET(HH,6)>BACKSET(HH,5) ;//高点7.FD01:=BACKSET(LL,6)>BACKSET(LL,5) ;//低点8.FG02:=IF(BARSLAST(FG01)=BARSLAST(FD01) ANDG>D,FG01,IF(BARSLAST(FD01)>BARSLAST(FG01),FG01,0));9.FD02:=IF(BARSLAST(FG01)=BARSLAST(FD01) ANDD>G,FD01,IF(BARSLAST(FG01)>BARSLAST(FD01),FD01,0));10.FG0:=FG02 AND H=HHV(H,BARSLAST(FD02));11.FD0:=FD02 AND L=LLV(L,BARSLAST(FG02));12.GP:IF(FG0,H,NULL),CIRCLEDOT,COLORCYAN;13.DP:IF(FD0,L,NULL),CIRCLEDOT,COLORCYAN;14.GQ:=L>REF(H,1) AND DAY=REF(DAY,1);15.DQ:=H<REF(L,1) AND DAY=REF(DAY,1);16.GQL:=REF(L,BARSLAST(GQ));17.DQH:=REF(H,BARSLAST(DQ));18.FGH:=REF(H,BARSLAST(FG0));19.FGL:=REF(L,BARSLAST(FG0));20.FGH1:=REF(H,BARSLAST(FG0)+1);21.FGL1:=REF(L,BARSLAST(FG0)+1);22.FGH2:=REF(H,BARSLAST(FG0)+2);23.FGL2:=REF(L,BARSLAST(FG0)+2);24.FDH:=REF(H,BARSLAST(FD0));25.FDL:=REF(L,BARSLAST(FD0));26.FDH1:=REF(H,BARSLAST(FD0)+1);27.FDL1:=REF(L,BARSLAST(FD0)+1);28.FDH2:=REF(H,BARSLAST(FD0)+2);29.FDL2:=REF(L,BARSLAST(FD0)+2);30.FGZH:=IF(FGL<=FGL1,FGH2,FGH1);31.FGZL:=IF(FGH1<FGL,FGL,IF(FGL<=FGL1,FGL2,FGL1));32.FDZH:=IF(FDL1>FDH,FDH,IF(FDH>=FDH1,FDH2,FDH1));33.FDZL:=IF(FDH>=FDH1,FDL2,FDL1);34.FG1:=FGH>FDZH AND FG0;35.FD1:=FDL<FGZL AND FD0;36.FG:=FG1 AND FGH>FDH AND FGL>FDL ANDFGL1>FDL;37.FD:=FD1 AND FDL<FGL AND FDH<FGH ANDFDH1<FGH;38.BH0:=(H<=REF(H,1) AND L>=REF(L,1)) OR (H>=REF(H,1)AND L<=REF(L,1)); 39.BHG:=COUNT(BH0,BARSLAST(FD0));40.BHD:=COUNT(BH0,BARSLAST(FG0));41.BGQ:=COUNT(GQ,BARSLAST(FD0));42.BDQ:=COUNT(DQ,BARSLAST(FG0));43.BK0:=IF(BHG>0,BHG+2+老笔,IF(BHD,BHD+2+老笔,3));44.BKA:=IF(BGQ,BK0-BGQ,IF(BDQ,BK0-BDQ,BK0));45.G1X:=(FG AND BARSLAST(FD)>BKA);46.D1X:=(FD AND BARSLAST(FG)>BKA);47.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))); 48.D1:=(FD0 ANDREF(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))); 49.G1H:=IF(BARSLAST(D1)>BARSLAST(G1),REF(H,BARSLAST(G1)),REF(H,BARSLAST(D1)));50.D1L:=IF(BARSLAST(G1)>BARSLAST(D1),REF(L,BARSLAST(D1)),REF(L,BARSLAST(G1)));51.G2:=G1 AND H=HHV(G1H,BARSLAST(D1)+1) ANDH>REF(H,1) AND BARSLAST(D1)>BARSLAST(G1);52.D2:=D1 AND L=LLV(D1L,BARSLAST(G1)+1) ANDL<REF(L,1) AND BARSLAST(G1)>BARSLAST(D1);53.G3:=G2 OR (FG0 ANDREF(H,BARSLAST(FG0))>REF(H,BARSLAST(G2)) AND BARSLAST(D2)>BARSLAST(G2));54.D3:=D2 OR (FD0 ANDREF(L,BARSLAST(FD0))<REF(L,BARSLAST(D2)) AND BARSLAST(G2)>BARSLAST(D2));55.GPB:IF(G1X,H,NULL),CIRCLEDOT,COLORYELLOW;56.DPB:IF(D1X,L,NULL),CIRCLEDOT,COLORYELLOW;57.NN:=G3;//{画线}58.UU:=D3;59.DRAWLINE(UU,L,NN, H,COLORGREEN);60.DRAWLINE(NN,H,UU, L,COLORGREEN);。

缠论选股公式（一笔回调出现底分型）

缠论选股公式（一笔回调出现底分型）

缠论选股公式（⼀笔回调出现底分型）缠中说禅底分型：底分型（简称底）定义：第⼆K线低点是相邻三K线低点中最低的，⽽⾼点也是相邻三K线⾼点中最低的。

叫底分型。

⼀笔回调出现底分型⽰意图：公式源码：{笔底分型 选股 预警 确保向下笔成⽴后的底分型}V00:= HIGHV01:= HIGHREF(LOW,1);V02:= HIGH>REF(HIGH,1) AND LOWV03:= 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 AND HHVBARS(HIGH,6) >= 5 AND V03;V2:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 2 AND HHVBARS(HIGH,7) >= 6 AND V04;V3:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 1 AND HHVBARS(HIGH,7) >= 6 AND V03;V4:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 2 AND HHVBARS(HIGH,8) >= 7 AND V04;V5:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 AND LLVBARS(LOW,8) = 1 AND HHVBARS(HIGH,8) >= 7 AND V03;V6:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 2 AND HHVBARS(HIGH,9) >= 8 AND V04;V7:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 AND LLVBARS(LOW,9) = 1 AND HHVBARS(HIGH,9) >= 8 AND V03;V8:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 2 AND HHVBARS(HIGH,10) >= 9 AND V04;V9:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 AND LLVBARS(LOW,10) = 1 AND HHVBARS(HIGH,10) >= 9 AND V03;V10:= COUNT(V00,11)>=3 AND COUNT(V01 OR V02,10)<=5 ANDLLVBARS(LOW,11) = 2 AND HHVBARS(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;选股意向图：。

缠论实战技巧——顶底分型，次高成笔，最便捷中枢画法（附源码）

缠论实战技巧——顶底分型，次高成笔，最便捷中枢画法（附源码）

缠论实战技巧——顶底分型，次高成笔，最便捷中枢画法（附源码）初涉缠论不久，颇有心得，今天和大家交流探讨一下。

缠论表面上十分复杂，其实不然，所谓会者不难，那些说缠论无用的，更是井底之蛙，所谓的连缠论都不了解是什么，怎么有资格做评价呢。

其实缠论一整套流程就是分型（第三根K线的强弱很重要）——笔（不一定非要严格笔，有时候相似笔也是好用的）——中枢（级别很重要，上升中枢和下跌中枢一定要用同级别分界线画出来）——买卖点！今天我跟大家分享顶底分型一点方法！分型很多人都只是到顶分型出，底分型进，但是分型在实战应用要看分型的位置，强弱程度，前面的压力位，以及处理完包含关系。

我跟大家举例说明！下图圈出来的就是强势的底分型，是比较好的买点位置，不用等到底分型确认在进入！通过笔线段中枢，去重新划分。

只有熟练之后，你看到某只股票才像看到黄金一样，这个股票是涨是跌你会一目了然，完全告别的踩的成分，以后炒股基本上就找到了确定性方法，赚的明白亏的也明白。

顶低背离源码N:=5;M1:=3;M2:=3;RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;KD乖离:(SMA(RSV,M1,1)-SMA(SMA(RSV,M1,1),M2,1))*2,COLORSTICK;K:SMA(RSV,M1,1),COLORFFFF00;D:SMA(K,M2,1),COLOR2020FF;REFLINE:50;K1:=IF(K>80,K,0);K2:=IF(K<20,K,100);K3:=K1+REF(K1,1)+REF(K1,2);K4:=K2+REF(K2,1)+REF(K2,2);DRAWICON(COUNT(K3>240,1),100,4);DRAWICON(COUNT(K4<60,1),20,5);图中的看盘主图为高抛低吸，是一位缠论大师分享，需要的缠友可以问我要下文件。

缠论进阶——顶底分型操作法

缠论进阶——顶底分型操作法

缠论进阶——顶底分型操作法以下五种分型操作方法：1、最具有杀伤力的顶分型。

通常来讲，在非包含关系处理之后的顶分型中，如果第3根K线跌破第一根的底而且不能高收到第1根K 线区间的一半之上，则是最弱的一种，即这种顶分型具有较强的杀伤力。

则底分型相反。

2、较大杀伤力的顶分型。

假如第2根K线是长上影线甚至就是直接长阴，而第3根K线不能以阳线收在第2根K线区间的一半之上，则该顶分型的力度就比较大，最终要延续成笔的可能性就很大。

假如里面存在一个包含关系，而这包含关系是直接将阳线以长阴吃掉，则是最坏的一种包含关系，底分型则相反。

3、中继型。

假如第1根K线是一根长阳线，而第2根、第3根K 线均是小阴、小阳，则这个分型结构就没有太大的意义，在小级别上，必须呈现出小级别中枢上移后小级别新中枢的产生，通常来讲，此顶分型，成为真正顶的可能性极小，大多数都是中继型的。

4、如何有效地判断顶分型。

譬如对日线上的顶分型，是是否有效地跌破5日均线，则是一个判断顶分型类似走势最好的操作根据。

周线顶分对应的是5周线。

相反，能够有效地判断底分型。

5、要结合小级别的走势。

必须注意，大级别的分型与某小级别的第一类、第二类买卖点并非绝对对应的关系，有前者必有后者，然后有后者并不一定有前者，因此前者仅仅是一个辅助。

关键就是结合小级别的走势，当下去确认这卖点。

然后第二天的回补关键看5日均线是否有效跌破，而判断的关键在于小级别的是否盘整背驰上。

通常来说，将分型与小级别走势类型结合起来进行操作，比如日线与5分钟的。

假如一个小级别的中枢震荡中连日K线均都没出现顶分型结果，则这个中枢震荡就没必要走了，后者就算打短差也要控制好数量，由于没有分型，便意味着走势还没有结束，随时都会产生新高，因此不要着急。

一旦顶分型成立，一定对应着小级别走势的第一类、第二类卖点，接下来，关键看新形成中枢的第三类买卖点的问题：通常情况下，若是中继的，都是第三类卖点之后形成中枢扩展，也就是说，有一个很好的盘整底背驰让你重新介入。

缠论主图、附图指标，两天终于做好了，大家凑合看看！

缠论主图、附图指标，两天终于做好了，大家凑合看看！

缠论主图、附图指标，两天终于做好了，大家凑合看看！我自己学股票也是从缠论的顶底分型开始的，我学了很多年指标技术，但是最终才发现只有缠论才能仔细把股票市场解释清楚。

从原著再看微博，再到实践，这么多年我虽然一直在做价值投资，但是买卖点还是在用缠论的理论。

最近编写了一点缠论的选股，希望对大家有帮助1、缠论第三类买点选股指标公式LS:=50;A1:=HHV(H,LS*0.7){TUFENDOU};A2:=HHV(H,LS*4){TUFENDOU};A3:=REF(HHV(H,LS*4),LS*0.7){TUFENDOU};A4:=LLV(L,LS/10){TUFENDOU};选股:{TUFENDOU}A1=A2 AND A1>=A3*1.2 AND A4>A3;2、缠论分型笔线段主图指标公式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<>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))<>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)) 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;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),>IF(CURRBARSCOUNT=PTD+1,TDPX,DRAWNULL),CIRCLEDOT, COLOR9370DB,LINETHICK2;DRAWTEXT(ISLASTBAR,TDPX,' 地平线10'), COLOR9370DB;3、缠论背驰指标公式DIFF:EMA(CLOSE,12)-EMA(CLOSE,27);DEA:EMA(DIFF,9);MACD:2*(DIFF-DEA), COLORSTICK,LINETHICK2;低位金叉:=CROSS(DIFF,DEA) AND DIFF<>STICKLINE(低位金叉,0,0.08,6,0),coloryellow;DRAWTEXT(低位金叉,0.16,' 低位金叉'),colorwhite;JCCOUNT:=COUNT(CROSS(DIFF,DEA),BARSLAST(DEA>=0));二次金叉:=CROSS(DIFF,DEA) AND DEA<0 and="" count(jccount="">STICKLINE(二次金叉,0,0.06,6,0),COLORFF00FF;DRAWICON(二次金叉,DEA*0.9,1) ;DRAWTEXT(二次金叉,0.2,' 二次金叉'),coloryellow;A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA);STICKLINE(底背离,0,0.03,6,0),COLOR00FF00;底背:DRAWLINE(A1=0,DEA,底背离,DEA,0),colorred,LINETHICK4;DRAWTEXT(底背离,0.12,' 底背离'),COLORFF00FF;A2:=BARSLAST(REF(CROSS(DEA,DIFF),1));顶背离:=REF(CLOSE,A2+1)DIFF AND CROSS(DEA,DIFF);顶背:DRAWLINE(A2=0,DEA,顶背离,DEA,0),colorgreen,LINETHICK4;DRAWTEXT(低位金叉 AND 二次金叉 AND 底背离,0.25,'三全项'),COLOR0000FF,LINETHICK2;。

缠中说禅公式代码

缠中说禅公式代码

(板块轮动指标）缠中说禅类别公式(板块轮动指标）(2010-02-21 22:09:38)MA5:MA(C,5);MA13:MA(C,13);MA21:MA(C,21);MA34:MA(C,34);MA55:MA(C,55);MA89:MA(C,89);MA144:MA(C,144);TMP1:=IF(C>MA5,10,0);TMP2:=IF(C>MA13,10,0);TMP3:=IF(C>MA21,10,0);TMP4:=IF(C>MA34,10,0);TMP5:=IF(C>MA55,10,0);TMP6:=IF(C>MA89,10,0);TMP7:=IF(C>MA144,10,0);A:TMP1+TMP2+TMP3+TMP4+TMP5+TMP6+TMP7+10;差B:( A-REF (A,1))+10;MA三:MA(A,N1);MA五:MA(A,N2);变盘公式bollA:(((MA(CLOSE,N))+2*STD(CLOSE,N))-((MA(CLOSE,N))-2*STD(CLOSE,N)))/(MA(CLOSE ,N)-2*STD(CLOSE,N))*10;MA5:MA(A,N1);MA13:MA(A,N2);MA21:MA(A,N3);MA34:MA(A,N4);MA55:MA(A,N5);MA89:MA(A,N6);MA144:MA(A,N7);昨55:REF(MA55,1);昨89:REF(MA89,1);昨144:REF(MA144,1);BOLL差:MA(CLOSE,N)-REF(BOLL,N9);MABOLL差:MA(BOLL差,N1);缠中说禅趋势力度：由短线均线与长期均线相交所形成的面积。

通达信的。

MA5:=MA(C,5);MA10:=MA(C,10);MA20:=MA(C,20);趋势力度:MA10-MA20,COLORSTICK;MA10-MA20;拉升变盘拉升成交量空头陷阱。

教你炒股票，“缠论”进阶教学1：顶底分型（一）

教你炒股票，“缠论”进阶教学1：顶底分型（一）

教你炒股票，“缠论”进阶教学1：顶底分型（一）缠论是采取“几何”的数学理论在精确的研究K线形态，是一个非常封闭的理论体系，最终得出股票买卖点。

和我们平常学习的K线“形态学”是相通的。

如果再加上我们一直推崇的“量价分析”，是比较完美的交易系统。

从今天开始陆续会更新一系列有关“缠论”的教学体系，期待共同进步，共同成长！按照缠论，可以把股票的K线走势分解成“分型”、“笔”、“线段”、“中枢”、“走势”，根据市场的走势，再做降级和升级处理（降级就是降到小周期级别，比如日线降到30分钟K线，升级同理向上升级），最终目的是：寻找得出三类买点。

分型是缠论中最基础的概念，分为顶分型和底分型，这个“分型”的概念，类似于K线理论中的“反转形态”。

比如顶分型类似K线形态里的“早晨之星”、比如底分型类似K线形态里的“黄昏之星”。

一、顶分型，是三根连续K线，其中第二根K线的高点是三根K 线中的最高点，低点也是最高点。

如下图：二、底分型，是三根连续K线，其中第二根K线的低点是三根K线中的最低点，高点也是最低点。

如下图注：分型的形态和K线的阴线还是阳线无关，只和每根K线的高低点相关。

“分型”是“笔”的基础单位，有了“笔”才能形成“线段”，形成了“线段”才能有“中枢”。

所以准确无误地找到“顶分型”和“底分型”是至关重要的。

而不同级别的K线，有不同的“顶底分型”。

在复杂的K线形态中，错中复杂的K线会有很多“包含”关系。

这就涉及到了“合并”的理论。

1、首先要判断K线的朝向，是向下还是向上；2、K线方向向上，相邻的两根K线，取两根K线的最高点的最大值，再取两根K线的最低点的最大值，组成一个新的K线，判断“顶分型”；如下图，K线方向是向上的，相邻的K线形成包含关系。

A点是两组K线高点最大值纳选；B点两组低点最大值纳选。

这样组成新的K 线。

这根新组成的K线协同旁边的两根K线形成一个“顶分型”3、K线方向向下，相邻的两根K线，取两根K线的最高点的最小值，再取两根K线的最低点的最小值，组成一个新的K线，判断“底分型”；如下图，先确定K线的方向向下，当两根K线形成包含关系，确定相邻K线最高点的最小值B点，还有最低点的最小值A点，形成了一根新K线，结合相邻的两根K线，形成“底分型”。

缠论的分笔分段公式的汇总

缠论的分笔分段公式的汇总

缠论的分笔分段公式的汇总缠论总的分笔确实存在有不足之处，但是在实战中也不是一无是处，所以我们看待事物要具有客观性。

我们先来了解下分型，分型大家都知道分为顶分型以及底分型，当然我们想要运用公式来方便我们的投资，就要首先标记顶分型及底分型的顶部或底部，也就是节点。

{一、标记所有顶分型及底分型的顶部或底部，以下简称“节点”。

};{非包含关系的分型端点预选};分型顶0:=H>REF(H,1) AND L>REF(L,1);分型底0:=L{包含关系的K线处理：凡不符合上述类型的K线，均处于包含关系之中};{包含关系分为二种：一、当前K线包含前一根K线时，需进行合并处理;二、当前K线被前一根K线包含时，因不涉及端点，无需处理。

};分型顶1:=(H>=REF(H,1) AND L<=REF(L,1)) AND (BARSLAST(分型顶0)<barslast(分型底0));< p="" style="margin: 0px; padding: 0px;">分型底1:=(H>=REF(H,1) AND L<=REF(L,1)) AND (BARSLAST(分型底0)<barslast(分型顶0));< p="" style="margin: 0px; padding: 0px;">{将前述二种分型节点作为备选分型。

}分型顶2:=分型顶0 OR 分型顶1;分型底2:=分型底0 OR 分型底1;{对连续的同向分型节点，取最高点或最低点为本笔分型的节点，并向前过滤掉中间满足条件的分型。

};{注：过滤的目的是仅保留最后一次的最高最低节点分型，确保预选分型节点的唯一性。

}分型顶:=FILTERX(分型顶2 AND H=HHV(H,BARSLAST(分型底2)),BARSLAST(分型底2));分型底:=FILTERX(分型底2 AND L=LLV(L,BARSLAST(分型顶2)),BARSLAST(分型顶2));了解了分型的公司，我们在来看笔，对于形成笔的三个条件，在前面的文章中讲过，也就是力度、包含、数量。

缠论分段指标源码及详解

缠论分段指标源码及详解

缠论分段指标源码及详解``` pythonimport numpy as npdef ChanSegmentation(data):N = len(data)segments = []direction = 0 # 0代表未确定方向，1代表上升，-1代表下降start_index = 0end_index = 0for i in range(1, N):if data[i] > data[i-1] and direction <= 0: # 上升段direction = 1start_index = i-1elif data[i] < data[i-1] and direction >= 0: # 下降段direction = -1start_index = i-1elif (data[i] > data[i-1] and direction == 1) or (data[i] < data[i-1] and direction == -1): # 延续上升或下降段continueelse: # 转折点end_index = i-1segment = {'start': start_index, 'end': end_index,'direction': direction}segments.append(segment)direction = 0if direction != 0: # 最后一段segment = {'start': start_index, 'end': N-1, 'direction': direction}segments.append(segment)return segments```这段代码的作用是根据输入的数据序列，进行缠论分段处理，并返回各个分段的起始点、结束点和方向。

缠论机构分形版公式源码

缠论机构分形版公式源码

缠论机构分形版公式源码缠论是一种技术分析方法，旨在通过分析市场价格的波动和趋势，来预测未来的走势。

它主要基于一种称为“缠绕理论”的理论框架。

缠绕理论的算法并没有一个固定的公式源码，而是通过对市场价格数据进行分析，结合各种技术指标和形态来形成判断。

在实际应用中，可以根据缠论的原理和规则，编写相应的程序代码进行分析和预测。

以下是一个示例的缠论分形版源码，供参考：pythonimport numpy as np# 计算K线的高低点def calculate_high_low(data):high = np.max(data)low = np.min(data)return high, low# 判断是否构成缠论分形def is_fractal(data):if len(data) != 5:return Falsehigh, low = calculate_high_low(data)if data[0] > high and data[4] < low:return Trueif data[0] < low and data[4] > high:return Truereturn False# 查找缠论分形def find_fractals(prices):fractals = []for i in range(2, len(prices)-2):data = prices[i-2:i+3]if is_fractal(data):fractals.append(i)return fractals# 示例：使用缠论分形判断趋势def analyze_trend(prices):fractals = find_fractals(prices)if len(fractals) < 2:return "无法判断趋势"last_fractal = fractals[-1]second_last_fractal = fractals[-2]if prices[last_fractal] > prices[second_last_fractal]:return "上涨趋势"elif prices[last_fractal] < prices[second_last_fractal]:return "下跌趋势"else:return "横盘震荡"# 示例数据prices = [100, 110, 120, 90, 80, 70, 130, 140, 150] print(analyze_trend(prices))请注意，以上代码只是一个示例，具体的缠论分析方法可能会根据实际情况和需求进行调整和优化。

缠论中枢源代码

缠论中枢源代码

MA(CLOSE,5);//福安赚差价的人，设计QQ624544691//高低点一定是前6天和后6天的最高点和最低点//BD1:=LOW<=LLV(LOW,6) AND REFX(LOW,1)>=LOW AND REFX(LOW,2)>=LOW AND REFX(LOW,3)>=LOW AND REFX(LOW,4)>=LOW AND REFX(LOW,5)>=LOW ;/ /笔高，粗选//BG1:= HIGH>=HHV(HIGH,6) AND REFX(HIGH,1)<=HIGH AND REFX(HIGH,2)<=HIG H AND REFX(HIGH,3)<=HIGH AND REFX(HIGH,4)<=HIGH AND REFX(HIGH,5)< =HIGH ;//笔低，粗选//BDQ:=(REFX(BD1,1)=1 AND BARSLAST(BG1)>=3)OR (REFX(BD1,1)=1 AND COUNT(BD1,BARPOS)=0 AND COUNT(BG1,BARPOS)=0) ; BDQ1:=(BDQ AND COUNT(BDQ,BARSLAST(BG1))=1) OR ( BARSSINCE(BDQ)=0);BD2:=(BD1 AND BARSLAST(BG1)>3 AND LOW<=LLV(LOW,BARSLAST(BDQ1)) AND COUNT(BG1,BARSLAST(BDQ1))=0) OR (BD1 AND LOW<=LLV(LOW,BARSLAST(BDQ1)) AND COUNT(BG1,BARPOS)=0 ); BDDW:=BACKSET(BD2,BARSLAST(BDQ1));//DRAWTEXT(BDDW,HIGH,'1');//DRAWTEXT((BDDW AND REFX(BDDW,1)=0),LOW*0.94,'第二低点');//BD3:=(BDDW AND REFX(BDDW,1)=0) OR (BDDW AND ISLASTBAR) OR (BD1 AND BARSLAST(BG1)<4);//修改过，去除高低点在同一根////笔高前一根//BGQ:=(REFX(BG1,1)=1 AND BARSLAST(BD1)>=3)OR (REFX(BG1,1)=1 AND COUNT(BD1,BARPOS)=0 AND COUNT(BG1,BARPOS)=0); //DRAWTEXT(BGQ ,HIGH,'前')COL OR YELLOW;//测试低点//BGQ1:=(BGQ AND COUNT(BGQ,BARSLAST(BD1))=1) OR ( BARSSINCE(BGQ)=0);//DRAWTEXT(BGQ1 ,HIGH*1.03,'第一前')COL OR CYAN;//测试低点////新笔高//BG2:=(BG1 AND BARSLAST(BD1)>3 AND HIGH>=HHV(HIGH,BARSLAST(BGQ1)) AN D COUNT(BD1,BARSLAST(BGQ1))=0 ) OR (BG1 AND HIGH>=HHV(HIGH,BARSLAST(BGQ1)) AND COUNT(BD1,BARPOS)=0 ); BGDW:=BACKSET(BG2,BARSLAST(BGQ1));//DRAWTEXT((BGDW AND REFX(BGDW,1)=0),HIGH*1.03,'第二高');//BG3:=(BGDW AND REFX(BGDW,1)=0) OR (BGDW AND ISLASTBAR) OR (BG1 AND BARSLAST(BD1)<4) ;//跟前面的笔高距离小于4，并且价格是最低的////笔低前一根//BDQ30:=(REFX(BD1,1)=1 ) OR (REFX(BD1,1)=1 AND COUNT(BD1,BARPOS)=0 AND COUNT(BG1,BARPOS)=0) ; BDQ130:=(BDQ30 AND COUNT(BDQ30,BARSLAST(BG1))=1)OR ( BARSSINCE(BDQ30)=0);//DRAWTEXT(BDQ ,LOW*0.98,'前')COL OR YELLOW;//测试低点////DRAWTEXT(BDQ1,LOW*0.96,'第一前')COL OR CYAN;//测试低点////新BD2//BD230:=(BD1 AND LOW<=LLV(LOW,BARSLAST(BDQ130)) AND COUNT(BG1,BARSL AST(BDQ130))=0 ) OR (BD1 AND LOW<=LLV(LOW,BARSLAST(BDQ130)) AND COUNT(BG1,BARPOS)=0 ); BDDW30:=BACKSET(BD230,BARSLAST(BDQ130));BD4:=BDDW30 AND REFX(BDDW30,1)=0;BD5:=BD3 OR (BD4 AND BARSLAST(BG1)<4 ) ;//跟前面的笔低距离小于4，并且价格是最高的////笔高前一根//BGQ30:=(REFX(BG1,1)=1 )OR (REFX(BG1,1)=1 AND COUNT(BD1,BARPOS)=0 AND COUNT(BG1,BARPOS)=0); //DRAWTEXT(BGQ ,HIGH,'前')COL OR YELLOW;//测试低点//BGQ130:=(BGQ30 AND COUNT(BGQ30,BARSLAST(BD1))=1) OR ( BARSSINCE(BGQ30)=0);//DRAWTEXT(BGQ1 ,HIGH*1.03,'第一前')COL OR CYAN;//测试低点////新笔高//BG230:=(BG1 AND HIGH>=HHV(HIGH,BARSLAST(BGQ130)) AND COUNT(BD1,BAR SLAST(BGQ130))=0) OR (BG1 AND HIGH>=HHV(HIGH,BARSLAST(BGQ130)) AND COUNT(BD1,BARPOS)=0 ); BGDW30:=BACKSET(BG230,BARSLAST(BGQ130));BG4:=BGDW30 AND REFX(BGDW30,1)=0;BG5:=BG3 OR (BG4 AND BARSLAST(BD1)<4) ;//去掉绝对错误低点//BD6:=(BD5 AND LOW>=REF(HIGH,BARSLAST(BG5)) ) ;//最低价大于前笔高//BD7:= BD5 AND REFX(HIGH,1)>=REF(HIGH,BARSLAST(BG5)) ;//笔低后面一根最高价大于前高////DRAWTEXT(BD7,HIGH,'错误低点');//BD:=BD5 AND BD6=0 AND BD7=0;//去掉绝对错误高点//BG6:=BG5 AND HIGH<=REF(LOW,BARSLAST(BD5));BG7:=BG5 AND REFX(LOW,1)<=REF(LOW,BARSLAST(BD5)) ;BG:= BG5 AND BG6=0 AND BG7=0;//DRAWTEXT(BD5 ,LOW,'低点')COL OR RED;//测试低点////DRAWTEXT(BG5,HIGH,'高点')COL OR GREEN;//测试高点////DRAWTEXT(BD1 ,LOW,'低点') ;//测试低点////DRAWTEXT(BG1,HIGH,'高点') ;//测试高点////DRAWTEXT(BD,LOW ,'Y低点');//测试低点////DRAWTEXT(BG,HIGH ,'Y高点') ;//测试高点//JQD:=BARSLAST(BD);//距前低//JQG:=BARSLAST(BG);//距前高////K线包含处理////前面顶部左侧K线第1根是否跟前一根重合//DQBHGG:=(REF(LOW,JQG+1)<=REF(LOW,JQG+2) AND REF(HIGH,JQG+1)>=REF(HIG H,JQG+2)) OR (REF(LOW,JQG+1)>=REF(LOW,JQG+2) AND REF(HIGH,JQG+1)<=REF (HIGH,JQG+2));//前面底部的左侧第一根K线是否跟前一根重合//DDQQBBHH:=(REF(LOW,JQD+1)<=REF(LOW,JQD+2) AND REF(HIGH,JQD+1)>=REF(H IGH,JQD+2)) OR (REF(LOW,JQD+1)>=REF(LOW,JQD+2) AND REF(HIGH,JQD+1)<=R EF(HIGH,JQD+2));//当前位置左右侧跟前面高点点最高点是否包含判断//ADQGYCA:=(REFX(LOW,1)<=REFX(LOW,2) AND REFX(HIGH,1)>=REFX(HIGH,2)) OR (REFX(LOW,1)>=REFX(LOW,2) AND REFX(HIGH,JQG+1)<=REFX(HIGH,2)); KAKDZC:=(REF(LOW,1)<=REF(LOW,2) AND REF(HIGH,1)>=REF(HIGH,2)) OR (REF(L OW,1)>=REF(LOW,2) AND REF(HIGH,JQG+1)<=REF(HIGH,2));BKDQDYC:=(REFX(LOW,1)<=REFX(LOW,2) AND REFX(HIGH,1)>=REFX(HIGH,2)) OR (REFX(LOW,1)>=REFX(LOW,2) AND REFX(HIGH,JQG+1)<=REFX(HIGH,2)); JKDQDZCA:=(REF(LOW,1)<=REF(LOW,2) AND REF(HIGH,1)>=REF(HIGH,2)) OR (REF (LOW,1)>=REF(LOW,2) AND REF(HIGH,JQG+1)<=REF(HIGH,2));//包含成立取最大值////按前面顺序//DZD:=MIN(REF(HIGH,JQD+1),REF(HIGH,JQD+2));GZD:=MAX(REF(LOW,JQG+1),REF(LOW,JQG+2));DQGYC:=MAX(REFX(LOW,1),REFX(LOW,2) );//当前是顶分型，取低点最大值// DQGZC:=MAX(REF(LOW,1),REF(LOW,2));DQDYC:=MIN(REFX(HIGH,1),REFX(HIGH,2) );//当前是底分型，取高点最小值// DQDZC:=MIN(REF(HIGH,1),REF(HIGH,2));//高低点包含关系//BBDQBH:=LOW<REF(LOW,JQG) AND LOW<REF(LOW,JQG+1) AND LOW<REF(LOW,J QG-1);//顶分型底分型包含判断//BDB:=(BD AND LOW<IFELSE(DQBHGG,GZD,REF(LOW,JQG+1)) AND REF(HIGH,JQG)>IFELSE(JKDQDZCA,DQDZC,REF(HIGH,1)) AND REF(HIGH,JQG)>IFELSE(BKDQDYC,DQ DYC,REFX(HIGH,1))AND LOW<REF(CLOSE,JQG+2) AND LOW<IFELSE((REF(HIGH,JQG)>=REF(HIGH,JQG +1) AND REF(LOW,JQG)<=REF(LOW,JQG+1)),REF(LOW,JQG+2),REF(LOW,JQG+1)) AND LOW<IFELSE(REF(HIGH,JQG)>=REF(HIGH,JQG-1)AND REF(LOW,JQG)<=REF(LOW,JQG-1),REF(LOW,JQG-2),REF(LOW,JQG-1))AND REF(HIGH,JQG)>IFELSE(LOW<=REFX(LOW,1) AND HIGH>=REFX(HIGH,1) AND LOW<=REF(LOW,1) AND HIGH>=REF(HIGH,1),REFX(HIGH,2),REFX(HIGH,1))) OR (BARSSINCE(BD)=0 AND COUNT(BG ,BARPOS)=0) OR (BARSSINCE(BD)=0 AND COUNT(BG ,BARPOS)=1 AND BARSLAST(BG)>=4 AND LO W<REF(HIGH,BARSLAST(BG)) AND LOW<REF(LOW,BARSLAST(BG)-1) AND REF(HIGH ,1)<REF(HIGH,BARSLAST(BG)) AND REFX(HIGH,1)<REF(HIGH,BARSLAST(BG))); //当前底分型，最后一句包含缺口情况AND LOW<REF(LOW,JQG)//BGB:=(BG AND REF(LOW,JQD)<IFELSE(KAKDZC,DQGZC,REF(LOW,1)) AND HIGH>REF(CLOSE,JQD+2)AND HIGH>IFELSE(DDQQBBHH,DZD,REF(HIGH,JQD+1))AND REF(LOW,JQD)<IFELSE(ADQGYCA,DQGYC,REFX(LOW,1)) AND HIGH>IFELSE(REF (LOW,JQD)<=REF(LOW,JQD+1)AND REF(HIGH,JQD)>REF(HIGH,JQD+1),REF(HIGH,JQD+2),REF(HIGH,JQD+1))AND HIGH>IFELSE(REF(LOW,JQD)<=REF(LOW,JQD-1)AND REF(HIGH,JQD)>REF(HIGH,JQD-1),REF(HIGH,JQD-2),REF(HIGH,JQD-1))AND REF(LOW,JQD)<IFELSE(HIGH>=REFX(HIGH,1) AND LOW<=REFX(LOW,1) AND HIGH>=REF(HIGH,1) AND LOW<=REF(LOW,1),REFX(LOW,2),REFX(LOW,1))) OR (BARSSINCE(BG)=0 AND COUNT(BD ,BARPOS)=0) OR (BARSSINCE(BG)=0 AND COUNT(BD ,BARPOS)=1 AND BARSLAST(BD)>=4 AND HIGH>REF(LOW,BARSLAST(B D)) AND HIGH>REF(HIGH,BARSLAST(BD)-1) AND REF(LOW,1)>REF(LOW,BARSLAST( BD)) AND REFX(LOW,1)>REF(LOW,BARSLAST(BD)));//当前顶分型,最后一句是包含缺口情况AND HIGH>REF(HIGH,JQD)////DRAWTEXT(BDB,LOW*0.98,'低点')COL OR RED;//测试低点////DRAWTEXT(BGB,HIGH,'高点')COL OR GREEN;//测试高点////HIGH*1.05;////合并同向高低点//JQD1:=BARSLAST(BDB);//距前低//JQG1:=BARSLAST(BGB);//距前高////笔高前一根//BBGQ:=(REFX(BGB,1)=1 AND BARSLAST(BDB)>=3 ) OR (REFX(BGB,1)=1 AND COUNT(BDB,BARPOS)=0 AND COUNT(BGB,BARPOS)=0);//DRAWTEXT(BBGQ ,HIGH,'前')COL OR YELLOW;//测试低点//BBGQ1:=(BBGQ AND COUNT(BBGQ,BARSLAST(BDB))=1) OR ( BARSSINCE(BBGQ)=0); //DRAWTEXT(BBGQ1 ,HIGH*1.05,'第一前')COL OR CYAN;//测试低点////新笔高////合并高点，只合并到距离前低5根K线部分//GG2:=(BGB AND BARSLAST(BDB)>3 AND HIGH>=HHV(HIGH,BARSLAST(BBGQ1)) A ND COUNT(BDB,BARSLAST(BBGQ1))=0);GG:=BACKSET(GG2,BARSLAST(BBGQ1));//DRAWTEXT(GG,HIGH,'1')COL OR YELLOW;//测试低点////DRAWTEXT((GG AND REFX(GG,1)=0),HIGH*1.03,'二高');//XZBG1:=BGB AND BARSLAST(BDB)<4 ;//保留近高//ZGD:=((GG AND REFX(GG,1)=0) OR XZBG1) OR (GG AND ISLASTBAR) OR (BARSSINCE(BGB)=0 AND COUNT(BDB,BARPOS)=0);//获取特殊高序列////新笔低////笔低前一根//BBDQ:=(REFX(BDB,1)=1 AND BARSLAST(BGB)>=3)OR (REFX(BDB,1)=1 AND COUNT(BDB,BARPOS)=0 AND COUNT(BGB,BARPOS)=0); BBDQ1:=(BBDQ AND COUNT(BBDQ,BARSLAST(BGB))=1) OR ( BARSSINCE(BBDQ)=0); //DRAWTEXT(BBDQ ,LOW*0.98,'前')COL OR YELLOW;//测试低点////DRAWTEXT(BBDQ1,LOW*0.96,'第一前')COL OR CYAN;//测试低点////新BD2//DD2:=(BDB AND BARSLAST(BGB)>3 AND LOW<=LLV(LOW,BARSLAST(BBDQ1)) AND COUNT(BGB,BARSLAST(BBDQ1))=0);DD:=BACKSET(DD2,BARSLAST(BBDQ1));//DRAWTEXT(DD,HIGH,'1');//DRAWTEXT((DD AND REFX(DD,1)=0),LOW*0.94,'第二低点');//XZBD1:=BDB AND BARSLAST(BGB)<4;//保留近低//ZDD:=((DD AND REFX(DD,1)=0) OR XZBD1) OR (DD AND ISLASTBAR) OR (BARSSINCE(BDB)=0 AND COUNT(BGB,BARPOS)=0);//获取特殊低序列////精选点////DRAWTEXT(ZGD,HIGH*1.03,'ZGD')COL OR WHITE DRAWABOVE;//DRAWTEXT(ZDD,LOW*0.97,'ZDD')COL OR YELLOW DRAWABOVE;//DRAWTEXT(BDB,LOW,'P低点')COL OR CYAN DRAWABOVE;//DRAWTEXT(BGB,HIGH,'P高点')COL OR RED DRAWABOVE;//定义特征高低点后的，顶分型和底分型//FXD:=LOW<=REF(LOW,1) AND REFX(LOW,1)>=LOW AND REFX(LOW,2)>=LOW AND REFX(LOW,3)>=LOW AND REFX(LOW,4)>=LOW AND REFX(LOW,5)>=LOW ;//DRAWTEXT(FXD,LOW,'FXD');//找出特征低点//TZD:=BACKSET(ZDD AND BARSLAST(ZGD)<4 ,BARSLAST(ZGD));//特征低点向前赋值// TZDD:=(TZD AND REFX(TZD,1)=0) OR (TZD AND ISLASTBAR);//定位特征低点////DRAWTEXT(TZDD,HIGH,'特征低点');//TZG:=BACKSET(ZGD AND BARSLAST(ZDD)<4 ,BARSLAST(ZDD));TZGG:=(TZG AND REFX(TZG,1)=0) OR (TZG AND ISLASTBAR);ZQGD:= BARSSINCE(ZGD)=0 AND COUNT(ZDD,BARPOS)=0;JZD:=(TZDD AND REF(TZGG,BARSLAST(ZGD))=0 AND REF(REF(TZDD,BARSLAST(Z DD)),1)=0) OR (TZDD AND REF(ZQGD,BARSLAST(ZGD)));//找出特征低点//TZDQC:=BACKSET(JZD,BARSLAST(ZGD));//这地方等等再思考//TZDDDDFZ:=(TZDQC AND REFX(TZDQC,1)=0) OR (TZDQC AND ISLASTBAR);//DRAWTEXT(TZDDDDFZ,LOW*0.98,'去除低点')COL OR MAGENTA ;//找出符合条件底分型//JQD9:=BARSLAST(ZDD);//距前低//JQG9:=BARSLAST(ZGD);//距前高////K线包含处理////前面顶部左侧K线第1根是否跟前一根重合//DQBHGG9:=(REF(LOW,JQG9+1)<=REF(LOW,JQG9+2) AND REF(HIGH,JQG9+1)>=REF (HIGH,JQG9+2)) OR (REF(LOW,JQG9+1)>=REF(LOW,JQG9+2) AND REF(HIGH,JQG9 +1)<=REF(HIGH,JQG9+2));//前面底部的左侧第一根K线是否跟前一根重合//DDQQBBHH9:=(REF(LOW,JQD9+1)<=REF(LOW,JQD9+2) AND REF(HIGH,JQD9+1)>=R EF(HIGH,JQD9+2)) OR (REF(LOW,JQD9+1)>=REF(LOW,JQD9+2) AND REF(HIGH,JQD 9+1)<=REF(HIGH,JQD9+2));//当前位置左右侧跟前面高点点最高点是否包含判断//ADQGYCA9:=(REFX(LOW,1)<=REFX(LOW,2) AND REFX(HIGH,1)>=REFX(HIGH,2)) OR (REFX(LOW,1)>=REFX(LOW,2) AND REFX(HIGH,JQG9+1)<=REFX(HIGH,2)); KAKDZC9:=(REF(LOW,1)<=REF(LOW,2) AND REF(HIGH,1)>=REF(HIGH,2)) OR (REF( LOW,1)>=REF(LOW,2) AND REF(HIGH,JQG9+1)<=REF(HIGH,2));BKDQDYC9:=(REFX(LOW,1)<=REFX(LOW,2) AND REFX(HIGH,1)>=REFX(HIGH,2)) OR (REFX(LOW,1)>=REFX(LOW,2) AND REFX(HIGH,JQG9+1)<=REFX(HIGH,2)); JKDQDZCA9:=(REF(LOW,1)<=REF(LOW,2) AND REF(HIGH,1)>=REF(HIGH,2)) OR (RE F(LOW,1)>=REF(LOW,2) AND REF(HIGH,JQG9+1)<=REF(HIGH,2));//包含成立取最大值////按前面顺序//DZD9:=MIN(REF(HIGH,JQD9+1),REF(HIGH,JQD9+2));GZD9:=MAX(REF(LOW,JQG9+1),REF(LOW,JQG9+2));DQGYC9:=MAX(REFX(LOW,1),REFX(LOW,2) );//当前是顶分型，取低点最大值// DQGZC9:=MAX(REF(LOW,1),REF(LOW,2));DQDYC9:=MIN(REFX(HIGH,1),REFX(HIGH,2) );//当前是底分型，取高点最小值// DQDZC9:=MIN(REF(HIGH,1),REF(HIGH,2));//高低点包含关系//BBDQBH9:=LOW<REF(LOW,JQG9) AND LOW<REF(LOW,JQG9+1) AND LOW<REF(LO W,JQG9-1);//找出特征低点后符合条件的底分型//FHFXD:= BARSLAST(ZDD)<BARSLAST(ZGD) AND BARSLAST(ZGD)>=4 AND FXD A ND COUNT(ZDD,BARSLAST(ZGD))=1 AND REF(TZDDDDFZ,BARSLAST(ZDD)) AND HI GH<REF(HIGH,BARSLAST(ZGD));//DRAWTEXT(FHFXD,LOW,'底分型')COL OR RED;//顶分型底分型包含判断//BDB9:=(FHFXD AND LOW<IFELSE(DQBHGG9,GZD9,REF(LOW,JQG9+1)) AND REF(HI GH,JQG9)>IFELSE(JKDQDZCA9,DQDZC9,REF(HIGH,1)) AND REF(HIGH,JQG9)>IFELSE( BKDQDYC9,DQDYC9,REFX(HIGH,1))AND LOW<REF(CLOSE,JQG9+2) AND LOW<REF(LOW,JQG9-1)AND LOW<IFELSE((REF(HIGH,JQG9)>=REF(HIGH,JQG9+1)AND REF(LOW,JQG9)<=REF(LOW,JQG9+1)),REF(LOW,JQG9+2),REF(LOW,JQG9+1)) AND LOW<IFELSE(REF(HIGH,JQG9)>=REF(HIGH,JQG9-1)AND REF(LOW,JQG9)<=REF(LOW,JQG9-1),REF(LOW,JQG9-2),REF(LOW,JQG9-1))AND REF(HIGH,JQG9)>IFELSE(LOW<=REFX(LOW,1) AND HIGH>=REFX(HIGH,1) AND LOW<=REF(LOW,1) AND HIGH>=REF(HIGH,1),REFX(HIGH,2),REFX(HIGH,1)) ); //当前底分型，最后一句包含缺口情况AND LOW<REF(LOW,JQG)////DRAWTEXT(BDB9,LOW*0.98,'底分型')COL OR YELLOW;//定位第一个底分型////定位底分型左边一根//DFXZC1:=REFX(BDB9,1)=1 ;DFXZC:=DFXZC1 AND COUNT(DFXZC1,BARSLAST(ZGD))=1;//DRAWTEXT(BARSNEXT(BDB9)=1,LOW,'前')COL OR RED;//DRAWTEXT(DFXZC,HIGH,'第一前')COL OR GREEN;//DWDFXZCFZ:=BACKSET(BDB9 AND LOW<=LLV(LOW,BARSLAST(DFXZC)) AND COUNT (ZGD,BARSLAST(DFXZC))=0,BARSLAST(DFXZC));DWDYZC:=DWDFXZCFZ AND REFX(DWDFXZCFZ,1)=0;//DRAWTEXT(DWDYZC,LOW*0.95,'Z底分型')COL OR CYAN;//TZDQCHD1:=((ZDD AND TZDDDDFZ=0) OR DWDYZC) OR (DWDFXZCFZ AND ISLASTBAR) OR (BARSSINCE(ZDD)=0 AND COUNT(ZGD,BARPOS)=0);//特征低去除后低点，产生新低点序列记为TZDQCHD////DRAWTEXT(TZDQCHD1,LOW*0.95,'新低序列')COL OR RED;////合并低点//DDQ:=(REFX(TZDQCHD1,1)=1 ) OR(REFX(TZDQCHD1,1)=1 AND COUNT(ZGD,BARPOS)=0 AND COUNT(TZDQCHD1,BARP OS)=0);//DRAWTEXT(DDQ,LOW,'前');DDQ1:=(DDQ AND COUNT(DDQ,BARSLAST(ZGD))=1) OR (BARSSINCE(DDQ)=0);//DRAWTEXT(DDQ1,LOW*0.98,'第一前')COL OR CYAN;//TZDCJDW:=BACKSET(TZDQCHD1 AND LOW<=LLV(LOW,BARSLAST(DDQ1)) AND COU NT(ZGD,BARSLAST(DDQ1))=0,BARSLAST(DDQ1));//DRAWTEXT(TZDCJDW ,HIGH,'1')COL OR GREEN;//TZDQCHD:=(TZDCJDW AND REFX(TZDCJDW,1)=0) OR (TZDCJDW AND ISLASTBAR); //验证////DRAWTEXT(TZDQCHD,LOW*0.98,'新低') ;//合并高点//GDQQ:=(REFX(ZGD,1)=1 )OR (REFX(ZGD,1)=1 AND COUNT(ZGD,BARPOS)=0 AND COUNT(TZDQCHD,BARPOS) =0);//高点前一根//GDQQ1:=(GDQQ AND COUNT(GDQQ,BARSLAST(TZDQCHD))=1) OR (BARSSINCE(GDQQ)=0);FZXGD:=BACKSET(ZGD AND HIGH>=HHV(HIGH,BARSLAST(GDQQ1)) AND COUNT(TZ DQCHD,BARSLAST(GDQQ1))=0 ,BARSLAST(GDQQ1) );//赋值新高点，合并,修改过，添加COUNT(ZDD,BARSLAST(GDQQ1))=0////验证////DRAWTEXT(FZXGD,HIGH,'1');//DRAWTEXT(GDQQ,HIGH,'前')COL OR MAGENTA;//DRAWTEXT(GDQQ1,HIGH*0.95,'第一前')COL OR CYAN;////合并低点后形成的新高点//TZDQCHG:=((FZXGD AND REFX(FZXGD,1)=0)) OR (FZXGD AND ISLASTBAR) ;//DRAWTEXT(TZDQCHG,HIGH,'新高') ;//找出特征高点//TZD1:=BACKSET(TZDQCHD AND BARSLAST(TZDQCHG)<4 ,BARSLAST(TZDQCHG));//标记特征低点//TZDD1:=(TZD1 AND REFX(TZD1,1)=0) OR (TZD1 AND ISLASTBAR);//区分特征低点序列//TZG1:=BACKSET(TZDQCHG AND BARSLAST(TZDQCHD)<4 ,BARSLAST(TZDQCHD));//标记特征高点//TZGG1:=(TZG1 AND REFX(TZG1,1)=0) OR (TZG1 AND ISLASTBAR);//区分特征高点序列//ZQDD:=ZDD AND COUNT(ZGD,BARPOS)=0;//最前低点//JZG1:=(TZGG1 AND REF(TZDD1,BARSLAST(TZDQCHD))=0 AND REF(REF(TZGG1,B ARSLAST(TZDQCHG)),1)=0) OR (TZGG1 AND REF(ZQDD,BARSLAST(TZDQCHD)));//找出特征高点//TZGQC1:=BACKSET(JZG1,BARSLAST(TZDQCHD));//去除特征高//TZGQCFZ:=(TZGQC1 AND REFX(TZGQC1,1)=0) OR (TZGQC1 AND ISLASTBAR);//标记定位特征高////DRAWTEXT(TZGQCFZ,HIGH*1.05,'去除高点')COL OR MAGENTA;//定义顶分型//FXG:= HIGH>=REF(HIGH,1) AND REFX(HIGH,1)<=HIGH;//找出符合条件底分型//JQD10:=BARSLAST(TZDQCHD);//距前低//JQG10:=BARSLAST(TZDQCHG);//距前高////K线包含处理////前面顶部左侧K线第1根是否跟前一根重合//DQBHGG10:=(REF(LOW,JQG10+1)<=REF(LOW,JQG10+2) AND REF(HIGH,JQG10+1)> =REF(HIGH,JQG10+2)) OR (REF(LOW,JQG10+1)>=REF(LOW,JQG10+2) AND REF(HI GH,JQG10+1)<=REF(HIGH,JQG10+2));//前面底部的左侧第一根K线是否跟前一根重合//DDQQBBHH10:=(REF(LOW,JQD10+1)<=REF(LOW,JQD10+2) AND REF(HIGH,JQD10+1 )>=REF(HIGH,JQD10+2)) OR (REF(LOW,JQD10+1)>=REF(LOW,JQD10+2) AND REF( HIGH,JQD10+1)<=REF(HIGH,JQD10+2));//当前位置左右侧跟前面高点点最高点是否包含判断//ADQGYCA10:=(REFX(LOW,1)<=REFX(LOW,2) AND REFX(HIGH,1)>=REFX(HIGH,2)) O R (REFX(LOW,1)>=REFX(LOW,2) AND REFX(HIGH,JQG10+1)<=REFX(HIGH,2)); KAKDZC10:=(REF(LOW,1)<=REF(LOW,2) AND REF(HIGH,1)>=REF(HIGH,2)) OR (REF (LOW,1)>=REF(LOW,2) AND REF(HIGH,JQG10+1)<=REF(HIGH,2));BKDQDYC10:=(REFX(LOW,1)<=REFX(LOW,2) AND REFX(HIGH,1)>=REFX(HIGH,2)) O R (REFX(LOW,1)>=REFX(LOW,2) AND REFX(HIGH,JQG10+1)<=REFX(HIGH,2)); JKDQDZCA10:=(REF(LOW,1)<=REF(LOW,2) AND REF(HIGH,1)>=REF(HIGH,2)) OR (REF(LOW,1)>=REF(LOW,2) AND REF(HIGH,JQG10+1)<=REF(HIGH,2));//包含成立取最大值////按前面顺序//DZD10:=MIN(REF(HIGH,JQD10+1),REF(HIGH,JQD10+2));GZD10:=MAX(REF(LOW,JQG10+1),REF(LOW,JQG10+2));DQGYC10:=MAX(REFX(LOW,1),REFX(LOW,2) );//当前是顶分型，取低点最大值// DQGZC10:=MAX(REF(LOW,1),REF(LOW,2));DQDYC10:=MIN(REFX(HIGH,1),REFX(HIGH,2) );//当前是底分型，取高点最小值// DQDZC10:=MIN(REF(HIGH,1),REF(HIGH,2));//高低点包含关系//BBDQBH10:=LOW<REF(LOW,JQG10) AND LOW<REF(LOW,JQG10+1) AND LOW<REF( LOW,JQG10-1);//找出特征高点后符合条件的顶分型//FHFXG:=BARSLAST(TZDQCHD)>BARSLAST(TZDQCHG) AND BARSLAST(TZDQCHD)>=4 AND FXG AND COUNT(TZDQCHG,BARSLAST(TZDQCHD))=1 AND REF(TZGQCFZ,BARSLA ST(TZDQCHG)) AND HIGH>REF(HIGH,BARSLAST(TZDQCHD));//DRAWTEXT(FHFXG,HIGH*1.03,'顶分型')COL OR YELLOW;//顶分型底分型包含判断//BGB10:=(FHFXG AND HIGH>IFELSE(DDQQBBHH10,DZD10,REF(HIGH,JQD10+1)) AND REF(LOW,JQD10)<IFELSE(ADQGYCA10,DQGYC10,REFX(LOW,1)) AND REF(LOW,JQD1 0)<IFELSE(KAKDZC10,DQGZC10,REF(LOW,1)) AND HIGH>REF(CLOSE,JQD10+2) AND HIGH>IFELSE(REF(LOW,JQD10)<=REF(LOW,JQD10+1)AND REF(HIGH,JQD10)>REF(HIGH,JQD10+1),REF(HIGH,JQD10+2),REF(HIGH,JQD10+ 1)) AND HIGH>IFELSE(REF(LOW,JQD10)<=REF(LOW,JQD10-1) AND REF(HIGH,JQD10)>REF(HIGH,JQD10-1),REF(HIGH,JQD10-2),REF(HIGH,JQD10-1)) AND REF(LOW,JQD10)<IFELSE(HIGH>=REFX(HIGH,1) AND LOW<=REFX(LOW,1) AND HIGH>=REF(HIGH,1) AND LOW<=REF(LOW,1),REFX(LOW,2),REFX(LOW,1)));//当前顶分型,最后一句是包含缺口情况AND HIGH>REF(HIGH,JQD)////DRAWTEXT(BGB10,HIGH,'顶分型')COL OR RED;////定位顶分型左边一根//GFXZC1:=REFX(BGB10,1)=1;GFXZC:=GFXZC1 AND COUNT(GFXZC1,BARSLAST(TZDQCHG))=1;//赋值第一个CFXZC////DRAWTEXT(BARSNEXT(BGB10)=1 ,LOW,'前')COL OR RED;//DRAWTEXT(GFXZC,HIGH,'第一前')COL OR GREEN;//DWGFXZCFZ:=BACKSET(BGB10 AND HIGH>=HHV(HIGH,BARSLAST(GFXZC)) AND CO UNT(TZDQCHD,BARSLAST(GFXZC))=0,BARSLAST(GFXZC));//DRAWTEXT(DWGFXZCFZ,HIGH,'1');//DWDYGZC:=(DWGFXZCFZ AND REFX(DWGFXZCFZ,1)=0) OR (DWGFXZCFZ AND ISLASTBAR);//DRAWTEXT(DWDYGZC,HIGH*1.03,'Z顶分型')COL OR CYAN;//TZGQCHGG1:=((TZDQCHG AND TZGQCFZ=0) OR DWDYGZC) OR (BARSSINCE(ZGD)=0 AND COUNT(TZDQCHD,BARPOS)=0);//特征高去除后低点，产生新高点序列记为TZGQCHG1//;//验证////DRAWTEXT(TZDQCHG AND TZGQCFZ=0,HIGH,'高点')COL OR MAGENTA;////合并高点//ZZGQ:=REFX(TZGQCHGG1,1)=1;ZZGQ1:=(ZZGQ AND COUNT(ZZGQ,BARSLAST(TZDQCHD))=1) OR (BARSSINCE(ZZGQ)=0);TZGDZZFZ:=BACKSET(TZGQCHGG1 AND HIGH>=HHV(HIGH,BARSLAST(ZZGQ1)) AND COUNT(TZDQCHD,BARSLAST(ZZGQ1))=0,BARSLAST(ZZGQ1));//验证////DRAWTEXT(ZZGQ,HIGH,'前')COL OR MAGENTA;//DRAWTEXT(ZZGQ1,HIGH*0.95,'第一前')COL OR CYAN;//TZGQCHG1:=(TZGDZZFZ AND REFX(TZGDZZFZ,1)=0) OR (TZGDZZFZ AND ISLASTBAR) OR (BARSSINCE(TZGQCHGG1)=0 AND COUNT(TZDQCHD,BARPOS)=0);//最新高////DRAWTEXT(TZGQCHG1,HIGH*0.98,'新高')COL OR MAGENTA;////合并低点//ZZDDQ:=REFX(TZDQCHD,1)=1;//相对上一新高点，合并低点，定义新低点//ZZDDQ1:=(ZZDDQ AND COUNT(ZZDDQ,BARSLAST(TZGQCHG1))=1)OR (BARSSINCE(ZZDDQ)=0);FZXDD1:=BACKSET(TZDQCHD AND LOW<=LLV(LOW,BARSLAST(ZZDDQ1)) AND CO UNT(TZGQCHG1,BARSLAST(ZZDDQ1))=0 ,BARSLAST(ZZDDQ1));//赋值新高点，合并// //验证////DRAWTEXT(ZZDDQ,HIGH,'前')COL OR MAGENTA;//DRAWTEXT(ZZDDQ1,HIGH*0.95,'第一前')COL OR CYAN;//TZGQCHD1:=(FZXDD1 AND REFX(FZXDD1,1)=0) OR (FZXDD1 AND ISLASTBAR) OR (BARSSINCE(TZDQCHD)=0 AND COUNT(TZGQCHG1,BARPOS)=0);//合并低点后形成的新低点////再次去除特征高低点//BBD:=TZGQCHD1;BBG:=TZGQCHG1;C1:=BBG OR BBD;POLYLINE( C1,IFELSE(BBD,LOW,HIGH) , IFELSE(BBD,COLORRED, COLORGREEN) ) ,POINTDOT;。

炒股干货分享：缠论抄底与逃顶指标，波段获利必备（附源代码）

炒股干货分享：缠论抄底与逃顶指标，波段获利必备（附源代码）

炒股干货分享：缠论抄底与逃顶指标，波段获利必备（附源代码）适合自己的指标，才是好指标。

本指标是股市缠论高手根据缠论的相关理论编写，去年一位研究缠论的职业投资股友分享给阁主，感觉对做波段有着重要的参考，今天把它分享给学习或喜欢研究缠论的股友们，希望能给大家带来一定的价值。

咱们先看缠论顶底指标效果展示：案例一案例二案列三案例四案例五缠论顶底指标，给人感觉用来做短线或波点蛮不错的，但是请注意：本指标含有未来函数，对未来函数有忌讳的股友请忽视。

下面，咱们分享一下缠论顶底指标的具体使用流程。

第一步第二步第三步第四步下面是缠论顶底的源代码:顶:=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:=LGP:=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<>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="">STICKLINE(CLOSE< ref(close,1)="" ,open,close,3,0=""> STICKLINE(CLOSE< ref(close,1)="" ,open,close,2.7,0=""> STICKLINE(CLOSE< ref(close,1)="" ,open,close,2.1,0=""> STICKLINE(CLOSE< ref(close,1)="" ,open,close,1.5,0=""> STICKLINE(CLOSE< ref(close,1)="" ,open,close,0.9,0=""> STICKLINE(CLOSE< ref(close,1)="" ,open,close,0.3,0=""> {笔底分型选股预警确保向下笔成立后的底分型}V00:= HIGH<>V01:= HIGHREF(LOW,1);V02:= HIGH>REF(HIGH,1) AND LOW<>V03:= HIGH>REF(HIGH,1) AND LOW>REF(LOW,1);V04:= REF(HIGH,2) < high="" and="" ref(low,2)=""><>AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) <>V1:= COUNT(V00,6)>=3 AND COUNT(V01 OR V02,5)=0 AND LLVBARS(LOW,6) = 1 AND HHVBARS(HIGH,6) >= 5 AND V03;V2:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 2 AND HHVBARS(HIGH,7) >= 6 AND V04;V3:= COUNT(V00,7)>=3 AND COUNT(V01 OR V02,6)=1 AND LLVBARS(LOW,7) = 1 AND HHVBARS(HIGH,7) >= 6 AND V03;V4:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 and="" llvbars(low,8)="2" and="" hhvbars(high,8)="">= 7 AND V04;V5:= COUNT(V00,8)>=3 AND COUNT(V01 OR V02,7)<=2 and="" llvbars(low,8)="1" and="" hhvbars(high,8)="">= 7 AND V03;V6:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 and="" llvbars(low,9)="2" and="" hhvbars(high,9)="">= 8 AND V04;V7:= COUNT(V00,9)>=3 AND COUNT(V01 OR V02,8)<=3 and="" llvbars(low,9)="1" and="" hhvbars(high,9)="">= 8 AND V03;V8:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 and="" llvbars(low,10)="2" and="" hhvbars(high,10)="">= 9 AND V04;V9:= COUNT(V00,10)>=3 AND COUNT(V01 OR V02,9)<=4 and="" llvbars(low,10)="1" and="" hhvbars(high,10)="">= 9 AND V03;V10:= COUNT(V00,11)>=3 AND COUNT(V01 OR V02,10)<=5 and="" llvbars(low,11)="2" and="" hhvbars(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:= HIGHREF(LOW,1);HV02:= HIGH>REF(HIGH,1) AND LOW<>HV03:= HIGH<>HV04:= REF(HIGH,2) > HIGH AND REF(LOW,2) > LOW AND REF(HIGH,2) > REF(HIGH,1) AND REF(LOW,2) <>HV1:= COUNT(HV00,6)>=3 AND COUNT(HV01 OR HV02,5)=0 AND HHVBARS(HIGH,6) = 1 AND LLVBARS(LOW,6) >= 5 AND HV03;HV2:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 2 AND LLVBARS(LOW,7) >= 6 AND HV04;HV3:= COUNT(HV00,7)>=3 AND COUNT(HV01 OR HV02,6)=1 AND HHVBARS(HIGH,7) = 1 AND LLVBARS(LOW,7) >= 6 AND HV03;HV4:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 and="" hhvbars(high,8)="2" and="" llvbars(low,8)="">= 7 AND HV04;HV5:= COUNT(HV00,8)>=3 AND COUNT(HV01 OR HV02,7)<=2 and="" hhvbars(high,8)="1" and="" llvbars(low,8)="">= 7 AND HV03;HV6:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 and="" hhvbars(high,9)="2" and="" llvbars(low,9)="">= 8 AND HV04;HV7:= COUNT(HV00,9)>=3 AND COUNT(HV01 OR HV02,8)<=3 and="" hhvbars(high,9)="1" and=""llvbars(low,9)="">= 8 AND HV03;HV8:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 and="" hhvbars(high,10)="2" and="" llvbars(low,10)="">= 9 AND HV04;HV9:= COUNT(HV00,10)>=3 AND COUNT(HV01 OR HV02,9)<=4 and="" hhvbars(high,10)="1" and="" llvbars(low,10)="">= 9 AND HV03;HV10:= COUNT(HV00,11)>=3 AND COUNT(HV01 OR HV02,10)<=5 and="" hhvbars(high,11)="2" and="" 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);本文不推荐股票，只做技术分享，投资有风险，操作需谨慎。

文华财经指标公式期货软件指标公式缠论、顶底背离、金叉死叉,买卖提示指标3

文华财经指标公式期货软件指标公式缠论、顶底背离、金叉死叉,买卖提示指标3

缠论、顶底背离、金叉死叉，买卖提示指标3：DIFF :EMA(CLOSE,12) - EMA(CLOSE,26);DEA :EMA(DIFF,9);MACD :2*(DIFF-DEA);ZERO :0;落差:=DIFF-REF(DIFF,1);斜率:=落差/REF(落差,1);STICKLINE(MACD>0 AND MACD>=REF(MACD,1),0,MACD,8,0),COLOR0000FF; STICKLINE(MACD>0 AND MACD<REF(MACD,1),0,MACD,8,0),COLORFF0000; STICKLINE(MACD<0 AND MACD>=REF(MACD,1),0,MACD,8,0),COLORFF00FF; STICKLINE(MACD<0 AND MACD<REF(MACD,1),0,MACD,8,0),COLOR00FF00;GJ:=MAX(C,O);L4:=LLV(GJ,4);GT:=DEA>REF(DEA,1) AND REF(DEA,1)<REF(DEA,2);A1:=BARSLAST(REF(CROSS(DIFF,DEA),1));底背离:=REF(CLOSE,A1+1)>CLOSE AND DIFF>REF(DIFF,A1+1) AND CROSS(DIFF,DEA); STICKLINE(底背离,DEA*1.09,DEA*0.86,6,0),COLOR00FF00;DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORRED,LINETHICK2;DRAWTEXT(底背离,DEA*1.09,'底背离'),COLOR6600FF;STICKLINE(底背离,DEA*1.09,DEA*0.86,8,0),COLORYELLOW;H4:=HHV(GJ,4);GT2:=DEA<REF(DEA,1) AND REF(DEA,1)>REF(DEA,2);A2:=BARSLAST(REF(GT2,1));顶背离:= REF(H4,A2+1)<H4 AND DIFF<REF(DIFF,A2+1) AND GT2;DRAWLINE(A2=0 ,DEA,顶背离,REF(DEA,GT2),0),COLORGREEN,LINETHICK2; DRAWTEXT(顶背离,REF(DEA,GT2)*1.07,'顶背离'),COLORGREEN;低位金叉:=CROSS(DIFF,DEA) AND DIFF<-0.1;STICKLINE(低位金叉,DEA*0.86,DEA*0.66,6,0),COLORYELLOW;DRAWTEXT(低位金叉,DEA*0.86,' 低位金叉'),COLORYELLOW;突破零轴:=CROSS(DIFF,0) AND DEA <DIFF;STICKLINE(突破零轴,DIFF*0.86,DIFF*0.66,6,0),COLORYELLOW;DRAWTEXT(突破零轴,DEA*0.86,' 突破零轴'),COLORWHITE;跌破零轴:=CROSS(0,DIFF) AND DEA >DIFF;STICKLINE(跌破零轴,DIFF*0.86,DIFF*0.66,6,0),COLORRED;DRAWTEXT(跌破零轴,DEA*2.86,' 跌破零轴'),COLORRED;。

顶底分型分类

顶底分型分类

*顶底分型分类A:{顶底分型}STICKLINE(1,H,L,1.5,0),COLORGREEN;{----------};{双K线的9种排列及代号的数学原理-残月08制作于2011.12.04};{8种底分型和8种顶分型的数学原理-残月08制作于2011.12.04};MA1K高:=IF(H>REF(H,1),1,IF(H=REF(H,1),0,IF(H<REF(H,1),-1,0)));MA1K低:=IF(L>REF(L,1),1,IF(L=REF(L,1),0,IF(L<REF(L,1),-1,0)));MA1K:=MA1K高+MA1K低;MA1K昨:=REF(MA1K,1);底转强:=IF(MA1K=2 AND MA1K昨<2,10,0);顶转弱:=IF(MA1K=-2 AND MA1K昨>-2,10,0);底:=IF(底转强=10 AND REF(底转强,1)=0,10,0);顶:=IF(顶转弱=10 AND REF(顶转弱,1)=0,10,0);{----------};STICKLINE(底=10,H,L,1.5,0),COLORRED;STICKLINE(顶=10,H,L,1.5,0),COLORBLUE;B:MA5:MA(C,5);MA13:MA(C,13);MA34:MA(C,34);kx:="chanlun@kxian";{这个放第一个要不会出问题滴-_-\\\~~}kxg:="chanlun@kxg";kxd:="chanlun@kxd";kxx:="chanlun@kxfx";笔:="chanlun@bi";笔周期:"chanlun@bilast",linethick0, coloryellow;bilast:="chanlun@bilast";{笔周期};段:="chanlun@duan";段周期:"chanlun@duanlast", linethick0, coloryellow;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, 20, 502), colorf00ff0;STICKLINE(zszg>zszd AND duanfx=-1, zszg, zszd, 20, 502), colore6002d;{中枢震荡监视器}DRAWLINE(zsks=1, zszz, zsjs=1, zszz, 0), coloryellow;{画中枢END}zslx:="chanlun@zslx"(段);{高级别走势类型中枢本级别走势构成的中枢}zslxA:="chanlun@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(笔=1,h,笔=-1,l,0),coloryellow,linethick1;drawline(笔=-1,l,笔=1,h,0),coloryellow,linethick1;drawline(段=1,h,段=-1,l,0),colorblue,linethick1;drawline(段=-1,l,段=1,h,0),colorblue,linethick1;drawline(zslx=1, kxg, zslx=-1, kxd, 0),CIRCLEDOT,colorRed, linethick2;drawline(zslx=-1, kxd, zslx=1, kxg, 0),CIRCLEDOT,colorRed, linethick2;drawline(zslxA=1, kxg, zslxA=-1, kxd,0),CIRCLEDOT,colorMagenta, linethick2;drawline(zslxA=-1, kxd, zslxA=1, kxg, 0),CIRCLEDOT,colorMagenta, linethick2;{涨停彩色}STICKLINE((C-REF(C,1))/REF(C,1)>0.095,C,O,10,0),COLORMAGENTA;A1:=BARSLAST(REF(CROSS("MACD.DIF"(12,26,9),"MACD.DE A"(12,26,9)),1));B1:=REF(C,A1+1)>C AND REF("MACD.DIF"(12,26,9),A1+1)<"MACD.DIF"(12,26,9) AND CROSS("MACD.DIF"(12,26,9),"MACD.DEA"(12,26,9));底背离MACD:DRAWTEXT(FILTER(B1>0,5),LOW,'1'),COLORYELLOW;DRAWTEXT(FILTER(B1>0,5),LOW*0.98,'MACD底背离'),COLOR00FF00;A2:=BARSLAST(REF(CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3)),1));B2:=REF(C,A2+1)>C AND REF("KDJ.K"(9,3,3),A2+1)<"KDJ.K"(9,3,3) AND CROSS("KDJ.K"(9,3,3),"KDJ.D"(9,3,3));底背离KDJ:DRAWTEXT(FILTER(B2>0,5),LOW,'▲'),COLORYELLOW;DRAWTEXT(FILTER(B2>0,5),LOW*0.98,'KDJ底背离'),COLORRED;A3:=BARSLAST(REF(CROSS("RSI.RSI1"(8,55,55),"RSI.RSI2"(8, 55,55)),1));B3:=REF(C,A3+1)>C AND REF("RSI.RSI1"(8,55,55),A3+1)<"RSI.RSI1"(8,55,55) AND CROSS("RSI.RSI1"(8,55,55),"RSI.RSI2"(8,55,55));底背离RSI:DRAWTEXT(FILTER(B3>0,5),LOW,'▲'),COLORYELLOW;DRAWTEXT(FILTER(B3>0,5),LOW*0.98,'RSI底背离'),COLORF0F000;A4:=BARSLAST(REF(CROSS("DMI.PDI"(14,6),"DMI.MDI"(14,6 )),1));B4:=REF(C,A4+1)>C AND REF("DMI.PDI"(14,6),A4+1)<"DMI.PDI"(14,6) AND CROSS("DMI.PDI"(14,6),"DMI.MDI"(14,6));底背离DMI:DRAWTEXT(FILTER(B4>0,5),LOW,'▲'),COLORYELLOW;DRAWTEXT(FILTER(B4>0,5),LOW*0.98,'DMI底背离'),COLORF00FF0;C1:=BARSLAST(REF(CROSS("MACD.DEA"(12,26,9),"MACD.DI F"(12,26,9)),1));D1:=REF(C,C1+1)<C AND REF("MACD.DIF"(12,26,9),C1+1)>"MACD.DIF"(12,26,9) AND CROSS("MACD.DEA"(12,26,9),"MACD.DIF"(12,26,9));顶背离MACD:DRAWTEXT(FILTER(D1>0,5),HIGH*1.02,'▲'),COLOR00FF0 0;DRAWTEXT(FILTER(D1>0,5),HIGH*1.04,'MACD顶背离'),COLORRED;C2:=BARSLAST(REF(CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3)),1));D2:=REF(C,C2+1)<C AND REF("KDJ.K"(9,3,3),C2+1)>"KDJ.K"(9,3,3) AND CROSS("KDJ.D"(9,3,3),"KDJ.K"(9,3,3));顶背离KDJ:DRAWTEXT(FILTER(D2>0,5),HIGH*1.02,'▲'),COLOR00FF00;DRAWTEXT(FILTER(D2>0,5),HIGH*1.04,'KDJ顶背离'),COLORF00FF0;C3:=BARSLAST(REF(CROSS("RSI.RSI2"(8,55,55),"RSI.RSI1"(8, 55,55)),1));D3:=REF(C,C3+1)<C AND REF("RSI.RSI1"(8,55,55),C3+1)>"RSI.RSI1"(8,55,55) AND CROSS("RSI.RSI2"(8,55,55),"RSI.RSI1"(8,55,55));顶背离RSI:DRAWTEXT(FILTER(D3>0,5),HIGH*1.02,'▲'),COLOR00FF00;DRAWTEXT(FILTER(D3>0,5),HIGH*1.04,'RSI顶背离'),COLORYELLOW;C4:=BARSLAST(REF(CROSS("DMI.MDI"(14,6),"DMI.PDI"(14,6 )),1));D4:=REF(C,C4+1)<C AND REF("DMI.PDI"(14,6),C4+1)>"DMI.PDI"(14,6) AND CROSS("DMI.MDI"(14,6),"DMI.PDI"(14,6));顶背离DMI:DRAWTEXT(FILTER(D4>0,5),HIGH*1.02,'▲'),COLOR00FF00;DRAWTEXT(FILTER(D4>0,5),HIGH*1.04,'DMI顶背离'),COLORF0F000;{顶底分型}STICKLINE(1,H,L,1.5,0),COLORGREEN;{----------};{双K线的9种排列及代号的数学原理-残月08制作于2011.12.04};{8种底分型和8种顶分型的数学原理-残月08制作于2011.12.04};MA1K高:=IF(H>REF(H,1),1,IF(H=REF(H,1),0,IF(H<REF(H,1),-1,0)));MA1K低:=IF(L>REF(L,1),1,IF(L=REF(L,1),0,IF(L<REF(L,1),-1,0)));MA1K:=MA1K高+MA1K低;MA1K昨:=REF(MA1K,1); 底转强:=IF(MA1K=2 AND MA1K昨<2,10,0);顶转弱:=IF(MA1K=-2 AND MA1K昨>-2,10,0);底:=IF(底转强=10 AND REF(底转强,1)=0,10,0);顶:=IF(顶转弱=10 AND REF(顶转弱,1)=0,10,0);{----------};STICKLINE(底=10,H,L,1.5,0),COLORRED; STICKLINE(顶=10,H,L,1.5,0),COLORBLUE;。

缠中说禅量化交易系统

缠中说禅量化交易系统

缠中说禅量化交易系统函数使用说明1.Chdlm 缠论动力调用函数，CHDLM(CLOSE,1)：返回的动力数值，CHDLM(CLOSE,2)：返回值1表示动力底，返回值-1表示动力顶,CHDLM(CLOSE,3)：返回值1表示底背离买点，返回值-1表示顶背离卖点。

可以结合其他函数，进行画线，画标识，选股，预警等。

使用例子：CHDL2.Macdnum 返回MACD的参数MACDNUM(1)：返回周期数值1，供MACD函数调用MACDNUM(2)：返回周期数值2，供MACD函数调用MACDNUM(3)：返回周期数值3，供MACD函数调用使用例子：三级别MACD3.Kxian K线的初始化KXIAN（HIGH,LOW）;所有与笔有关的调用，必须先进行此函数的调用使用例子：CHFB4.Chbi 返回缠论笔顶底，返回值1笔的顶，返回值-1笔的底CHBI(P)：P参数可以选择11,12,21,22,31,32；51（高级版选用）CHBI(11) 严格新笔CHBI(12) 严格老笔CHBI(21) 不考虑第一元素和第三元素对顶底的包含的新笔CHBI(22) 不考虑第一元素和第三元素对顶底的包含的老笔CHBI(31) 考虑第一元素不考虑第三元素对顶底的包含的新笔CHBI(32) 考虑第一元素不考虑第三元素对顶底的包含的老笔CHBI(51) 将分型直接相连，不考虑包含及共用K线使用例子：CHFB5.Chbinum 返回缠论一笔中K线的根数CHBINUM(P)：P参数可以选择11,12,21,22,31,32；51（高级版选用）P的取值参考CHBI使用例子见：CHFB6.Chibs 返回缠论笔的状态（向上，向下，顶分型，底分型）CHBIS(P)：P参数可以选择11,12,21,22,31,32；51（高级版选用）P的取值参考CHBI返回值1，代表顶分型，返回值-1，代表底分型返回值2，代表向上笔返回值3，代表向下笔使用例子见：个股矩阵7.Chduan 返回缠论线段的顶底，返回值1 线段的顶，返回值-1 线段的底CHDUAN; 线段的划分之前，必须有笔的划分。

  1. 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
高保留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);
局部低点预选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);
高保留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);
距前低天:=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);
低保留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));
局部高点预选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);
低保留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);
预判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);
极点保留:=IF(AAAD=0,高保留YX+低保留YX,AAAD);
局部极点:IF(极点保留=-1,L,IF(极点保留=1,H,DRAWNULL)) CIRCLEDOT COLORYELLOW;
DRAWLINE(极点保留=-1,局部极点,极点保留=1,局部极点,0)COLORBLUE,LINETHICK3;
高保留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);
判断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);
高保留:=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);
预判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,D 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);
低保留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);
低保留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);
DRAWLINE(极点保留=1,局部极点,极点保留=-1,局部极点,0)COLORBLUE,LINETHICK3;
DRAWICON(极点保留=-1,L-0.03,1);
DRAWICON(极点保留=1,H+0.03,2);
低保留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);
预判:=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);
判断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);
相关文档
最新文档