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

註冊日期: Jan 2010
來  自:
文章數量: 270

【分筆成交】值

總版主您好:
AA:=引用指標('FITX1','BSV.SB',0,0);
引用至9.快樂股市、BSV中、SB:XG-XH【分筆成交】值、如果引用在3分週期使用、會加重負擔、可否有其他方式、可在3分週期、得其值、請總版主指導。

向版主報告此篇 | 查IP位址
Old Post 2014-04-16 10:39
N122562663 現在離線 點選這裡查看 N122562663 的個人資料 點選這裡給 N122562663 傳送一條短訊 查找更多關於 N122562663 的文章 增加 N122562663 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

回覆: 【分筆成交】值

引用:
最初由 N122562663 發表
總版主您好:
AA:=引用指標('FITX1','BSV.SB',0,0);
引用至9.快樂股市、BSV中、SB:XG-XH【分筆成交】值、如果引用在3分週期使用、會加重負擔、可否有其他方式、可在3分週期、得其值、請總版主指導。



把 BSV 公式源碼換成這一段試試
之前的人寫的程式碼不太好
我重新寫過了, 僅需要底下這幾行就可取代
應該可以快上不少

---- 請見後續修正 ---

向版主報告此篇 | 查IP位址
Old Post 2014-04-16 14:36
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
N122562663
資深會員

註冊日期: Jan 2010
來  自:
文章數量: 270

數值就不一樣

總版主您好:新公式確實較許多、但不知何故、未相減引用、買賣方量都一樣、相減引用【分筆成交】值、數值就不一樣、請問解決之道。謝謝您。

AA:=引用指標('FITX1','BSV.',0,0);買方量-賣方量
BB:=引用指標('FITX1','新公式',0,0);買方量-賣方量

向版主報告此篇 | 查IP位址
Old Post 2014-04-17 12:21
N122562663 現在離線 點選這裡查看 N122562663 的個人資料 點選這裡給 N122562663 傳送一條短訊 查找更多關於 N122562663 的文章 增加 N122562663 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

回覆: 數值就不一樣

引用:
最初由 N122562663 發表
總版主您好:新公式確實較許多、但不知何故、未相減引用、買賣方量都一樣、相減引用【分筆成交】值、數值就不一樣、請問解決之道。謝謝您。

AA:=引用指標('FITX1','BSV.',0,0);買方量-賣方量
BB:=引用指標('FITX1','新公式',0,0);買方量-賣方量



引用要指定哪個公式的哪個變數
您並沒有指定變數唷

若您需要用到差值

可在
量:VOL Linethick0;
這行之後, 加上
差: 買方量-賣方量;

如此就不需分別引用買方量和賣方量算差值
可直接引用算好的 "差", 如此可讓效能更好

向版主報告此篇 | 查IP位址
Old Post 2014-04-17 13:36
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
N122562663
資深會員

註冊日期: Jan 2010
來  自:
文章數量: 270

可否全秀出

總版主您好:抱歉、我先試、再說、謝謝您。

向版主報告此篇 | 查IP位址
Old Post 2014-04-17 13:41
N122562663 現在離線 點選這裡查看 N122562663 的個人資料 點選這裡給 N122562663 傳送一條短訊 查找更多關於 N122562663 的文章 增加 N122562663 至你的好友列表 編輯/刪除訊息 引用回覆
N122562663
資深會員

註冊日期: Jan 2010
來  自:
文章數量: 270

值依然不同

總版主您好:抱歉、我試過後、值依然不同、請看那兒出錯、謝謝您。


新公式

UD:=符號值(收盤價-向前引用(收盤價,1));
UD:=條件函數(數據位置=1,-1,向前引用(UD,上一次條件成立位置(UD<>0)));
買方量:求和((UD=1)*成交量,0) Linethick0;
賣方量:求和((UD=-1)*成交量,0) Linethick0;
量:成交量 Linethick0;
差:買方量-賣方量;

AA:引用指標('FITX1','.差',0,0);

///////////////////////////////////////////////////////////////////////////////////
原公式

{本公式,僅適用分筆成交分析週期 , Buy & Sell Volume , BSV}
XA:=C-C;
XB:=C/C;


XD:=CLOSE;

<%
VA= FFL.VarData("XA")
VB= FFL.VarData("XB")


VD= FFL.VarData("XD")

LT = UBound( VD )

for k = 1 to LT


if VD(k)>VD(k-1) then

VA( k )=1
else
VA( k )=0

end if


if VA(k-1)=1 and VD(k)=VD(k-1) then

VA( k )=1
else
VA( k )=VA(k)

end if


next



for k = 1 to LT


if VD(k)<VD(k-1) then

VB( k )=1
else
VB( k )=0

end if


if VB(k-1)=1 and VD(k)=VD(k-1) then

VB( k )=1
else
VB( k )=VB(k)

end if


next



FFL.VarData("XA")=VA
FFL.VarData("XB")=VB
%>


STICKLINE(XA=1,0,V,7,0),COLORRED;
STICKLINE(XB=1,0,V,7,0),COLORGREEN;



XE:=XA*VOL;
XF:=XB*VOL;



XG:=SUM(XE,0);
XH:=SUM(XF,0);

{
<%
VG= FFL.VarData("XG")
VH= FFL.VarData("XH")

LT = UBound( VG )

for k = 0 to LT

VG( k )=VG(LT)
VH( k )=VH(LT)

next


FFL.VarData("XG")=VG
FFL.VarData("XH")=VH
%>
}

買方量:XG , Linethick0 ;
賣方量:XH , Linethick0 ;

量:VOL ,Linethick0 ;

差:買方量-賣方量;


AA:引用指標('FITX1','.差',0,0);

向版主報告此篇 | 查IP位址
Old Post 2014-04-17 16:04
N122562663 現在離線 點選這裡查看 N122562663 的個人資料 點選這裡給 N122562663 傳送一條短訊 查找更多關於 N122562663 的文章 增加 N122562663 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

回覆: 值依然不同

引用:
最初由 N122562663 發表
總版主您好:抱歉、我試過後、值依然不同、請看那兒出錯、謝謝您。


新舊的寫法, 兩者計算結果並不會有差距唷
我這比對過100%沒問題

應該是您之後的程序處理造成的

如仍有問題請來電公司, 謝謝

向版主報告此篇 | 查IP位址
Old Post 2014-04-17 16:23
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

請改為這樣 v5.0 和 v5.1 就能通用了
---- 請見後續修正 ---

向版主報告此篇 | 查IP位址
Old Post 2014-04-17 18:35
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
N122562663
資深會員

註冊日期: Jan 2010
來  自:
文章數量: 270

值已相同

總版主您好:值已相同、謝謝您。

向版主報告此篇 | 查IP位址
Old Post 2014-04-17 18:38
N122562663 現在離線 點選這裡查看 N122562663 的個人資料 點選這裡給 N122562663 傳送一條短訊 查找更多關於 N122562663 的文章 增加 N122562663 至你的好友列表 編輯/刪除訊息 引用回覆
N122562663
資深會員

註冊日期: Jan 2010
來  自:
文章數量: 270

值是不相同

總版主您好:今天放進盤中即時運轉、值是不相同、煩您費心、再支援、謝謝您。

向版主報告此篇 | 查IP位址
Old Post 2014-04-18 16:26
N122562663 現在離線 點選這裡查看 N122562663 的個人資料 點選這裡給 N122562663 傳送一條短訊 查找更多關於 N122562663 的文章 增加 N122562663 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

回覆: 值是不相同

引用:
最初由 N122562663 發表
總版主您好:今天放進盤中即時運轉、值是不相同、煩您費心、再支援、謝謝您。


Sorry 我疏忽運算次序了
修正如下:

UD:=SGN(c-ref(c,1));
UD:=if(barpos=1,-1,UD);
UD:=ref(UD,barslast(UD<>0));
買方量:SUM((UD=1)*V,0) Linethick0;
賣方量:SUM((UD=-1)*V,0) Linethick0;
量:VOL Linethick0;
STICKLINE(UD=1,0,V,7,0),COLORRED;
STICKLINE(UD=-1,0,V,7,0),COLORGREEN;

向版主報告此篇 | 查IP位址
Old Post 2014-04-18 16:43
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
N122562663
資深會員

註冊日期: Jan 2010
來  自:
文章數量: 270

值已完全相同

總版主您好:今天即時測試、值已完全相同、謝謝您支援。

向版主報告此篇 | 查IP位址
Old Post 2014-04-21 12:16
N122562663 現在離線 點選這裡查看 N122562663 的個人資料 點選這裡給 N122562663 傳送一條短訊 查找更多關於 N122562663 的文章 增加 N122562663 至你的好友列表 編輯/刪除訊息 引用回覆
cgjj
總版主

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

回覆: 值已完全相同

引用:
最初由 N122562663 發表
總版主您好:今天即時測試、值已完全相同、謝謝您支援。


不客氣 ^_^

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

論壇跳轉:
主題評分:

論壇規定:
你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章
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.  聯絡我們