![]() |
在這個頁面顯示本主題全部的 13 個文章 |
奇狐社區論壇 (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=23502)
日夜盤問題
版主你好:
1)可否寫出將日盤(8:45–13:45)及夜盤(15:00–05:00)分開計算的公式?
2)公式為MACD
以上需求煩請指導....謝謝
__________________
chiu
回覆: 日夜盤問題
引用:
最初由 a9681054 發表
版主你好:
1)可否寫出將日盤(8:45–13:45)及夜盤(15:00–05:00)分開計算的公式?
2)公式為MACD
以上需求煩請指導....謝謝
原碼:
CC:=C; SWCK:=IsRegularFBar or tradedate<>ref(tradedate,1); ES:=barssince(SWCK)*0; EL:=ES; EM:=ES; StNo:=lbound(ES); for i=StNo to datacount do begin if SWCK[i]=1 then begin ES[i]:=CC[i]; EL[i]:=ES[i]; end else begin ES[i]:=(2*CC[i]+(SHORT-1)*ES[i-1])/(SHORT+1); EL[i]:=(2*CC[i]+(LONG-1)*EL[i-1])/(LONG+1); end; end; DIFF:ES-EL; for i=StNo to datacount do begin if SWCK[i]=1 then begin EM[i]:=DIFF[i]; end else begin EM[i]:=(2*DIFF[i]+(M-1)*EM[i-1])/(M+1); end; end; DEA:EM; MACD:2*(DIFF-DEA),COLORSTICK,Linethick2; VERTLINE(SWCK) Linedot color777777;
回覆:
1) 版主太棒了,謝謝你
2)想瞭解一下源碼意思,可否幫忙註解...謝謝
__________________
chiu
引用:
最初由 a9681054 發表
回覆:
1) 版主太棒了,謝謝你
2)想瞭解一下源碼意思,可否幫忙註解...謝謝
引用:
最初由 a9681054 發表
回覆:
2)想瞭解一下源碼意思,可否幫忙註解...謝謝
回覆:
了解.....謝謝版主的指導
__________________
chiu
不練習,"迴圈" 是永遠學不會的~~
要試著自己去思考想像處理的流程,去實際練習
從無到有,自己把程式練習寫出來~~
回覆:
1)這迴圈的學習版主所言甚是,會照版主建議從基本學習起
2)另日夜盤還有一個需求:
1.可否寫出將日盤(8:45–13:45)及夜盤(15:00–05:00)分開計算的公式?
2.公式為奇狐內建特色公式"控盤力道"
以上需求煩請指導....謝謝
__________________
chiu
引用:
最初由 a9681054 發表
回覆:
1)這迴圈的學習版主所言甚是,會照版主建議從基本學習起
2)另日夜盤還有一個需求:
1.可否寫出將日盤(8:45–13:45)及夜盤(15:00–05:00)分開計算的公式?
2.公式為奇狐內建特色公式"控盤力道"
以上需求煩請指導....謝謝
控盤力道不是每一根都有值,是自第二根才開始有效~~
回覆:
我有看了歷史圖。的確是第二根才開始有值
要日夜分開計算,起算點那根如何因應您必須去思考
回覆:
日夜起算點,都採第二根開始計算,這樣可以嗎?
__________________
chiu
引用:
最初由 a9681054 發表
控盤力道不是每一根都有值,是自第二根才開始有效~~
回覆:
我有看了歷史圖。的確是第二根才開始有值
要日夜分開計算,起算點那根如何因應您必須去思考
回覆:
日夜起算點,都採第二根開始計算,這樣可以嗎?
對一個數列而言
並無法去設置僅中間某幾根K棒是無效的~~
回覆:
了解
也就是說
必須要有相應的處理,一定要給數值來填補
重點是您要填補何值!
回覆:
以0來填補,這樣可以嗎?
__________________
chiu
引用:
最初由 a9681054 發表
對一個數列而言
並無法去設置僅中間某幾根K棒是無效的~~
回覆:
了解
也就是說
必須要有相應的處理,一定要給數值來填補
重點是您要填補何值!
回覆:
以0來填補,這樣可以嗎?
原碼:
SS:=(C+H+L)/3; SWCK:=IsRegularFBar or tradedate<>ref(tradedate,1) or barpos=1; ES:=barssince(SWCK)*0; StNo:=lbound(ES); P:=01;for i=StNo to datacount do if SWCK[i]=0 then SS[i]:=(2*SS[i]+(P-1)*SS[i-1])/(P+1); P:=13;for i=StNo to datacount do if SWCK[i]=0 then SS[i]:=(2*SS[i]+(P-1)*SS[i-1])/(P+1); P:=21;for i=StNo to datacount do if SWCK[i]=0 then SS[i]:=(2*SS[i]+(P-1)*SS[i-1])/(P+1); RSS1:=REF(SS,1); MM:=if(SWCK,0,(SS-RSS1)/RSS1*100); 力道:MM*1000 linethick; STICKLINE(MM>1,1,力道,6,0),COLORMAGENTA; STICKLINE(MM<1,1,力道,6,0),COLORCYAN; STICKLINE(MM<ref(MM,1),1,力道,6,0),COLORCYAN; STICKLINE(MM>ref(MM,1),1,力道,6,0),COLORMAGENTA;
回覆:
可以了,非常感謝版主幫忙~
__________________
chiu
全部時間均為台灣時間, 現在時間為01:39 | 在這個頁面顯示本主題全部的 13 個文章 |
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved.