查看完整版本: [07-07] (DZH)动态 黄金分割线+江恩八分线

jy02599559 2008-7-7 12:53

[07-07] (DZH)动态 黄金分割线+江恩八分线

{黄金分割线+江恩八分线 }
input:K(1,1,3);            
DRAWGBKLAST(C>0,STRIP(RGB(90,90,90),RGB(0,0,0),0));
DRAWTEXTREL(0,3,'代码:'+STKLABEL),ColorFFFFFF;

T := BARSLAST(DISPSTATUS=1)+1;
A := DISPSTATUS=2;
HH := HHV(H, T);
LL := LLV(L, T);
HL := HH-LL;
wH := HHVBARS(H, T);
wL := LLVBARS(L, T);
KK := wH-wL;
mHL := HH-HL*0.5;
if K=1 then begin
  HL191 := (HH-LL)*0.191;
  HL382 := (HH-LL)*0.382;
  HL618 := (HH-LL)*0.618;
  HL809 := (HH-LL)*0.809;
  if KK<0 then begin
    a1 := HH-HL191;
    a2 := HH-HL382;
    a3 := HH-HL618;
    a4 := HH-HL809;
  end else begin
    a1 := LL+HL191;
    a2 := LL+HL382;
    a3 := LL+HL618;
    a4 := LL+HL809;
  end
end
if k=1 then begin
  HL125 := (HH-LL)*0.125;
  HL250 := (HH-LL)*0.25;
  HL375 := (HH-LL)*0.375;
  HL625 := (HH-LL)*0.625;
  HL750 := (HH-LL)*0.75;
  HL875 := (HH-LL)*0.875;
  if kk<0 then begin
    b1 := HH-HL125;
    b2 := HH-HL250;
    b3 := HH-HL375;
    b4 := HH-HL625;
    b5 := HH-HL750;
    b6 := HH-HL875;
  end else begin
    b1 := LL+HL125;
    b2 := LL+HL250;
    b3 := LL+HL375;
    b4 := LL+HL625;
    b5 := LL+HL750;
    b6 := LL+HL875;
  end
end   
DRAWTEXT(A and K<>3,HH, '  最高价:'+HH),ALIGN2,colorgreen;
DRAWTEXT(A and K<>3,LL, '  最低价:'+ll),ALIGN2,VALIGN2,colorgreen;
DRAWTEXT(A and K<>3,mHL,'  50%:'+mHL),ALIGN2,color00ffff;
DRAWTEXT(A and K=1, a1, '  0.191:'+NUMTOSTRN(a1,2)),ALIGN2,color00ffff;
DRAWTEXT(A and K=1, a2, '  0.382:'+NUMTOSTRN(a2,2)),ALIGN2,color00ffff;
DRAWTEXT(A and K=1, a3, '  0.618:'+NUMTOSTRN(a3,2)),ALIGN2,color00ffff;
DRAWTEXT(A and K=1, a4, '  0.809:'+NUMTOSTRN(a4,2)),ALIGN2,color00ffff;
DRAWTEXT(A and K=1, b1, '  1/8:'+NUMTOSTRN(b1,2)),ALIGN2,colorgreen;
DRAWTEXT(A and K=1, b2, '  1/4:'+NUMTOSTRN(b2,2)),ALIGN2,colorgreen;
DRAWTEXT(A and K=1, b3, ' 3/8:'+NUMTOSTRN(b3,2)),ALIGN0,colorgreen;
DRAWTEXT(A and K=1, b4, ' 5/8:'+NUMTOSTRN(b4,2)),ALIGN0,colorgreen;
DRAWTEXT(A and K=1, b5, '  3/4:'+NUMTOSTRN(b5,2)),ALIGN2,colorgreen;
DRAWTEXT(A and K=1, b6, '  7/8:'+NUMTOSTRN(b6,2)),ALIGN2,colorgreen;
DRAWTEXT(A and K<>3,HH, ' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,colorred,linethick7;
DRAWTEXT(A and K<>3,LL, ' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,colorred,linethick7;
DRAWTEXT(A and K<>3,mHL,' ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄ ̄'),ALIGN2,colorff0000,linethick7;
DRAWTEXT(A and K=1, a1, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0;
DRAWTEXT(A and K=1, a2, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0;
DRAWTEXT(A and K=1, a3, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0;
DRAWTEXT(A and K=1, a4, '﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ ﹊ '),ALIGN2,color208FFF,linethick0;

DRAWTEXT(A and K=1, b1, '                                                                                              ﹉﹉﹉﹉'),ALIGN2,color00FF00;
DRAWTEXT(A and K=1, b2, '                                                                                              ﹉﹉﹉﹉'),ALIGN2,color00ff00;
DRAWTEXT(A and K=1, b3, '﹉﹉'),ALIGN0,color00ff00;
DRAWTEXT(A and K=1, b4, '﹉﹉'),ALIGN0,color00ff00;
DRAWTEXT(A and K=1, b5, '                                                                                              ﹉﹉﹉﹉'),ALIGN2,color00ff00;
DRAWTEXT(A and K=1, b6, '                                                                                              ﹉﹉﹉﹉'),ALIGN2,color00FF00;

PT  := REF(HIGH,1)-REF(LOW,1);
重心:=(HIGH + LOW + CLOSE)/3;
压力Ⅰ:= 2*重心-LOW;
压力Ⅱ:= 重心 + PT;
支撑Ⅰ:= 2*重心-HIGH;
支撑Ⅱ:= 重心 - PT;
DRAWTEXTABS(75,8,'  《逆势操作》'),ColorFFFF00;
DRAWTEXTABS(150,8,'  重心:'+重心),Color208FFF;
DRAWTEXTABS(75,27,'    支  撑'),ColorFFFFFF;
DRAWTEXTABS(75,44,'    '+支撑Ⅰ),ColorFFFFFF;
DRAWTEXTABS(75,62,'    '+支撑Ⅱ),ColorFFFFFF;
DRAWTEXTABS(75,27,'                压  力'),Color00FF00;
DRAWTEXTABS(75,44,'                '+压力Ⅰ),Color00FF00;
DRAWTEXTABS(75,62,'                '+压力Ⅱ),Color00FF00;
DRAWTEXTABS(75,5,'│'),Color00FFFF;
DRAWTEXTABS(75,17,'│'),Color00FFFF;
DRAWTEXTABS(75,29,'│'),Color00FFFF;
DRAWTEXTABS(75,41,'│'),Color00FFFF;
DRAWTEXTABS(75,53,'│'),Color00FFFF;
DRAWTEXTABS(75,65,'│'),Color00FFFF;
DRAWTEXTABS(218,5,'│'),Color00FFFF;
DRAWTEXTABS(218,17,'│'),Color00FFFF;
DRAWTEXTABS(218,29,'│'),Color00FFFF;
DRAWTEXTABS(218,41,'│'),Color00FFFF;
DRAWTEXTABS(218,53,'│'),Color00FFFF;
DRAWTEXTABS(218,65,'│'),Color00FFFF;
DRAWTEXTABS(146,25,'│'),Color00FFFF;
DRAWTEXTABS(146,29,'│'),Color00FFFF;
DRAWTEXTABS(146,41,'│'),Color00FFFF;
DRAWTEXTABS(146,53,'│'),Color00FFFF;
DRAWTEXTABS(146,65,'│'),Color00FFFF;
DRAWTEXTABS(80,0,'────────────'),Color00FFFF;
DRAWTEXTABS(80,20,'────────────'),Color00FFFF;
DRAWTEXTABS(80,37,'────────────'),Color00FFFF;
DRAWTEXTABS(80,54,'────────────'),Color00FFFF;
DRAWTEXTABS(80,71,'────────────'),Color00FFFF;

WX:=MA(CLOSE,0);
STICKLINE(C>=O,C,O,8,0),COLOR0000AA;
STICKLINE(C>=O,C,O,6,0),COLOR0000bb ;
STICKLINE(C>=O,C,O,4,0),COLOR0000cc ;
STICKLINE(C>=O,C,O,2,0),COLOR0000ee;
STICKLINE(C>=O,H,L,0,0),COLOR0000ff;
STICKLINE(C<=O,C,O,8,0),Color7B7b00;
STICKLINE(C<=O,C,O,6,0),Color909000;
STICKLINE(C<=O,C,O,4,0),ColorA8a800;
STICKLINE(C<=O,C,O,2,0),COLORcece00;
STICKLINE(C<=O,H,L,0,0),COLORffff00;
G:=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);
X:=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);
DRAWTEXT(G,L*0.997,'▲'),ALIGN1,VALIGN0,Colorff00ff;
DRAWTEXT(G,L,' ̄'),ALIGN1,VALIGN0,Color00ff00;
DRAWTEXT(X,H*1.002,'▼'),ALIGN1,VALIGN2,Color00ffff;
DRAWTEXT(X,H,' ̄'),ALIGN1,VALIGN0,Color00ffff;
ED:=barslast(G);
EF:=barslast(X);
买入到卖出天数:ED,LINETHICK0,ColorFFFFFF;
卖出到买入天数:EF,LINETHICK0,ColorFFFFFF;
换手: VOL/CAPITAL*100,LINETHICK0,colorwhite;
QQ:=换手;
DRAWTEXTREL(0,910,'             买入到到当前周期:'+NUMTOSTR(ED) +'天'+'  卖出到当前周期:'+NUMTOSTR(EF) +'天'+'   换手率:'+NUMTOSTRN(QQ,2)+'%'),colorFfff00;




========================================================================================================
引用了未来数据:
未来数据[G:=ZIG(3,5)>REF(ZIG(3,5),1) ANDREF(ZIG(3,5),1)<=REF(ZIG(3,5),2) ANDREF(ZIG(3,5),2)<=REF(ZIG(3,5),3);
X:=ZIG(3,5)<REF(ZIG(3,5),1) ANDREF(ZIG(3,5),1)>=REF(ZIG(3,5),2) ANDREF(ZIG(3,5),2)>=REF(ZIG(3,5),3);
]是计算时间用的。时间对空间。由市场的重要底部或顶部起计,以下是江恩认为有机会出现转势的日数:
(1)7至12天    (2)18至21天    (3)28至31天
(4)42至49天    (5)57至65天    (6)85至92天
(7)112至120天  (8)150至157天   (9)175至185天
       在外汇市场中,最重要的为以下三段时间:
(1) 短期趋势——42至49天;
(2) 中期短势——85至92天;
(3) 中/长期趋势——175至185天。
江恩波动法则包含着非常广泛的内容,但在江恩在世时,又没有给出明确的波动法则定义,
这也就造成了以后研究江恩理论的分析家对波动法则的不同理解。
有一个音乐家兼炒家彼得曾写过一篇文章,从乐理角度去解释波动法则。
彼得认为,江恩理论与乐理一脉相承,两者都是波动法则的不同理解。音节的基本结构由七个音阶组成,
在七个音阶中,发生共震的是C与G及高八度的C,亦即百分之十及一倍水平。也就是说,
音阶是以二分之一,三分之一,四分之一及八分之一的形式产生共震,因此频率的一倍、两倍、四倍、
八倍会产生共震。而上述比例及倍数与江恩的波动法则有着密切联系,也就是江恩的分割比率。
江恩的分割比率是以8为基础的,也就是江恩的分割比率是50%(二分之一),
其次是25%(四分之一)和75%(四分之三),再其次便是八分之一、八分之三、八分之五及八分之七。
我们在研究深沪股市的走势图时,可以发现大量的实际例证来证明江恩分割比率的有效性。江恩波动法则中非常强调倍数关系和分割比率的分数关系,
而倍数关系和分数关系是可以相互转化的,这就要看我们所取的数值的大小.如一个庄家要把4.00元的,
股票做到8.00元,那么从4元至8元上涨100%为1;而6.00元是上涨的50%;5.00元
为上涨的25%;7.00元为上涨的75%;那么在这些位置是江恩分割比率要重视的位置.
如果我们把4.00元涨至5.00元,涨幅1.00元作为涨幅的第一阶段为1的话,那么到6.00元涨2元,

jy02599559 2008-7-7 12:54

smi54lies smi54lies smi54lies smi49lies smi49lies 自顶!支持本本版主

czw8566 2008-7-7 12:54

smi54lies smi54lies smi54lies

不给钱不起来 2008-7-7 12:54

smi49lies smi49lies

如意人生 2008-7-7 12:55

smi49lies smi49lies smi49lies

a66 2008-7-7 12:58

我顶smi48lies smi48lies smi48lies

美裳 2008-7-7 13:00

太深了,我晕倒,顶一个smi87lies smi87lies

金猪牛 2008-7-7 13:02

smi54lies smi54lies smi54lies

天真 2008-7-7 13:03

smi49lies smi49lies smi49lies

liqiang 2008-7-7 13:06

smi49lies smi49lies smi49lies smi87lies smi87lies smi87lies

yestodayo 2008-7-8 19:10

smi54lies smi54lies smi54lies smi54lies smi54lies smi48lies

步飞尘 2008-7-8 23:54

谢谢了,我也下来用来,看看还可以的smi12lies smi12lies

我笨笨 2008-7-9 11:16

smi54lies smi49lies

小米 2008-7-12 10:01

楼主好榜啊

huo43468 2008-7-12 17:36

smi52lies smi52lies smi52lies

lvmm_y 2008-7-12 18:22

K  怎么我的显示没有定义 K 的标识符呢

xwc16888888 2008-7-15 20:20

smi87lies smi87lies smi49lies smi49lies smi49lies

rocky_yq 2008-7-15 22:11

smi48lies

laoniubi 2008-7-17 16:20

K  怎么我的显示没有定义 K 的标识符呢
请问高手如何解决?

峻岭 2008-7-17 20:32

smi85lies

rhinegold 2008-7-17 21:42

请问能不能改成飞狐的啊

250055 2008-7-17 23:22

谢谢啊smi12lies smi12lies smi12lies

股惑人生 2008-7-22 20:56

smi54lies smi54lies

s-xhua 2008-7-22 23:16

楼主正是好人smi54lies

yingjia28 2008-7-24 11:24

回复 15楼 的帖子

谢谢
页: [1]
查看完整版本: [07-07] (DZH)动态 黄金分割线+江恩八分线