找回密码
 立即注册

QQ登录

只需一步,快速开始

广告载入中...
查看: 32196|回复: 892

峰谷线公式改编

   火... [复制链接]
发表于 2010-10-8 13:13 | 显示全部楼层 |阅读模式

马上注册,享用更多功能,让你轻松玩转本论坛。

您需要 登录 才可以下载或查看,没有账号?立即注册

×
{设立参数:百分比(3,20,5), 右数峰序(2,20,2)}
{ZIG(3,5);}
{百分比:=5};
{右数峰序:=2;}
A1:=MA(CLOSE,5);
A2:=MA(CLOSE,10);
A3:=MA(CLOSE,20);
A4:=MA(CLOSE,30);
DT:=CLOSE>A1 AND A1>A2 AND A2>A3 AND A3>A4;
{MA5:MA(C,5);}{HTTP://U.178448.COM/SPACE.PHP?UID=30578}
MA10:=MA(C,10);{WEN98编写}
MA20:=MA(C,20);
波谷值:=CONST(TROUGH(2,百分比,1)),NODRAW;{前M个ZIG转向波谷值}
波谷值1:=CONST(TROUGH(2,百分比,2)),NODRAW;
波谷值2:=CONST(TROUGH(2,百分比,3)),NODRAW;
波谷值3:=CONST(TROUGH(2,百分比,4)),NODRAW;
波谷值4:=CONST(TROUGH(2,百分比,5)),NODRAW;
波谷距离:= 1+CONST(TROUGHBARS(2,百分比,1)),NODRAW;{前M个ZIG转向波谷到当前距离}
{例如:TROUGH(2,5,2)表示%5最低价ZIG转向的前2个波谷到当前的周期数};
波谷距离1:= 1+CONST(TROUGHBARS(2,百分比,2)),NODRAW;
波谷距离2:= 1+CONST(TROUGHBARS(2,百分比,3)),NODRAW;
波谷距离3:= 1+CONST(TROUGHBARS(2,百分比,4)),NODRAW;
波谷距离4:= 1+CONST(TROUGHBARS(2,百分比,5)),NODRAW;
波峰值:=CONST(PEAK(1,百分比,右数峰序));
波峰值1:=CONST(PEAK(1,百分比,3));
波峰值2:=CONST(PEAK(1,百分比,4));
波峰值3:=CONST(PEAK(1,百分比,5));
波峰值4:=CONST(PEAK(1,百分比,6));
{例如EAK(1,5,1)表示%5最高价ZIG转向的上一个波峰的数值}
N:=0.001;
XG:=ABS(波峰值-波谷值)<=N {AND BARSCOUNT(V)>60};
XG1:=ABS(波峰值1-波谷值1)<=N {AND BARSCOUNT(V)>60};
XG2:=ABS(波峰值2-波谷值2)<=N {AND BARSCOUNT(V)>60};
XG3:=ABS(波峰值3-波谷值3)<=N {AND BARSCOUNT(V)>60};
XG4:=ABS(波峰值4-波谷值4)<=N {AND BARSCOUNT(V)>60};
波峰距离:= 1+CONST(PEAKBARS(1,百分比,右数峰序)),NODRAW;
{PEAKBARS(K,N,M)表示之字转向ZIG(K,N)的前M个波峰到当前的周期数,M必须大于等于1}
BFJL:=1+CONST(PEAKBARS(1,百分比,3)),NODRAW;
BFJL1:=1+CONST(PEAKBARS(1,百分比,4)),NODRAW;
BFJL2:=1+CONST(PEAKBARS(1,百分比,5)),NODRAW;
BFJL3:=1+CONST(PEAKBARS(1,百分比,6)),NODRAW;
距离:=CURRBARSCOUNT;
JZXRAWLINE(距离=波峰距离 AND XG,波谷值,距离=1,波谷值,1),COLORMAGENTA;
JZX1RAWLINE(距离=BFJL AND XG1,波谷值1,距离=波谷距离,波谷值1,1),COLORMAGENTA;
JZX2RAWLINE(距离=BFJL1 AND XG2,波谷值2,距离=波谷距离1,波谷值2,1),COLORMAGENTA;
JZX3RAWLINE(距离=BFJL2 AND XG3,波谷值3,距离=波谷距离2,波谷值3,1),COLORMAGENTA;
JZX4RAWLINE(距离=BFJL3 AND XG4,波谷值4,距离=波谷距离3,波谷值4,1),COLORMAGENTA;
DRAWTEXT(距离=波谷距离 AND XG,L*0.98,' 峰谷线'),COLORYELLOW;
DRAWTEXT(距离=波谷距离1 AND XG1,L*0.98,' 峰谷线'),COLORYELLOW;
DRAWTEXT(距离=波谷距离2 AND XG2,L*0.98,' 峰谷线'),COLORYELLOW;
DRAWTEXT(距离=波谷距离3 AND XG3,L*0.98,' 峰谷线'),COLORYELLOW;
DRAWTEXT(距离=波谷距离4 AND XG4,L*0.98,' 峰谷线'),COLORYELLOW;
DRAWICON(距离=波峰距离,H*1.01,2);{波峰位置}
DRAWICON(距离=波谷距离,L*0.985,1);{波谷位置}
DRAWICON(距离=BFJL,H*1.01,2);
DRAWICON(距离=BFJL1,H*1.01,2);
DRAWICON(距离=波谷距离1,L*0.985,1);
DRAWICON(距离=波谷距离2,L*0.985,1);
DRAWICON(距离=波谷距离3,L*0.985,1);
DRAWICON(距离=波谷距离4,L*0.985,1);
JZX0RAWLINE(距离=1+CONST(TROUGHBARS(2,百分比,2)) AND XG,
波谷值,距离=1,波谷值,1),COLORMAGENTA;
精准点:=(ABS(H-波谷值)<=N OR ABS(L-波谷值)<=N) {AND 距离<=120};
精准点1:=(ABS(H-波谷值1)<=N OR ABS(L-波谷值1)<=N);
精准点2:=(ABS(H-波谷值2)<=N OR ABS(L-波谷值2)<=N);
精准点3:=(ABS(H-波谷值3)<=N OR ABS(L-波谷值3)<=N);
精准点4:=(ABS(H-波谷值4)<=N OR ABS(L-波谷值4)<=N);
STICKLINE(精准点,波谷值,波谷值,3,1),COLORYELLOW;
DRAWTEXT(精准点,波谷值*0.98,'A');
DRAWTEXT(精准点1,波谷值1*0.98,'A1');
DRAWTEXT(精准点2,波谷值2*0.98,'A2');
DRAWTEXT(精准点3,波谷值3*0.98,'A3');
DRAWTEXT(精准点4,波谷值4*0.98,'A4');
JZX5RAWLINE(精准点1,波谷值,精准点,波谷值,1),COLORBLUE;
JZX6RAWLINE(精准点2,波谷值1,精准点1,波谷值1,1),COLORBLUE;
JZX7RAWLINE(精准点3,波谷值2,精准点2,波谷值2,1),COLORBLUE;
JZX8RAWLINE(精准点4,波谷值3,精准点3,波谷值3,1),COLORBLUE;
{MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
主力20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;};
精准点0:=(ABS(H-波峰值)<=N OR ABS(L-波峰值)<=N) {AND 距离<=120};
精准点A:=(ABS(H-波峰值1)<=N OR ABS(L-波峰值1)<=N);
精准点B:=(ABS(H-波峰值2)<=N OR ABS(L-波峰值2)<=N);
精准点C:=(ABS(H-波峰值3)<=N OR ABS(L-波峰值3)<=N);
精准点D:=(ABS(H-波峰值4)<=N OR ABS(L-波峰值4)<=N);
STICKLINE(精准点0,波峰值,波峰值,3,1),COLORYELLOW;
DRAWTEXT(精准点0,波峰值,'D');
DRAWTEXT(精准点A,波峰值1,'D1');
DRAWTEXT(精准点B,波峰值2,'D2');
DRAWTEXT(精准点C,波峰值3,'D3');
DRAWTEXT(精准点D,波峰值4,'D4');
JZX51:DRAWLINE(精准点A,波峰值,精准点0,波峰值,1),COLORYELLOW;
JZX61:DRAWLINE(精准点B,波峰值1,精准点A,波峰值1,1),COLORYELLOW;
JZX71:DRAWLINE(精准点C,波峰值2,精准点B,波峰值2,1),COLORYELLOW;
JZX81:DRAWLINE(精准点D,波峰值3,精准点C,波峰值3,1),COLORYELLOW;
{4.咬住峰顶线}
FDX:=PEAK(1,5,1);{REF(HHV(H,60),5)};{上一波峰值}
TJ:=BETWEEN(MA(H,3),波峰值1*0.998,波峰值1*1.02);
T1J:=BETWEEN(MA(H,3),波峰值2*0.998,波峰值2*1.02);
T2J:=BETWEEN(MA(H,3),波峰值3*0.998,波峰值3*1.02);
T3J:=BETWEEN(MA(H,3),波峰值*0.998,波峰值*1.02);
咬住峰顶线:=COUNT(TJ,3)>=2 OR COUNT(T1J,3)>=2 OR COUNT(T2J,3)>=2 OR
COUNT(T3J,3)>=2;
{DRAWTEXT(咬住峰顶线,L*0.98,'咬');}
异向并肩精准:= MIN(O,C)=REF(MAX(O,C),1) ;
DRAWTEXT(异向并肩精准,L*0.95,'异向精准'),COLORRED;

发表于 2014-9-22 19:59 | 显示全部楼层
我死了,但是在烈火中我又站起来了,你猜是涅磐,还是尸变?

回复

使用道具 举报

头像被屏蔽
发表于 2015-12-6 02:50 | 显示全部楼层
提示: 作者被禁止或删除 内容自动屏蔽
回复

使用道具 举报

发表于 2020-3-3 13:38 | 显示全部楼层


阳胜进,阴胜出,时时刻刻保持清醒的理念!
回复

使用道具 举报

发表于 2010-10-8 13:29 | 显示全部楼层
回复 1# 亨通


    ddddddddddddddddddddddddddddddddddddddddddddddddddddddddddd
回复

使用道具 举报

发表于 2010-10-8 13:30 | 显示全部楼层
学习,学习。。。。。。。。。。
回复

使用道具 举报

发表于 2010-10-8 13:35 | 显示全部楼层
好,看看改编的如何……
回复

使用道具 举报

发表于 2010-10-8 13:39 | 显示全部楼层
呵呵 好东西 大家一起来分享
回复

使用道具 举报

发表于 2010-10-8 13:47 | 显示全部楼层
通达信通不过,请楼主再改改。
回复

使用道具 举报

发表于 2010-10-8 13:48 | 显示全部楼层
呵呵 好东西 大家一起来分享
回复

使用道具 举报

发表于 2010-10-8 13:55 | 显示全部楼层
谢谢分享,楼主辛苦了
回复

使用道具 举报

发表于 2010-10-8 13:55 | 显示全部楼层
通达信通不过,请楼主再改改。
回复

使用道具 举报

发表于 2010-10-8 13:59 | 显示全部楼层
隐藏的内容需要回复才可以浏览
回复

使用道具 举报

发表于 2010-10-8 14:05 | 显示全部楼层
峰谷线公式改编
回复

使用道具 举报

发表于 2010-10-8 14:08 | 显示全部楼层
通达信通不过,请楼主再改改。
回复

使用道具 举报

发表于 2010-10-8 14:23 | 显示全部楼层
好,看看改编的效果。
回复

使用道具 举报

 楼主| 发表于 2010-10-8 14:29 | 显示全部楼层
  1. {设立参数:百分比(3,20,5), 右数峰序(2,20,2)}
  2. {ZIG(3,5);}
  3. {百分比:=5};
  4. {右数峰序:=2;}
  5. A1:=MA(CLOSE,5);
  6. A2:=MA(CLOSE,10);
  7. A3:=MA(CLOSE,20);
  8. A4:=MA(CLOSE,30);
  9. DT:=CLOSE>A1 AND A1>A2 AND A2>A3 AND A3>A4;

  10. {MA5:MA(C,5);}{HTTP://U.178448.COM/SPACE.PHP?UID=30578}
  11. MA10:=MA(C,10);{WEN98编写}
  12. MA20:=MA(C,20);
  13. 波谷值:=CONST(TROUGH(2,百分比,1)),NODRAW;{前M个ZIG转向波谷值}
  14. 波谷值1:=CONST(TROUGH(2,百分比,2)),NODRAW;
  15. 波谷值2:=CONST(TROUGH(2,百分比,3)),NODRAW;
  16. 波谷值3:=CONST(TROUGH(2,百分比,4)),NODRAW;
  17. 波谷值4:=CONST(TROUGH(2,百分比,5)),NODRAW;
  18. 波谷距离:= 1+CONST(TROUGHBARS(2,百分比,1)),NODRAW;{前M个ZIG转向波谷到当前距离}
  19. {例如:TROUGH(2,5,2)表示%5最低价ZIG转向的前2个波谷到当前的周期数};
  20. 波谷距离1:= 1+CONST(TROUGHBARS(2,百分比,2)),NODRAW;
  21. 波谷距离2:= 1+CONST(TROUGHBARS(2,百分比,3)),NODRAW;
  22. 波谷距离3:= 1+CONST(TROUGHBARS(2,百分比,4)),NODRAW;
  23. 波谷距离4:= 1+CONST(TROUGHBARS(2,百分比,5)),NODRAW;
  24. 波峰值:=CONST(PEAK(1,百分比,右数峰序));
  25. 波峰值1:=CONST(PEAK(1,百分比,3));
  26. 波峰值2:=CONST(PEAK(1,百分比,4));
  27. 波峰值3:=CONST(PEAK(1,百分比,5));
  28. 波峰值4:=CONST(PEAK(1,百分比,6));
  29. {例如:PEAK(1,5,1)表示%5最高价ZIG转向的上一个波峰的数值}
  30. N:=0.001;
  31. XG:=ABS(波峰值-波谷值)<=N {AND BARSCOUNT(V)>60};
  32. XG1:=ABS(波峰值1-波谷值1)<=N {AND BARSCOUNT(V)>60};
  33. XG2:=ABS(波峰值2-波谷值2)<=N {AND BARSCOUNT(V)>60};
  34. XG3:=ABS(波峰值3-波谷值3)<=N {AND BARSCOUNT(V)>60};
  35. XG4:=ABS(波峰值4-波谷值4)<=N {AND BARSCOUNT(V)>60};



  36. 波峰距离:= 1+CONST(PEAKBARS(1,百分比,右数峰序)),NODRAW;
  37. {PEAKBARS(K,N,M)表示之字转向ZIG(K,N)的前M个波峰到当前的周期数,M必须大于等于1}
  38. BFJL:=1+CONST(PEAKBARS(1,百分比,3)),NODRAW;
  39. BFJL1:=1+CONST(PEAKBARS(1,百分比,4)),NODRAW;
  40. BFJL2:=1+CONST(PEAKBARS(1,百分比,5)),NODRAW;
  41. BFJL3:=1+CONST(PEAKBARS(1,百分比,6)),NODRAW;
  42. 距离:=CURRBARSCOUNT;
  43. JZX:DRAWLINE(距离=波峰距离 AND XG,波谷值,距离=1,波谷值,1),COLORMAGENTA;
  44. JZX1:DRAWLINE(距离=BFJL AND XG1,波谷值1,距离=波谷距离,波谷值1,1),COLORMAGENTA;
  45. JZX2:DRAWLINE(距离=BFJL1 AND XG2,波谷值2,距离=波谷距离1,波谷值2,1),COLORMAGENTA;
  46. JZX3:DRAWLINE(距离=BFJL2 AND XG3,波谷值3,距离=波谷距离2,波谷值3,1),COLORMAGENTA;
  47. JZX4:DRAWLINE(距离=BFJL3 AND XG4,波谷值4,距离=波谷距离3,波谷值4,1),COLORMAGENTA;
  48. DRAWTEXT(距离=波谷距离 AND XG,L*0.98,' 峰谷线'),COLORYELLOW;
  49. DRAWTEXT(距离=波谷距离1 AND XG1,L*0.98,' 峰谷线'),COLORYELLOW;
  50. DRAWTEXT(距离=波谷距离2 AND XG2,L*0.98,' 峰谷线'),COLORYELLOW;
  51. DRAWTEXT(距离=波谷距离3 AND XG3,L*0.98,' 峰谷线'),COLORYELLOW;
  52. DRAWTEXT(距离=波谷距离4 AND XG4,L*0.98,' 峰谷线'),COLORYELLOW;
  53. DRAWICON(距离=波峰距离,H*1.01,2);{波峰位置}
  54. DRAWICON(距离=波谷距离,L*0.985,1);{波谷位置}
  55. DRAWICON(距离=BFJL,H*1.01,2);
  56. DRAWICON(距离=BFJL1,H*1.01,2);
  57. DRAWICON(距离=波谷距离1,L*0.985,1);
  58. DRAWICON(距离=波谷距离2,L*0.985,1);
  59. DRAWICON(距离=波谷距离3,L*0.985,1);
  60. DRAWICON(距离=波谷距离4,L*0.985,1);

  61. JZX0:DRAWLINE(距离=1+CONST(TROUGHBARS(2,百分比,2)) AND XG,
  62. 波谷值,距离=1,波谷值,1),COLORMAGENTA;
  63. 精准点:=(ABS(H-波谷值)<=N OR ABS(L-波谷值)<=N) {AND 距离<=120};
  64. 精准点1:=(ABS(H-波谷值1)<=N OR ABS(L-波谷值1)<=N);
  65. 精准点2:=(ABS(H-波谷值2)<=N OR ABS(L-波谷值2)<=N);
  66. 精准点3:=(ABS(H-波谷值3)<=N OR ABS(L-波谷值3)<=N);
  67. 精准点4:=(ABS(H-波谷值4)<=N OR ABS(L-波谷值4)<=N);
  68. STICKLINE(精准点,波谷值,波谷值,3,1),COLORYELLOW;
  69. DRAWTEXT(精准点,波谷值*0.98,'A');
  70. DRAWTEXT(精准点1,波谷值1*0.98,'A1');
  71. DRAWTEXT(精准点2,波谷值2*0.98,'A2');
  72. DRAWTEXT(精准点3,波谷值3*0.98,'A3');
  73. DRAWTEXT(精准点4,波谷值4*0.98,'A4');


  74. JZX5:DRAWLINE(精准点1,波谷值,精准点,波谷值,1),COLORBLUE;
  75. JZX6:DRAWLINE(精准点2,波谷值1,精准点1,波谷值1,1),COLORBLUE;
  76. JZX7:DRAWLINE(精准点3,波谷值2,精准点2,波谷值2,1),COLORBLUE;
  77. JZX8:DRAWLINE(精准点4,波谷值3,精准点3,波谷值3,1),COLORBLUE;



  78. {MID:=(3*CLOSE+LOW+OPEN+HIGH)/6;
  79. 主力:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+
  80. 16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+
  81. 13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+
  82. 10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+
  83. 7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+
  84. 4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210,COLORRED;};

  85. 精准点0:=(ABS(H-波峰值)<=N OR ABS(L-波峰值)<=N) {AND 距离<=120};
  86. 精准点A:=(ABS(H-波峰值1)<=N OR ABS(L-波峰值1)<=N);
  87. 精准点B:=(ABS(H-波峰值2)<=N OR ABS(L-波峰值2)<=N);
  88. 精准点C:=(ABS(H-波峰值3)<=N OR ABS(L-波峰值3)<=N);
  89. 精准点D:=(ABS(H-波峰值4)<=N OR ABS(L-波峰值4)<=N);
  90. STICKLINE(精准点0,波峰值,波峰值,3,1),COLORYELLOW;
  91. DRAWTEXT(精准点0,波峰值,'D');
  92. DRAWTEXT(精准点A,波峰值1,'D1');
  93. DRAWTEXT(精准点B,波峰值2,'D2');
  94. DRAWTEXT(精准点C,波峰值3,'D3');
  95. DRAWTEXT(精准点D,波峰值4,'D4');
  96. JZX51:DRAWLINE(精准点A,波峰值,精准点0,波峰值,1),COLORYELLOW;
  97. JZX61:DRAWLINE(精准点B,波峰值1,精准点A,波峰值1,1),COLORYELLOW;
  98. JZX71:DRAWLINE(精准点C,波峰值2,精准点B,波峰值2,1),COLORYELLOW;
  99. JZX81:DRAWLINE(精准点D,波峰值3,精准点C,波峰值3,1),COLORYELLOW;



  100. {4.咬住峰顶线}
  101. FDX:=PEAK(1,5,1);{REF(HHV(H,60),5)};{上一波峰值}
  102. TJ:=BETWEEN(MA(H,3),波峰值1*0.998,波峰值1*1.02);
  103. T1J:=BETWEEN(MA(H,3),波峰值2*0.998,波峰值2*1.02);
  104. T2J:=BETWEEN(MA(H,3),波峰值3*0.998,波峰值3*1.02);
  105. T3J:=BETWEEN(MA(H,3),波峰值*0.998,波峰值*1.02);
  106. 咬住峰顶线:=COUNT(TJ,3)>=2 OR COUNT(T1J,3)>=2 OR COUNT(T2J,3)>=2 OR
  107. COUNT(T3J,3)>=2;
  108. {DRAWTEXT(咬住峰顶线,L*0.98,'咬');}


  109. 异向并肩精准:= MIN(O,C)=REF(MAX(O,C),1) ;
  110. DRAWTEXT(异向并肩精准,L*0.95,'异向精准'),COLORRED;
复制代码
回复

使用道具 举报

发表于 2010-10-8 14:51 | 显示全部楼层
真的好用吗
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Archiver|手机版|小黑屋|股海明灯官网 ( 京ICP备18020431号 )

GMT+8, 2024-11-23 23:41 , Processed in 0.136320 second(s), Total 12, Slave 11 queries , Gzip On, MemCached On.

Powered by Discuz! X3.5

Copyright © 2001-2024 Tencent Cloud.

快速回复 返回顶部 返回列表