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

註冊日期: Nov 2008
來  自:
文章數量: 30

指標寫法

KK:=CLOSE - REF( CLOSE , 10 ) ;
XX:=ABS( CLOSE - REF( CLOSE , 1 ) ) ;
VV:=SUM( XX , 10 ) ;
ER:=ABS( KK / VV ) ;
SS:=ER * 0.618 ;
PP:=SS * SS , Linethick0;
YY:REF( CLOSE , 1 ) ;
AA:IF( SUM( 1 ,0 ) , YY , 0 ) ;
BB:BARSLAST( ABS(AA)>0 ) ;
DD:REF( CLOSE , BB ) ;
CC:=CLOSE , Linethick0 ;
<%
VD= FFL.VarData("DD")
VC= FFL.VarData("CC")
VP= FFL.VarData("PP")
LT = UBound( VC )
for J= NN+1 TO LT
VD( J )=VD( J - 1 ) + VP( J ) * ( VC( J ) - VD( J - 1 ) )
next
FFL.VarData("DD")=VD
%>

PARTLINE(CLOSE> 0,DD) , COLOR0000ff, Linethick3;

上面公式含有VBS語法,是否請版主或其他指標高手幫小弟改成不含
VBS語法之公式

謝謝.........

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

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

回覆: 指標寫法

引用:
最初由 well0892 發表
KK:=CLOSE - REF( CLOSE , 10 ) ;
XX:=ABS( CLOSE - REF( CLOSE , 1 ) ) ;
VV:=SUM( XX , 10 ) ;
ER:=ABS( KK / VV ) ;
SS:=ER * 0.618 ;
PP:=SS * SS , Linethick0;
YY:REF( CLOSE , 1 ) ;
AA:IF( SUM( 1 ,0 ) , YY , 0 ) ;
BB:BARSLAST( ABS(AA)>0 ) ;
DD:REF( CLOSE , BB ) ;
CC:=CLOSE , Linethick0 ;
<%
VD= FFL.VarData("DD")
VC= FFL.VarData("CC")
VP= FFL.VarData("PP")
LT = UBound( VC )
for J= NN+1 TO LT
VD( J )=VD( J - 1 ) + VP( J ) * ( VC( J ) - VD( J - 1 ) )
next
FFL.VarData("DD")=VD
%>

PARTLINE(CLOSE> 0,DD) , COLOR0000ff, Linethick3;

上面公式含有VBS語法,是否請版主或其他指標高手幫小弟改成不含
VBS語法之公式

謝謝.........



此段公式並不完整唷
NN 是沒被定義的變數

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

註冊日期: Nov 2008
來  自:
文章數量: 30

總版主大大您好:


小弟在發文之前已注意到 NN 沒被定義的問題,因為整個程式可以正常運作,所以沒有再去注意,但是小弟曾經試過只要是大於1的整數或是

任何沒被定義及已被定義之文字後面加上大於1的整數,都是可以正常運作,而且結果完全一樣,因此感到疑惑,

若是將 NN+1改成 PP+1 請問這樣可以改成不含 VBS 語法之公式嗎 ?

麻煩總版主 謝謝....

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

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

引用:
最初由 well0892 發表
總版主大大您好:


小弟在發文之前已注意到 NN 沒被定義的問題,因為整個程式可以正常運作,所以沒有再去注意,但是小弟曾經試過只要是大於1的整數或是

任何沒被定義及已被定義之文字後面加上大於1的整數,都是可以正常運作,而且結果完全一樣,因此感到疑惑,

若是將 NN+1改成 PP+1 請問這樣可以改成不含 VBS 語法之公式嗎 ?

麻煩總版主 謝謝....



這指標若用於股價無負數的商品
單就這五行來看

YY:REF( CLOSE , 1 ) ;
AA:IF( SUM( 1 ,0 ) , YY , 0 ) ;
BB:BARSLAST( ABS(AA)>0 ) ;
DD:REF( CLOSE , BB ) ;
CC:=CLOSE

CC 和 DD 其值是完全相同的
差別僅在於
DD 自第二根K棒開始有效
CC 自第一根K棒開始有效

程序處理上沒必要這麼費事

---------------------------------------------------------

那段 vbs 程式相等於
for j=NN+1 to datacount do begin
DD[j]:=DD[j-1]+PP[j]*(CC[j]-DD[j-1]);
end;

NN 會影響起點, 也會影響後面的計算數值

這整段程式像是拼湊而成的
建議您先弄清楚它算什麼吧
不要錯的渾然不知

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

註冊日期: Nov 2008
來  自:
文章數量: 30

總版主大大您好:
經由您的指點小弟已經了解這個程式的運算方式,非常感謝,但是仍有問題尚未克服,所以再度向您請教

假設 A為商品第一個交易日之數值,其值為大於0之任意數
N為ABS(CLOSE-OPEN)*0.01

如果第一個交易日A取一任意數 A=5000 則運算式為 5000+N*(CLOSE-5000) 如果等於5005
第二個交易日則引用5005 則運算式為 5005+N*(CLOSE-5005) 如果等於5008
第三個交易日則引用5008 則運算式為 5008+N*(CLOSE-5008) 如果等於5007
第四個交易日則引用5007 則運算式為 5007+N*(CLOSE-5007)
以下類推.....

請問總版主這樣的狀況應該如何寫?

是否一定要用數列的方式寫?

不用數列的方式可以嗎?如果可以請總版主用這個方式幫助小弟

謝謝...

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

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

引用:
最初由 well0892 發表
總版主大大您好:
經由您的指點小弟已經了解這個程式的運算方式,非常感謝,但是仍有問題尚未克服,所以再度向您請教

假設 A為商品第一個交易日之數值,其值為大於0之任意數
N為ABS(CLOSE-OPEN)*0.01

如果第一個交易日A取一任意數 A=5000 則運算式為 5000+N*(CLOSE-5000) 如果等於5005
第二個交易日則引用5005 則運算式為 5005+N*(CLOSE-5005) 如果等於5008
第三個交易日則引用5008 則運算式為 5008+N*(CLOSE-5008) 如果等於5007
第四個交易日則引用5007 則運算式為 5007+N*(CLOSE-5007)
以下類推.....

請問總版主這樣的狀況應該如何寫?

是否一定要用數列的方式寫?

不用數列的方式可以嗎?如果可以請總版主用這個方式幫助小弟

謝謝...



因為需引用前一根算計算後的值, 故需要迴圈處理
StNo:=1; StA:=5000;
AA[StNo]:=StA+N*(CC[J]-StA);
for i=StNo+1 to datacount do begin
AA[i]=AA[i-1]+N*(CC[i]-AA[i-1]);
end;

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

論壇跳轉:
主題評分:

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