到奇狐勝券首頁 奇狐社區論壇 購買奇狐勝券 試用奇狐勝券
 
論壇首頁 你可以在這裡編輯你的資料,查看短訊,訂閱主題和論壇參數等等 免費會員註冊 會員列表 論壇幫助 論壇日曆 論壇搜索 加入我的最愛 登出論壇  
奇狐社區論壇 : Powered by vBulletin version 2.3.0 奇狐社區論壇 > 指標公式 > 問題交流 > 求助
  上一主題   下一主題
作者
主題 發表新主題    回覆主題
a588
資深會員

註冊日期: Nov 2006
來  自: 台北市
文章數量: 101

求助

請問:
在台當月全日盤中<分時平均成本>公式

{Daily Volume Weighted Average Minute Cost ,WBC, 當日分時平均成本}
//
本公式日盤與夜盤時段,不分開計算

分時平均成本:0,Color66CCFF,LINETHICK0;
ZZTS:=strright(stklabel,1)='+'; //本商品具備盤後交易
if ZZTS then TDATE:Tradedate ColorMAGENTA linethick;
if datatype<1 or datatype=12 then begin //分線以下週期
SP:=Sum(C*Vol,0); SV:=SUM(Vol,0);
分時平均成本:=SP/SV;
DW:=1; if datatype<>0 then DW:=SV>0 and (ref(SV,1)>0 or barpos=1);
PARTLINE(DW,分時平均成本),Color66CCFF,LINETHICK2;
end else begin
DECK:=TradeDate<>ref(TradeDate,1);
DESP:=barslast(DECK);
VERTLINE(DECK) ColorMAGENTA linedot; //標示換交易日(垂直分隔線)
KLINE(O,H,L,C,0);
SP:=Sum(((H+L+C*2)/4)*Vol,DESP+1);
SV:=Sum(Vol,DESP+1);
分時平均成本:=SP/SV;
DW:=DESP>0 and SV>0 and ref(SV,1)>0;
PARTLINE(DW,分時平均成本),Color66CCFF,LINETHICK2;
end;

可否寫出將日盤(8:45–13:45)及夜盤(15:00–05:00)分開計算的公式?
謝謝!

向版主報告此篇 | 查IP位址
Old Post 2020-03-17 10:32
a588 現在離線 點選這裡查看 a588 的個人資料 查找更多關於 a588 的文章 增加 a588 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

註冊日期: Oct 2003
來  自:
文章數量: 18091

回覆: 求助

引用:
最初由 a588 發表
請問:
在台當月全日盤中<分時平均成本>公式

{Daily Volume Weighted Average Minute Cost ,WBC, 當日分時平均成本}
//
本公式日盤與夜盤時段,不分開計算

分時平均成本:0,Color66CCFF,LINETHICK0;
ZZTS:=strright(stklabel,1)='+'; //本商品具備盤後交易
if ZZTS then TDATE:Tradedate ColorMAGENTA linethick;
if datatype<1 or datatype=12 then begin //分線以下週期
SP:=Sum(C*Vol,0); SV:=SUM(Vol,0);
分時平均成本:=SP/SV;
DW:=1; if datatype<>0 then DW:=SV>0 and (ref(SV,1)>0 or barpos=1);
PARTLINE(DW,分時平均成本),Color66CCFF,LINETHICK2;
end else begin
DECK:=TradeDate<>ref(TradeDate,1);
DESP:=barslast(DECK);
VERTLINE(DECK) ColorMAGENTA linedot; //標示換交易日(垂直分隔線)
KLINE(O,H,L,C,0);
SP:=Sum(((H+L+C*2)/4)*Vol,DESP+1);
SV:=Sum(Vol,DESP+1);
分時平均成本:=SP/SV;
DW:=DESP>0 and SV>0 and ref(SV,1)>0;
PARTLINE(DW,分時平均成本),Color66CCFF,LINETHICK2;
end;

可否寫出將日盤(8:45–13:45)及夜盤(15:00–05:00)分開計算的公式?
謝謝!



SWCK:=TradeDate<>ref(TradeDate,1) or IsRegularFBar or barpos=1;
SWSP:=barslast(SWCK);
VERTLINE(SWCK) ColorMAGENTA linedot; //標示換盤首根
SP:=Sum(((H+L+C*2)/4)*Vol,SWSP+1);
SV:=Sum(Vol,SWSP+1);
分時平均成本:SP/SV linethick Color66CCFF;
DW:=SWSP>0 and SV>0 and ref(SV,1)>0;
PARTLINE(DW,分時平均成本),Color66CCFF,LINETHICK2;

向版主報告此篇 | 查IP位址
Old Post 2020-03-17 11:08
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
全部時間均為台灣時間, 現在時間為06:22 發表新主題    回覆主題
  上一主題   下一主題
顯示可列印版本 | 訂閱此主題

論壇跳轉:
主題評分:

論壇規定:
你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章
HTML語法禁止
vB 語法核准
表情符號核准
貼圖語法[IMG]核准
 

本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。

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

簡愛洋行 製作 Copyright 2003-. All Rights Reserved.  聯絡我們