|
cgjj
總版主
註冊日期: Oct 2003
來 自:
文章數量: 17633 |
回覆: 可否將月K棒背景塗顏色
引用: 最初由 一心不亂 發表
目前總版主的程式是將月K棒用PRTLINE 和STICKLINE 畫在日K棒的視窗上, 想說可否修改一下將月K棒塗淡淡的紅色(背景)如果月開盤價<月收盤價。反之塗淡淡的綠色。我曾用DRAWGBK來修改但是不成功!
可否請總版主 修改一下程式,這樣會更清楚一目了然!
謝謝!
範例:(只畫柱體,引線刪除)
MM:=Month;
MSt:=barpos=1 or ref(MM,1)<>MM;
MEd:=refx(MSt,1) or barpos=datacount;
MSp:=BARSLAST(MSt);
MO:ref(O,MSp) LINETHICK0 colormagenta;
MH:HHV(H,MSp+1) LINETHICK0 colormagenta;
MH:=SETVAL(MEd,MH,-MSp,MH);
ML:LLV(L,MSp+1) LINETHICK0 colormagenta;
ML:=SETVAL(MEd,ML,-MSp,ML);
MC:SETVAL(MEd,C,-MSp,C) LINETHICK0 colormagenta;
STICKLINE(MC>MO,MC,MO,10,0) color000055;
STICKLINE(MC<MO,MC,MO,10,0) color555500;
WW:=FLOOR((DATETOD1970(date)-3)/7);
WSt:=barpos=1 or ref(WW,1)<>WW;
WEd:=refx(WSt,1) or barpos=datacount;
WSp:=BARSLAST(WSt);
WO:ref(O,WSp) LINETHICK0 colormagenta;
WH:HHV(H,WSp+1) LINETHICK0 colormagenta;
WH:=SETVAL(WEd,WH,-WSp,WH);
WL:LLV(L,WSp+1) LINETHICK0 colormagenta;
WL:=SETVAL(WEd,WL,-WSp,WL);
WC:SETVAL(WEd,C,-WSp,C) LINETHICK0 colormagenta;
STICKLINE(WC>WO,WC,WO,10,0) color660066;
STICKLINE(WC<WO,WC,WO,10,0) color006600;
KLINE(O,H,L,C,0);
|
|
向版主報告此篇 | |
|
2017-06-26 10:12 |
|
|
| |
|
一心不亂
資深會員
註冊日期: Apr 2014
來 自:
文章數量: 118 |
印度15分K圖時00:01-04:15 只畫成一根60分K?
請問版主:
我的周期是用15分K,在道瓊商品下看時都很正常,但是當我選到印度,A50商品時,畫最後一根60分K的範圍是從23:40-04:45。不再是每4根15分K畫一個,請問問題出在哪裡?
DECK:=Tradedate<>ref(tradedate,1);
//繪60分大K
M60K:=MOD(OPENMINUTES(DATE,TIME),60);
M60St:=barpos=1 or DECK or ref(M60K,1)=0;
M60Ed:=refx(M60St,1) or barpos=datacount;
M60Sp:=BARSLAST(M60St);
M60O:ref(O,M60Sp) LINETHICK0 color00BBFF;
M60H:HHV(H,M60Sp+1) LINETHICK0 color00BBFF;
M60H:=SETVAL(M60Ed,M60H,-M60Sp,M60H);
M60L:LLV(L,M60Sp+1) LINETHICK0 color00BBFF;
M60L:=SETVAL(M60Ed,M60L,-M60Sp,M60L);
M60C:SETVAL(M60Ed,C,-M60Sp,C) LINETHICK0 color00BBFF;
SpD2:=FLOOR(M60Sp/2);
M60V:=SETVAL(M60Ed,0,-SpD2,barpos-SpD2);
M60V:=barpos=M60V;
PKM60:=M60Sp>0;
PKMV:=PKM60 and M60V;
PKLV:=M60St and Not(M60Ed);
PKRV:=PKM60 and M60Ed;
RedK:=M60C>M60O;
PARTLINE(PKM60 and RedK=1,M60O) colormagenta;
PARTLINE(PKM60 and RedK=1,M60C) colormagenta;
STICKLINE(PKMV and RedK=1,M60H,MAX(M60C,M60O),0,0) colormagenta;
STICKLINE(PKMV and RedK=1,M60L,MIN(M60C,M60O),0,0) colormagenta;
STICKLINE(PKLV and RedK=1,M60C,M60O,0,0) colormagenta;
STICKLINE(PKRV and RedK=1,M60C,M60O,0,0) colormagenta;
PARTLINE(PKM60 and RedK=0,M60O) colorgreen;
PARTLINE(PKM60 and RedK=0,M60C) colorgreen;
STICKLINE(PKMV and RedK=0,M60H,MAX(M60C,M60O),0,0) colorgreen;
STICKLINE(PKMV and RedK=0,M60L,MIN(M60C,M60O),0,0) colorgreen;
STICKLINE(PKLV and RedK=0,M60C,M60O,0,0) colorgreen;
STICKLINE(PKRV and RedK=0,M60C,M60O,0,0) colorgreen;
|
|
向版主報告此篇 | |
|
2017-10-07 14:30 |
|
|
| |
|
cgjj
總版主
註冊日期: Oct 2003
來 自:
文章數量: 17633 |
回覆: 印度15分K圖時00:01-04:15 只畫成一根60分K?
引用: 最初由 一心不亂 發表
請問版主:
我的周期是用15分K,在道瓊商品下看時都很正常,但是當我選到印度,A50商品時,畫最後一根60分K的範圍是從23:40-04:45。不再是每4根15分K畫一個,請問問題出在哪裡?
DECK:=Tradedate<>ref(tradedate,1);
//繪60分大K
M60K:=MOD(OPENMINUTES(DATE,TIME),60);
M60St:=barpos=1 or DECK or ref(M60K,1)=0;
M60Ed:=refx(M60St,1) or barpos=datacount;
M60Sp:=BARSLAST(M60St);
M60O:ref(O,M60Sp) LINETHICK0 color00BBFF;
M60H:HHV(H,M60Sp+1) LINETHICK0 color00BBFF;
M60H:=SETVAL(M60Ed,M60H,-M60Sp,M60H);
M60L:LLV(L,M60Sp+1) LINETHICK0 color00BBFF;
M60L:=SETVAL(M60Ed,M60L,-M60Sp,M60L);
M60C:SETVAL(M60Ed,C,-M60Sp,C) LINETHICK0 color00BBFF;
SpD2:=FLOOR(M60Sp/2);
M60V:=SETVAL(M60Ed,0,-SpD2,barpos-SpD2);
M60V:=barpos=M60V;
PKM60:=M60Sp>0;
PKMV:=PKM60 and M60V;
PKLV:=M60St and Not(M60Ed);
PKRV:=PKM60 and M60Ed;
RedK:=M60C>M60O;
PARTLINE(PKM60 and RedK=1,M60O) colormagenta;
PARTLINE(PKM60 and RedK=1,M60C) colormagenta;
STICKLINE(PKMV and RedK=1,M60H,MAX(M60C,M60O),0,0) colormagenta;
STICKLINE(PKMV and RedK=1,M60L,MIN(M60C,M60O),0,0) colormagenta;
STICKLINE(PKLV and RedK=1,M60C,M60O,0,0) colormagenta;
STICKLINE(PKRV and RedK=1,M60C,M60O,0,0) colormagenta;
PARTLINE(PKM60 and RedK=0,M60O) colorgreen;
PARTLINE(PKM60 and RedK=0,M60C) colorgreen;
STICKLINE(PKMV and RedK=0,M60H,MAX(M60C,M60O),0,0) colorgreen;
STICKLINE(PKMV and RedK=0,M60L,MIN(M60C,M60O),0,0) colorgreen;
STICKLINE(PKLV and RedK=0,M60C,M60O,0,0) colorgreen;
STICKLINE(PKRV and RedK=0,M60C,M60O,0,0) colorgreen;
測試過沒您說的情況唷
您有升級到最新版 v5.1.161116 嗎?
http://www.chiefox.com.tw/bbs/showt...&threadid=20559
另外,建議您把
M60St:=barpos=1 or DECK or ref(M60K,1)=0;
改為
M60St:=DECK or ref(M60K,1)=0;
避免算到開頭不完整的交易日
cgjj 附帶上了此圖片:
|
|
向版主報告此篇 | |
|
2017-10-11 09:17 |
|
|
| |
|
bill25789
中級會員
註冊日期: Mar 2021
來 自:
文章數量: 75 |
引用: 最初由 cgjj 發表
什麼意思? 您是指什麼?
因為現在版本已是5.2
還是說可以直接下載前面哪個附件檔
附件:BigK_2G_v51.ALG
或
附件:日周月K_20131230.ALG
|
|
向版主報告此篇 | |
|
2021-04-01 12:00 |
|
|
| |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|