[飞狐] 缠论一买、三买选股公式(飞狐+悟多公式)+仿悟多三买公式

合集下载

缠论第三类买点选股公式

缠论第三类买点选股公式引言缠论作为一种技术分析方法，在股市中得到了广泛的应用和认可。

它通过观察股票价格走势的波动和形态以及其他相关指标，提供了一种判断市场趋势和买卖时机的方法。

本文将介绍缠论的第三类买点选股公式，帮助投资者更好地进行股票交易决策。

一、缠论概述缠论由缠中说缠发起，他通过对股票走势进行各种形态和波动分析，找出了一些规律和模式。

缠论基于对市场心理和市场趋势的理解，以此来判断股票的买卖时机。

第三类买点选股公式是缠论中的一种重要方法，可以辅助投资者进行选股和进出场决策。

二、第三类买点选股公式第三类买点选股公式是缠论中的一种买点判断方法。

它基于股票价格的走势和形态，通过观察股票价格的波动和形态来判断买入时机。

以下是第三类买点选股公式的一般步骤：1.观察价格的线段走势首先，观察股票价格的线段走势。

线段是指在股票价格上升或下降过程中形成的高低点连接成的线段。

通过观察线段的走势，可以判断股票的趋势。

2.确定线段的标准在观察线段的走势后，确定线段的标准。

线段的标准是指连接线段高低点的线段走势形态。

根据缠论的理论，线段的标准有多种类型，如上升趋势、下降趋势、盘整等。

通过确定线段的标准，可以更好地判断股票的走势。

3.寻找第三类买点在观察和确认线段的走势和标准后，寻找第三类买点。

第三类买点是指在线段下跌或盘整过程中，出现一些特殊形态或信号，预示股票价格将会上升或突破前高点。

通过寻找第三类买点，可以选择适合的时机进行买入。

4.买入股票最后，根据观察和判断的第三类买点，选择合适的时机进行买入股票。

结语第三类买点选股公式是缠论中的一种重要方法，它通过观察股票价格的线段走势和形态，辅助投资者进行买卖时机的判断。

投资者可以根据这一公式，结合其他相关指标和市场趋势，进行选股和买卖决策。

当然，在实际操作中仍需谨慎，选择合适的时机进行买入或卖出。

希望本文对您理解缠论的第三类买点选股公式有所帮助。

以上就是关于"缠论第三类买点选股公式"的文档，希望对您有所启发。

缠论第三类买点选股公式

缠论第三类买点选股公式【最新版】目录1.缠论简介2.缠论第三类买点的概念3.缠论第三类买点选股公式及其作用4.缠论画线公式的应用5.结论正文一、缠论简介缠论是一种基于中国传统禅宗哲学的股市技术分析理论，创立人是知名的股票市场分析师和投资家缠中说禅。

缠论的主要观点是认为股市走势是一种自相似的结构，可以通过分析历史走势来预测未来走势。

在缠论中，走势被划分为中枢和连接段，中枢是股票价格走势的核心，连接段是中枢之间的价格波动。

二、缠论第三类买点的概念缠论将买点分为三类，其中第三类买点是指在股票价格突破中枢上边界后，再次回踩中枢上边界并确认支撑的点位。

这个点位是投资者买入股票的信号，因为在这个点位买入股票，后市走势往往会出现上涨。

三、缠论第三类买点选股公式及其作用缠论第三类买点选股公式可以帮助投资者快速找到符合第三类买点的股票，从而提高选股效率。

该公式可以计算股票价格与中枢上边界的距离，当股票价格突破中枢上边界并回踩时，公式可以给出买入信号。

通过使用这个公式，投资者可以在股票市场上获得更高的收益。

四、缠论画线公式的应用缠论画线公式可以帮助投资者更准确地划分股票价格的中枢和连接段。

通过画线公式，投资者可以找到中枢的上边界、下边界和连接段的高点、低点。

这样，在股票价格突破中枢上边界时，投资者可以更加准确地判断是否出现了第三类买点。

同时，画线公式还可以帮助投资者判断股票价格的走势，从而更好地预测未来股票价格的涨跌。

五、结论总之，缠论第三类买点选股公式和缠论画线公式是股票市场中有效的技术分析工具。

通过应用这些公式，投资者可以更准确地判断股票价格的走势，从而提高选股和投资决策的准确性。

缠论三买的选股公式

缠论三买的选股公式摘要：1.缠论三买的概念2.缠论三买的选股公式3.缠论三买的应用实例4.缠论三买的注意事项正文：一、缠论三买的概念缠论是一种基于浪的理论体系，主要研究市场价格波动的规律。

在缠论中，三买是指在股票市场中，经过两次回调后，再次出现买入信号的点位。

这个点位具有较高的安全性和盈利概率，被认为是一个较好的买入机会。

二、缠论三买的选股公式缠论三买的选股公式主要包括以下几个方面：1.趋势线：首先，需要画出股票价格的趋势线。

趋势线可以分为上升趋势线和下降趋势线。

在趋势线中，有三个重要的点：高点、低点和拐点。

2.浪：在趋势线中，每一个波浪都可以分为上升浪和下降浪。

上升浪是指股票价格在一定时间内的上涨，而下降浪则是指股票价格在一定时间内的下跌。

3.三买信号：在缠论中，三买信号是指在股票价格经过两次回调后，再次出现买入信号的点位。

这个点位具有较高的安全性和盈利概率。

三、缠论三买的应用实例以下是一个缠论三买的应用实例：假设某只股票的价格趋势线如下：高点1:10 元低点1:8 元拐点1:9 元高点2:12 元低点2:10 元拐点2:11 元在这个例子中，三买信号出现在11 元附近。

当股票价格回调至11 元时，可以视为一个较好的买入机会。

四、缠论三买的注意事项在使用缠论三买的选股公式时，需要注意以下几点：1.趋势线的画法：趋势线的画法直接影响到三买信号的判断。

因此，在画趋势线时，需要准确判断高点、低点和拐点。

2.浪的划分：在判断三买信号时，需要正确划分上升浪和下降浪。

正确的浪的划分有助于找到更安全的三买信号。

3.止损和止盈：在使用缠论三买的选股公式时，需要设置合理的止损和止盈点。

缠论一买、三买选股公式(飞狐+悟多公式)

MA10:=MA(CLOSE,10);MA5MA1MA2MA3 DATANUMBER:二DATAT YPE; DATANUMBER1:=DATATYPE; DATANUMBER2:=DATAT YPE; DATANUMBER3:=DATAT YPE; LING:二HIGH;<% vbdata nu mber = ("data nu mber") vbdata nu mber1 = ("data number1") vbdata nu mber2 = ("data nu mber2") vbdata=1vbdata 仁 vbdata2=1Select Case vbdata nu mberCase 0 vbdata= vbdata 仁 vbdata2=Case 1 vbdata= vbdata 仁 vbdata2二Case 2 vbdata= vbdata1= vbdata2= Case 3 vbdata=vbdata1= vbdata2=Case 4 vbdata= vbdata1=vbdata2=Case 5 vbdata= vbdata1= vbdata2=Case 6 vbdata=vbdata1=vbdata2=Case 7 vbdata= vbdata1=vbdata2=Case 8 vbdata=vbdata1= vbdata2=Case 9 vbdata= vbdata1= vbdata2=Case 10 vbdata= vbdata1= vbdata2=Case 11 vbdata= vbdata1= vbdata2= Case 12 vbdata= vbdata1=vbdata2= Case else vbdata=2MA(CL0SE,5); MA5-MA10; MA10; MA10;vbdata1= vbdata2=2 End Select ("datanumber") =vbdata ("datanumber1") =vbdata1 ("datanumber2") =vbdata2 vbling = ("ling") vbma = ("ma1") vbma2 = ("ma2") vbma3 = ("ma3") nlast = UBound( vbma ) nvalue = nvaluefu = bianhua = 2 oldbianhua = 0 for m = 0 to nlast vbma2(m) = 0 vbma3(m) = 0 vbling(m)=0 next m= 0 for i = 0 to nlastm=m+1 'nlast - m 'vbma2(i) = 0 if (vbma(i) > 0) then bianhua = 1 nvalue = nvalue + vbma(i) else bianhua = 2 nvaluefu = nvaluefu + vbma(i) end ifif (oldbianhua = bianhua) then else vbma3(i) = m m=0if (bianhua = 1) then vbma2(i) = nvaluefu nvaluefu = 0 'nvaluefu = 0 else vbma2(i) = nvalue nvalue = 0 'nvalue = 0end if end if oldbianhua = bianhua next ("ma2") = vbma2 ("ma3") = vbma3 ("ling") =vbling %> DRAWNUMBER(REF(MA2,0)<0 0=1,LLV(LOW,5),REF(MA2,0)*1000,0),colorFF00;DRAWNUMBER(REF(MA2,0)<0 0=1,LLV(LOW,5)-DATANUMBER,REF(MA3,0),0),colorFFFF;DRAWNUMBER(REF(MA2,0)<0 0=1,LLV(LOW,5)-DATANUMBER*2,REF(MA2,0)*1000/REF(MA3,0),0),colorFF00;DRAWNUMBER(REF(MA2,0)>0 AND 0=1,HHV(HIGH,5),REF(MA2,0)*1000,0),colorFF;DRAWNUMBER(REF(MA2,0)>0 0=1,HHV(HIGH,5)+DATANUMBER,REF(MA3,0),0),colorFFFF;DRAWNUMBER(REF(MA2,0)>0 AND0=1,HHV(HIGH,5)+DATANUMBER*2,REF(MA2,0)*1000/REF(MA3,0),0),colorFF; MA1:=MA5-MA10;WEIHE:=LING; WEIPING:=LING;<% vbhe=("weihe") vbping=("weiping") vbma = ("ma1") nlast = UBound( vbma )nvalue = nvaluefu = bianhua = 2 oldbianhua = 0 i= 0 m= nlast if (vbma(nlast) >0) then Do While (vbma(m)>0) nvalue = vbma(m) + nvalue i=i+1 m=m-1 if(m<0)then exit do end if Loop elseAND AND ANDANDDo While (vbma(m)<0) nvalue = vbma(m) + nvalue i=i+1 m=m-1 if(m<0) then exit do end if Loop end if if (i=0) then i=1 end if nvaluefu = nvalue/i vbhe(nlast) = nvalue vbping(nlast) = nvaluefu ("weihe") =vbhe ("weiping")= vbping %> DRAWNUMBER(WEIHE<>0 0=1,IF(WEIHE>0,HIGH,LOW),WEIHE*1000,0),colorFF;DRAWNUMBER(WEIHE<>0 0=1,(IF(WEIHE>0,HIGH,LOW))-DATANUMBER*2,WEIPING*1000,0),colorFF00; DRAWNUMBER(WEIPING<>0 AND 0=1,(IF(WEIHE>0,HIGH,LOW))-DATANUMBER,WEIHE/WEIPING ,0),colorFFFF; DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIFF,9); MACD:=2*(DIFF-DEA);MA1:=MACD; MA2:=MACD; MA3:=MACD;MA1WE:=MACD; HE:=MA2;WEIHEMACD:=0; WEIPINGMACD:=0;H1:=HIGH; L1:=LOW; FOXH:=HIGH; FOXL:=LOW; FOXBAOHAN:=LING;FOXBAOHAN1:=LING; FOXGUANXI:=LING; FOXFENXING:=LING;FOXFENXING1:=LING; FOXFENNUMBER:=LING;FOXQUEKOU:=LING; FOXBICOUNT:=LING; FOXWEIBI:=LING;<% vbquekou=("foxquekou") vbfennumber=("foxfennumber") vbdatanumber = ("datanumber") vbh = ("foxh") vbL = ("foxl") vbh1 = ("foxh") vbL1 = ("foxl") vbbaohan =("foxbaohan") vbbaohan1 = ("foxbaohan1") vbguanxi = ("foxguanxi") vbfenxing =("foxfenxing") vbfenxing1 = ("foxfenxing1") vbbicount=("foxbicount")vbweibi=("foxweibi") nlast = UBound( vbh ) nvalue = nvaluefu = bianhua = 2vbguanxi(0) = 1 for m = 1 to nlast if (vbh(m)>vbh(m-1) and vbl(m)>vbl(m-1))then vbguanxi(m)=1 elseif (vbh(m)<vbh(m-1) and vbl(m)<vbl(m-1)) then vbguanxi(m)=-1 else vbguanxi(m) = 0 if (vbguanxi(m-1)=1) then vbguanxi(m)=1 if (vbh(m)>=vbh(m-1) and vbl(m)<=vbl(m-1)) then vbbaohan(m) = 2 vbbaohan(m-1) = 1 vbh(m-1)=vbh(m) vbl(m)=vbl(m-1) elsevbbaohan(m-1) = -1 vbbaohan(m) = -2 vbh(m)=vbh(m-1) vbl(m-1)=vbl(m) end ifelse vbguanxi(m)=-1 if (vbh(m)>=vbh(m-1) and vbl(m)<=vbl(m-1)) then vbbaohan(m) = 2 vbbaohan(m-1) = 1 vbh(m)=vbh(m-1) vbl(m-1)=vbl(m)else vbbaohan(m-1) = -1 vbbaohan(m) = -2 vbh(m-1)=vbh(m) vbl(m)=vbl(m-1) end if end if end if end if next'处理连续包含即 :连续 3个及以上 K 线间存在的包含关系 for m = 0 to nlastvbbaohan1(m) = vbbaohan(m)NEXT i=0 do while (vbbaohan(i)=0) i=i+1 if (i>nlast) then Exit Do end if loop '第一个包含的位置 lastfenxing=i bao=0 existbao=0 for m = i to nlast if (vbbaohan(m) <> 0) then bao=bao+1 if (bao>=2) then if (vbbaohan(m)=2 and vbbaohan(m-1)=1 orvbbaohan(m)=-2 and vbbaohan(m-1)=-1) then vbbaohan1(m) = bao if (bao>2) thenexistbao=BAO for i = 1 to bao vbh(m-bao+i)=vbh(m) vbL(m-bao+i)=vbl(m)if (i = 1 or i=bao ) thenelsevbbaohan1(m-bao+i)=-3end ifnextend if'do while (bao>1)AND AND'vbh(m-bao+1)=vbh(m)'vbL(m-bao+1)=vbl(m)'if (existbao=BAO or bao=existbao-1) then'else'vbbaohan1(m-bao+1)=-3'end if'bao=bao-1'loopbao=0end ifend ifelsebao=0end ifnext'分型预处理existbao=vbguanxi(0)for m = 1 to nlast'if (vbh(m-1)>=vbh(m-2) and vbh(m-1)>=vbh(m) and vbl(m-1)>=vbl(m-2) and vbl(m-1)>=vbl(m) or vbh(m-1)<=vbh(m-2) and vbh(m-1)<=vbh(m) and vbl(m-1)<vbl(m-2) and vbl(m-1)<=vbl(m)) then'end ifif (vbguanxi(m)<>existbao) thenif (vbguanxi(m-1)=1) thenvbfenxing(m-1) = 1'顶elsevbfenxing(m-1) = -1'底end ifexistbao=vbguanxi(m)end ifnext'以上分型预处理for m = 0 to nlastvbfenxing1(m) = vbfenxing(m)vbfenxing1(m) = 0nexti=0do while (vbfenxing(i)=0)i=i+1if (i>nlast) thenExit Doend iflooplastfenxing=i'取第一个分型位置'下面去掉连续的顶或底for m = lastfenxing+1+nlast to nlastif (vbfenxing(m)<>0) thenif (vbfenxing(m)<>vbfenxing(lastfenxing)) then lastfenxing=m elseif (vbfenxing(m)=1) thenif (vbh(m)>vbh(lastfenxing)) thenvbfenxing(lastfenxing)=0lastfenxing=melsevbfenxing(m)=0end ifelseif (vbl(m)<vbl(lastfenxing)) thenvbfenxing(lastfenxing)=0lastfenxing=melsevbfenxing(m)=0end ifend if'顶要高的底要低的相等时要选时间在前面的'vbfenxing(m)=0end ifend ifnext'以下处理分型间距离不小于 4 的要求同时处理连续的顶和底的问题bao=0i=0n=0existbao=vbfenxing(0)m=0do while (vbbaohan1(i) <2)i=i+1if (i>nlast) thenExit Do end if loop lastbaohan=i '第一个包含位置i=0 do while (vbfenxing(i)=0) i=i+1 if (i>nlast) then Exit Do end if loop'第一个预备分型位置lastfenxing=i lastfenxing1=lastfenxing i=0for m = lastfenxing+1 to nlast if (vbbaohan(m) = 0) then bao=bao+1 elseif (vbbaohan1(m) >=2 ) then n=n+1 end if end ifvbfenxing1(m) = bao+n '包含关系只视为一个k 线'vbfenxing1(m)=vbbaohan1(m)'if (m>735) then 'exit for 'end ifif (vbfenxing(m)<>0) thenif (bao+n>= 4) then '分型间距离大于等于 4 符合要求if(vbfenxing(m)<>vbfenxing(lastfenxing)) then 'vbfenxing1(m)=vbfenxing(m) n=0 bao=0 lastfenxing1=lastfenxing lastfenxing=m elseif (vbfenxing(m)=1) then if (vbh(m)>vbh(lastfenxing)) then 'exit forvbfenxing(lastfenxing)=0n=0bao=0lastfenxing1=lastfenxinglastfenxing=melsevbfenxing(m)=0end ifelseif (vbl(m)<vbl(lastfenxing)) thenvbfenxing(lastfenxing)=0n=0bao=0lastfenxing1=lastfenxinglastfenxing=melsevbfenxing(m)=0end ifend if'顶要高的底要低的相等时要选时间在前面的end if'将上一个分开型位置数据更新为当下位置else'分型间距离小于 4 要看情况若与前分型不同且破坏前笔,可保留其它情况要去掉'破坏前笔即相邻分型不同且高于上上个顶或低于上上个底if (vbfenxing(m)<>vbfenxing(lastfenxing)) then'vbfenxing1(m)=vbfenxing(m)'i=lastfenxing-1'do while (vbfenxing(i)<>vbfenxing(m))'i=i-1'if (i=0) then'Exit Do'end if'loop'lastfenxing1=lastfenxingi=lastfenxing1if (vbfenxing(m)=1) thenif (vbl(m)>vbl1(m))thent1=vbl1(m)elset1=vbl(m)end ifif (vbh(i)>vbh1(i))thent2=vbh(m)else t2=vbh1(m) end if if (t1>t2) then n=0 bao=0 lastfenxing1=lastfenxing lastfenxing=melse vbfenxing(m)=0 end if else if (vbh(m)>vbh1(m))then t1=vbh(m) else t1=vbh1(m) end if if (vbl(i)>vbl1(i))then t2=vbl(m) else t2=vbl1(m) end if if (t1<t2) then 'if (vbh(m)<vbl(i)) then n=0 bao=0 lastfenxing1=lastfenxing lastfenxing=m else vbfenxing(m)=0 end if end if else if (vbfenxing(m)=1) then if (vbh(m)>vbh(lastfenxing)) then 'exit for vbfenxing(lastfenxing)=0 n=0 bao=0 lastfenxing1=lastfenxing lastfenxing=m else vbfenxing(m)=0 end ifelseif (vbl(m)<vbl(lastfenxing)) then vbfenxing(lastfenxing)=0 n=0 bao=0lastfenxing1=lastfenxing lastfenxing=m elsevbfenxing(m)=0end ifend if'顶要高的底要低的相等时要选时间在前面的end if end if end if next '以上处理分型间距离不小于 4 的要求'以下去掉连续的顶或底i=0do while (vbfenxing(i)=0) i=i+1 if (i>nlast) thenExit Do end if loop lastfenxing=i '取第一个分型位置'下面去掉连续的顶或底for m = lastfenxing+1+nlast to nlast if (vbfenxing(m)<>0) then if(vbfenxing(m)<>vbfenxing(lastfenxing)) then lastfenxing=m elseif (vbfenxing(m)=1) then if (vbh(m)>vbh(lastfenxing)) then vbfenxing(lastfenxing)=0 lastfenxing=m else vbfenxing(m)=0 end if elseif (vbl(m)<vbl(lastfenxing)) then vbfenxing(lastfenxing)=0lastfenxing=m else vbfenxing(m)=0 end if end if'顶要高的底要低的相等时要选时间在前面的'vbfenxing(m)=0 end if end if next '以下处理一个顶要大于相邻的两个底及一个底要小于相邻的两个顶的问题'取第一个分型位置i=0do while (vbfenxing(i)=0)i=i+1if (i>nlast) thenExit Doend ifloop lastfenxing=i for m = lastfenxing+1 to nlast if (vbfenxing(m)<>0) then if (vbfenxing(m)>0) then if (vbh(m)>vbl(lastfenxing)) then '满足条件顶>底lastfenxing=m else'不满足条件顶>底两个全置为0,并查下一个vbfenxing(m)=0vbfenxing(lastfenxing)=0m=m+1do while (vbfenxing(m)=0)m=m+1if (m>nlast) thenExit Doend iflooplastfenxing=mend ifelseif (vbl(m)<vbh(lastfenxing)) then '满足条件底<顶lastfenxing=melse'不满足条件底<顶两个全置为0,并查下一个vbfenxing(m)=0vbfenxing(lastfenxing)=0 m=m+1 do while (vbfenxing(m)=0) m=m+1 if (m>nlast) then Exit Do end if loop lastfenxing=m end if end if end if next i=0 for m = 0 to nlast if (vbfenxing(m)<>0) then i=i+1 vbfennumber(m)=i end if next'vbfennumber(nlast)=0 'vbfenxing(nlast)=-vbfenxing(lastfenxing) x1=0 x2=0 x3=0 x4=0 x5=0 x6=0 x7=0 bi=0 maxbi=0 zhsh=0'先取三个分型数据,然后进入循环处理a=0'Do While (vbfenxing(a) = 0 and a <= nlast) Do While ( a < nlast) if ( vbfenxing(a) <> 0) then exit do end if a = a + 1 Loopx1=aa=x1+1Do While ( a < nlast)if ( vbfenxing(a) <> 0) thenexit doend if a = a + 1 Loop x2=a a=x2+1Do While ( a < nlast)if ( vbfenxing(a) <> 0) thenexit doend if a = a + 1 Loop x3=a a=x3+1 bi=0 zhshbegin=x1 zzg=0 zzd=0 zgg=0 zdd=0 zg=0 zd=0 gg=0 dd=0FOR m=a TO nlast'(1)开始按照找出不能形成线段(中枢)的连续三笔中的中间那笔是两个线段(中枢)的分界标志'其它则是不同级别的中枢和线段的思路设计'在大盘和指数中分笔与1分中1分级别要大一些,在个股中1分要大一些因有的个股 1 分钟内可能无成交if (vbfenxing(m)<>0) then'(2) begin 只在分型不为0时进行处理,即:是分型时处理bi=bi+1x4=mif (zhshbegin=0) thenzhshbegin=x4end ifif (vbfenxing(x1)>0) then'以顶分型开始，x1,x3取高点x2,x4取低点，线段及中枢区间取高点中的低者，低点中的高者zg=min(vbh(x1),vbh(x3))'临时中枢高点zd=max(vbl(x2),vbl(x4))'临时中枢低点gg=max(vbh(x1),vbh(x3))'临时中枢高高点dd=min(vbl(x2),vbl(x4))'临时中枢低低点else'以底分型开始，x2,x4取高点x1,x3取低点zg=min(vbh(x2),vbh(x4))' 临时中枢高点zd=max(vbl(x1),vbl(x3))'临时中枢低点gg=max(vbh(x2),vbh(x4))' 临时中枢高高点dd=min(vbl(x1),vbl(x3))'临时中枢低低点end ifif (zd>zg ) then'(3)中枢低点大于高点，即未形成中枢，要将x2,x3的位置记录出来vbweibi(x2)=1vbweibi(x3)=2'msgbox("当前的vbweibi(x3) :" & cstr(vbweibi(x3)))maxbi=max(maxbi,bi)vbbicount(x2)=bibi=-1zhshbegin=0else'(3)中枢低点小于等于高点,即形成中枢,不用记录位置end if'(3)结束,将x1,x2,x3 的值分别换成x2,x3,x4 的值,也即向前推进一个分型,然后再返回进行比较x1=x2x2=x3x3=x4end if'(2) 结束NEXT'(1)结束找出所有连续三笔无重叠的位置,即不能形成中枢的候选位置,以下要对这些位置进行筛选并逐个分析,看图时要特别注意这些位置'以下为自定义函数部分Function max(a, b)If (a >= b) Thenmax = aElse max = bEnd IfEnd Function Function min(a, b) If (a <= b) Then min = aElse min = bEnd IfEnd Function ("foxweibi")=vbweibi ("foxbicount")=vbbicount ("foxh") =vbh ("foxl") =vbl ("foxbaohan") = vbbaohan ("foxbaohan1") = vbbaohan1 ("foxguanxi") = vbguanxi ("foxfenxing") = vbfenxing ("foxfenxing1") = vbfenxing1 ("foxfennumber") =vbfennumber ("foxquekou") = vbquekou %>FOXXIAN:=LING; FOXXIANG:=LING; FOXXIAND:=LING;FOXTEG:=LING; FOXTED:=LING;FOXTEGX:=LING; FOXTEG1:=LING; FOXTED1:=LING;FOXTEGX1:=LING; FOXDATATYPE:=DATATYPE;FOXTEBAO:=LING; FOXTEBAO1:=LING; FOXTEGUANXI1:=LING; FOXFENNUMXIAN:=LING; FOXZQDM:=STRLEFT(STKLABEL,2); FOXXIAOSHU:=0;<% vbquekou=("foxquekou") vbfennumber=("foxfennumber") vbdatanumber = ("foxdatatype") vbfennumxian=("foxfennumxian") vbxiaoshu=("foxxiaoshu") vbh = ("foxh") vbL = ("foxl") vbh1 = ("foxh") vbL1 = ("foxl") vbbaohan = ("foxbaohan") vbbaohan1 = ("foxbaohan1") vbguanxi = ("foxguanxi") vbfenxing = ("foxfenxing") vbfenxing1 = ("foxfenxing1") vbzqdm = ("foxzqdm") vbxian=("foxxian")vbxiang=("foxxiang") vbxiand=("foxxiand") vbteg=("foxteg") vbted=("foxted")vbtegx=("foxtegx") vbtebao=("foxtebao") vbtebao1=("foxtebao1") vbteg1=("foxteg1") vbted1=("foxted1") vbtegx1=("foxtegx1") vbweibi=("foxweibi")vbbicount=("foxbicount") nlast = UBound( vbh )'msgbox("当前的数据类型为："& cstr(vbzqdm))IF ( vbzqdm ="58" or vbzqdm ="90" or vbzqdm ="03" or vbzqdm ="18" or vbzqdm ="50" or vbzqdm ="51" or vbzqdm ="52" ) THENvbxiaoshu=3 else vbxiaoshu=2 end if IF ((vbdatanumber>=0 OR vbdatanumber=1 ) )THEN'IF ((vbdatanumber=0 OR vbdatanumber=1 ) and ( vbzqdm ="88" or vbzqdm ="1b" or vbzqdm ="1B" or vbzqdm ="1a" or vbzqdm ="1A" or vbzqdm ="39" ) )THENELSE FOR m=0 TO nlast if (vbfenxing(m)<>0) then vbxian(m)=vbfenxing(m)vbxiang(m)=vbh(m) vbxiand(m)=vbl(m) end ifNEXT ENd IF '笔的数据是按K 线数据自动计算的即:vbfenxing '初始计算相关数据置为0 当数据类型为0和1即分笔和1分钟时要按笔-线段的过程组成中枢'其它级别(指 5 分钟及以上)时用笔组成中枢此时要将笔的数据即:分型位置代入线段数组中IF ((vbdatanumber>=0 OR vbdatanumber=1 ) )THEN'IF ((vbdatanumber=0 OR vbdatanumber=1 ) and ( vbzqdm ="88" or vbzqdm ="1b" or vbzqdm ="1B" or vbzqdm ="1a" or vbzqdm ="1A" or vbzqdm ="39" ) )THEN '(1)分笔和1分钟计算线段数据vbzqdm =0 为指数'公式还未考虑开始连续三笔无重叠不能形成线段的处理,缠论中对此也未明确不能形成线段的笔应发生属于那个线段'对走势中间连续三笔无重叠不能形成线段的处理也未明确不能形成线段的笔应属于那个线段'缠论中规定线段是连续的且以不同的分型作为两个端点即:不能顶到顶和底到底,此规定要考虑的i = 0 ex=0Do While ( i <= nlast)If (vbfenxing(i) <> 0 ) thenexit do end if i = i + 1 Loop x1 = i xianbegin = x1 i = x1 + 1Do While ( i <= nlast)If (vbfenxing(i) <> 0 ) thenexit do end if i = i + 1 Loop x2 = i i = x2 + 1 Do While ( i <= nlast) If (vbfenxing(i)<> 0 ) then exit do end if i = i + 1Loop x3 = i i = x3 + 1Do While ( ex=0 )'()if (x3>nlast or x2>nlast ) then'msgbox("当前的 1 x2：" & cstr(x2) & "当前的 1 x3: " & cstr(x3) & "当前的nlast: " & cstr(nlast) )exit doend ifif ( vbweibi(x2)=0 or vbweibi(x3)=0 or vbweibi(x3)=1 or vbweibi(x2)=2 ) then'msgbox("当前的 1 x2：" & cstr(x2) & "当前的 1 x3: " & cstr(x3) & "当前的nlast: " & cstr(nlast) )exit doelsex1=x2x2=x3Do While ( i <= nlast)If (vbfenxing(i) <> 0 ) thenexit doend ifi = i + 1Loopx3 = ii = x3 + 1end ifloop'()i = x3 + 1xianbegin = x1tewei = x2if (x3<=nlast) thenIf (vbfenxing(x1) = 1) Thenxianfang = -1'以顶分型开始,线段方向向下vbted(tewei) = vbl(tewei)vbteg(tewei) = vbh(x3)Elsexianfang = -1'以底分型开始,线段方向向上vbteg(tewei) = vbl(tewei)vbted(tewei) = vbh(x3)End Ifvbtegx(tewei) = xianfang'定义出第一个特征序列,及关系即:是上升的还是下降的end if'tewei = x4tenumber = 0 i = x3 + 1 vbxian(xianbegin) = vbfenxing(xianbegin) vbxiang(xianbegin) = vbh(xianbegin) vbxiand(xianbegin) = vbl(xianbegin) 'vbxiang(xianbegin) = gg'vbxiand(xianbegin) = dd For m = i To nlast'(2)Do While ( m <= nlast)If (vbfenxing(m) <> 0 ) then exit do end if m = m + 1Loop x4 = m m = x4 + 1 Do While ( m <= nlast) If (vbfenxing(m) <> 0 ) then exit do end if m = m + 1Loop x5 = m m = x5 + 1 newtewei = x4 if ( x5 > nlast) then exit for end ifIf (xianfang = -1) Then'xianfang=-1 以顶分型开始,线段方向向下vbted(newtewei) = vbl(newtewei)vbteg(newtewei) = vbh(x5)Else'xianfang=1 以底分型开始,线段方向向上vbteg(newtewei) = vbh(newtewei)vbted(newtewei) = vbl(x5)End If'判断方向/缺口及包含vbtegx(newtewei) = xianfang tenumber = 1 + tenumber 'if (tenumber >= 1) thenIf (vbted(newtewei) > vbted(tewei) And vbteg(newtewei) > vbteg(tewei) Orvbted(newtewei) < vbted(tewei) And vbteg(newtewei) < vbteg(tewei)) Then'(3)向上或向下即:不是包含If (vbted(newtewei) > vbted(tewei) And vbteg(newtewei) > vbteg(tewei)) Then'(4) 特征序列的方向向上tefang = 1Elsetefang = -1'(4)特征序列的方向向下End Ifvbtegx(newtewei) = tefangIf (xianfang <> tefang) Then'(5)线段方向与特征序列的方向不同,即:出现了特征序列的分型线段方向与特征序列关系不同,出现分型,'首先判断自tewei(x2) 开始的三笔是否构成线段,构成线段则下一步,不构成线段返回原线段继续,再判断第一个(tewei 的前一个特征序列)与第二个(tewei) 之间是否有缺口if ( vbweibi(x4)=0 or vbweibi(x3)=0 or vbweibi(x4)=1 or vbweibi(x3)=2 ) then 'if ( vbweibi(x6)=0 or vbweibi(x5)=0 ) then'{} 构成线段,新线段从newtewei 开始,原线段在newtewei 处结束还要判断顶是否大于底if (tenumber <= 1) then'(te number)此情况发生在三笔构成线段但线段的两端不是其最高点或最低点的情况当下只有三笔不能开始新线段否则就出现一笔构成一个线段的现象了i=mDo While ( i <= nlast)If (vbfenxing(i) <> 0 ) thenexit doend ifi = i + 1Loopx6 = iif ( x6 > nlast) then'msgbox( " {} 当前的x6：" & cstr(x6) & " 当前的nlast：" & cstr(nlast) ) exit forend if'再判断x5,x6 是否构成线段,构成则新线段否则原线段继续if ( vbweibi(x6)=0 or vbweibi(x5)=0 or vbweibi(x6)=1 or vbweibi(x5)=2 ) then '开始构成新线段,新线段在newtewei 开始xianbegin=newteweivbxian(xianbegin) = vbfenxing(xianbegin)vbxiang(xianbegin) = vbh(xianbegin)vbxiand(xianbegin) = vbl(xianbegin)x2=x5x3=x6tewei=x2m = x6 + 1If (vbfenxing(xianbegin) = 1) Then xianfang = -1 '以顶分型开始 ,线段方向向下vbted(tewei) vbteg(tewei) Else xianfang = 1 '以底分型开始 ,线段方向向上vbteg(tewei) = vbh(tewei) vbted(tewei) = vbl(x3) End If vbtegx(tewei) = xianfang tenumber = 0 else 'else 原线段继续 tewei=newtewei vbtegx(newtewei) = xianfang x2=x4 x3=x5 m = x5 + 1 end if '开始结束 else '(tenumber) tenumber = 0 bao = 0 xianbegin = tewei vbxian(xianbegin) =vbfenxing(xianbegin) vbxiang(xianbegin) = vbh(xianbegin) vbxiand(xianbegin) =vbl(xianbegin) x2 = X3 x3 = x4 tewei = x2If (vbfenxing(xianbegin) = 1) Then xianfang = -1 '以顶分型开始 ,线段方向向下vbted(tewei) vbteg(tewei) Else xianfang = 1 '以底分型开始 ,线段方向向上vbteg(tewei) = vbh(tewei) vbted(tewei) = vbl(x3) End Ifvbtegx(tewei) = xianfang m = x3+1 end if'(tenumber) else'{} 不构成线段 ,原线段继续 tewei=newtewei vbtegx(newtewei) = xianfang x2=x4 x3=x5 m = x5 + 1 end if '{}Else'(5)线段方向与特征序列关系相同 , 未出现分型 tewei 的值更新为 newtewei 'tenumber = 1+tenumber vbtegx(newtewei) = xianfangtewei=newteweix2=x4x3=x5End If'(5)Else'(3)包含 vbtegx(newtewei) = xianfangIf (vbted(tewei) >= vbted(newtewei) And vbteg(tewei) <= vbteg(newtewei)) Then '后面包含前面 newtewei 是后面的 tewei 在前面 1 为 tewei 被后一个包含 2 为newtewei 包含前一个 vbtebao(tewei) = 1 vbtebao(newtewei) = 2Else'前面包含后面-1为tewei 包含后一个-2为newtewei 被前一个包含 vbtebao(tewei) = -1 vbtebao(newtewei) = -2End IfIf (xianfang = -1) Then '线段方向向下取向下包含 temp = min(vbted(newtewei),vbted(tewei)) vbted(newtewei) = temp vbted(tewei) = temptemp = min(vbteg(newtewei), vbteg(tewei)) vbteg(newtewei) = temp vbteg(tewei) = temp Else'线段方向向上取向上包含temp = max(vbted(newtewei), vbted(tewei)) vbted(newtewei) = temp vbted(tewei) = temp temp = max(vbteg(newtewei), vbteg(tewei))vbteg(newtewei) = temp=vbl(tewei)= vbh(x3)=vbl(tewei)= vbh(x3)vbteg(tewei) = tempEnd If'判断与tewei 的前面是否有连续的包含关系temp = tewei - 1ex = 0bao = 0Do While (ex = 0)Do While ( temp >=0)If (vbteg(temp) <> 0 ) thenexit doend iftemp = temp - 1Loopif (temp<0) then'msgbox("当前的10 temp：" & cstr(temp) & ” 当前的nlast: " & cstr(nlast)) exit do end ifIf (vbtebao(temp) = 0 Or vbtebao(temp) >= 2 Or vbtebao(temp) = -2 Or vbtegx(temp) <> xianfang) Thenex = 1Elsebao = bao + 1End Iftemp = temp - 1Loop'有几个连续包含，指大于三个K线的包含，BAO的值是包含的K线数减2,当只有两个连续K 线包含时BAO 为0temp = tewei - 1For i = 1 To baoDo While ( temp >=0)If (vbteg(temp) <> 0 ) thenexit doend iftemp = temp - 1Loopif (temp<0) then'msgbox("当前的11 temp：" & cstr(temp) & ” 当前的nlast: " & cstr(nlast)) exit forend ifvbteg(temp) = vbteg(tewei)vbted(temp) = vbted(tewei)temp = temp - 1Nextvbtebao(newtewei) = bao + 2temp = tewei - 1For i = 1 To bao + 2If (i = 1 Or i = bao + 2) ThenElseDo While ( temp >0)If (vbteg(temp) <> 0 ) thenexit doend iftemp = temp - 1Loopif (temp<0) then'msgbox("当前的12 temp：" & cstr(temp) & "当前的nlast: " & cstr(nlast)) exit for end if vbtebao(temp) = -3 temp = temp - 1End IfNexttewei=newteweix2=x4x3=x5m = x5 + 1End If'(3)Next'(2)For i = 0 To nlastIf (vbtebao(i) = -2) Thenvbtebao(i) = 2End IfIf (vbtebao1(i) = -2) Then vbtebao1(i) = 2End IfNext'包含关系标准化,即结束标志都为 2 及以上'处理线段的两个端点满足条件顶>= 底i=0 do while (vbxian(i)=0) i=i+1 if (i>nlast) then Exit Do end if loop lastfenxing=i for m = lastfenxing+1+ nlast to nlast if (vbxian(m)<>0) then if (vbxian(m)>0) then if (vbxiang(m)>=vbxiand(lastfenxing)) then '满足条件顶>=底lastfenxing=m else'不满足条件顶<底两个全置为0,并查下一个vbxian(m)=0 vbxian(lastfenxing)=0 vbxiang(m)=0 vbxiang(lastfenxing)=0 vbxiand(m)=0 vbxiand(lastfenxing)=0m=m+1 do while (vbxian(m)=0) m=m+1 if (m>nlast) then Exit Do end if looplastfenxing=m end if else if (vbxiand(m)<=vbxiang(lastfenxing)) then '满足条件底<顶lastfenxing=m else'不满足条件底<顶两个全置为0,并查下一个vbxian(m)=0 vbxian(lastfenxing)=0 vbxiang(m)=0 vbxiang(lastfenxing)=0 vbxiand(m)=0 vbxiand(lastfenxing)=0m=m+1 do while (vbxian(m)=0)m=m+1 if (m>nlast) then Exit Do end if loop lastfenxing=m end if end if end if next '计算线段的高点和低点i=0do while (vbxian(i)=0) i=i+1 if (i>nlast) then Exit Do end if loop lastfenxing=i'vbxiang(i)=vbh(i) 'vbxiand(i)=vbl(i) gg=vbxiang(i) dd=vbxiand(i) for m = lastfenxing+1+ nlast to nlast if (vbfenxing(m)<>0) then gg=max(gg,vbh(m)) dd=min(dd,vbl(m)) if (vbxian(m)<>0) then vbxiang(i)=gg vbxiand(i)=dd if (vbxian(m)>0) then else end if gg=vbh(m) dd=vbl(m) end if end if next end if'(1)i=nlastdo while (vbxian(i)=0)i=i-1if (i>nlast or i<0) thenExit Doend iflooplastfenxing=i 'vbxian(nlast) = -vbxian(lastfenxing) 'vbxiang(nlast) = vbh(nlast)'vbxiand(nlast) = vbl(nlast) 'vbteg(newtewei) = 0 'vbted(newtewei) = 0 '以下为自定义函数部分Function max(a, b) If (a >= b) Then max = aElse max = b End IfEnd FunctionFunction min(a, b)If (a <= b) Then min = aElse min = b End IfEnd Function ("foxxiaoshu") =vbxiaoshu ("foxteg")=vbteg ("foxted")=vbted ("foxtegx")=vbtegx ("foxteg1")=vbteg1 ("foxted1")=vbted1 ("foxtegx1")=vbtegx1 ("foxtebao")=vbtebao ("foxtebao1")=vbtebao1 ("foxxian")=vbxian ("foxxiang")=vbxiang ("foxxiand")=vbxiand %>FOXWEI:=LING; FOXBUYSELL:=LING; <%vbdatanumber3 = ("datanumber3") vbbicount=("foxbicount") vbweibi=("foxweibi") vbquekou=("foxquekou") vbfennumber=("foxfennumber") vbfennumxian=("foxfennumxian") vbh = ("foxh") vbL = ("foxl") vbh1 = ("foxh") vbL1 = ("foxl") vbbaohan = ("foxbaohan") vbbaohan1 = ("foxbaohan1") vbguanxi = ("foxguanxi") vbfenxing = ("foxfenxing") vbfenxing1 = ("foxfenxing1") vbbuysell=("foxbuysell")vbwei=("foxwei") vbxian=("foxxian") vbxiang=("foxxiang") vbxiand=("foxxiand")vbteg=("foxteg") vbted=("foxted") vbtegx=("foxtegx") vbteg1=("foxteg1")vbted1=("foxted1") vbtegx1=("foxtegx1") nlast = UBound( vbh ) i=0 for m = 0 to nlast if (vbxian(m)<>0) then i=i+1 vbfennumxian(m)=i end if next'vbfennumxian(nlast)=0 x1=0 x2=0 x3=0 x4=0 x5=0 x6=0 x7=0 bi=0 maxbi=0zhsh=0'先取三个分型数据,然后进入循环处理a=0'Do While (vbxian(a) = 0 and a <= nlast)Do While ( a < nlast)if ( vbxian(a) <> 0) thenexit doend if a = a + 1 Loop x1=a a=x1+1Do While ( a < nlast)if ( vbxian(a) <> 0) thenexit doend if a = a + 1 Loop x2=a a=x2+1Do While ( a < nlast)if ( vbxian(a) <> 0) thenexit doend if a = a + 1 Loop x3=a a=x3+1 bi=0 zhshbegin=x1 zzg=0 zzd=0 zgg=0 zdd=0 zg=0 zd=0 gg=0 dd=0 'vbbicount=("foxbicount") 'vbweibi=("foxweibi") FOR m=a TO nlast'(1)开始按照找出不能形成线段(中枢)的连续三笔中的中间那笔是两个线段(中枢)的分界标志'其它则是不同级别的中枢和线段的思路设计'在大盘和指数中分笔与1分中1分级别要大一些,在个股中1分要大一些因有的个股1 分钟内可能无成交if (vbxian(m)<>0) then'(2) begin 只在分型不为0时进行处理,即:是分型时处理bi=bi+1x4=mif (zhshbegin=0) thenzhshbegin=x4end ifif (vbxian(x1)>0) then'以顶分型开始，x1,x3取高点x2,x4取低点，线段及中枢区间取高点中的低者，低点中的高者zg=min(vbxiang(x1),vbxiang(x3))'临时中枢高点zd=max(vbxiand(x2),vbxiand(x4))'临时中枢低点gg=max(vbxiang(x1),vbxiang(x3))'临时中枢高高点dd=min(vbxiand(x2),vbxiand(x4))'临时中枢低低点else'以底分型开始，x2,x4取高点x1,x3取低点zg=min(vbxiang(x2),vbxiang(x4))'临时中枢高点zd=max(vbxiand(x1),vbxiand(x3))'临时中枢低点gg=max(vbxiang(x2),vbxiang(x4))'临时中枢高高点dd=min(vbxiand(x1),vbxiand(x3))'临时中枢低低点end ifif (zd>zg ) then'(3)中枢低点大于高点，即未形成中枢，要将x2,x3的位置记录出来vbwei(x2)=1vbwei(x3)=2'还要计算上一个中枢的级别和中枢区间及波动区间,计算中枢的级别根据bi 记数器。

缠论三类买点选股公式

缠论三类买点选股公式
摘要：
1.缠论三类买点的定义和分类
2.缠论三类买点的选股公式
3.使用缠论三类买点选股公式的注意事项
正文：
一、缠论三类买点的定义和分类
缠论是一种基于浪的理论体系，主要研究市场价格波动的规律。

在缠论中，买点是指在价格波动中，可能出现上涨的点位。

根据价格波动的不同特点，缠论将买点分为三类：
1.第一类买点：价格从下跌趋势转为上涨趋势的点位。

2.第二类买点：价格从下跌趋势转为盘整趋势的点位。

3.第三类买点：价格从盘整趋势转为上涨趋势的点位。

二、缠论三类买点的选股公式
1.第一类买点选股公式：
(1) 找到价格下跌趋势的结束点，即价格出现底背离的点位。

(2) 底背离出现后，价格开始上涨，且上涨幅度超过前一波下跌幅度的1/2。

2.第二类买点选股公式：
(1) 找到价格下跌趋势的结束点，即价格出现底背离的点位。

(2) 底背离出现后，价格开始进入盘整阶段，且盘整阶段的价格波动幅度
较小。

(3) 盘整阶段结束后，价格开始上涨，且上涨幅度超过盘整阶段的价格波动幅度。

3.第三类买点选股公式：
(1) 找到价格盘整趋势的结束点，即价格出现突破盘整区间的点位。

(2) 突破盘整区间后，价格开始上涨，且上涨幅度超过盘整阶段的价格波动幅度的1/2。

三、使用缠论三类买点选股公式的注意事项
1.选股时应结合市场整体走势，避免在市场整体下跌趋势中使用买点公式。

2.选股时应关注个股的基本面信息，避免选择基本面较差的股票。

3.选股时应结合其他技术分析指标，如均线、MACD 等，以提高选股的准确性。

缠论三买三卖指标源码公式

缠论三买三卖指标源码公式
缠论三买三卖指标源码公式是基于缠论理论的技术分析指标。

其
公式源码如下：
三买指标：IF（LOW>REF（LOW，1），IF（LOW>REF（LOW，2），
IF（LOW>REF（LOW，3），IF（LOW>REF（LOW，4），1，0），0），0），0）
三卖指标：IF（HIGH<REF（HIGH，1），IF（HIGH<REF（HIGH，2），IF（HIGH<REF（HIGH，3），IF（HIGH<REF（HIGH，4），1，0），0），0），0）
其中，IF函数用于判断条件是否成立，LOW表示当日的最低价，REF函数用于引用前一天的数据，HIGH表示当日的最高价。

三买指标
判断出买入时机，当日的最低价比前4日的最低价都高时，表示出现
三买信号，可以考虑买入；三卖指标判断出卖出时机，当日的最高价
比前4日的最高价都低时，表示出现三卖信号，可以考虑卖出。

缠论三买三卖指标源码公式的运用，需要结合实际的股票走势进
行判断，不可单独使用。

同时，需要根据自己的交易经验和策略，结
合其他技术指标和基本面分析，进行综合判断。

缠论一买、三买选股公式(飞狐+悟多公式)

缠论一买、三买选股公式（飞狐+悟多公式）公式指标 2009-08-14 11:42:38 阅读5639 评论20 字号：大中小订阅一买的选股公式初步搞出来的，当然还不完善，不能算是一买的公式，充其量算选出即将盘整背驰的，不过两个中枢下的盘整背驰就是一买了，当然真正是否背驰还要靠人工来判断，它只能初选，不过也省下很多事了，欢迎使用，多提意见。

beginif DATAPERIOD=0 then minbi:="fbase.var2#min1";if DATAPERIOD=1 then minbi:="fbase.var2#min5";if DATAPERIOD=2 then minbi:="fbase.var2#min30";if DATAPERIOD=3 then minbi:="fbase.var2#min60";if DATAPERIOD=4 then minbi:="fbase.var2#day";if DATAPERIOD=5 then minbi:="fbase.var2#day";if DATAPERIOD=6 then minbi:="fbase.var2#week";if DATAPERIOD=7 then minbi:="fbase.var2#month";if DATAPERIOD=8 then minbi:="fbase.var2#year";var001:="fbase.var2#min30";if datatype=3 then var001:="fbase.var2#min60";if datatype=4 then var001:="fbase.var2#day";var1:="chzhshch@kxian";var2:="chzhshch@bi";{处理笔关系}var3:="chzhshch@tongji"(minbi);{同级别分解}zg:="chzhshch@zg"(var3);//一定要先调用ZGzd:="chzhshch@zd"(var3);zswz:=barslast(zg>zd);tj3:=count(abs(var3),barslast(var3=1))=0;tj4:=l<ref(l,barslast(var2=-1));tj5:=count(var2=1,zswz-1)>0;tj6:=ref(h,barslast(var2=1))<ref(zd,zswz);tj7:=count(zg>zd,barslast(var3=1))>0;not(zg>zd)&&tj3&&tj7&&tj4&&tj5&&tj6;end;一买是模糊的，不准确的，三买就比较标准了，同样背驰需自行判断，否则不背驰就跌回中枢了：beginif DATAPERIOD=0 then minbi:="fbase.var2#min1";if DATAPERIOD=1 then minbi:="fbase.var2#min5";if DATAPERIOD=2 then minbi:="fbase.var2#min30";if DATAPERIOD=3 then minbi:="fbase.var2#min60";if DATAPERIOD=4 then minbi:="fbase.var2#day";if DATAPERIOD=5 then minbi:="fbase.var2#day";if DATAPERIOD=6 then minbi:="fbase.var2#week";if DATAPERIOD=7 then minbi:="fbase.var2#month";if DATAPERIOD=8 then minbi:="fbase.var2#year";var001:="fbase.var2#min30";if datatype=3 then var001:="fbase.var2#min60";if datatype=4 then var001:="fbase.var2#day";var1:="chzhshch@kxian";var2:="chzhshch@bi";{处理笔关系}var3:="chzhshch@tongji"(minbi);{同级别分解}zg:="chzhshch@zg"(var3);//一定要先调用ZGzd:="chzhshch@zd"(var3);var1:="chzhshch@kxian";var2:="chzhshch@bi";var4:=barslast(var001<>0);tj1:=ref(var001,var2)=-1; //上级别是底var5:=sum(abs(var2),var2);tj2:=var5=1; //第一个回调才算tj3:=count(abs(var3),barslast(var3=-1))=0;zswz:=barslast(zg>zd);tj4:=count(zg>zd,barslast(var3=-1))>0;tj5:=count(var2=1,barslast(var2=-1))=1;tj6:=count(var2=1,zswz-1)=1;tj7:=ref(l,barslast(var2=1))>ref(zg,barslast(zg>zd));not(zg>zd)&&tj3&&tj4&&tj5&&tj6&&tj7;end;MA10:=MA(CLOSE,10);MA5:=MA(CLOSE,5);MA1:=MA5-MA10;MA2:=MA10;MA3:=MA10;DATANUMBER:=DATATYPE;DATANUMBER1:=DATATYPE;DATANUMBER2:=DATATYPE;DATANUMBER3:=DATATYPE;LING:=HIGH;<%vbdatanumber = FFL.VarData("datanumber") vbdatanumber1 = FFL.VarData("datanumber1") vbdatanumber2 = FFL.VarData("datanumber2") vbdata=1vbdata1=0.001vbdata2=1Select Case vbdatanumber Case 0vbdata=0.015vbdata1=0.001vbdata2=0.015Case 1vbdata=0.018vbdata1=0.001vbdata2=0.018Case 2vbdata=0.037vbdata1=0.001vbdata2=0.037Case 3vbdata=0.052vbdata1=0.001vbdata2=0.052Case 4vbdata=0.067vbdata1=0.001vbdata2=0.067Case 5vbdata=0.13vbdata1=0.001vbdata2=0.13Case 6vbdata=0.28vbdata1=0.001vbdata2=0.28Case 7vbdata=0.45vbdata1=0.001vbdata2=0.45Case 8vbdata=0.73vbdata1=0.001vbdata2=0.73Case 9vbdata=1.2vbdata1=0.001vbdata2=1.2Case 10vbdata=0.6vbdata1=0.001vbdata2=0.6Case 11vbdata=0.1vbdata1=0.001vbdata2=0.1Case 12vbdata=0.02vbdata1=0.001vbdata2=0.02Case elsevbdata=2vbdata1=0.001vbdata2=2End SelectFFL.VarData("datanumber") =vbdata FFL.VarData("datanumber1") =vbdata1 FFL.VarData("datanumber2") =vbdata2 vbling = FFL.VarData("ling")vbma = FFL.VarData("ma1")vbma2 = FFL.VarData("ma2")vbma3 = FFL.VarData("ma3")nlast = UBound( vbma )nvalue = 0.0000nvaluefu = 0.0000bianhua = 2oldbianhua = 0for m = 0 to nlastvbma2(m) = 0vbma3(m) = 0vbling(m)=0nextm= 0for i = 0 to nlastm=m+1'nlast - m'vbma2(i) = 0if (vbma(i) > 0) thenbianhua = 1nvalue = nvalue + vbma(i)elsebianhua = 2nvaluefu = nvaluefu + vbma(i)if (oldbianhua = bianhua) thenelsevbma3(i) = mm=0if (bianhua = 1) thenvbma2(i) = nvaluefunvaluefu = 0'nvaluefu = 0elsevbma2(i) = nvaluenvalue = 0'nvalue = 0end ifend ifoldbianhua = bianhuanextFFL.VarData("ma2") = vbma2FFL.VarData("ma3") = vbma3FFL.VarData("ling") =vbling%>DRAWNUMBER(REF(MA2,0)<0 AND 0=1,LLV(LOW,5),REF(MA2,0)*1000,0),colorFF00; DRAWNUMBER(REF(MA2,0)<0 AND 0=1,LLV(LOW,5)-DATANUMBER,REF(MA3,0),0),colorFFFF;DRAWNUMBER(REF(MA2,0)<0 AND 0=1,LLV(LOW,5)-DATANUMBER*2,REF(MA2,0)*1000/REF(MA3,0),0),colorFF00; DRAWNUMBER(REF(MA2,0)>0 AND 0=1,HHV(HIGH,5),REF(MA2,0)*1000,0),colorFF; DRAWNUMBER(REF(MA2,0)>0 AND 0=1,HHV(HIGH,5)+DATANUMBER,REF(MA3,0),0),colorFFFF;DRAWNUMBER(REF(MA2,0)>0 AND 0=1,HHV(HIGH,5)+DATANUMBER*2,REF(MA2,0)*1000/REF(MA3,0),0),colorFF;MA1:=MA5-MA10;WEIHE:=LING;WEIPING:=LING;<%vbhe=FFL.VarData("weihe")vbping=FFL.VarData("weiping")vbma = FFL.VarData("ma1")nlast = UBound( vbma )nvalue = 0.0000nvaluefu = 0.0000bianhua = 2oldbianhua = 0i= 0if (vbma(nlast) > 0) thenDo While (vbma(m)>0)nvalue = vbma(m) + nvaluei=i+1m=m-1if(m<0) thenexit doend ifLoopelseDo While (vbma(m)<0)nvalue = vbma(m) + nvaluei=i+1m=m-1if(m<0) thenexit doend ifLoopend ifif (i=0) theni=1end ifnvaluefu = nvalue/ivbhe(nlast) = nvaluevbping(nlast) = nvaluefuFFL.VarData("weihe") =vbheFFL.VarData("weiping")= vbping%>DRAWNUMBER(WEIHE<>0 AND 0=1,IF(WEIHE>0,HIGH,LOW),WEIHE*1000,0),colorFF; DRAWNUMBER(WEIHE<>0 AND 0=1,(IF(WEIHE>0,HIGH,LOW))-DATANUMBER*2,WEIPING*1000,0),colorFF00; DRAWNUMBER(WEIPING<>0 AND 0=1,(IF(WEIHE>0,HIGH,LOW))-DATANUMBER,WEIHE/WEIPING,0),colorFFFF;DIFF:=EMA(CLOSE,12)-EMA(CLOSE,26);DEA:=EMA(DIFF,9);MACD:=2*(DIFF-DEA);MA1:=MACD;MA2:=MACD;MA3:=MACD;MA1WE:=MACD;HE:=MA2;WEIHEMACD:=0;WEIPINGMACD:=0;L1:=LOW;FOXH:=HIGH;FOXL:=LOW;FOXBAOHAN:=LING;FOXBAOHAN1:=LING;FOXGUANXI:=LING;FOXFENXING:=LING;FOXFENXING1:=LING;FOXFENNUMBER:=LING;FOXQUEKOU:=LING;FOXBICOUNT:=LING;FOXWEIBI:=LING;<%vbquekou=FFL.VarData("foxquekou")vbfennumber=FFL.VarData("foxfennumber") vbdatanumber = FFL.VarData("datanumber")vbh = FFL.VarData("foxh")vbL = FFL.VarData("foxl")vbh1 = FFL.VarData("foxh")vbL1 = FFL.VarData("foxl")vbbaohan = FFL.VarData("foxbaohan")vbbaohan1 = FFL.VarData("foxbaohan1") vbguanxi = FFL.VarData("foxguanxi")vbfenxing = FFL.VarData("foxfenxing") vbfenxing1 = FFL.VarData("foxfenxing1") vbbicount=FFL.Vardata("foxbicount")vbweibi=FFL.Vardata("foxweibi")nlast = UBound( vbh )nvalue = 0.0000nvaluefu = 0.0000bianhua = 2vbguanxi(0) = 1for m = 1 to nlastif (vbh(m)>vbh(m-1) and vbl(m)>vbl(m-1)) then vbguanxi(m)=1elseif (vbh(m)<vbh(m-1) and vbl(m)<vbl(m-1)) then vbguanxi(m)=-1elsevbguanxi(m) = 0if (vbguanxi(m-1)=1) thenvbguanxi(m)=1if (vbh(m)>=vbh(m-1) and vbl(m)<=vbl(m-1)) thenvbbaohan(m) = 2vbbaohan(m-1) = 1vbh(m-1)=vbh(m)vbl(m)=vbl(m-1)elsevbbaohan(m-1) = -1vbbaohan(m) = -2vbh(m)=vbh(m-1)vbl(m-1)=vbl(m)end ifelsevbguanxi(m)=-1if (vbh(m)>=vbh(m-1) and vbl(m)<=vbl(m-1)) then vbbaohan(m) = 2vbbaohan(m-1) = 1vbh(m)=vbh(m-1)vbl(m-1)=vbl(m)elsevbbaohan(m-1) = -1vbbaohan(m) = -2vbh(m-1)=vbh(m)vbl(m)=vbl(m-1)end ifend ifend ifend ifnext'处理连续包含即:连续3个及以上K线间存在的包含关系for m = 0 to nlastvbbaohan1(m) = vbbaohan(m)NEXTi=0do while (vbbaohan(i)=0)i=i+1if (i>nlast) thenExit Doend ifloop'第一个包含的位置lastfenxing=ibao=0existbao=0for m = i to nlastif (vbbaohan(m) <> 0) thenbao=bao+1if (bao>=2) thenif (vbbaohan(m)=2 and vbbaohan(m-1)=1 or vbbaohan(m)=-2 and vbbaohan(m-1)=-1) thenvbbaohan1(m) = baoif (bao>2) thenexistbao=BAOfor i = 1 to baovbh(m-bao+i)=vbh(m)vbL(m-bao+i)=vbl(m)if (i = 1 or i=bao ) thenelsevbbaohan1(m-bao+i)=-3end ifnextend if'do while (bao>1)'vbh(m-bao+1)=vbh(m)'vbL(m-bao+1)=vbl(m)'if (existbao=BAO or bao=existbao-1) then'else'vbbaohan1(m-bao+1)=-3'end if'bao=bao-1'loopbao=0end ifend ifelsebao=0end ifnext'分型预处理existbao=vbguanxi(0)for m = 1 to nlast'if (vbh(m-1)>=vbh(m-2) and vbh(m-1)>=vbh(m) and vbl(m-1)>=vbl(m-2) and vbl(m-1)>=vbl(m) or vbh(m-1)<=vbh(m-2) and vbh(m-1)<=vbh(m) and vbl(m-1)<vbl(m-2) and vbl(m-1)<=vbl(m)) then'end ifif (vbguanxi(m)<>existbao) thenif (vbguanxi(m-1)=1) thenvbfenxing(m-1) = 1'顶elsevbfenxing(m-1) = -1'底end ifexistbao=vbguanxi(m)end ifnext'以上分型预处理for m = 0 to nlastvbfenxing1(m) = vbfenxing(m)vbfenxing1(m) = 0nexti=0do while (vbfenxing(i)=0)i=i+1if (i>nlast) thenExit Doend iflooplastfenxing=i'取第一个分型位置'下面去掉连续的顶或底for m = lastfenxing+1+nlast to nlastif (vbfenxing(m)<>0) thenif (vbfenxing(m)<>vbfenxing(lastfenxing)) then lastfenxing=melseif (vbfenxing(m)=1) thenif (vbh(m)>vbh(lastfenxing)) thenvbfenxing(lastfenxing)=0lastfenxing=melsevbfenxing(m)=0end ifelseif (vbl(m)<vbl(lastfenxing)) thenvbfenxing(lastfenxing)=0lastfenxing=melsevbfenxing(m)=0end ifend if'顶要高的底要低的相等时要选时间在前面的'vbfenxing(m)=0end ifend ifnext'以下处理分型间距离不小于4的要求同时处理连续的顶和底的问题bao=0i=0n=0existbao=vbfenxing(0)m=0do while (vbbaohan1(i) <2)i=i+1if (i>nlast) thenExit Doend iflooplastbaohan=i'第一个包含位置i=0do while (vbfenxing(i)=0)i=i+1if (i>nlast) thenExit Doend ifloop'第一个预备分型位置lastfenxing=ilastfenxing1=lastfenxingi=0for m = lastfenxing+1 to nlastif (vbbaohan(m) = 0) thenbao=bao+1elseif (vbbaohan1(m) >=2 ) thenn=n+1end ifend ifvbfenxing1(m) = bao+n'包含关系只视为一个k线'vbfenxing1(m)=vbbaohan1(m)'if (m>735) then'exit for'end ifif (vbfenxing(m)<>0) thenif (bao+n>= 4) then'分型间距离大于等于4 符合要求if (vbfenxing(m)<>vbfenxing(lastfenxing)) then'vbfenxing1(m)=vbfenxing(m)n=0bao=0lastfenxing1=lastfenxinglastfenxing=melseif (vbfenxing(m)=1) thenif (vbh(m)>vbh(lastfenxing)) then'exit forvbfenxing(lastfenxing)=0n=0bao=0lastfenxing1=lastfenxinglastfenxing=melsevbfenxing(m)=0end ifelseif (vbl(m)<vbl(lastfenxing)) thenvbfenxing(lastfenxing)=0n=0bao=0lastfenxing1=lastfenxinglastfenxing=melsevbfenxing(m)=0end ifend if'顶要高的底要低的相等时要选时间在前面的end if'将上一个分开型位置数据更新为当下位置else'分型间距离小于4 要看情况若与前分型不同且破坏前笔,可保留其它情况要去掉'破坏前笔即相邻分型不同且高于上上个顶或低于上上个底if (vbfenxing(m)<>vbfenxing(lastfenxing)) then'vbfenxing1(m)=vbfenxing(m)'i=lastfenxing-1'do while (vbfenxing(i)<>vbfenxing(m))'i=i-1'if (i=0) then'Exit Do'end if'loop'lastfenxing1=lastfenxing i=lastfenxing1if (vbfenxing(m)=1) then if (vbl(m)>vbl1(m))thent1=vbl1(m)elset1=vbl(m)end ifif (vbh(i)>vbh1(i))thent2=vbh(m)elset2=vbh1(m)end ifif (t1>t2) thenn=0bao=0lastfenxing1=lastfenxing lastfenxing=melsevbfenxing(m)=0end ifelseif (vbh(m)>vbh1(m))thent1=vbh(m)elset1=vbh1(m)end ifif (vbl(i)>vbl1(i))thent2=vbl(m)elset2=vbl1(m)end ifif (t1<t2) then'if (vbh(m)<vbl(i)) then n=0bao=0lastfenxing1=lastfenxing lastfenxing=melsevbfenxing(m)=0end ifend ifelseif (vbfenxing(m)=1) thenif (vbh(m)>vbh(lastfenxing)) then'exit forvbfenxing(lastfenxing)=0n=0bao=0lastfenxing1=lastfenxinglastfenxing=melsevbfenxing(m)=0end ifelseif (vbl(m)<vbl(lastfenxing)) thenvbfenxing(lastfenxing)=0n=0bao=0lastfenxing1=lastfenxinglastfenxing=melsevbfenxing(m)=0end ifend if'顶要高的底要低的相等时要选时间在前面的end ifend ifend ifnext'以上处理分型间距离不小于4的要求'以下去掉连续的顶或底i=0do while (vbfenxing(i)=0)i=i+1if (i>nlast) thenExit Doend iflooplastfenxing=i'取第一个分型位置'下面去掉连续的顶或底for m = lastfenxing+1+nlast to nlastif (vbfenxing(m)<>0) thenif (vbfenxing(m)<>vbfenxing(lastfenxing)) then lastfenxing=melseif (vbfenxing(m)=1) thenif (vbh(m)>vbh(lastfenxing)) thenvbfenxing(lastfenxing)=0lastfenxing=melsevbfenxing(m)=0end ifelseif (vbl(m)<vbl(lastfenxing)) thenvbfenxing(lastfenxing)=0lastfenxing=melsevbfenxing(m)=0end ifend if'顶要高的底要低的相等时要选时间在前面的'vbfenxing(m)=0end ifend ifnext'以下处理一个顶要大于相邻的两个底及一个底要小于相邻的两个顶的问题'取第一个分型位置i=0do while (vbfenxing(i)=0)i=i+1if (i>nlast) thenExit Doend iflooplastfenxing=ifor m = lastfenxing+1 to nlastif (vbfenxing(m)<>0) thenif (vbfenxing(m)>0) thenif (vbh(m)>vbl(lastfenxing)) then'满足条件顶>底lastfenxing=melse'不满足条件顶>底两个全置为0,并查下一个vbfenxing(m)=0vbfenxing(lastfenxing)=0m=m+1do while (vbfenxing(m)=0)m=m+1if (m>nlast) thenExit Doend iflooplastfenxing=mend ifelseif (vbl(m)<vbh(lastfenxing)) then'满足条件底<顶lastfenxing=melse'不满足条件底<顶两个全置为0,并查下一个vbfenxing(m)=0vbfenxing(lastfenxing)=0m=m+1do while (vbfenxing(m)=0)m=m+1if (m>nlast) thenExit Doend iflooplastfenxing=mend ifend ifend ifnexti=0for m = 0 to nlastif (vbfenxing(m)<>0) theni=i+1vbfennumber(m)=iend ifnext'vbfennumber(nlast)=0'vbfenxing(nlast)=-vbfenxing(lastfenxing) x1=0x2=0x3=0x4=0x5=0x6=0x7=0bi=0maxbi=0zhsh=0'先取三个分型数据,然后进入循环处理a=0'Do While (vbfenxing(a) = 0 and a <= nlast)Do While ( a < nlast)if ( vbfenxing(a) <> 0) thenexit doend ifa = a + 1Loopx1=aa=x1+1Do While ( a < nlast)if ( vbfenxing(a) <> 0) thenexit doend ifa = a + 1Loopx2=aa=x2+1Do While ( a < nlast)if ( vbfenxing(a) <> 0) thenexit doend ifa = a + 1Loopx3=aa=x3+1bi=0zhshbegin=x1zzg=0zzd=0zgg=0zdd=0zg=0zd=0gg=0dd=0FOR m=a TO nlast'(1)开始按照找出不能形成线段(中枢)的连续三笔中的中间那笔是两个线段(中枢)的分界标志'其它则是不同级别的中枢和线段的思路设计'在大盘和指数中分笔与1分中1分级别要大一些,在个股中1分要大一些因有的个股1分钟内可能无成交if (vbfenxing(m)<>0) then'(2) begin 只在分型不为0时进行处理,即:是分型时处理bi=bi+1x4=mif (zhshbegin=0) thenzhshbegin=x4end ifif (vbfenxing(x1)>0) then'以顶分型开始,x1,x3取高点x2,x4取低点,线段及中枢区间取高点中的低者,低点中的高者zg=min(vbh(x1),vbh(x3))'临时中枢高点zd=max(vbl(x2),vbl(x4))'临时中枢低点gg=max(vbh(x1),vbh(x3))'临时中枢高高点dd=min(vbl(x2),vbl(x4))'临时中枢低低点else'以底分型开始,x2,x4取高点x1,x3取低点zg=min(vbh(x2),vbh(x4))'临时中枢高点zd=max(vbl(x1),vbl(x3))'临时中枢低点gg=max(vbh(x2),vbh(x4))'临时中枢高高点dd=min(vbl(x1),vbl(x3))'临时中枢低低点end ifif (zd>zg ) then'(3)中枢低点大于高点,即未形成中枢,要将x2,x3的位置记录出来vbweibi(x2)=1vbweibi(x3)=2'msgbox("当前的vbweibi(x3)：" & cstr(vbweibi(x3)))maxbi=max(maxbi,bi)vbbicount(x2)=bibi=-1zhshbegin=0else'(3)中枢低点小于等于高点,即形成中枢,不用记录位置end if'(3)结束,将x1,x2,x3的值分别换成x2,x3,x4的值,也即向前推进一个分型,然后再返回进行比较x1=x2x2=x3x3=x4end if'(2) 结束NEXT'(1)结束找出所有连续三笔无重叠的位置,即不能形成中枢的候选位置,以下要对这些位置进行筛选并逐个分析,看图时要特别注意这些位置'以下为自定义函数部分Function max(a, b)If (a >= b) Thenmax = aElsemax = bEnd IfEnd FunctionFunction min(a, b)If (a <= b) Thenmin = aElsemin = bEnd IfEnd FunctionFFL.Vardata("foxweibi")=vbweibiFFL.Vardata("foxbicount")=vbbicountFFL.VarData("foxh") =vbhFFL.VarData("foxl") =vblFFL.VarData("foxbaohan") = vbbaohanFFL.VarData("foxbaohan1") = vbbaohan1FFL.VarData("foxguanxi") = vbguanxiFFL.VarData("foxfenxing") = vbfenxingFFL.VarData("foxfenxing1") = vbfenxing1FFL.VarData("foxfennumber") = vbfennumberFFL.VarData("foxquekou") = vbquekou%>FOXXIAN:=LING;FOXXIANG:=LING;FOXXIAND:=LING;FOXTEG:=LING;FOXTED:=LING;FOXTEGX:=LING;FOXTEG1:=LING;FOXTED1:=LING;FOXTEGX1:=LING;FOXDATATYPE:=DATATYPE;FOXTEBAO:=LING;FOXTEBAO1:=LING;FOXTEGUANXI1:=LING;FOXFENNUMXIAN:=LING;FOXZQDM:=STRLEFT(STKLABEL,2);FOXXIAOSHU:=0;<%vbquekou=FFL.VarData("foxquekou")vbfennumber=FFL.VarData("foxfennumber")vbdatanumber = FFL.VarData("foxdatatype")vbfennumxian=FFL.VarData("foxfennumxian")vbxiaoshu=FFL.VarData("foxxiaoshu")vbh = FFL.VarData("foxh")vbL = FFL.VarData("foxl")vbh1 = FFL.VarData("foxh")vbL1 = FFL.VarData("foxl")vbbaohan = FFL.VarData("foxbaohan")vbbaohan1 = FFL.VarData("foxbaohan1")vbguanxi = FFL.VarData("foxguanxi")vbfenxing = FFL.VarData("foxfenxing")vbfenxing1 = FFL.VarData("foxfenxing1")vbzqdm = FFL.VarData("foxzqdm")vbxian=FFL.Vardata("foxxian")vbxiang=FFL.Vardata("foxxiang")vbxiand=FFL.Vardata("foxxiand")vbteg=FFL.Vardata("foxteg")vbted=FFL.Vardata("foxted")vbtegx=FFL.Vardata("foxtegx")vbtebao=FFL.Vardata("foxtebao")vbtebao1=FFL.Vardata("foxtebao1")vbteg1=FFL.Vardata("foxteg1")vbted1=FFL.Vardata("foxted1")vbtegx1=FFL.Vardata("foxtegx1")vbweibi=FFL.Vardata("foxweibi")vbbicount=FFL.Vardata("foxbicount")nlast = UBound( vbh )'msgbox("当前的数据类型为：" & cstr(vbzqdm))IF ( vbzqdm ="58" or vbzqdm ="90" or vbzqdm ="03" or vbzqdm ="18" or vbzqdm ="50" or vbzqdm ="51" or vbzqdm ="52" ) THENvbxiaoshu=3elsevbxiaoshu=2end ifIF ((vbdatanumber>=0 OR vbdatanumber=1 ) )THEN'IF ((vbdatanumber=0 OR vbdatanumber=1 ) and ( vbzqdm ="88" or vbzqdm ="1b" or vbzqdm ="1B" or vbzqdm ="1a" or vbzqdm ="1A" or vbzqdm ="39" ) )THEN ELSEFOR m=0 TO nlastif (vbfenxing(m)<>0) thenvbxian(m)=vbfenxing(m)vbxiang(m)=vbh(m)vbxiand(m)=vbl(m)end ifNEXTENd IF'笔的数据是按K线数据自动计算的即:vbfenxing'初始计算相关数据置为0 当数据类型为0和1即分笔和1分钟时要按笔-线段的过程组成中枢'其它级别(指5分钟及以上)时用笔组成中枢此时要将笔的数据即:分型位置代入线段数组中IF ((vbdatanumber>=0 OR vbdatanumber=1 ) )THEN'IF ((vbdatanumber=0 OR vbdatanumber=1 ) and ( vbzqdm ="88" or vbzqdm ="1b" or vbzqdm ="1B" or vbzqdm ="1a" or vbzqdm ="1A" or vbzqdm ="39" ) )THEN '(1)分笔和1分钟计算线段数据vbzqdm =0 为指数'公式还未考虑开始连续三笔无重叠不能形成线段的处理,缠论中对此也未明确不能形成线段的笔应发生属于那个线段'对走势中间连续三笔无重叠不能形成线段的处理也未明确不能形成线段的笔应属于那个线段'缠论中规定线段是连续的且以不同的分型作为两个端点即:不能顶到顶和底到底,此规定要考虑的i = 0ex=0Do While ( i <= nlast)If (vbfenxing(i) <> 0 ) thenexit doend ifi = i + 1Loopx1 = ixianbegin = x1i = x1 + 1Do While ( i <= nlast)If (vbfenxing(i) <> 0 ) thenexit doend ifi = i + 1Loopx2 = ii = x2 + 1Do While ( i <= nlast)If (vbfenxing(i) <> 0 ) thenexit doend ifi = i + 1Loopx3 = ii = x3 + 1Do While ( ex=0 )'()if (x3>nlast or x2>nlast ) then'msgbox("当前的1 x2：" & cstr(x2) & "当前的1 x3：" & cstr(x3) & "当前的nlast：" & cstr(nlast) )exit doend ifif ( vbweibi(x2)=0 or vbweibi(x3)=0 or vbweibi(x3)=1 or vbweibi(x2)=2 ) then'msgbox("当前的1 x2：" & cstr(x2) & "当前的1 x3：" & cstr(x3) & "当前的nlast：" & cstr(nlast) )exit doelsex1=x2x2=x3Do While ( i <= nlast)If (vbfenxing(i) <> 0 ) thenexit doend ifi = i + 1Loopx3 = ii = x3 + 1end ifloop'()i = x3 + 1xianbegin = x1tewei = x2if (x3<=nlast) thenIf (vbfenxing(x1) = 1) Thenxianfang = -1'以顶分型开始,线段方向向下vbted(tewei) = vbl(tewei)vbteg(tewei) = vbh(x3)Elsexianfang = -1'以底分型开始,线段方向向上vbteg(tewei) = vbl(tewei)vbted(tewei) = vbh(x3)End Ifvbtegx(tewei) = xianfang'定义出第一个特征序列,及关系即:是上升的还是下降的end if'tewei = x4tenumber = 0i = x3 + 1vbxian(xianbegin) = vbfenxing(xianbegin)vbxiang(xianbegin) = vbh(xianbegin)vbxiand(xianbegin) = vbl(xianbegin)'vbxiang(xianbegin) = gg'vbxiand(xianbegin) = ddFor m = i To nlast'(2)Do While ( m <= nlast)If (vbfenxing(m) <> 0 ) thenexit doend ifm = m + 1Loopx4 = mm = x4 + 1Do While ( m <= nlast)If (vbfenxing(m) <> 0 ) thenexit doend ifm = m + 1Loopx5 = mm = x5 + 1newtewei = x4if ( x5 > nlast) thenexit forend ifIf (xianfang = -1) Then'xianfang=-1 以顶分型开始,线段方向向下vbted(newtewei) = vbl(newtewei)vbteg(newtewei) = vbh(x5)Else'xianfang=1 以底分型开始,线段方向向上vbteg(newtewei) = vbh(newtewei)vbted(newtewei) = vbl(x5)End If'判断方向/缺口及包含vbtegx(newtewei) = xianfangtenumber = 1 + tenumber'if (tenumber >= 1) thenIf (vbted(newtewei) > vbted(tewei) And vbteg(newtewei) > vbteg(tewei) Or vbted(newtewei) < vbted(tewei) And vbteg(newtewei) < vbteg(tewei)) Then '(3)向上或向下即:不是包含If (vbted(newtewei) > vbted(tewei) And vbteg(newtewei) > vbteg(tewei)) Then '(4) 特征序列的方向向上tefang = 1Elsetefang = -1'(4)特征序列的方向向下End Ifvbtegx(newtewei) = tefangIf (xianfang <> tefang) Then'(5)线段方向与特征序列的方向不同,即:出现了特征序列的分型线段方向与特征序列关系不同,出现分型,'首先判断自tewei(x2)开始的三笔是否构成线段,构成线段则下一步,不构成线段返回原线段继续,再判断第一个(tewei的前一个特征序列)与第二个(tewei)之间是否有缺口if ( vbweibi(x4)=0 or vbweibi(x3)=0 or vbweibi(x4)=1 or vbweibi(x3)=2 ) then'if ( vbweibi(x6)=0 or vbweibi(x5)=0 ) then'{}构成线段,新线段从newtewei开始,原线段在newtewei处结束还要判断顶是否大于底if (tenumber <= 1) then'(tenumber)此情况发生在三笔构成线段但线段的两端不是其最高点或最低点的情况,当下只有三笔不能开始新线段否则就出现一笔构成一个线段的现象了i=mDo While ( i <= nlast)If (vbfenxing(i) <> 0 ) thenexit doend ifi = i + 1Loopx6 = iif ( x6 > nlast) then'msgbox( " {}当前的x6：" & cstr(x6) & "当前的nlast：" & cstr(nlast) )end if'再判断x5,x6是否构成线段,构成则新线段否则原线段继续if ( vbweibi(x6)=0 or vbweibi(x5)=0 or vbweibi(x6)=1 or vbweibi(x5)=2 ) then'开始构成新线段,新线段在newtewei开始xianbegin=newteweivbxian(xianbegin) = vbfenxing(xianbegin)vbxiang(xianbegin) = vbh(xianbegin)vbxiand(xianbegin) = vbl(xianbegin)x2=x5x3=x6tewei=x2m = x6 + 1If (vbfenxing(xianbegin) = 1) Thenxianfang = -1'以顶分型开始,线段方向向下vbted(tewei) = vbl(tewei)vbteg(tewei) = vbh(x3)Elsexianfang = 1'以底分型开始,线段方向向上vbteg(tewei) = vbh(tewei)vbted(tewei) = vbl(x3)End Ifvbtegx(tewei) = xianfangtenumber = 0else'else 原线段继续tewei=newteweivbtegx(newtewei) = xianfangx2=x4x3=x5m = x5 + 1end if'开始结束else'(tenumber)tenumber = 0bao = 0xianbegin = teweivbxian(xianbegin) = vbfenxing(xianbegin)vbxiang(xianbegin) = vbh(xianbegin)vbxiand(xianbegin) = vbl(xianbegin)x3 = x4tewei = x2If (vbfenxing(xianbegin) = 1) Thenxianfang = -1'以顶分型开始,线段方向向下vbted(tewei) = vbl(tewei)vbteg(tewei) = vbh(x3)Elsexianfang = 1'以底分型开始,线段方向向上vbteg(tewei) = vbh(tewei)vbted(tewei) = vbl(x3)End Ifvbtegx(tewei) = xianfangm = x3+1end if'(tenumber)else'{}不构成线段,原线段继续tewei=newteweivbtegx(newtewei) = xianfangx2=x4x3=x5m = x5 + 1end if'{}Else'(5)线段方向与特征序列关系相同,未出现分型tewei的值更新为newtewei'tenumber = 1+tenumbervbtegx(newtewei) = xianfangtewei=newteweix2=x4x3=x5End If'(5)Else'(3)包含vbtegx(newtewei) = xianfangIf (vbted(tewei) >= vbted(newtewei) And vbteg(tewei) <= vbteg(newtewei)) Then'后面包含前面newtewei是后面的 tewei在前面 1为tewei被后一个包含 2为newtewei包含前一个vbtebao(tewei) = 1vbtebao(newtewei) = 2Else'前面包含后面 -1为tewei包含后一个 -2为newtewei被前一个包含vbtebao(tewei) = -1vbtebao(newtewei) = -2End IfIf (xianfang = -1) Then'线段方向向下取向下包含temp = min(vbted(newtewei), vbted(tewei))vbted(newtewei) = tempvbted(tewei) = temptemp = min(vbteg(newtewei), vbteg(tewei))vbteg(newtewei) = tempvbteg(tewei) = tempElse'线段方向向上取向上包含temp = max(vbted(newtewei), vbted(tewei))vbted(newtewei) = tempvbted(tewei) = temptemp = max(vbteg(newtewei), vbteg(tewei))vbteg(newtewei) = tempvbteg(tewei) = tempEnd If'判断与tewei的前面是否有连续的包含关系temp = tewei - 1ex = 0bao = 0Do While (ex = 0)Do While ( temp >=0)If (vbteg(temp) <> 0 ) thenexit doend iftemp = temp - 1Loopif (temp<0) then'msgbox("当前的10 temp：" & cstr(temp) & "当前的nlast：" & cstr(nlast) ) exit doend ifIf (vbtebao(temp) = 0 Or vbtebao(temp) >= 2 Or vbtebao(temp) = -2 Or vbtegx(temp) <> xianfang) Thenex = 1Elsebao = bao + 1End Iftemp = temp - 1Loop'有几个连续包含,指大于三个K线的包含,BAO的值是包含的K线数减2,当只有两个连续K线包含时BAO为0temp = tewei - 1For i = 1 To baoDo While ( temp >=0)If (vbteg(temp) <> 0 ) thenexit doend iftemp = temp - 1Loopif (temp<0) then'msgbox("当前的11 temp：" & cstr(temp) & "当前的nlast：" & cstr(nlast) ) exit forend ifvbteg(temp) = vbteg(tewei)vbted(temp) = vbted(tewei)temp = temp - 1Nextvbtebao(newtewei) = bao + 2temp = tewei - 1For i = 1 To bao + 2If (i = 1 Or i = bao + 2) ThenElseDo While ( temp >0)If (vbteg(temp) <> 0 ) thenexit doend iftemp = temp - 1Loopif (temp<0) then'msgbox("当前的12 temp：" & cstr(temp) & "当前的nlast：" & cstr(nlast) ) exit forend ifvbtebao(temp) = -3temp = temp - 1End IfNexttewei=newteweix2=x4x3=x5m = x5 + 1End If。

三类买卖点标准定义,缠论公式指标

三类买卖点标准定义,缠论公式指标缠论有1、2、3类买卖点，缠论第3类买卖点，是激进的缠中说禅操作模式，利润最大赚钱最快，这也是分歧争论最大一类的买卖点。

网络配图的3类买卖点理论图99%是错误的，很多人学习缠论多年，3买一直搞不太清楚，90%的缠迷对3类买卖点是错误的，包括许多缠论高手。

一、先上缠中说禅原始定理。

1、第三类买卖点定理：一个次级别走势类型向上离开缠中说禅走势中枢，然后以一个次级别走势类型回试，其低点不跌破ZG，则构成了第三类买点；一个次级别走势类型向下离开缠中说禅走势中枢，然后以一个次级别走势类型回抽，其高点不升破ZD，则构成第三类卖点。

（而对于第三类买卖点，其意义就是对付中枢结束的。

一个级别的中枢结束，无非面对两种情况：a、转成更大的中枢；b、上涨或下跌直到形成新的该级别中枢。

第三类买卖点就是告诉什么时候发生这种事情的，而在第二、三买卖点的本级别走势类型之间，都是中枢震荡，这时候，是不会有该级别的买卖点的，因此，如果参与其中的买卖，用的都是低级别的买卖点。

）2、走势类型走势：你打开走势图看到的就是走势。

走势分不同级别。

走势类型：上涨、下跌、盘整。

趋势：上涨、下跌。

对于市场走势，有一个是“不患”的，就是走势的三种分类：上涨、下跌、盘整。

所有走势都可以分解成这三种情况。

这是一个最简单的道理，而这才是市场分析唯一值得依靠的基础。

很多人往往忽视最简单的东西，去搞那些虚头八脑的玩意。

而无论你是主力、散户、庄家，都逃不过这三种分类所交织成的走势。

那么，何谓上涨、下跌、盘整？下面给出一个定义。

首先必须明确的是，所有上涨、下跌、盘整都建立在一定的周期图表上，例如在日线上的盘整，在30分钟线上可能就是上涨或下跌，因此，一定的图表是判断的基础，而图表的选择，与上面所说交易系统的选择是一致的，相关于你的资金、性格、操作风格等。

上涨：最近一个高点比前一高点高，且最近一个低点比前一低点高。

下跌：最近一个高点比前一高点低，且最近一个低点比前一低点低。

缠论第三类买点选股公式

缠论第三类买点选股公式
缠论第三类买点选股公式是根据缠论交易系统的原则和方法进行股票选取的工具。

缠论第三类买点是指在缠论交易系统中，当价格突破密集的多重阻力位时，形成可靠的买点。

根据缠论的原则，我们可以使用以下公式来选取股票：
1. 找到近期形成多重阻力位的股票：首先，我们要找到近期在走势中形成多重阻力位的股票，这些阻力位可以是K线的顶部、均线的压力位、重要的技术指标等。

2. 选取突破阻力位的股票：当我们找到形成多重阻力位的股票后，我们需要观察其价格是否能够突破这些阻力位。

如果股票的价格能够明显突破阻力位并且站稳在阻力位之上，那么这个股票将成为第三类买点的候选股票。

3. 确认成交量配合：在选取候选股票之后，我们还需要观察成交量的配合情况。

如果成交量在股票价格突破阻力位时出现明显的增加，表明市场对这个股票的兴趣增加，那么这个股票具有更高的买入潜力。

4. 具备其他技术指标的支持：除了缠论的原则外，我们还可以结合其他的技术指标来支持我们的买点选股公式。

例如，可以观察股票的相对强弱指标（RSI），MACD指标等，判断市场的买入力量是否足够。

需要注意的是，缠论第三类买点选股公式只是一个工具，在使用时需要结合个人的交易策略和风险偏好进行判断和决策。

同
时，市场风险和个股风险都需要充分考虑，在决策时要遵循风险管理原则，控制好仓位和止盈止损。

缠论一二三买点副图公式收集（缠论股票公式）

缠论⼀⼆三买点副图公式收集（缠论股票公式）（公式是⽹上搜来的，未及验证，谨作资料收集，最难得是副图。

）DRAWGBK(C>0, RGB(0,0,00),RGB(0,0,0),0,’11’,0);MA21:MA(C,10),COLORGREEN,LINETHICK2;MA60:MA(C,60);VAR6:=(( ABS((OPEN-CLOSE))/(HIGH-LOW))*VOL);VAR7:=(( (HIGH-IF((CLOSE>OPEN),CLOSE,OPEN))/(HIGH-LOW))*VOL);VAR8:=(( (IF((CLOSE>OPEN),OPEN,CLOSE)-LOW)/(HIGH-LOW))*VOL);VAR9:=IF(((VOL/CAPITAL)>0.001),1,EXP(ABS(LOG(((VOL/CAPITAL)*100)))));加仓:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE>OPEN,NODRAW,COLORRED;减仓:VAR6>=VAR7 AND VAR6>=VAR8 AND CLOSE洗盘:VAR8>VAR6 AND VAR8>VAR7,NODRAW,COLORWHITE;⾼抛:VAR7>VAR6 AND VAR7>VAR8,NODRAW,COLORMAGENTA;地量:VAR9>2 AND VOLDRAWKLINE(H,O,L,C);TY:=C;A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BACKSET(B1,10+1);HD:=FILTER(C1,10);A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1);LD:=FILTER(C2,10);前期⾼位:REF(H,BARSLAST(HD)),COLORYELLOW,LINETHICK4,POINTDOT;前期低位:REF(L,BARSLAST(LD)), COLORGREEN,POINTDOT,LINETHICK4;STICKLINE(加仓,O,C,1,0),COLORRED;STICKLINE(洗盘,O,C,1,0),COLORWHITE;STICKLINE(减仓,O,C,1,0),COLORBLUE;STICKLINE(⾼抛,O,C,1,0),COLORMAGENTA;STICKLINE(地量,O,C,1,0),COLORGREEN;JJ:=(3*C+H+L+O)/6;VAR1:=(8*JJ+7*REF(JJ,1)+6*REF(JJ,2)+5*REF(JJ,3)+4*REF(JJ,4)+3*REF(JJ,5)+2*REF(JJ,6)+REF(JJ,8))/36; TJ1:=VOL=HHV(VOL,10) AND VOL>2*REF(VOL,1) AND CLOSE>VAR1 AND C>REF(C,1);LJL:=FILTER(TJ1,5);DRAWTEXT_FIX(1,0.0,0.0,0,’蓝芯-主⼒低位深度洗盘或⾼位出货坚决’),COLORBLUE,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.06,0,’⽩芯-主⼒轻度洗盘’),COLORWHITE,LINETHICK1;DRAWTEXT_FIX(1,0.00,0.12,0,’棕芯-出现了近期相对地量’),COLORGREEN,LINETHICK1;DRAWTEXT_FIX(1,0.00,0.18,0,’粉芯-主⼒在做⾼抛低吸或低吸⾼抛’),COLORFF00FF,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.24,0,’红芯-主⼒吸筹进货积极主动’),COLORRED,LINETHICK1; DRAWTEXT_FIX(1,0.00,0.3,0,’黄芯-主⼒吸筹进货强并且成交量出现黄⾦柱’),COLORYELLOW,LINETHICK1;DRAWTEXT_FIX(C>0,0.004,1,0,DYBLOCK),COLORYELLOW,LINETHICK2;DRAWTEXT_FIX(C>0,0.06,1,0,HYBLOCK),COLORRED,LINETHICK2;DRAWTEXT_FIX(C>0,0.12,1,0,EXTERNSTR(0,1)),COLORWHITE,LINETHICK2;EN1:=ZIG(3,5)>REF(ZIG(3,5),1) AND REF(ZIG(3,5),1)<=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)<=REF(ZIG(3,5),3);PL10:=ZIG(3,10);⾛强2:=BARSLAST(PL10ZTJZ5:=IF(PL10>REF(PL10,1),COUNT(EN1,⾛强2),0);追2:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2;追4:=EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3;DRAWTEXT(追2 OR 追4,LOW*0.978,’追’),COLORYELLOW;PL5:=ZIG(3,5);EX1:=ZIG(3,5)=REF(ZIG(3,5),2) AND REF(ZIG(3,5),2)>=REF(ZIG(3,5),3);EN2:=ZIG(3,10)>REF(ZIG(3,10),1) AND REF(ZIG(3,10),1)<=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2) <=REF(ZIG(3,10),3);EX2:=ZIG(3,10)=REF(ZIG(3,10),2) AND REF(ZIG(3,10),2)>=REF(ZIG(3,10),3);PL20:=ZIG(3,20);EN3:=ZIG(3,20)>REF(ZIG(3,20),1) AND REF(ZIG(3,20),1)<=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2) <=REF(ZIG(3,20),3);EX3:=ZIG(3,20)=REF(ZIG(3,20),2) AND REF(ZIG(3,20),2)>=REF(ZIG(3,20),3);PL40:=ZIG(3,40);⾛强1:=BARSLAST(PL5⾛弱1:=BARSLAST(PL5>REF(PL5,1));⾛弱2:=BARSLAST(PL10>REF(PL10,1));⾛强3:=BARSLAST(PL20⾛弱3:=BARSLAST(PL20>REF(PL20,1));ZTJD5:=IF(PL10>REF(PL10,1),COUNT(EX1,⾛强2),0);DTJZ5:=IF(PL10DTJD5:=IF(PL10ZTJZ10:=IF(PL20>REF(PL20,1),COUNT(EN2,⾛强3),0);ZTJD10:=IF(PL20>REF(PL20,1),COUNT(EX2,⾛强3),0);DTJZ10:=IF(PL20DTJD10:=IF(PL20DRAWTEXT(EN1 AND DTJZ5=1,L*0.98,’反弹低点’),COLORLIRED;DRAWTEXT(EX1 AND DTJD5=2,H*1.02,’反弹⾼点！’),COLORLIBLUE;DRAWTEXT(EN2 AND ZTJZ5=1,L*0.98,’买⼊’),COLORYELLOW;DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJD5=1,H*1.02,’减仓’),COLORFFFF00; DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=2,L*0.98,’—-买’),COLOR0000FF; DRAWTEXT(EX1 AND PL10>REF(PL10,1) AND ZTJZ5=2,H*1.02,’短卖’),COLORGREEN; DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.98,’—-短买’),COLOR0000FF; DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=1,H*1.02,’短卖’),COLORGREEN; DRAWTEXT(EN2 AND DTJZ10=1,L*0.96,’Ⅰ’),COLORFF00FF;DRAWTEXT(EX2 AND DTJD10=2,H*1.03,’Ⅱ’),COLORFF6000;DRAWTEXT(EN3 AND ZTJZ10=1,L*0.95,’Ⅲ’),COLORYELLOW;DRAWTEXT(EX2 AND PL20>REF(PL20,1) ANDZTJD10=1,H*1.06,’①’),LINETHICK3,COLORFFFF00;DRAWTEXT(EN2 AND PL20>REF(PL20,1) ANDZTJZ10=2,L*0.96,’②’),LINETHICK3,COLORYELLOW;DRAWTEXT(EX2 AND PL20>REF(PL20,1) AND ZTJD10=2 OR (ZTJD10=0 OR ZTJD10=2) AND EX2,H*1.02,’清仓!’),LINETHICK3,COLORWHITE;DRAWTEXT(EN2 AND PL20>REF(PL20,1) ANDZTJZ10=3,L*0.96,’④’),LINETHICK3,COLORYELLOW;DRAWTEXT(EN1 AND PL10>REF(PL10,1) AND ZTJZ5=3,L*0.95,’⑷’),COLORYELLOW;EMA13:=EMA(C,13);EMA34:=EMA(C,34);EMA55:=EMA(C,55);EMA120:=EMA(C,120);CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;CR2:=V>MA(V,5)*0.6;CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;CR4:=ABS(EMA34-EMA55)/EMA55<0.03;CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1);CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);DRAWTEXT(CR6,C*0.98,’风险’),COLORWHITE;原创⽂章，作者：派尔财经，如若转载，请注明出处：https:///41969.html。

飞狐主图、副图和选股公式

飞狐主图、副图和选股公式主图均线：KEY:=DATE<=1900731;ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);ZHE:=EMA(EMA(EMA(EMA(ZHC,2),2),5),5);C1:=SMA(EMA(ZHE,1),2,1);C3:=SMA(EMA(ZHE,3),2,1);C6:=SMA(EMA(ZHE,6),2,1);C7:=SMA(EMA(ZHE,7),2,1);IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGINSTICKLINE(C1>=C6,C1,C6,8,1),colorFF00FF;STICKLINE(C1>=C6,C7,C3,8,0),colorFF00FF;STICKLINE(C1<=C6,C1,C6,8,1),colorFF00;STICKLINE(C1<=C6,C7,C3,8,0),colorFF00;中线:=MA(ZHE,N),LINEDOT,colorBROWN;阻力:=中线+P*STD(ZHE,N),LINEDOT,color808080;支撑:=中线-P*STD(ZHE,N),LINEDOT,color808080;成本价:"AMOUNT#day"/"VOL#day"/100*KEY,LINETHICK0,PRECISION 2,COLORGREEN;分水岭:EMA(EMA(EMA(EMA((MA(ZHC,3)+MA(ZHC,6)+MA(ZHC,12)+ MA(ZHC,24))/4,2),2),5),5),colorFFFF00;//趋势线:ZHE,LINETHICK2,PRECISION2,colorFFFF00;趋势线:ZHE,LINETHICK2,PRECISION2,colorFFFF00;生命线:EMA(EMA(EMA(EMA(MA(ZHC,60),2),2),5),5),colorFF;主力:EMA(EMA(EMA(EMA(MA(ZHC,103),2),2),5),5),colorFF00FF;年线:EMA(EMA(EMA(EMA(MA(ZHC,453),2),2),5),5),colorFFFF;获利盘:=WINNER(成本价)*100;集中度:=(COST(95)-COST(5))/(COST(95)+COST(5))*100*KEY;DRAWTEXTEX(KEY,1,18,0,'当前获利盘比例：'+NUMTOSTR(获利盘,1)+'％筹码集中度：'+NUMTOSTR(集中度,1)+'％'),colorFF00FF;IF DATATYPE=1 OR DATATYPE=2 OR DATATYPE=3 OR DATATYPE=4 OR DATATYPE=5 THENVERTLINE(TIME=150000),POINTDOT,color80;ELSEIF DATATYPE=11 THENVERTLINE(TIME=140000),POINTDOT,color80;PARTLINE(KEY,分水岭),LINETHICK2,colorFFFF00;PARTLINE(KEY,生命线),LINETHICK2,colorFF;PARTLINE(KEY,主力),LINETHICK2,colorFF00FF;PARTLINE(KEY,年线),LINETHICK3,colorFFFF;BC:=ZHC>分水岭 AND ZHC>中线;SC:=ZHC<分水岭 AND ZHC<中线;STICKLINE(BC,LOW,HIGH,0.1,1),colorFFFF;STICKLINE(BC AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFFFF;STICKLINE(BC AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF;STICKLINE(SC,LOW,HIGH,0.1,1),colorFF00;STICKLINE(SC AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF00;STICKLINE(SC AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFF00;END;ELSE BEGINEND;主图均线：KEY:=DATE<=1900731;ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);ZHE:=EMA(EMA(EMA(EMA(ZHC,2),2),5),5);FSL:=EMA(EMA(EMA(EMA((MA(ZHC,3)+MA(ZHC,6)+MA(ZH C,12)+MA(ZHC,24))/4,2),2),5),5);MAINX:=EMA(EMA(EMA(EMA(MA(ZHC,60),2),2),5),5);FSLMAINX:=EMA(FSL-MAINX,3);涨停板:=IF(KEY,CLOSE/REF(CLOSE,1)>1.097,0);跌停板:=IF(KEY,REF(CLOSE,1)/CLOSE>1.097,0);涨停板ST:=IF(KEY,CLOSE/REF(CLOSE,1)>1.049,0);跌停板ST:=IF(KEY,REF(CLOSE,1)/CLOSE>1.049,0);ST0:=STRNCMP(STKNAME,'S',1)=0;ST1:=STRNCMP(STKNAME,'ST',2)=0;ST2:=STRNCMP(STKNAME,'*ST',3)=0;ST3:=STRNCMP(STKNAME,'SST',3)=0;ST4:=STRNCMP(STKNAME,'S*ST',4)=0;C1:=SMA(EMA(ZHE,1),2,1);C3:=SMA(EMA(ZHE,3),2,1);C6:=SMA(EMA(ZHE,6),2,1);C7:=SMA(EMA(ZHE,7),2,1);IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGINSTICKLINE(C1>=C6,C1,C6,8,1),colorFF00FF;STICKLINE(C1>=C6,C7,C3,8,0),colorFF00FF;STICKLINE(C1<=C6,C1,C6,8,1),colorFF00;STICKLINE(C1<=C6,C7,C3,8,0),colorFF00;中线:MA(ZHE,N),colorBROWN;阻力:中线+P*STD(ZHE,N),color808080;支撑:中线-P*STD(ZHE,N),color808080;成本价:"AMOUNT#day"/"VOL#day"/100*KEY,LINETHICK0,PRECISION 2,COLORGREEN;获利盘:=WINNER(成本价)*100;集中度:=(COST(95)-COST(5))/(COST(95)+COST(5))*100*KEY;DRAWTEXTEX(KEY,1,18,0,'当前获利盘比例：'+NUMTOSTR(获利盘,1)+'％筹码集中度：'+NUMTOSTR(集中度,1)+'％'),colorFF00FF;趋势线:ZHE,LINETHICK2,PRECISION2,colorFFFF00;生命线:MAINX,LINETHICK2,PRECISION2,colorFF;分水岭:FSL,LINETHICK2,PRECISION2,colorFFFF;TA:=REF(趋势线,1)<趋势线;TB:=REF(趋势线,1)>趋势线;TD:=趋势线>生命线 AND FSLMAINX>0;TK:=趋势线<生命线 AND FSLMAINX<0;PARTLINE(TD AND TA,趋势线),LINETHICK2,colorFFFF;PARTLINE(TK AND TB,趋势线),LINETHICK2,colorFFFF00;IF DATATYPE=1 OR DATATYPE=2 OR DATATYPE=3 OR DATATYPE=4 OR DATATYPE=5 THENVERTLINE(TIME=150000),POINTDOT,color80;ELSEIF DATATYPE=11 THENVERTLINE(TIME=140000),POINTDOT,color80;PARTLINE(KEY,分水岭),LINETHICK2,colorFFFF;PARTLINE(KEY,生命线),LINETHICK2,colorFF;BC:=ZHC>分水岭 AND ZHC>中线;SC:=ZHC<分水岭 AND ZHC<中线;STICKLINE(BC,LOW,HIGH,0.1,1),colorFFFF;STICKLINE(BC AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFFFF;STICKLINE(BC ANDCLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF;STICKLINE(SC,LOW,HIGH,0.1,1),colorFF00;STICKLINE(SC AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF00;STICKLINE(SC AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFF00;END;ELSEEXIT;IF DATATYPE=6 THENIF ST0 OR ST1 OR ST2 OR ST3 OR ST4 THEN BEGINDRAWICON(涨停板ST,生命线,10);DRAWICON(跌停板ST,生命线,11);END;ELSE BEGINDRAWICON(涨停板,生命线,10);DRAWICON(跌停板,生命线,11);EXIT;END;副图Boll:(N:26 P:2)KEY:=DATE<=1900731;ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);ZHE:=EMA(EMA(EMA(EMA(ZHC,2),2),5),5);C1:=SMA(EMA(ZHE,1),2,1);C3:=SMA(EMA(ZHE,3),2,1);C6:=SMA(EMA(ZHE,6),2,1);C7:=SMA(EMA(ZHE,7),2,1);IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGINSTICKLINE(C1>=C6,C1,C6,8,0),colorFF;STICKLINE(C1>=C6,C7,C3,0,0),colorFF;STICKLINE(C1<=C6,C1,C6,8,0),colorFF00;STICKLINE(C1<=C6,C7,C3,0,0),colorFF00;KMA:=MA(ZHC,5);PARTLINE(KEY,KMA),colorFFFF;MID:=MA(ZHE,N);PARTLINE(KEY,MID),colorFFFFFF;PARTLINE(KEY,MA(MID,55)),LINEDASH,colorFF00FF;UPPER:=MID+P*STD(ZHE,N);PARTLINE(KEY,UPPER),POINTDOT,color808080;LOWER:=MID-P*STD(ZHE,N);PARTLINE(KEY,LOWER),POINTDOT,color808080;IF DATATYPE=4 OR DATATYPE=5 THENVERTLINE(TIME=150000),POINTDOT,color3333;ELSE BEGIN END;END;ELSE副图筹码集中度:KEY:=DATE<=1900731;ZHM:="AMOUNT#day"/"VOL#day"/100*KEY;CM1:=SMA(EMA(ZHM,1),2,1);CM3:=SMA(EMA(ZHM,3),2,1);CM6:=SMA(EMA(ZHM,6),2,1);CM7:=SMA(EMA(ZHM,7),2,1);CMM:=(CM1+CM3+CM6+CM7)/4;IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN获利盘:WINNER(ZHM)*100,LINETHICK0,PRECISION1,colorFF;筹码集中度:(COST(95)-COST(5))/(COST(95)+COST(5))*100*KEY,LINETHICK0,PRECISION1,colorFFFF;STICKLINE(CM1>=CM6,CM1,CM6,8,0),colorFF;STICKLINE(CM1>=CM6,CM7,CM3,0,0),colorFF;STICKLINE(CM1<=CM6,CM1,CM6,8,0),colorFF00;STICKLINE(CM1<=CM6,CM7,CM3,0,0),colorFF00;CMX1:=SMA(EMA(COST(1),21),2,1);CMX2:=SMA(EMA(COST(10),21),2,1);CMX3:=SMA(EMA(COST(30),21),2,1);CMX4:=SMA(EMA(COST(50),21),2,1);CMX5:=SMA(EMA(COST(70),21),2,1);CMX6:=SMA(EMA(COST(90),21),2,1);CMX7:=SMA(EMA(COST(99),21),2,1);PARTLINE(KEY,CMX1),colorCC;PARTLINE(KEY,CMX2),color33CC;PARTLINE(KEY,CMX3),color66CC;PARTLINE(KEY,CMX4),color99CC;PARTLINE(KEY,CMX5),colorCCCC;PARTLINE(KEY,CMX6),colorFFCC;PARTLINE(KEY,CMX7),colorFF;END;ELSE BEGINEND;副图多空线:KEY:=DATE<=1900731;ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);DMZ:=IF(HIGH+LOW<=REF(HIGH,1)+REF(LOW,1),0,MAX(AB S(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));DMF:=IF(HIGH+LOW>=REF(HIGH,1)+REF(LOW,1),0,MAX(AB S(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));ADMZ:=IF(KEY,MA(DMZ,10),0);ADMF:=IF(KEY,MA(DMF,10),0);STZ0:=IF(ADMZ>ADMF,(ADMZ-ADMF)/ADMZ,IF(ADMZ=ADMF,0,(ADMZ-ADMF)/ADMF));STZ:=(IF(ADMZ>ADMF,(ADMZ-ADMF)/ADMZ,IF(ADMZ=ADMF,0,(ADMZ-ADMF)/ADMF)))*(60);ASTZ:=SMA(STZ0,30,1)*60;IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN波动线:STZ,PRECISION0,colorFFFFFF;多空线:ASTZ,PRECISION0,colorFFFF;主力线:EMA(EMA(EMA(EMA(MA(ASTZ,60),2),2),5),5),PRECISION0,colo rFF00FF;PARTLINE(KEY,-30),LINETHICK2,colorFF00;PARTLINE(KEY,0),LINETHICK2,color80;PARTLINE(KEY,30),LINETHICK2,colorFF;END;ELSE BEGINEND;副图FT：KEY:=DATE<=1900731;STICKLINE(CLOSE>=OPEN,LOW,HIGH,0.1,1),colorFF;STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF;STICKLINE(CLOSE>=REF(CLOSE,1) AND CLOSE=OPEN,LOW,HIGH,0.1,1),colorFF;STICKLINE(CLOSE>=REF(CLOSE,1) AND CLOSE=OPEN,OPEN,CLOSE,8,1),colorFF;STICKLINE(CLOSE<OPEN,LOW,HIGH,0.1,0),colorFFFF00;STICKLINE(CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF00;STICKLINE(CLOSE<REF(CLOSE,1) AND CLOSE=OPEN,LOW,HIGH,0.1,0),colorFFFF00;STICKLINE(CLOSE<REF(CLOSE,1) AND CLOSE=OPEN,OPEN,CLOSE,8,0),colorFFFF00;ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);ZHQS:=EMA(EMA(EMA(EMA(ZHC,2),2),5),5);MAINX:=EMA(EMA(EMA(EMA(MA(ZHC,60),2),2),5),5);FSL:=EMA(EMA(EMA(EMA((MA(ZHC,3)+MA(ZHC,6)+MA(ZH C,12)+MA(ZHC,24))/4,2),2),5),5);IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN趋势线:ZHQS,LINETHICK2,PRECISION0,colorFFFF00;生命线:MAINX,LINETHICK2,PRECISION0,colorFF;分水岭:FSL,LINETHICK2,PRECISION0,colorFFFF;END;ELSE BEGINEND;主图均线:KEY:=DATE<=1900601;STICKLINE(CLOSE>=OPEN,LOW,HIGH,0.1,1),colorFF;STICKLINE(CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF;STICKLINE(CLOSE>=REF(CLOSE,1) AND CLOSE=OPEN,LOW,HIGH,0.1,1),colorFF;STICKLINE(CLOSE>=REF(CLOSE,1) AND CLOSE=OPEN,OPEN,CLOSE,8,1),colorFF;STICKLINE(CLOSE<OPEN,LOW,HIGH,0.1,0),colorFFFF00;STICKLINE(CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF00;STICKLINE(CLOSE<REF(CLOSE,1) AND CLOSE=OPEN,LOW,HIGH,0.1,0),colorFFFF00;STICKLINE(CLOSE<REF(CLOSE,1) ANDCLOSE=OPEN,OPEN,CLOSE,8,0),colorFFFF00;ST0:=STRNCMP(STKNAME,'S',1)=0;ST1:=STRNCMP(STKNAME,'ST',2)=0;ST2:=STRNCMP(STKNAME,'*ST',3)=0;ST3:=STRNCMP(STKNAME,'SST',3)=0;ST4:=STRNCMP(STKNAME,'S*ST',4)=0;ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);涨停板:=IF(KEY,(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>9.95,0);跌停板:=IF(KEY,(REF(CLOSE,1)-CLOSE)/REF(CLOSE,1)*100>9.95,0);涨停板ST:=IF(KEY,(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>4.95,0);跌停板ST:=IF(KEY,(REF(CLOSE,1)-CLOSE)/REF(CLOSE,1)*100>4.95,0);ZHQS:=EMA(EMA(EMA(EMA(ZHC,2),2),5),5);FSL:=EMA(EMA(EMA(EMA((MA(ZHC,3)+MA(ZHC,6)+MA(ZH C,12)+MA(ZHC,24))/4,2),2),5),5);MAINX:=EMA(EMA(EMA(EMA(MA(ZHC,60),2),2),5),5);FSLMAINX:=EMA(FSL-MAINX,3);IF NOT(STKTYPE=6 OR STKTYPE=7 AND STKTYPE=8) THEN BEGIN成本价:"AMOUNT#day"/"VOL#day"/100*KEY,LINETHICK0,PRECISION 2,colorFFFF;获利盘:=WINNER(成本价)*100;集中度:=(COST(95)-COST(5))/(COST(95)+COST(5))*100*KEY;DRAWTEXTEX(KEY,1,18,0,'当前获利盘比例：'+NUMTOSTR(获利盘,1)+'％筹码集中度：'+NUMTOSTR(集中度,1)+'％'),colorFF00FF;LA1:=LLVBARS(LOW,17);LA2:=BACKSET(ISLASTBAR,LA1+1);LA:=FILTER(LA2,17);DRAWICON(LA,LOW*0.998,4);DRAWNUMBER(LA,LOW*0.994,LOW,2),colorFFFFFF;LB1:=LLVBARS(LOW,144);LB2:=BACKSET(ISLASTBAR,LB1+1);LB:=FILTER(LB2,144);DRAWICON(LB,LOW*0.996,4);DRAWNUMBER(LB,LOW*0.99,LOW,2),colorFFFFFF;LC1:=LLVBARS(LOW,453);LC2:=BACKSET(ISLASTBAR,LC1+1);LC:=FILTER(LC2,453);DRAWICON(LC,LOW*0.992,4);DRAWNUMBER(LC,LOW*0.986,LOW,2),colorFFFFFF;HA1:=HHVBARS(HIGH,17);HA2:=BACKSET(ISLASTBAR,HA1+1);HA:=FILTER(HA2,17);DRAWICON(HA,HIGH*1.002,5);DRAWNUMBER(HA,HIGH*1.006,HIGH,2),colorFFFFFF;HB1:=HHVBARS(HIGH,144);HB2:=BACKSET(ISLASTBAR,HB1+1);HB:=FILTER(HB2,144);DRAWICON(HB,HIGH*1.004,5);DRAWNUMBER(HB,HIGH*1.008,HIGH,2),colorFFFFFF; LINEVALUE(LB,LOW,LA,LOW,0,0),LINETHICK2,colorFF; LINEVALUE(LC,LOW,LB,LOW,0,0),LINETHICK2,color66FF; LINEVALUE(HB,HIGH,HA,HIGH,0,0),LINETHICK2,color33CC00; TA:=REF(ZHQS,1)<ZHQS;TB:=REF(ZHQS,1)>ZHQS;TD:=ZHQS>MAINX AND FSLMAINX>0;TK:=ZHQS<MAINX AND FSLMAINX<0;STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA,HIGH,LOW,0.5,0),colorFFFF;STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF;STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFFFF;STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB,HIGH,LOW,0.5,0),colorCCCCCC;STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorCCCCCC;STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorCCCCCC;STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD,HIGH,LOW,0.5,0),colorFFFF;STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF;STICKLINE(CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFFFF;STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB AND TK,HIGH,LOW,0.5,0),colorCCCCCC;STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB AND TK AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorCCCCCC;STICKLINE((OPEN<ZHQS OR OPEN<MAINX) AND TB AND TK AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorCCCCCC;STICKLINE((NOT(CLOSE>ZHQS AND OPEN>ZHQS AND TA OR CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD OR (OPEN<ZHQS OR OPEN<MAINX) AND TB)) AND CLOSE<OPEN,HIGH,LOW,0.5,0),colorFFFF00;STICKLINE((NOT(CLOSE>ZHQS AND OPEN>ZHQS AND TA OR CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD OR (OPEN<ZHQS OR OPEN<MAINX) AND TB)) AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF00;STICKLINE((NOT(CLOSE>ZHQS AND OPEN>ZHQS AND TA OR CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD OR (OPEN<ZHQS OR OPEN<MAINX) AND TB)) AND CLOSE>=OPEN,HIGH,LOW,0.5,0),colorFF;STICKLINE((NOT(CLOSE>ZHQS AND OPEN>ZHQS AND TA OR CLOSE>ZHQS AND OPEN>ZHQS AND TA AND TD OR (OPEN<ZHQS OR OPEN<MAINX) AND TB)) AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF;STICKLINE(BARSCOUNT(CLOSE)<=5 AND CLOSE<OPEN,HIGH,LOW,0.5,0),colorFFFF00;STICKLINE(BARSCOUNT(CLOSE)<=5 AND CLOSE<OPEN,OPEN,CLOSE,8,0),colorFFFF00;STICKLINE(BARSCOUNT(CLOSE)<=5 AND CLOSE>=OPEN,HIGH,LOW,0.5,0),colorFF;STICKLINE(BARSCOUNT(CLOSE)<=5 AND CLOSE>=OPEN,OPEN,CLOSE,8,1),colorFF;IF DATATYPE=4 OR DATATYPE=5 THEN BEGINTC1:=MA(ZHC,55);TC2:=MA(ZHC,103);TC3:=MA(ZHC,453);PARTLINE(KEY,EMA(EMA(EMA(EMA(TC1,2),2),5),5)),colorFFFF FF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC3,2),2),5),5)),colorFF0 0FF;VERTLINE(TIME=150000),POINTDOT,color3333;END;ELSE BEGINIF DATATYPE=11 THEN BEGINTC1:=MA(ZHC,55);TC2:=MA(ZHC,103);TC3:=MA(ZHC,453);PARTLINE(KEY,EMA(EMA(EMA(EMA(TC1,2),2),5),5)),colorFFFF FF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC3,2),2),5),5)),colorFF0 0FF;VERTLINE(TIME=140000),POINTDOT,color3333;END;ELSE BEGINIF DATATYPE=6 THEN BEGINIF ST0 OR ST1 OR ST2 OR ST3 OR ST4 THEN BEGINDRAWICON(涨停板ST,HIGH*1.02,10);DRAWICON(跌停板ST,LOW*0.98,11);END;ELSE BEGINDRAWICON(涨停板,HIGH*1.05,10);DRAWICON(跌停板,LOW*0.95,11);END;TC1:=MA(ZHC,14);TC2:=MA(ZHC,25);TC3:=MA(ZHC,99);PARTLINE(KEY,EMA(EMA(EMA(EMA(TC1,2),2),5),5)),colorFFFF FF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC3,2),2),5),5)),colorFF0 0FF;END;ELSE BEGINIF DATATYPE=7 THEN BEGINTC2:=MA(ZHC,99);TC3:=MA(ZHC,181);TC4:=MA(ZHC,272);发财线:EMA(EMA(EMA(EMA(TC1,2),2),5),5),LINETHICK2,PRECISION2,c olorFF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF FF;牛熊界:EMA(EMA(EMA(EMA(TC3,2),2),5),5),LINETHICK2,PRECISION2,c olorFFFF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC4,2),2),5),5)),colorFF0 0FF;END;ELSE BEGINIF DATATYPE=2 OR DATATYPE=3 THEN BEGINTC1:=MA(ZHC,55);TC2:=MA(ZHC,103);TC3:=MA(ZHC,453);PARTLINE(KEY,EMA(EMA(EMA(EMA(TC1,2),2),5),5)),colorFFFF FF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC3,2),2),5),5)),colorFF0 0FF;VERTLINE(TIME=150000),POINTDOT,color3333;END;ELSE BEGINIF DATATYPE=1 THEN BEGINVERTLINE(TIME=150000),POINTDOT,color33CC;END;ELSE BEGINIF DATATYPE=8 THEN BEGINTC2:=MA(ZHC,40);TC3:=MA(ZHC,60);TC4:=MA(ZHC,80);TC5:=MA(ZHC,100);TC6:=MA(ZHC,120);TC7:=MA(ZHC,140);PARTLINE(KEY,EMA(EMA(EMA(EMA(TC1,2),2),5),5)),colorFFFF FF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC2,2),2),5),5)),colorFFFF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC3,2),2),5),5)),colorFF0 0FF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC4,2),2),5),5)),colorCC0 0FF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC5,2),2),5),5)),color990 0FF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC6,2),2),5),5)),color660 0FF;PARTLINE(KEY,EMA(EMA(EMA(EMA(TC7,2),2),5),5)),color330 0FF;END;ELSE BEGINEND;END;END;END;END;END;END;END;ELSEWX:=MA(CLOSE,0);M2:MA(CLOSE,P2)*(IF(N<2,WX,1));M3:MA(CLOSE,P3)*(IF(N<3,WX,1));M4:MA(CLOSE,P4)*(IF(N<4,WX,1));M5:MA(CLOSE,P5)*(IF(N<5,WX,1));M6:MA(CLOSE,P6)*(IF(N<6,WX,1));M7:MA(CLOSE,P7)*(IF(N<7,WX,1));M8:MA(CLOSE,P8)*(IF(N<8,WX,1));副图MACD：KEY:=DATE<=1900731;PARTLINE(KEY,0),LINETHICK2,color99;VAR1:=IF(KEY,EMA(EMA(EMA((OPEN+HIGH+LOW+CLOSE)/ 4,13),13),13),0);VAR2:=(VAR1-REF(VAR1,1))/REF(VAR1,1)*1;智能DIFF:VAR2*100,PRECISION2;智能DEA:EMA(VAR2,21)*100,PRECISION2;智能MACD:VAR2*100,COLORSTICK,PRECISION2;副图能量线:KEY:=DATE<=1900701;ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);VAR1:=REF(ZHC,1);VAR2:=SUM(VOL,2)/((HHV(HIGH,2)-LLV(LOW,2))*100);VAR3:=(CLOSE-VAR1)*VAR2;VAR4:=SUM(VAR3,0);VAR5:=SMA(VAR4,5,1);VAR6:=SMA(VAR4,8,1);ZHSC0:=IF(KEY,VAR5-VAR6,0);ZHSC:=ZHSC0/10;ZHD:=(SUM(IF(ZHSC>0,ZHSC*1.003,ZHSC*1.003>0),34))/(34 );ZHE:=(SUM(IF(ZHSC<=0,ZHSC*0.97,ZHSC*0.97<0),34))/(34);能量:ZHSC,COLORSTICK,PRECISION1,colorFF;PARTLINE(KEY,ZHD),LINETHICK2,colorFFFF;PARTLINE(KEY,ZHE),LINETHICK2,colorFF00;PARTLINE(KEY,0),LINETHICK2,colorFFFFFF;副图成交量：KEY:=DATE<=1900731;总股本:=FINANCE(1);净利润:=FINANCE(30);每股收益:=净利润*1000/(总股本*10000);流通盘:=CAPITAL;每股净资:=FINANCE(34);市盈率:=CLOSE/每股收益;换手率:=VOL/CAPITAL*100;流通市值:=CAPITAL*VOLUNIT*CLOSE;均量10:=MA(VOL,10);均量20:=MA(VOL,20);均量40:=MA(VOL,40);涨跌幅:(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100;成交手数:VOL,VOLSTICK;DRAWTEXTEX(KEY,0,0,0,STKNAME+'('+STKLABEL+') 流通盘:'+NUMTOSTR(流通盘/100,0)+'万股市盈率:'+NUMTOSTR(市盈率,0)+'倍每股净资:'+NUMTOSTR(每股净资,2)+'元流通市值:'+NUMTOSTR(流通市值/10000,2)+'万元成交额:'+NUMTOSTR(AMOUNT/10000,2)+'万元换手率:'+NUMTOSTR(换手率,2)+'%'),color66FF;PARTLINE(KEY,均量10),colorFF00;PARTLINE(KEY,均量20),colorFFFF;PARTLINE(KEY,均量40),colorFFFFFF;⑤%:CAPITAL*5/100,linedot;交易分钟数:=if(CURRENTTIME>93000 and CURRENTTIME<150000,if(CURRENTTIME<113000,(TIMETOT0(CURRENTTIME)-34200)/60,if(CURRENTTIME>130000,(TIMETOT0(CURRENTTIME)-39600)/60,120)),240);预测量:IF(BARSTATUS=2,VOL/交易分钟数*240,VOL),COLOR00FFFF,LINETHICK0;{预测量2:IF(BARSTATUS=2,VOL*240/OPENMINUTES(CURRENTTIME),VO L),COLOR00FF00,LINETHICK0;}STICKLINE(BARSTATUS=2,0,预测量,8,1),COLOR00FFFF,LINEDOT副图位置:KEY:=DATE<=1900731;VAR3:=LLV(LOW,33);VAR4:=HHV(HIGH,21);VAR5:=IF(KEY,EMA((CLOSE-VAR3)/(VAR4-VAR3)*100,20)*0.998,0);PARTLINE(KEY,20),LINETHICK2,color808080;PARTLINE(KEY,50),LINETHICK2,colorFFFFFF;PARTLINE(KEY,80),LINETHICK2,colorFF00FF;技术位:EMA(0.667*REF(VAR5,1)+0.333*VAR5,1),CIRCLEDOT,PRECISIO N1,colorFF00;MACD选股：智能DIFF:="ZNMACD.智能DIFF";智能DEA:="ZNMACD.智能DEA";BUY:=LONGCROSS(智能DIFF,智能DEA,N) AND BETWEEN(智能DEA,-0.05,0.35);BARSLAST(BUY)<=X;筹码选股：KEY:=DATE<=1900731;ZHM:="AMOUNT#DAY"/"VOL#DAY"/100*KEY;CM1:=SMA(EMA(ZHM,1),2,1);CM3:=SMA(EMA(ZHM,3),2,1);CM6:=SMA(EMA(ZHM,6),2,1);CM7:=SMA(EMA(ZHM,7),2,1);CMM:=(CM1+CM3+CM6+CM7)/4;CMX:=SMA(EMA(COST(59),21),2,1);LONGCROSS(CMM,CMX,25);多空选股:KEY:=DATE<=1900731;ZHC:=IF(KEY,(OPEN+HIGH+LOW+CLOSE)/4,0);DMZ:=IF(HIGH+LOW<=REF(HIGH,1)+REF(LOW,1),0,MAX(AB S(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));DMF:=IF(HIGH+LOW>=REF(HIGH,1)+REF(LOW,1),0,MAX(AB S(HIGH-REF(HIGH,1)),ABS(LOW-REF(LOW,1))));ADMZ:=IF(KEY,MA(DMZ,10),0);ADMF:=IF(KEY,MA(DMF,10),0);STZ0:=IF(ADMZ>ADMF,(ADMZ-ADMF)/ADMZ,IF(ADMZ=ADMF,0,(ADMZ-ADMF)/ADMF));STZ:=(IF(ADMZ>ADMF,(ADMZ-ADMF)/ADMZ,IF(ADMZ=ADMF,0,(ADMZ-ADMF)/ADMF)))*(60);ASTZ:=SMA(STZ0,30,1)*60;BUY:=ALL(ASTZ<26,120) AND ASTZ>-5 AND ASTZ<15 AND CROSS(STZ,ASTZ);BARSLAST(BUY)<=X;。

缠论三类买点选股公式

缠论三类买点选股公式摘要：一、引言二、缠论三类买点简介1.一类买点2.二类买点3.三类买点三、缠论三类买点选股公式详解1.一类买点选股公式2.二类买点选股公式3.三类买点选股公式四、缠论三类买点选股公式的实际应用与案例分析1.一类买点选股公式实际应用与案例分析2.二类买点选股公式实际应用与案例分析3.三类买点选股公式实际应用与案例分析五、总结正文：一、引言缠论，全名缠中说禅，是由我国著名投资家、分析师缠中说禅所创立的一种技术分析理论。

缠论以中枢、走势、买卖点为核心，通过研究价格、成交量、时间、空间等市场行为，为投资者提供了一套独特的分析方法和操作策略。

在缠论中，买卖点的把握是关键，而选股公式则是辅助投资者快速筛选出具有买卖点股票的重要工具。

本文将详细介绍缠论三类买点选股公式的相关内容。

二、缠论三类买点简介缠论将买点分为一类买点、二类买点和三类买点。

三类买点在缠论中分别有不同的定义和特点，具体如下：1.一类买点：是指股价在下跌过程中，出现一个次级别的背驰，从而引发的一个买点。

这类买点通常预示着下跌趋势的终结和上涨趋势的开始。

2.二类买点：是指股价在上涨过程中，出现一个次级别的回调，从而引发的一个买点。

这类买点通常预示着上涨趋势的延续和加速。

3.三类买点：是指股价在上涨或下跌过程中，出现一个次级别的盘整背驰，从而引发的一个买点。

这类买点通常预示着趋势的转折和市场方向的明确。

三、缠论三类买点选股公式详解为了方便投资者快速筛选出具有三类买点的股票，我们可以通过编写选股公式来实现。

以下是三类买点的选股公式：1.一类买点选股公式：```X1 := HIGH > REF(HIGH, 1) AND LOW < REF(LOW, 1) AND HIGH > REF(HIGH, 1);X2 := X1 AND COUNT(X1, 5) = 1;```2.二类买点选股公式：```X1 := LOW < REF(LOW, 1) AND HIGH > REF(HIGH, 1) AND LOW < REF(LOW, 1);X2 := X1 AND COUNT(X1, 5) = 1;```3.三类买点选股公式：```X1 := REF(HIGH, 1) < REF(LOW, 1) AND HIGH > REF(HIGH, 1) AND REF(HIGH, 1) < REF(LOW, 1);X2 := X1 AND COUNT(X1, 5) = 1;```四、缠论三类买点选股公式的实际应用与案例分析以下我们将通过实际案例来分析三类买点选股公式的应用：1.一类买点选股公式实际应用与案例分析：在某个股票市场中，某只股票经过一段时间的下跌后，出现了一类买点。

手机能用的缠论指标公式提示三买

手机能用的缠论指标公式提示三买一、线段形态判断缠论中的线段形态判断主要包括线段标识、线段高低点判断以及线段结束判断。

其中，线段标识主要有线段上升（阳线段）和线段下跌（阴线段）两种形态。

在判断线段的高低点时，需要综合考虑前一线段的高低点和当前线段的走势确定。

线段结束的判断可以通过高低点的变化形态进行判断，如前低点下探或者高低点持平等。

二、均线系统缠论中的均线系统主要使用到了5日均线和20日均线。

其中，5日均线代表短期趋势，20日均线代表中期趋势。

当5日均线上穿20日均线时，代表短期趋势向上，这时候可以考虑买入；当5日均线下穿20日均线时，代表短期趋势向下，这时候可以考虑卖出。

三、缠论指标的使用缠论中常用的指标包括MACD、KDJ和RSI指标等。

这些指标可以综合分析价格走势的强弱以及超买超卖情况。

1.MACD指标是一种趋势指标，通过计算移动平均线的快线与慢线之间的差异来判断价格的走势状况。

当MACD指标快线上穿慢线时，代表价格走势向上，可以考虑买入；当MACD指标快线下穿慢线时，代表价格走势向下，可以考虑卖出。

2.KDJ指标是一种摆动指标，通过计算最高价、最低价和收盘价之间的关系来判断市场的买卖力量。

当KDJ指标的K线上穿D线时，代表市场买入力量增强，可以考虑买入；当KDJ指标的K线下穿D线时，代表市场卖出力量增强，可以考虑卖出。

3.RSI指标是一种相对强弱指标，通过计算一段时间内价格上涨和下跌幅度的比例来判断市场的超买超卖情况。

当RSI指标超过70%时，代表市场超买，可以考虑卖出；当RSI指标低于30%时，代表市场超卖，可以考虑买入。

综上所述，手机能用的缠论指标公式主要包括线段形态判断、均线系统和缠论指标的使用。

通过综合使用这些指标，可以更好地判断市场的走势以及买卖时机。

当然，这些指标只是一种辅助工具，投资者还需要结合具体的市场情况进行判断和决策。

缠论三类买点选股公式

缠论三类买点选股公式
摘要：
一、引言
二、缠论简介
1.缠论的来源
2.缠论的核心理论
三、三类买点
1.一类买点
2.二类买点
3.三类买点
四、缠论三类买点选股公式
1.公式构成
2.公式应用
五、结论
正文：
缠论是一种基于浪的理论体系，由股票市场分析师、心理学家缠中说禅（微博ID：@缠中说禅）创立。

其核心理论包括：走势必完美、中枢、走势类型、背驰等。

缠论认为，股票市场的走势是复杂多变的，但无论多么复杂，都可以归结为浪的连接和转折。

通过研究浪的规律，可以把握市场走势，实现稳定盈利。

在缠论中，买点是指在某个价格区间内，股票价格可能反转上涨的点。

根
据买点出现的位置和特点，缠论将买点分为三类。

1.一类买点：在下跌趋势中出现的买点，表示股票价格可能反转进入上升趋势。

2.二类买点：在盘整过程中出现的买点，表示股票价格可能在盘整后选择向上突破。

3.三类买点：在上升趋势中出现的买点，表示股票价格可能加速上涨。

缠论三类买点选股公式是基于缠论的三类买点理论，通过技术指标和公式，筛选出可能出现三类买点的股票。

公式主要包括两个部分：趋势判断和买点确认。

1.趋势判断：通过判断股票价格的中长期趋势，筛选出处于上升趋势或盘整阶段的股票。

2.买点确认：在上升趋势或盘整阶段的股票中，通过技术指标和公式，找出可能出现三类买点的股票。

总的来说，缠论三类买点选股公式是一种基于缠论理论的选股方法，通过筛选可能出现三类买点的股票，帮助投资者把握市场机会，实现盈利。

缠论第3买点选股公式

缠论第3买点选股公式
缠论第3买点选股公式
1、柱状缠论：
a ) 买入股价突破20日最高价并形成新高时，可以考虑买入；
b ) 如果历史行情中，股票有5日以上的上涨行情，可以考虑买入；
c ) 如果最近行情出现一次弱势缠论，且当日收盘价比弱势价高，也可以考虑买入。

2、K线缠论：
a ) 当股价跌破10日高点，同时出现K线形态具有缩量和减速特征，可以考虑买入；
b ) 如果收盘价突破10日高点，而且形态有减速，可以考虑买入；
c ) 如果行情中出现K线上影线，但是当日收盘价比弱势价高，也可以考虑买入。

3、指标缠论：
a ) 如果MACD柱线从负值向正值转变，加上指标的中线穿越线型上影线并距离弱势价较近，可以考虑买入；
b ) 如果KDJ柱线从负值向正值转变，加上指标的K线接近穿越线型上影线而且弱势价较低，可以考虑买入；
c ) 如果RSI柱线形成回升趋势，指标收盘价在20和80之间，可以考虑买入。

缠论类一买选股公式

缠论类一买选股公式
缠论是一种技术分析方法，主要用于股市走势预测和选股。

缠论类一买选股公式是根据缠论的理论原则和技术指标进行选股的公式。

缠论的理论原则是基于K线图形态的变化和价格走势的判断，根据市场的波动性和趋势性来进行选股。

缠论技术指标包括各种趋势线、通道线、顶底转折点等指标。

缠论类一买选股公式可以根据不同的缠论指标进行选择，以下是一个基本的缠论类一买选股公式：
1. 确定股票的趋势：根据缠论理论原则，首先确定股票的趋势是上涨趋势还是下跌趋势。

可以通过观察股票的K线图形态
和趋势线来判断。

2. 确定买入信号：在确定股票的趋势后，根据缠论的技术指标，确定买入信号。

例如，在上涨趋势中，可以通过价格突破阻力线、趋势线、布林带等指标来确定买入信号。

3. 设置止损点：在确定买入信号后，设置止损点以控制风险。

可以根据股票的波动性和缠论指标来设置止损点，一般可以设置在价格突破的支撑线下方。

4. 确定持有时间：在买入后，根据缠论的技术指标，确定持有时间。

可以根据股票的波动性和趋势性来确定持有时间，一般可以持有到股票走势出现明显反转。

需要注意的是，缠论类一买选股公式只是一种参考方法，投资者在使用时需要结合自己的实际情况和风险承受能力进行操作，并且需要进行实盘验证。

一图教会你缠论的（三买），让你从此走向财务自由之路.......

一图教会你缠论的（三买），让你从此走向财务自由之路.......
别问我是怎么知道这个三买的,我也是听别人说的,说日线级别的三买。

对照看相应的macd图形。

把此图精细的看上三五年或研究个三年五年。

没看个三五年哪能轻易明白这里的道理，看到此图就像看无字天书。

如其在缠版那样瞎混,不如把此图挂在床头看三年五年更实在。

也是奇怪得道之后竟有一种白日飞升飘飘然的感觉。

学缠的入门就是画线，而线的2端就是低分型和顶分型，最好在1只票的周，日，60 30 15 5 1，各级别画。

画到你一眼能看出这个顶低分型是本级别的另外几个是次级别，甚至次次级别的，还有扩张后变成大级别顶低分型的时候，再去理解123类买卖点就明白了。

但这只是刚刚学会用筷子而已，夹到肉还是菜皮还要两说。

这图是108课里的图,这票是缠师说的票,这三买是缠师说的三买,我把这图一贴,原意是想让学正宗缠论三买的人无地自容的,结果这图一贴出来,竟然无人能识,还有一堆人出来否定，还是我后来多次提醒以后,才有个别的人知道这是缠师说的三买,你说他们这些缠论学的。

先会看中枢,然后找出中枢,一个中枢的盘整走势类型, 两个同级别的中枢同向不叠加的是趋势走势类型，相叠的同级别的两个中枢走势还是盘整走势类型,延伸的还是盘整,扩展的还是盘整, 扩张的也还是盘整走势类型。

缠术在理论上就这两种而已，很简单的。

思考高人的“二买‘三买不在本级别的这句话。

1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。

zd:="chzhshch@zd"(var3);
zswz:=barslast(zg>zd);
tj3:=count(abs(var3),barslast(var3=1))=0;
tj4:=l<ref(l,barslast(var2=-1));
tj5:=count(var2=1,zswz-1)>0;
zd:="chzhshch@zd"(var3);
var1:="="chzhshch@bi";
var4:=barslast(var001<>0);
tj1:=ref(var001,var2)=-1; //上级别是底
var5:=sum(abs(var2),var2);
if datatype=4 then var001:="fbase.var2#day";
var1:="chzhshch@kxian";
var2:="chzhshch@bi";{处理笔关系}
var3:="chzhshch@tongji"(minbi);{同级别分解}
zg:="chzhshch@zg"(var3);//一定要先调用ZG
tj6:=count(var2=1,zswz-1)=0;
zgg:=ref(zg,zswz);
tj7:=o>c&&count(if(o>c,1,0),barslast(var2=-1)-1)=1&&ref(h,1)>zgg&&l>zgg;
tj8:=o>c&&count(if(o>c,1,0),min(barslast(var2=-1)-1,barslast(l>zgg)))=1&&ref(h,1)>zgg&&l>zgg;
tj6:=count(var2=1,zswz-1)=1;
tj7:=ref(l,barslast(var2=1))>ref(zg,barslast(zg>zd));
not(zg>zd)&&tj3&&tj4&&tj5&&tj6&&tj7;
end;
再加一个仿悟多日线3买的公式，当然不是只能用于日线，但这个似乎是日线用起来更好些。
tj6:=ref(h,barslast(var2=1))<ref(zd,zswz);
tj7:=count(zg>zd,barslast(var3=1))>0;
not(zg>zd)&&tj3&&tj7&&tj4&&tj5&&tj6;
end;
一买是模糊的，不准确的，三买就比较标准了，同样背驰需自行判断，否则不背驰就跌回中枢了：
if datatype=4 then var001:="fbase.var2#day";
var1:="chzhshch@kxian";
var2:="chzhshch@bi";{处理笔关系}
var3:="chzhshch@tongji"(minbi);{同级别分解}
zg:="chzhshch@zg"(var3);//一定要先调用ZG
tj2:=var5=1; //第一个回调才算
tj3:=count(abs(var3),barslast(var3=-1))=0;
zswz:=barslast(zg>zd);
tj4:=count(zg>zd,barslast(var3=-1))>0;
tj5:=count(var2=1,barslast(var2=-1))=1;
if DATAPERIOD=3 then minbi:="fbase.var2#min60";
if DATAPERIOD=4 then minbi:="fbase.var2#day";
if DATAPERIOD=5 then minbi:="fbase.var2#day";
if DATAPERIOD=6 then minbi:="fbase.var2#week";
if DATAPERIOD=7 then minbi:="fbase.var2#month";
if DATAPERIOD=8 then minbi:="fbase.var2#year";
var001:="fbase.var2#min30";
if datatype=3 then var001:="fbase.var2#min60";
if datatype=4 then var001:="fbase.var2#day";
var1:="chzhshch@kxian";
var2:="chzhshch@bi";{处理笔关系}
var3:="chzhshch@tongji"(minbi);{同级别分解}
zg:="chzhshch@zg"(var3);//一定要先调用ZG
if DATAPERIOD=7 then minbi:="fbase.var2#month";
if DATAPERIOD=8 then minbi:="fbase.var2#year";
var001:="fbase.var2#min30";
if datatype=3 then var001:="fbase.var2#min60";
zd:="chzhshch@zd"(var3);
{var4:=barslast(var001<>0);
tj1:=ref(var001,var2)=-1; //上级别是底
var5:=sum(abs(var2),var2);
tj2:=count(var2=1,barslast(var2=-1))=1; //第一个回调才算}
begin
if DATAPERIOD=0 then minbi:="fbase.var2#min1";
if DATAPERIOD=1 then minbi:="fbase.var2#min5";
if DATAPERIOD=2 then minbi:="fbase.var2#min30";
tj3:=count(if(var2=1,1,0),barslast(var2=-1))=0;
zswz:=barslast(zg>zd);
tj4:=count(zg>zd,barslast(var3=-1))>0;
tj5:=count(var2=1,barslast(var2=-1))=0;
if DATAPERIOD=7 then minbi:="fbase.var2#month";
if DATAPERIOD=8 then minbi:="fbase.var2#year";
var001:="fbase.var2#min30";
if datatype=3 then var001:="fbase.var2#min60";
begin
if DATAPERIOD=0 then minbi:="fbase.var2#min1";
if DATAPERIOD=1 then minbi:="fbase.var2#min5";
if DATAPERIOD=2 then minbi:="fbase.var2#min30";
[飞狐] 缠论一买、三买选股公式（飞狐+悟多公式）+仿悟多三买公式
相关搜索: 飞狐, 公式
一买的选股公式初步搞出来的，当然还不完善，不能算是一买的公式，充其量算选出即将盘整背驰的，不过两个中枢下的盘整背驰就是一买了，当然真正是否背驰还要靠人工来判断，它只能初选，不过也省下很多事了，欢迎使用，多提意见。
if DATAPERIOD=3 then minbi:="fbase.var2#min60";
if DATAPERIOD=4 then minbi:="fbase.var2#day";
if DATAPERIOD=5 then minbi:="fbase.var2#day";
if DATAPERIOD=6 then minbi:="fbase.var2#week";
tj3&&tj5&&tj6&&(tj7 or tj8);
end;
如何选股 /ruhechaogu/ruhexuangu/
文章来源：股票入门 (/)
if DATAPERIOD=3 then minbi:="fbase.var2#min60";
if DATAPERIOD=4 then minbi:="fbase.var2#day";
if DATAPERIOD=5 then minbi:="fbase.var2#day";