奇狐社區論壇 - 成交量疊加於KD指標

奇狐社區論壇 : Powered by vBulletin version 2.3.0

奇狐社區論壇 > 指標公式 > 問題交流 > 成交量疊加於KD指標

上一主題下一主題

作者

主題

Markchu7
資深會員

註冊日期: Nov 2007
來　　自:
文章數量: 1509

成交量疊加於KD指標

以下源碼是想將成交量疊加於KD指標的20~80之間!
ZA:=STKINBLOCK(STKLABEL,'上市指數') OR STKINBLOCK(STKLABEL,'上櫃指數');
XA:=VOL;
YA:=AMOUNT/100000000;
成交:IF(ZA=0,INTPART(XA),YA),LINETHICK,ColorRED;

首K:=BARPOS=SYSPARAM(2);
末K:=BARPOS=SYSPARAM(3);
首Ksp:=barslast(首K);
末Ksp:=barslast(末K);
VMHS:=HHV(成交,首Ksp+1);
VMLS:=LLV(成交,首Ksp+1);
VMH:=VMHS[SYSPARAM(3)];
VML:=VMLS[SYSPARAM(3)];

V換算值:=成交/(VMH-VML)*(80-20)+20;
STICKLINE(1,80,20,10,0),COLORYELLOW;
STICKLINE(1,50,50,10,0),COLOR000000;

STICKLINE(C>REF(C,1),20,V換算值,8,1),COLORRED;
STICKLINE(C=REF(C,1),20,V換算值,8,0),COLOR888888;
STICKLINE(C<REF(C,1),20,V換算值,8,1),COLORBLUE;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1);
D:SMA(K,3,1);

FILLRGN(K>D,K,D),COLORFF00FF;
FILLRGN(K<D,K,D),COLOR00AA00;

POLYLINE(1,D),COLORBLUE;
POLYLINE(1,K),COLORRED;
J:3*K-2*D,COLOR000000;

但以加權指數而言,顯然是失敗的!

Markchu7 附帶上了此圖片:

向版主報告此篇 |

2017-09-22 14:13

Markchu7
資深會員

註冊日期: Nov 2007
來　　自:
文章數量: 1509

但個股似乎是可以的!
可否幫忙寫正確的公式?感謝!

Markchu7 附帶上了此圖片:

向版主報告此篇 |

2017-09-22 14:15

cgjj
總版主

註冊日期: Oct 2003
來　　自:
文章數量: 18145

回覆: 成交量疊加於KD指標

引用:
最初由 Markchu7 發表
以下源碼是想將成交量疊加於KD指標的20~80之間!
ZA:=STKINBLOCK(STKLABEL,'上市指數') OR STKINBLOCK(STKLABEL,'上櫃指數');
XA:=VOL;
YA:=AMOUNT/100000000;
成交:IF(ZA=0,INTPART(XA),YA),LINETHICK,ColorRED;

首K:=BARPOS=SYSPARAM(2);
末K:=BARPOS=SYSPARAM(3);
首Ksp:=barslast(首K);
末Ksp:=barslast(末K);
VMHS:=HHV(成交,首Ksp+1);
VMLS:=LLV(成交,首Ksp+1);
VMH:=VMHS[SYSPARAM(3)];
VML:=VMLS[SYSPARAM(3)];

V換算值:=成交/(VMH-VML)*(80-20)+20;
STICKLINE(1,80,20,10,0),COLORYELLOW;
STICKLINE(1,50,50,10,0),COLOR000000;

STICKLINE(C>REF(C,1),20,V換算值,8,1),COLORRED;
STICKLINE(C=REF(C,1),20,V換算值,8,0),COLOR888888;
STICKLINE(C<REF(C,1),20,V換算值,8,1),COLORBLUE;

RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:SMA(RSV,3,1);
D:SMA(K,3,1);

FILLRGN(K>D,K,D),COLORFF00FF;
FILLRGN(K<D,K,D),COLOR00AA00;

POLYLINE(1,D),COLORBLUE;
POLYLINE(1,K),COLORRED;
J:3*K-2*D,COLOR000000;

但以加權指數而言,顯然是失敗的!

這樣做既費事，又費CPU(有動用sysparam)

改變成下面這樣，既簡單又快速

成交:=IF(strlen(stklabel)=3,AMOUNT/100000000,V);
成交 VOLSTICK NOAXIS colorred;
ZA:=STKINBLOCK(STKLABEL,'上市指數') OR STKINBLOCK(STKLABEL,'上櫃指數');
XA:=VOL;
YA:=AMOUNT/100000000;
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:SMA(RSV,M1,1);
D:SMA(K,M2,1);

向版主報告此篇 |

2017-09-22 14:24