刚做好江恩角度线公式及原码欢迎大家指导

happy19683

好贴,学习.gif" smilieid="273" border="0" alt="" />

大话李白

tqz75

请试验在三日图下，是否也能全面诠释市场时空！

大话李白

　　假设江恩线的作用是为了预测市场的未来走向这一理论成立。哪么如何才能确定市场中哪些股票能走强呢？下面的图片和思考只是为了验证这一理论进行的第一步。以后会在市场的波段内不断进行验证。
我们先编一个开方的指标，指标原码如下：

FU1:POW(SQRT(LLV(L,BARSLAST(DATE=1100702)+1))+0.25,2),COLORWHITE,LINETHICK3;
这句原码是找到自2010年07月02日以来的最低价处，以该价位开平方后+0.25后求2次方得到的一个数。原理可能与江恩的开方相类似吧！

然后再编一个自2010年07月02日以来涨幅的排序指标，找到阶段内涨幅最大的和最小的股票。以便观察上面题到的江恩原理的这个横线对涨幅的影响。涨幅排序指标原码如下：
ZQ:=BARSLAST(DATE<=1100702);
A:=IF(DATE>=1100702 AND DATE<=1100818,C,0);
LA:=LLV(A,ZQ);
HB:=HHV(A,ZQ);
阶段涨幅排序:HHV((HB/LA-1)*100,ZQ);


做好这两个指标后对Ａ股进行排序。前20名和后20名图片如下：

1.　沪深涨幅前20名。


2.沪深涨幅后20名：

大话李白

下面是涨幅前3名股票中开方后又平方线对涨幅的影响。

大话李白

下面是该线在弱势股中的位置。

大话李白

由上面的图片可知，快速突破并站在这横线上的才是今后的强势股哟~

不相信的话，把指标导入软件内排序后试试。这根线可以说是第一阶梯。

欢迎大家测试~

minsdren

很感谢楼主如此无私的交流。多谢

大话李白

短期筹码堆积在2710处，形成压力。

1.　下面是2010.07.28日的2710筹码堆积图片：


2.　下面是今天的2710筹码规程图片：


积累越多压力越大，当突破2710时就形成了支撑。所以目前是观望。在2710获得支撑后再玩~

3.　下面是对后期的预测图，也不知测的对不对。测的不对的，一定要靠诉我哟~


4.上述判断来源于下面的公式原码如下：

B:=TROUGHBARS(2,16.18,1)=0;
UL:=SUM(B,0);
LU:=UL[datacount]-UL+1;
DA1:=BARSLAST(LU=1 AND REF(LU,1)>1)+1;
L1:=REF(L,BARSLAST(LU=1 AND REF(LU,1)>1)),PRECISION2;
DA2:=BARSLAST(LU=2 AND REF(LU,1)>2)+1,LINETHICK0;
L2:=REF(L,BARSLAST(LU=2 AND REF(LU,1)>2)),PRECISION2;
H1:=HHV(IF(LU=2,H,0),DATEL2),PRECISION2;
DATEH1:=BARSLAST(H=H1)+1;
DXL:=LINEVALUE(LU=2 AND REF(LU,1)>2,L,DATEH1=1,H,0,1);
D18:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))/8,0,1),COLORGREEN,LINEDOT;
D14:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))/4,0,1),COLORGREEN,LINEDOT;
D13:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))/3,0,1),COLORGREEN,LINEDOT;
D12:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))/2,0,1),COLORGREEN,LINEDOT;
D11:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2)),0,1),COLORGREEN,LINETHICK1;
D21:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))*2,0,1),COLORGREEN,LINEDOT;
//D31:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))*3,0,1),COLORGREEN,LINEDOT;
//D41:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))*4,0,1),COLORGREEN,LINEDOT;
//D81:LINEVALUE(DATEH1=1,H,DATEH1=2,REF(H,1)-(REF(H,1)-REF(DXL,2))*8,0,1),COLORGREEN,LINEDOT;
//临界Z:POW(SQRT(L1)+0.25,2),COLORFF00FF,CIRCLEDOT;
//临界D:POW(SQRT(H1)-0.25,2),LINETHICK0;
//PARTLINE(D11<>0,临界D),COLORBLUE,CIRCLEDOT;
ZXL:=LINEVALUE(DATEH1=1,H,LU=1 AND REF(LU,1)>1,L,0,1);
Z18:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))/8,0,1),COLORYELLOW,LINEDOT;
Z14:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))/4,0,1),COLORYELLOW,LINEDOT;
Z13:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))/3,0,1),COLORYELLOW,LINEDOT;
Z12:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))/2,0,1),COLORYELLOW,LINEDOT;
Z11:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1)),0,1),COLORYELLOW,LINETHICK1;
Z21:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))*2,0,1),COLORYELLOW,LINEDOT;
Z31:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))*3,0,1),COLORYELLOW,LINEDOT;
Z41:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))*4,0,1),COLORYELLOW,LINEDOT;
Z81:LINEVALUE(LU=1 AND REF(LU,1)>1,L,REF(LU,1)=1 AND REF(LU,2)=2,REF(L,1)+(REF(ZXL,2)-REF(L,1))*8,0,1),COLORYELLOW,LINEDOT;
{成本堆积}
a0:=BARSCOUNT(c);
a3:=SYSPARAM(3);
a2:=SYSPARAM(2);
a4:=SYSPARAM(4);
a5:=SYSPARAM(5);
a6:=SYSPARAM(1);
n0:=a3-a2;
nn:=a0-a2;
h1:=(a4-a5)/8;
h2:=h1/4;
l1:=llv(l,n0);
ll2:=l1[a3];
y0:=a0>=a2;
vv:=if(y0=1 and a6>=a0,v,0);
c1:=if(BETWEEN(c,a4-0*h1,a4-1*h1),vv,0);
c2:=if(BETWEEN(c,a4-1*h1,a4-2*h1),vv,0);
c3:=if(BETWEEN(c,a4-2*h1,a4-3*h1),vv,0);
c4:=if(BETWEEN(c,a4-3*h1,a4-4*h1),vv,0);
c5:=if(BETWEEN(c,a4-4*h1,a4-5*h1),vv,0);
c6:=if(BETWEEN(c,a4-5*h1,a4-6*h1),vv,0);
c7:=if(BETWEEN(c,a4-6*h1,a4-7*h1),vv,0);
c8:=if(BETWEEN(c,a4-7*h1,a4-8*h1),vv,0);
c9:=if(BETWEEN(c,a4-8*h1,a4-9*h1),vv,0);
c10:=if(BETWEEN(c,a4-9*h1,a4-10*h1),vv,0);
v1:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c1,n0),0),2));
v2:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c2,n0),0),2));
v3:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c3,n0),0),2));
v4:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c4,n0),0),2));
v5:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c5,n0),0),2));
v6:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c6,n0),0),2));
v7:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c7,n0),0),2));
v8:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c8,n0),0),2));
v9:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c9,n0),0),2));
v10:=STRTONUM(NUMTOSTR(if(ISLASTBAR,sum(c10,n0),0),2));
av0:=max(v1,max(v2,max(v3,max(v4,max(v5,max(v6,max(v7,max(v8,max(v9,v10)))))))));
x1:=v1/av0>=nn/n0 and nn>=0;
x2:=v2/av0>=nn/n0 and nn>=0;
x3:=v3/av0>=nn/n0 and nn>=0;
x4:=v4/av0>=nn/n0 and nn>=0;
x5:=v5/av0>=nn/n0 and nn>=0;
x6:=v6/av0>=nn/n0 and nn>=0;
x7:=v7/av0>=nn/n0 and nn>=0;
x8:=v8/av0>=nn/n0 and nn>=0;
FILLRGN(v1/av0>=nn/n0 and nn>=0,a4-0*h1,a4-0.05*h1),Color002288;
FILLRGN(v2/av0>=nn/n0 and nn>=0,a4-1*h1,a4-1.05*h1),Color806000;
FILLRGN(v3/av0>=nn/n0 and nn>=0,a4-2*h1,a4-2.05*h1),Color808300;
FILLRGN(v4/av0>=nn/n0 and nn>=0,a4-3*h1,a4-3.05*h1),Color883D88;
FILLRGN(v5/av0>=nn/n0 and nn>=0,a4-4*h1,a4-4.05*h1),Color006868;
FILLRGN(v6/av0>=nn/n0 and nn>=0,a4-5*h1,a4-5.05*h1),color777700;
FILLRGN(v7/av0>=nn/n0 and nn>=0,a4-6*h1,a4-6.05*h1),color804000;
FILLRGN(v8/av0>=nn/n0 and nn>=0,a4-7*h1,a4-7.05*h1),color003377;
DRAWNUMBER(FILTER(refx(x1<ref(x1,1),6) and v1>0,10),a4,a4-0*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x2<ref(x2,1),6) and v2>0,10),(a4-1*h1),a4-1*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x3<ref(x3,1),6) and v3>0,10),(a4-2.7*3*h2),a4-2*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x4<ref(x4,1),6) and v4>0,10),(a4-12*h2),a4-3*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x5<ref(x5,1),6) and v5>0,10),(a4-16*h2),a4-4*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x6<ref(x6,1),6) and v6>0,10),(a4-20*h2),a4-5*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x7<ref(x7,1),6) and v7>0,10),(a4-24*h2),a4-6*h1,2),COLOR00FF00;
DRAWNUMBER(FILTER(refx(x8<ref(x8,1) and x8>0,5),10),ll2+1*4*h2,a4-7*h1,2),COLOR00FF00;

大话李白

上图中原码有电话图形的是代码ＨＴＭＬ代码巧合。
如导入不成功，请按下图中的内容进行部分替换。

渤海黄花鱼

楼主很强大，新人学习了，谢谢！

j91191

辛苦了 辛苦了 辛苦了

samyongq

楼主编写公式的能力真是强大，赞一个。

kang21324

能否设置为斜率为手动输入参数?每只股票的波动都是不相同的

minsdren

楼主在发帖子的时候只要禁止

• 禁用 Smilies
• 禁用 Discuz!代码

这个就可以防止出现电话样的图标了。

zero-zero

建议  是不是 可以  【%】作为斜率呢？   1%

毕竟 指数有几百点时，也有几千点，将来可能有几万点呀？是不是？

壹瓣杺埖

画线是否切中要害  
关键在于斜率值的取值！

星月轮回

大话李白

原帖由 zero-zero 于 2010-8-22 00:34 发表
建议  是不是 可以  【%】作为斜率呢？   1%

毕竟 指数有几百点时，也有几千点，将来可能有几万点呀？是不是？

可以用【%】作为斜率，但是上涨的%与下跌的%不好换算。例如，一支股票在一定周期内上涨了１５%，如何规定在下一个等周期内下跌多少才与前期上涨的启点位置重合呢？

tqz75

我搭档 股中变   拿了楼主贵人的代码测试了一下！

pengyi

我的问题是自动江恩角度线可否做出选股指标呢？如果能就实在好了

cyjawyt

呵呵，发一下我自己写的，非固定波动率，跟楼主的源码完全不一样~~

道氏法则强调收盘价，故而选用收盘线主图，分割比率不仅仅是黄金比率，还有一些数理中重要的转折比率，江恩的八分位做成了另一个主图，免得分割比率太多，不便于观察~~

还可以优化的，太懒了，懒得整了~~






[ 本帖最后由 cyjawyt 于 2010-8-23 20:03 编辑 ]

大话李白

昨天，阅读了何造中的《江恩角度线》，封面如下图：


式

大话李白

[quote]原帖由 大话李白 于 2010-8-23 13:24 发表
昨天，阅读了何造中的《江恩角度线》，封面如下图：


式 [/quote] 书中提到的波动率＝（历史最高价－历史最低价）/交易天数。编写成公式原码如下：HV:HHV(H,0),PRECISION2,LINETHICK0;
LV:LLV(L,0),PRECISION2,LINETHICK0;
SUMC:SUM(C>0,0),LINETHICK0;
波动率C:(HV-LV)/SUMC,LINETHICK0;这样可得出股票的每一日的波动率。从而根据波动率画出角度线。下面是2005.06.06为起点的江恩角度线原码：HV:HHV(H,0),PRECISION2,LINETHICK0;
LV:LLV(L,0),PRECISION2,LINETHICK0;
SUMC:SUM(C>0,0),LINETHICK0;
波动率C:(HV-LV)/SUMC,LINETHICK0;
U01:LINEVALUE(DATE=1050606,L,REF(DATE,1)=1050606,REF(L,1)+0.605,0,1),COLOR0066CC,LINETHICK2; 导入成公式，日线周期的效果图如下：

大话李白

原帖由 大话李白 于 2010-8-23 13:30 发表
书中提到的波动率＝（历史最高价－历史最低价）/交易天数。编写成公式原码如下：HV:HHV(H,0),PRECISION2,LINETHICK0;
LV:LLV(L,0),PRECISION2,LINETHICK0;
SUMC:SUM(C>0,0),LINETHICK0;
波动率C:(HV-LV)/SUMC,LI ...

同理，可画出1664.93点以来的上升江恩角度线原码及效果图如下:
HV:HHV(H,0),PRECISION2,LINETHICK0;
LV:LLV(L,0),PRECISION2,LINETHICK0;
SUMC:SUM(C>0,0),LINETHICK0;
波动率C:(HV-LV)/SUMC,LINETHICK0;
U01:LINEVALUE(DATE=1050606,L,REF(DATE,1)=1050606,REF(L,1)+REF(波动率C,1),0,1),COLOR0066CC,LINETHICK2;
U11:LINEVALUE(DATE=1081028,L,REF(DATE,1)=1081028,REF(L,1)+REF(波动率C,1),0,1),COLORFF00FF,LINETHICK2;

jun_lan74

大话李白

同理，可做出你认为较重要的高低点的江恩角度线。原码及效果图如下。HV:HHV(H,0),PRECISION2,LINETHICK0;
LV:LLV(L,0),PRECISION2,LINETHICK0;
SUMC:SUM(C>0,0),LINETHICK0;
波动率C:(HV-LV)/SUMC,LINETHICK0;D01:LINEVALUE(DATE=1010614,H,REF(DATE,1)=1010614,REF(H,1)-REF(波动率C,1),0,1),COLORFFFF00,LINETHICK1;
D11:LINEVALUE(DATE=1071016,H,REF(DATE,1)=1071016,REF(H,1)-REF(波动率C,1),0,1),COLORBLUE,LINETHICK1;
D21:LINEVALUE(DATE=1090804,H,REF(DATE,1)=1090804,REF(H,1)-REF(波动率C,1),0,1),COLORGREEN,LINETHICK1;U01:LINEVALUE(DATE=1050606,L,REF(DATE,1)=1050606,REF(L,1)+REF(波动率C,1),0,1),COLOR0066CC,LINETHICK2;
U11:LINEVALUE(DATE=1081028,L,REF(DATE,1)=1081028,REF(L,1)+REF(波动率C,1),0,1),COLORFF00FF,LINETHICK2;
U21:LINEVALUE(DATE=1100702,L,REF(DATE,1)=1100702,REF(L,1)+REF(波动率C,1),0,1),COLORYELLOW,LINETHICK1; 效果图如下：

[[i] 本帖最后由 大话李白 于 2010-8-23 13:55 编辑 [/i]]

大话李白

原帖由 大话李白 于 2010-8-23 13:54 发表
同理，可做出你认为较重要的高低点的江恩角度线。原码及效果图如下。HV:HHV(H,0),PRECISION2,LINETHICK0;
LV:LLV(L,0),PRECISION2,LINETHICK0;
SUMC:SUM(C>0,0),LINETHICK0;
波动率C:(HV-LV)/SUMC,LINETHICK0;D01 ...

问题来了，到底哪一个是正确的呢？高手们是哪何绘出江恩角度线呢？是根据底点或高点出来后再运行一段时间后绘图。
还是根据波动率从一点引出江恩角度线呢?

[ 本帖最后由 大话李白 于 2010-8-23 14:10 编辑 ]

大话李白

原帖由 大话李白 于 2010-8-23 13:58 发表


问题来了，到底哪一个是正确的呢？高手们是哪何绘出江恩角度线呢？是根据底点或高点出来后再运行一段时间后绘图。
还是根据波动率从一点引出江恩角度线呢?

首先请版主原谅没在一个贴内贴完所有的图，因为无法批量上传附件。
第一根对后市的影响效果图:

大话李白

原帖由 大话李白 于 2010-8-23 14:13 发表

首先请版主原谅没在一个贴内贴完所有的图，因为无法批量上传附件。
第一根对后市的影响效果图:

第二根对后市的影响效果图：