 |
a13923707868
中級會員

註冊日期: Sep 2022
來 自:
文章數量: 70 |
|
請問兩個以上的指標是否可以疊加在同一個圖上?
例如:
MACD + KD 或者程式碼應該編寫才能做到?而且都是滿座標可以各自分別辨識清楚?
感恩。
__________________
Stephen
|
|
向版主報告此篇 |  |
|
2025-12-24 13:34 |
|
|
|  |
 |
a13923707868
中級會員

註冊日期: Sep 2022
來 自:
文章數量: 70 |
|
感恩,我來試試看。
__________________
Stephen
|
|
向版主報告此篇 |  |
|
2025-12-24 14:47 |
|
|
|  |
 |
a13923707868
中級會員

註冊日期: Sep 2022
來 自:
文章數量: 70 |
|
想請教:
sysparam(2);//主圖可見K線最初的位置
sysparam(3);//主圖可見K線最後的位置
以日線即時盤而言,上述那一個是今天的位置?
__________________
Stephen
|
|
向版主報告此篇 |  |
|
2025-12-24 17:20 |
|
|
|  |
 |
a13923707868
中級會員

註冊日期: Sep 2022
來 自:
文章數量: 70 |
|
這個我我知道,但我想確認所謂的"最初"k線是在右邊或左邊?(相對"最後"k線就是在反方向)。
__________________
Stephen
|
|
向版主報告此篇 |  |
|
2025-12-24 18:23 |
|
|
|  |
 |
a13923707868
中級會員

註冊日期: Sep 2022
來 自:
文章數量: 70 |
|
感恩。
__________________
Stephen
|
|
向版主報告此篇 |  |
|
2025-12-25 12:37 |
|
|
|  |
 |
a13923707868
中級會員

註冊日期: Sep 2022
來 自:
文章數量: 70 |
|
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%,的相對應百分比。
功力實在不足,我只能畫出扭曲的彩帶。不知是否可以幫忙修正?
感恩
a13923707868 附帶上了此圖片:
__________________
Stephen
|
|
向版主報告此篇 |  |
|
2025-12-25 15:27 |
|
|
|  |
 |
a13923707868
中級會員

註冊日期: Sep 2022
來 自:
文章數量: 70 |
|
正常來說:
V_MID:=(V_MAX)*0.5;
以我目前的程式碼會畫在每根k棒的中間。很不清楚。
__________________
Stephen
|
|
向版主報告此篇 |  |
|
2025-12-25 15:31 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18251 |
|
引用: 最初由 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;
|
|
向版主報告此篇 |  |
|
2025-12-26 00:30 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18251 |
|
其實您目前想算的這個,也可以反過來思考,簡化為:
直接把 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;
|
|
向版主報告此篇 |  |
|
2025-12-26 08:54 |
|
|
|  |
 |
a13923707868
中級會員

註冊日期: Sep 2022
來 自:
文章數量: 70 |
|
感恩~~初步的效果出來了!但,我希望能夠將扭曲的彩帶轉呈水平的彩帶(如附圖的RSI00),要轉換的百分比前(我可以自行轉換),我必須先求得"畫線依據可見區間"的最大&最小,上面所附的程式碼邏輯我寫的有問題,所以我畫成扭曲的彩帶,可否再次幫忙修正求得區間最大值&最小值?
感恩。
a13923707868 附帶上了此圖片:
__________________
Stephen
|
|
向版主報告此篇 |  |
|
2025-12-26 16:08 |
|
|
|  |
 |
a13923707868
中級會員

註冊日期: Sep 2022
來 自:
文章數量: 70 |
|
啊!!!
抱歉我沒有看到那一段回覆,
造成困擾,深感抱歉。
__________________
Stephen
|
|
向版主報告此篇 |  |
|
2025-12-26 16:26 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|