奇狐社區論壇 - 請問自動時間轉折顯示

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 請問自動時間轉折顯示 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=5434)

由 steven401 在 2006-06-14 18:29 發表:

請問自動時間轉折顯示

我用Ｚｉｇ寫了一個程式自動的計算時間轉折也自動顯示, 最後一根Ｋ棒到每一個波峰及波谷的間隔時間,　波峰的間隔時間以黃色顯示 , 波谷的間隔時間以青色顯示　, 請問　:

1.　我想要當時間轉折遇到費波南茲系數的 3,　5,　8,　13,　21,　34,　55,　89等的系數時電腦自動顯示波峰的間隔時間以紅色顯示 , 其餘的波峰還是以黃色顯示　,　波谷的間隔時間以綠色顯示　, 其餘的波谷還是以青色顯示　,

2.當滑鼠的十字游標打開後顯示的波峰或波谷的間隔時間會自動扣抵十字游標的位置 .

謝謝指導!!
請參考附圖:

__________________
Steven

由 king 在 2006-06-14 18:42 發表:

要寫自動每個定位點皆不同,不如使用畫線功能來的好.

__________________
E-Trader World 交易世界、
Plurk、
Facebook、
Twitter
(EQ:情緒智商) & (HD:習慣領域)才是主導成功交易的重要關鍵。
「存於一個人自身的真相非常簡單，然而人們卻總是追求深奧的真理。」，金融交易亦是如此。

由 steven401 在 2006-06-14 19:08 發表:

回覆: 請問自動時間轉折顯示

引用:
最初由 steven401 發表
我用Ｚｉｇ寫了一個程式自動的計算時間轉折也自動顯示, 最後一根Ｋ棒到每一個波峰及波谷的間隔時間,　波峰的間隔時間以黃色顯示 , 波谷的間隔時間以青色顯示　, 請問　:

1.　我想要當時間轉折遇到費波南茲系數的 3,　5,　8,　13,　21,　34,　55,　89等的系數時電腦自動顯示波峰的間隔時間以紅色顯示 , 其餘的波峰還是以黃色顯示　,　波谷的間隔時間以綠色顯示　, 其餘的波谷還是以青色顯示　,

2.當滑鼠的十字游標打開後顯示的波峰或波谷的間隔時間會自動扣抵十字游標的位置 .

謝謝指導!!
請參考附圖:

__________________
Steven

由 king 在 2006-06-14 19:17 發表:

把這兩個公式撰寫邏輯整合即可
動態均線扣抵(轉貼)
支撐線

由 steven401 在 2006-06-14 19:55 發表:

引用:
最初由 king 發表
把這兩個公式撰寫邏輯整合即可
動態均線扣抵(轉貼)
支撐線

Thanks !!

__________________
Steven

由 kkkkkk 在 2006-06-16 05:25 發表:

引用:
最初由 king 發表
把這兩個公式撰寫邏輯整合即可
動態均線扣抵(轉貼)
支撐線

不用這麼複雜吧

z:zig(4,2);
pk:peakbars(4,2,1),linethick0;
pb:ref(barpos,pk),linethick0;
//pp:datacount-pb,linethick0,coloryellow;
pp:sysparam(1)-pb,linethick0,coloryellow;
drawnumber(pk=0 and pp>0,z,pp,0),align0,pxup20,coloryellow;
drawnumber(pk=0 and (pp=3 or pp=5 or pp=8 or pp=13 or pp=21 or pp=34 or pp=55 or pp=89),z,pp,0),colorred,align0,pxup20;

由 steven401 在 2006-06-16 17:54 發表:

引用:
最初由 kkkkkk 發表
不用這麼複雜吧

z:zig(4,2);
pkeakbars(4,2,1),linethick0;
pb:ref(barpos,pk),linethick0;
//pp:datacount-pb,linethick0,coloryellow;
pp:sysparam(1)-pb,linethick0,coloryellow;
drawnumber(pk=0 and pp>0,z,pp,0),align0,pxup20,coloryellow;
drawnumber(pk=0 and (pp=3 or pp=5 or pp=8 or pp=13 or pp=21 or pp=34 or pp=55 or pp=89),z,pp,0),colorred,align0,pxup20;

謝謝!! 這正是我所須要的.

__________________
Steven

由 p0068 在 2006-06-16 18:57 發表:

引用:
最初由 kkkkkk 發表
不用這麼複雜吧

z:zig(4,2);
pkeakbars(4,2,1),linethick0;
pb:ref(barpos,pk),linethick0;
//pp:datacount-pb,linethick0,coloryellow;
pp:sysparam(1)-pb,linethick0,coloryellow;
drawnumber(pk=0 and pp>0,z,pp,0),align0,pxup20,coloryellow;
drawnumber(pk=0 and (pp=3 or pp=5 or pp=8 or pp=13 or pp=21 or pp=34 or pp=55 or pp=89),z,pp,0),colorred,align0,pxup20;

???
pkeakbars(4,2,1),linethick0;
是否為
pk : peakbars(4,2,1),linethick0;
3q!

__________________
shujenwen

由 kkkkkk 在 2006-06-16 19:46 發表:

引用:
最初由 p0068 發表
???
pkeakbars(4,2,1),linethick0;
是否為
pk : peakbars(4,2,1),linethick0;
3q!

是的,原碼被smile搞亂了

由 steven401 在 2006-06-16 22:10 發表:

完成的畫面及程式源碼給有緣人分享 .

{MZIG16:參數設定: P1
週(16)
月(16)
}

MZ16:=ZIG(CLOSE,p1);
StickLine(IsUP AND MZ16>=REF(MZ16,1) , HIGH , LOW , 0 , 0 ) , COLORRED,{Color5050FF} ;
StickLine(IsUp AND MZ16>=REF(MZ16,1), CLOSE , OPEN ,7 , 0 ) , Colorred ;
StickLine(IsDown AND MZ16>=REF(MZ16,1), HIGH , LOW ,0, 1 ) , Colorred;
StickLine(IsDown AND MZ16>=REF(MZ16,1), CLOSE , OPEN ,7 , 1 ) , Colorred ;

StickLine(IsUP AND MZ16<REF(MZ16,1) , HIGH , LOW , 0 , 1 ) , COLORgreen ;
StickLine(IsUp AND MZ16<REF(MZ16,1), CLOSE , OPEN ,7 , 1 ) , Colorgreen ;
StickLine(IsDown AND MZ16<REF(MZ16,1), HIGH , LOW ,0, 0 ) , Colorgreen ;
StickLine(IsDown AND MZ16<REF(MZ16,1), CLOSE , OPEN ,7 , 0 ) , Colorgreen ;

StickLine( IsEqual and MZ16>=REF(MZ16,1) , HIGH , LOW , 0,1) , Colorred ;
StickLine( IsEqual and MZ16>=REF(MZ16,1) , CLOSE , OPEN , 7, 1 ) , Colorred ;
StickLine( IsEqual and MZ16<REF(MZ16,1) , HIGH , LOW , 0 ,1 ) , Colorgreen ;
StickLine( IsEqual and MZ16<REF(MZ16,1) , CLOSE , OPEN , 7 ,1 ) , Colorgreen ;

X:=Barscount( Close ) ;
{ 以下是描繪第一個交易日的K線，以補前面含蓋的不足 }
StickLine( IsEqual and X = 1 , HIGH, LOW,7, 0 ) , Color5050FF ;
StickLine( IsEqual and X = 1 , CLOSE , OPEN ,7, 0 ) , Color5050FF ;

MZ16:ZIG(CLOSE,p1),COLORYELLOW;
MZ16升%:((MZ16-TROUGH(MZ16,p1,1))/TROUGH(MZ16,p1,1))*100,colorred,LINETHICK0;
MZ16跌%:((MZ16-PEAK(MZ16,p1,1))/PEAK(MZ16,p1,1))*100,colorgreen,LINETHICK0;

SX:=BarsCount(close) ;
KFNo:Sum( 1 , 0 ),linethick0;
KNo:c*0,linethick0,coloryellow;
<%
KNo=FFL.VarData("KNo")
EndNo = ubound(KNo)
for i=0 to EndNo
KNo(i)=EndNo-i+1
next
FFL.VarData("KNo")=KNo
%>

PU:=PEAKBARS(CLOSE,P1,1);
PB:=REF(barpos,PU);
PH:=sysparam(1)-PB+1,coloryellow;
drawnumber(PU=0 and PH>0,MZ16,PH,0),ALIGN0,pxup55,coloryellow;
drawnumber(PU=0 and (PH=3 or PH=5 or PH=8 or PH=13 or PH=21 or PH=34 or PH=55 or PH=89),mz16,PH,0),COLORRED,align0,pxup55;

PD:=TROUGHBARS(CLOSE,p1,1);
PC:=REF(barpos,PD);
PL:=sysparam(1)-PC+1,COLORCYAN;
drawnumber(PD=0 and PL>0,MZ16,PL,0),align0,PXDN20,COLORCYAN;
drawnumber(PD=0 and (PL=3 or PL=5 or PL=8 or PL=13 or PL=21 or PL=34 or PL=55 or PL=89),mz16,PL,0),COLORRED,align0,PXDN20;

__________________
Steven

由 p0068 在 2006-06-16 23:11 發表:

引用:
最初由 steven401 發表
[B]完成的畫面及程式源碼給有緣人分享 .

{MZIG16:參數設定: P1
週(16)
月(16)
}

MZ16:=ZIG(CLOSE,p1);
B]

此二行錯誤
???
MZ16升%: (MZ16-TROUGH(MZ16,p1,1))/TROUGH(MZ16,p1,1))*100,colorred,LINETHICK0;
MZ16跌%: (MZ16-PEAK(MZ16,p1,1))/PEAK(MZ16,p1,1))*100,colorgreen,LINETHICK0;

__________________
shujenwen

由 kkkkkk 在 2006-06-17 09:14 發表:

論壇上像你這樣大方無私的人愈來愈少了,給你鼓掌!!

由 steven401 在 2006-06-17 10:01 發表:

引用:
最初由 p0068 發表
此二行錯誤
???
MZ16升%: (MZ16-TROUGH(MZ16,p1,1))/TROUGH(MZ16,p1,1))*100,colorred,LINETHICK0;
MZ16跌%: (MZ16-PEAK(MZ16,p1,1))/PEAK(MZ16,p1,1))*100,colorgreen,LINETHICK0;

此兩行應以　:　取代表情符號才正確 ,　不知是何原因我由奇狐的公式編輯中複製然後貼上來就被改變了 .
應用此指標可以節省分析波浪及時間轉折的時間 , 應用在月ｋ及週ｋ有較高的參考性　.

__________________
Steven

由 goodddog 在 2006-06-20 18:51 發表:

語句缺少分號?

drawnumber(PU=0 and PH>0,MZ16,PH,0),ALIGN0,pxup55,coloryellow;
這句明明有分號,竟然解譯不過, 不知問題在哪?!

由 p0068 在 2006-06-20 19:46 發表:

引用:
最初由 kkkkkk 發表
是的,原碼被smile搞亂了

__________________
shujenwen

由 ifuian 在 2006-06-21 19:39 發表:

借花獻佛

修改後獻給原創者

__________________
人外有人天外有天不懼不貪亦富亦安

由 ifuian 在 2006-06-21 19:40 發表:

借花獻佛

修改後獻給原創者
無加密

__________________
人外有人天外有天不懼不貪亦富亦安

全部時間均為台灣時間, 現在時間為09:43

在這個頁面顯示本主題全部的 17 個文章