  | 
	
	
	
	cgjj 
	總版主 
	 
	註冊日期: Oct 2003 
	來  自:  
	文章數量: 18211  | 
	
	
		
	    | 
			 回覆: 可否將月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 
	來  自:  
	文章數量: 18211  | 
	
	
		
	    | 
			 回覆: 印度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.   聯絡我們
 
 |