奇狐社區論壇 總頁數 (2): [1] 2 »
在這個頁面顯示本主題全部的 17 個文章

奇狐社區論壇 (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=24407)


由 a13923707868 在 2025-12-24 13:34 發表:

請問兩個以上的指標是否可以疊加在同一個圖上?

例如:
MACD + KD 或者程式碼應該編寫才能做到?而且都是滿座標可以各自分別辨識清楚?
感恩。

__________________
Stephen


由 cgjj 在 2025-12-24 14:13 發表:

回覆: 請問兩個以上的指標是否可以疊加在同一個圖上?

引用:
最初由 a13923707868 發表
例如:
MACD + KD 或者程式碼應該編寫才能做到?而且都是滿座標可以各自分別辨識清楚?
感恩。



請參考這邊的回答
http://www.chiefox.com.tw/bbs/showt...&threadid=23754


由 a13923707868 在 2025-12-24 14:47 發表:

感恩,我來試試看。

__________________
Stephen


由 a13923707868 在 2025-12-24 17:20 發表:

想請教:
sysparam(2);//主圖可見K線最初的位置
sysparam(3);//主圖可見K線最後的位置
以日線即時盤而言,上述那一個是今天的位置?

__________________
Stephen


由 cgjj 在 2025-12-24 17:34 發表:

引用:
最初由 a13923707868 發表
想請教:
sysparam(2);//主圖可見K線最初的位置
sysparam(3);//主圖可見K線最後的位置
以日線即時盤而言,上述那一個是今天的位置?



是主圖目前可視範圍的首根和末根!

主圖目前可視範圍,不一定會有今天的K棒,(例如移到過去觀看歷史K棒)


由 a13923707868 在 2025-12-24 18:23 發表:

這個我我知道,但我想確認所謂的"最初"k線是在右邊或左邊?(相對"最後"k線就是在反方向)。

__________________
Stephen


由 cgjj 在 2025-12-24 19:25 發表:

引用:
最初由 a13923707868 發表
這個我我知道,但我想確認所謂的"最初"k線是在右邊或左邊?(相對"最後"k線就是在反方向)。


最初就是比較早的,當然就是主圖最左邊的那根
最後就是比較晚的,當然就是主圖最右邊的那根


由 a13923707868 在 2025-12-25 12:37 發表:

感恩。

__________________
Stephen


由 a13923707868 在 2025-12-25 15:27 發表:

POS_B:=sysparam(2);//主圖可見K線最初的位置(早,左邊)
POS_E:=sysparam(3);//主圖可見K線最後的位置(晚,右邊)
V_MAX:=V;V_MIN:=V;
FOR i=POS_E TO POS_B DO
BEGIN
V_MAX:=MAX(V_MAX,REF(V,i));
V_MIN:=MIN(V_MIN,REF(V,i));
END;
V_MID:=(V_MAX);
///// OVB彩帶 //////////////////////
OBV:=SUM(SGN(CLOSE-REF(CLOSE,1))*VOL,0);
EV1:=MA(OBV,50);
EV2:=MA(OBV,10);
DM:=EV2-EV1;
FILLRGN(EV2> EV1,V_MID+30*0.01*V_MID,V_MID+70*0.01*V_MID),COLORBFBFFF;
FILLRGN((EV2> EV1) AND DM<REF(DM,1),V_MID+42*0.01*V_MID,V_MID+58*0.01*V_MID),COLORFFE8F5;
FILLRGN((EV2> EV1) AND DM<REF(DM,1) AND EV2>REF(EV2,1),V_MID+35*0.01*V_MID,V_MID+65*0.01*V_MID),COLORFFE8F5;
FILLRGN(EV2<=EV1,V_MID+30*0.01*V_MID,V_MID+70*0.01*V_MID),COLORFFFFAB;
FILLRGN(EV2<=EV1 AND DM>REF(DM,1) AND EV2>REF(EV2,1),V_MID+42*0.01*V_MID,V_MID+58*0.01*V_MID),COLORC9FFFF;
FILLRGN(EV2<=EV1 AND DM>REF(DM,1) AND EV2<REF(EV2,1),V_MID+35*0.01*V_MID,V_MID+65*0.01*V_MID),COLORC9FFFF;
//////////////////////////////////////////////////////////////////////////
{Volume , VOL , 成交張數}
N1:=5;N2:=20;N3:=20;
V5:MA(VOL,N1),Colora800a8{1c1cff} PRECISION0,lineTHICK1;
MA5:=V5;
PARTLINE(MA5>=REF(MA5,1),MA5),Colora800a8,linethick5;
///
V2:MA(VOL,N2),Color200000 PRECISION0,lineTHICK1;
MA20:=V2;
PARTLINE(MA20>=REF(MA20,1),MA20),Color200000,linethick5;
///
股本: (FINANCE(20)/100000),color008f00,POINTDOT;
總張:VOL,VOLSTICK,Colorblack,PRECISION0;
//////////////////////////////////////////////////////

程式碼如上,我希望得到OVB取均值&計算乖離變化,將類似如圖的水平彩帶疊加在成交量裡面&範圍是介於
1/2倍可見區最大量~1倍可見區間最大量,以此區間為100%,的相對應百分比。

功力實在不足,我只能畫出扭曲的彩帶。不知是否可以幫忙修正?
感恩

__________________
Stephen


由 a13923707868 在 2025-12-25 15:31 發表:

正常來說:

V_MID:=(V_MAX)*0.5;

以我目前的程式碼會畫在每根k棒的中間。很不清楚。

__________________
Stephen


由 cgjj 在 2025-12-26 00:30 發表:

引用:
最初由 a13923707868 發表
POS_B:=sysparam(2);//主圖可見K線最初的位置(早,左邊)
POS_E:=sysparam(3);//主圖可見K線最後的位置(晚,右邊)
V_MAX:=V;V_MIN:=V;
FOR i=POS_E TO POS_B DO
BEGIN
V_MAX:=MAX(V_MAX,REF(V,i));
V_MIN:=MIN(V_MIN,REF(V,i));
END;
V_MID:=(V_MAX);
///// OVB彩帶 //////////////////////
OBV:=SUM(SGN(CLOSE-REF(CLOSE,1))*VOL,0);
EV1:=MA(OBV,50);
EV2:=MA(OBV,10);
DM:=EV2-EV1;
FILLRGN(EV2> EV1,V_MID+30*0.01*V_MID,V_MID+70*0.01*V_MID),COLORBFBFFF;
FILLRGN((EV2> EV1) AND DM<REF(DM,1),V_MID+42*0.01*V_MID,V_MID+58*0.01*V_MID),COLORFFE8F5;
FILLRGN((EV2> EV1) AND DM<REF(DM,1) AND EV2>REF(EV2,1),V_MID+35*0.01*V_MID,V_MID+65*0.01*V_MID),COLORFFE8F5;
FILLRGN(EV2<=EV1,V_MID+30*0.01*V_MID,V_MID+70*0.01*V_MID),COLORFFFFAB;
FILLRGN(EV2<=EV1 AND DM>REF(DM,1) AND EV2>REF(EV2,1),V_MID+42*0.01*V_MID,V_MID+58*0.01*V_MID),COLORC9FFFF;
FILLRGN(EV2<=EV1 AND DM>REF(DM,1) AND EV2<REF(EV2,1),V_MID+35*0.01*V_MID,V_MID+65*0.01*V_MID),COLORC9FFFF;
//////////////////////////////////////////////////////////////////////////
{Volume , VOL , 成交張數}
N1:=5;N2:=20;N3:=20;
V5:MA(VOL,N1),Colora800a8{1c1cff} PRECISION0,lineTHICK1;
MA5:=V5;
PARTLINE(MA5>=REF(MA5,1),MA5),Colora800a8,linethick5;
///
V2:MA(VOL,N2),Color200000 PRECISION0,lineTHICK1;
MA20:=V2;
PARTLINE(MA20>=REF(MA20,1),MA20),Color200000,linethick5;
///
股本: (FINANCE(20)/100000),color008f00,POINTDOT;
總張:VOL,VOLSTICK,Colorblack,PRECISION0;
//////////////////////////////////////////////////////

程式碼如上,我希望得到OVB取均值&計算乖離變化,將類似如圖的水平彩帶疊加在成交量裡面&範圍是介於
1/2倍可見區最大量~1倍可見區間最大量,以此區間為100%,的相對應百分比。

功力實在不足,我只能畫出扭曲的彩帶。不知是否可以幫忙修正?
感恩



前面這一段 V_MAX 和 V_MIN,就算錯了!

POS_B:=sysparam(2);//主圖可見K線最初的位置(早,左邊)
POS_E:=sysparam(3);//主圖可見K線最後的位置(晚,右邊)
V_MAX:=V;V_MIN:=V;
FOR i=POS_E TO POS_B DO
BEGIN
V_MAX:=MAX(V_MAX,REF(V,i));
V_MIN:=MIN(V_MIN,REF(V,i));
END;


正確的寫法是像這樣:
原碼:
VV:=V; POS_B:=sysparam(2);//主圖可見K線最初的位置(早,左邊) POS_E:=sysparam(3);//主圖可見K線最後的位置(晚,右邊) V_MAX:=VV[POS_B]; V_MIN:=VV[POS_B]; FOR i=POS_B+1 TO POS_E DO BEGIN if VV[i]>V_MAX then V_MAX:=VV[i]; if VV[i]<V_MIN then V_MIN:=VV[i]; END;


由 cgjj 在 2025-12-26 08:54 發表:

其實您目前想算的這個,也可以反過來思考,簡化為:

直接把 OVB彩帶 當主軸畫出。
再把成交量按百分比去疊,不就簡單多了~~
例如:

OBV:=SUM(SGN(CLOSE-REF(CLOSE,1))*VOL,0);
EV1:MA(OBV,50);
EV2:MA(OBV,10);
DM:=EV2-EV1;
FILLRGN(EV2> EV1,EV1,EV2),COLORBFBFFF;
FILLRGN(EV2<=EV1,EV1,EV2),COLORFFFFAB;
FILLRGN(EV2<=EV1 AND DM>REF(DM,1) AND EV2>REF(EV2,1),EV1,EV2),COLORC9FFFF;
FILLRGN(EV2<=EV1 AND DM>REF(DM,1) AND EV2<REF(EV2,1),EV1,EV2),COLORC9FFFF;
V VOLSTICK NOAXIS;


由 a13923707868 在 2025-12-26 16:08 發表:

感恩~~初步的效果出來了!但,我希望能夠將扭曲的彩帶轉呈水平的彩帶(如附圖的RSI00),要轉換的百分比前(我可以自行轉換),我必須先求得"畫線依據可見區間"的最大&最小,上面所附的程式碼邏輯我寫的有問題,所以我畫成扭曲的彩帶,可否再次幫忙修正求得區間最大值&最小值?
感恩。

__________________
Stephen


由 cgjj 在 2025-12-26 16:14 發表:

引用:
最初由 a13923707868 發表
感恩~~初步的效果出來了!但,我希望能夠將扭曲的彩帶轉呈水平的彩帶(如附圖的RSI00),要轉換的百分比前(我可以自行轉換),我必須先求得"畫線依據可見區間"的最大&最小,上面所附的程式碼邏輯我寫的有問題,所以我畫成扭曲的彩帶,可否再次幫忙修正求得區間最大值&最小值?
感恩。



前面給你的 "正確的寫法"
V_MAX 和 V_MIN 就是畫面區間成交量之最大值與最小值

若您需求畫面區間OBV之最大值與最小值,方法是一樣的,依樣畫葫蘆去求就可


由 a13923707868 在 2025-12-26 16:26 發表:

啊!!!
抱歉我沒有看到那一段回覆,
造成困擾,深感抱歉。

__________________
Stephen


全部時間均為台灣時間, 現在時間為02:14 總頁數 (2): [1] 2 »
在這個頁面顯示本主題全部的 17 個文章


Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.

簡愛洋行 製作 Copyright 2003-. All Rights Reserved.