查看完整版本: 請lillian2005版主幫忙一下，謝謝。

請lillian2005版主幫忙一下，謝謝。

lillian2005版主，您好:
這是波浪結構公式，原碼如下:

input:n(5);
A1:=REF(H,N)=HHV(H,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); D1:=FILTER(C1,N);
A2:=REF(L,N)=LLV(L,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); D2:=FILTER(C2,N);
E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2; E2:=(H+L)/2;
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1;
L1:=(D2 AND NOT(D1 AND E1<E2));  H2:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:I1>REF(I1,1),LINETHICK0;
L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:I2>REF(I2,1),LINETHICK0;
DRAWLINE(HD,H,LD,L,0),COLORYELLOW,LINETHICK1;DRAWLINE(LD,L,HD,H,0),COLORYELLOW,LINETHICK1;

J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
DRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORYELLOW;


請 lillian2005版主幫忙，謝謝。

dddddddddddddddddddd

dddddddddddddddddddd

bT:=barslast(Ld or HD);
h1:ref(hhv(H,sumbars(bt=0,2)),barslast(bt=0)),linethick0; L1:ref(LLv(L,sumbars(bt=0,2)),barslast(bt=0)),linethick0;
drawnumber(bT=0,if(H>ref(H,ref(bT,1)+1),H*1.01,L*0.99),ref(bT,1)+2,0),align0,colorwhite;
drawnumber(bT=0,if(H>ref(H,ref(bT,1)+1),H*1.02,L*0.98),if(H>ref(H,ref(bT,1)+1),h1-L1,-(h1-L1)),2),align0,coloryellow;
drawnumber(islastbar,if(H>ref(H,bT),H*1.01,L*0.99),bT+1,0),align0,colorwhite;
drawnumber(islastbar,if(H>ref(H,bT),H*1.02,L*0.98),if(H>ref(H,bT),hhv(h,bT+1)-LLV(L,bT+1),-(hhv(h,bT+1)-LLV(L,bT+1))),2),align0,coloryellow;

謝謝 lillian2005版主幫忙。

請問 lillian2005版主，在HD 上方的全部數字可換紅色，LD下方的數字可換綠色的嗎?這樣看起來比較知道多空的地方，相同的色系，比較會搞混。請lillian2005版主幫忙修改，謝謝。

[quote]原帖由 [i]awhtox[/i] 于 2007-7-26 02:28 发表
請問 lillian2005版主，在HD 上方的全部數字可換紅色，LD下方的數字可換綠色的嗎?這樣看起來比較知道多空的地方，相同的色系，比較會搞混。請lillian2005版主幫忙修改，謝謝。 [/quote]

把下面式子拆開就行了

drawnumber(bT=0,if(H>ref(H,ref(bT,1)+1),H*1.01,L*0.99),ref(bT,1)+2,0),align0,colorwhite;
drawnumber(bT=0,if(H>ref(H,ref(bT,1)+1),H*1.02,L*0.98),if(H>ref(H,ref(bT,1)+1),h1-L1,-(h1-L1)),2),align0,coloryellow;

成為

drawnumber(bT=0 and H>ref(H,ref(bT,1)+1),H,ref(bT,1)+2,0),align0,colorred,pxup30;
drawnumber(bT=0 and H>ref(H,ref(bT,1)+1),H,h1-L1,2),align0,colorred,pxup60;

其餘的你自己試試看

謝謝 lillian2005版主的提示，自已動手來試試看。

谢谢提供分享

[quote]原帖由 [i]lillian2005[/i] 于 2007-7-25 08:35 发表
bT:=barslast(Ld or HD);
h1:ref(hhv(H,sumbars(bt=0,2)),barslast(bt=0)),linethick0; L1:ref(LLv(L,sumbars(bt=0,2)),barslast(bt=0)),linethick0;
drawnumber(bT=0,if(H>ref(H,ref(bT,1)+1),H*1.01,L*0.9 ... [/quote]


谢谢老师。

还请问前一个转折的幅值（或天数）和后面一个转折的幅值（或天数）之比如何求？

請lillian2005版主幫忙一下，謝謝。

lillian2005版主，您好:
這是波浪結構公式，原碼如下:

input:n(5);
A1:=REF(H,N)=HHV(H,2*N+1); B1:=FILTER(A1,N); C1:=BACKSET(B1,N+1); D1:=FILTER(C1,N);
A2:=REF(L,N)=LLV(L,2*N+1); B2:=FILTER(A2,N); C2:=BACKSET(B2,N+1); D2:=FILTER(C2,N);
E1:=(REF(LLV(L,2*N),1)+REF(HHV(H,2*N),1))/2; E2:=(H+L)/2;
H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(C)=1;
L1:=(D2 AND NOT(D1 AND E1<E2));  H2:=D1 AND NOT(D2 AND E1>=E2);
X1:=REF(BARSLAST(H1),1)+1; F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,L,10000),X1));
G1:=F1>REF(F1,1); I1:=BACKSET(G1,2); LD:I1>REF(I1,1),LINETHICK0;
L2:=LD OR ISLASTBAR OR BARSCOUNT(C)=1;
X2:=REF(BARSLAST(L2),1)+1; F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,H,0),X2));
G2:=F2>REF(F2,1); I2:=BACKSET(G2,2); HD:I2>REF(I2,1),LINETHICK0;
DRAWLINE(HD,H,LD,L,0),COLORYELLOW,LINETHICK1;DRAWLINE(LD,L,HD,H,0),COLORYELLOW,LINETHICK1;

J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
DRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORYELLOW;

[quote]原帖由 [i]xggs[/i] 于 2007-7-27 23:36 发表



谢谢老师。

还请问前一个转折的幅值（或天数）和后面一个转折的幅值（或天数）之比如何求？ [/quote]
??不很明瞭你所指的前一個和後一個的範圍是指哪裏?

[quote]原帖由 [i]lillian2005[/i] 于 2007-7-28 08:59 发表

??不很明瞭你所指的前一個和後一個的範圍是指哪裏? [/quote]


如何表达为涨跌副度?

谢谢提供分享

先弄清一些小疵点

下面两图都有点问题，不知是程序中哪里有点没有照顾到？高点的显示程序试调了一下，没有解决问题，求助老师。

[quote]原帖由 [i]xggs[/i] 于 2007-7-29 17:02 发表
下面两图都有点问题，不知是程序中哪里有点没有照顾到？高点的显示程序试调了一下，没有解决问题，求助老师。 [/quote]
這樣看看
drawnumber(bT=0,if(HD,H*1.01,L*0.99),ref(bT,1)+2,0),align0,colorwhite;
drawnumber(bT=0,if(HD,H*1.02,L*0.98),if(H>ref(H,ref(bT,1)+1),h1-L1,-(h1-L1)),2),align0,coloryellow;

[quote]原帖由 [i]lillian2005[/i] 于 2007-7-29 20:31 发表


這是清揚老師的公式,雖然網上可以取得,為尊重原作,任意修改,仍然十分不宜 [/quote]


真不好意思，沒有考慮到這是清揚老師的原作，不宜修改原作,在此說抱歉。
麻煩請 lillian2005版主，刪了14樓的貼子，謝謝。

[[i] 本帖最后由 awhtox 于 2007-7-29 21:49 编辑 [/i]]

好，顶。。。。

[quote]原帖由 [i]lillian2005[/i] 于 2007-7-29 20:27 发表

這樣看看
drawnumber(bT=0,if(HD,H*1.01,L*0.99),ref(bT,1)+2,0),align0,colorwhite;
drawnumber(bT=0,if(HD,H*1.02,L*0.98),if(H>ref(H,ref(bT,1)+1),h1-L1,-(h1-L1)),2),align0,coloryellow; [/quote]


谢谢老师，这样改标值位置和数字正确了，只是视觉上高低点又为同色了。

还有用pxup函数来标值，可以保证  在  不同的周期里，都在转折高低点边上，不至于在小于日线的周期里标到很远的地方去了。

想来可能是1楼的原程序所带来的结构分画问题

想来可能是1楼的原程序所带来的结构划分描述问题。

再发二图做一比较：上图为1楼结构划分，下图为自带ZIG函数。

求助难题答案

谢谢老师。

bH:=barslast(HD); bL:=barslast(LD);
xH:=H>HHV(ref(H,1),bL);  //vertline(xH),pointdot;
nH:=sum(xH,bL+1);
drawnumber(HD,H,nH,0),pxup30,align0;

很好，谢谢老师。

老师好

真是不好意思，我太笨了，整了一天，想试着学习写出最后一条K线的动态数，但是没有成功，还请老师再次帮助。谢谢。

[quote]原帖由 [i]xggs[/i] 于 2007-11-2 23:33 发表 [url=http://bbs.fjfox.com/redirect.php?goto=findpost&pid=371551&ptid=40420][img]http://bbs.fjfox.com/images/common/back.gif[/img][/url]
真是不好意思，我太笨了，整了一天，想试着学习写出最后一条K线的动态数，但是没有成功，还请老师再次帮助。谢谢。 [/quote]
請解釋一下什麼叫動態數?

老师好。

这是结构公式中的最后一段：
J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD),BARSLAST(LD))+1); J2:=J1>REF(J1,1);
DRAWLINE(J2,IF(HD,H,L),ISLASTBAR,IF(BARSLAST(HD)>BARSLAST(LD),H,L),0),COLORYELLOW;

下面是这段的实际数的写法：
drawnumber(islastbar,if(H>ref(H,bT),H*1.01,L*0.99),bT+1,0),align0,colorwhite;
drawnumber(islastbar,if(H>ref(H,bT),H*1.02,L*0.98),if(H>ref(H,bT),hhv(h,bT+1)-LLV(L,bT+1),-(hhv(h,bT+1)-LLV(L,bT+1))),2),align0,coloryellow;

也可改写成：
drawnumber(islastbar and H>ref(H,bT),H,bT+1,0),align0,colorwhite,pxup30;
drawnumber(islastbar and H>ref(H,bT),h,hhv(h,bT+1)-LLV(L,bT+1),0),align0,coloryellow,pxup60;
。。。。。。。


我现在想得到这一段所对应的按22楼要求写出的K线数。因为它是动态的，还没有最后固定，所以觉得叫它为动态值比较好点

bH:barslast(HD),linethick0; bL:barslast(LD),linethick0;
xH:H>HHV(ref(H,1),bL),linethick0;  //vertline(xH),pointdot,colorred;
//xH1:H>ref(HHV(H,bL+1),1),linethick0;  vertline(xH1),pointdot,colorcyan;
nH:sum(xH,bL+1)+1,linethick0;
drawnumber(HD,H,nH,0),pxup30,align0;
xL:L<LLV(ref(L,1),bH),linethick0;
nL:sum(xL,bH+1)+1,linethick0;
drawnumber(LD,L,nL,0),pxdn30,align0;
drawnumber(islastbar,if(bH<bL,L,H),if(bH<bL,nL,nH),0),align2,shift2,colorwhite;