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

註冊日期: Nov 2011
來　　自:
文章數量: 64
[求救]如何寫程式?

請教總版主:

再問另一個問題,如何寫程式?

"RSI金叉50" ...... "RSI死叉50" ..... "RSI金叉50" ..... "RSI死叉50"
"收盤價C1" ....... "收盤價C2" ....... "收盤價C3" ....... "收盤價C4"

如果"收盤價C2"> "收盤價C4" ,則將"收盤價C2"和"收盤價C4"之間的所有K線做記號(不含收盤價C2的K線和收盤價C4的K線)

謝謝

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

註冊日期: Oct 2003
來　　自:
文章數量: 18167
回覆: [求救]如何寫程式?

引用:
最初由 HXS6988 發表
請教總版主:

再問另一個問題,如何寫程式?

"RSI金叉50" ...... "RSI死叉50" ..... "RSI金叉50" ..... "RSI死叉50"
"收盤價C1" ....... "收盤價C2" ....... "收盤價C3" ....... "收盤價C4"

如果"收盤價C2"> "收盤價C4" ,則將"收盤價C2"和"收盤價C4"之間的所有K線做記號(不含收盤價C2的K線和收盤價C4的K線)

謝謝


用近期兩波的來做計算嗎? 若最末的波僅走一半呢?

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

註冊日期: Nov 2011
來　　自:
文章數量: 64

用近期兩波的來做計算嗎? =>是的.
若最末的波僅走一半呢? =>先不管.

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

註冊日期: Nov 2011
來　　自:
文章數量: 64
回覆:回覆: [求救]如何寫程式?

版主大人:

用近期兩波的來做計算嗎? =>是的.
若最末的波僅走一半呢? =>請先忽略

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

註冊日期: Oct 2003
來　　自:
文章數量: 18167
回覆: 回覆:回覆: [求救]如何寫程式?

引用:
最初由 HXS6988 發表
版主大人:

用近期兩波的來做計算嗎? =>是的.
若最末的波僅走一半呢? =>請先忽略


N:=12; //請自行修改參數
LC:= REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
DCK:=cross(50,RSI);
DSS:=SUM(DCK,0);
SP2:=SUMBARS(DCK,2)-1;
CK:=ref(C,SP2)>ref(C,barslast(DCK));
SEL:=(DSS=DSS[datacount]-1)*CK[datacount];
SEL:=SEL and DCK=0;
DRAWICON(SEL,L,12) pxdn5;

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

註冊日期: Nov 2011
來　　自:
文章數量: 64
回覆:回覆: 回覆:回覆: [求救]如何寫程式?

版主大人:
先謝謝你的程式.

如果條件改成:
如果"收盤價C2"> "收盤價C4" ,則只在"收盤價C2"的K線處做記號.

要如何從你的程式修改 ?

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

註冊日期: Oct 2003
來　　自:
文章數量: 18167
回覆: 回覆:回覆: 回覆:回覆: [求救]如何寫程式?

引用:
最初由 HXS6988 發表
版主大人:
先謝謝你的程式.

如果條件改成:
如果"收盤價C2"> "收盤價C4" ,則只在"收盤價C2"的K線處做記號.

要如何從你的程式修改 ?


N:=12; //請自行修改參數
LC:= REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
DCK:=cross(50,RSI);
DSS:=SUM(DCK,0);
SP2:=SUMBARS(DCK,2)-1;
CK:=ref(C,SP2)>ref(C,barslast(DCK));
SEL:(DSS=DSS[datacount]-1)*CK[datacount]*DCK;
DRAWICON(SEL,L,12) pxdn5;

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

註冊日期: Nov 2011
來　　自:
文章數量: 64
回覆:回覆: 回覆:回覆: 回覆:回覆: [求救]如何寫程式?

版主大人:

對不起,我先前誤會了.

用近期兩波的來做計算嗎? =>否. 從第一根K線開始, 只要是相臨的兩波("RSI死叉50" ..... "RSI金叉50" ..... "RSI死叉50")都計算,如果"收盤價C2"> "收盤價C4" ,則只在"收盤價C2"的K線處做記號.

如果是這樣的條件,要如何修改程式 ?

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

註冊日期: Oct 2003
來　　自:
文章數量: 18167
回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: [求救]如何寫程式?

引用:
最初由 HXS6988 發表
版主大人:

對不起,我先前誤會了.

用近期兩波的來做計算嗎? =>否. 從第一根K線開始, 只要是相臨的兩波("RSI死叉50" ..... "RSI金叉50" ..... "RSI死叉50")都計算,如果"收盤價C2"> "收盤價C4" ,則只在"收盤價C2"的K線處做記號.

如果是這樣的條件,要如何修改程式 ?


若是這樣計算起點不同, 結果就不同唷
例如:
用近期的1000 根 和 近期的1200 根算
結果可能就會不一樣

而且
現在的兩波會與下一個兩波, 其中有一波是重疊的
A,B,C,D,E
A, B 組成兩波, BC 組成兩波, CD 組成兩波, ....

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

註冊日期: Nov 2011
來　　自:
文章數量: 64
回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: [求救]如何寫程式?

版主大人:

A,B,C,D,E,F,G,H
A, ,C, ,E, ,G, 代表"RSI金叉50"的點,
,B, ,D, ,F, ,H 代表"RSI死叉50"的點,

B跟後面的D比較收盤大小,若B大在B做記號,
D跟後面的F比較收盤大小,若D大在D做記號,
F跟後面的H比較收盤大小,若F大在F做記號,
這樣可以嗎?

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

註冊日期: Oct 2003
來　　自:
文章數量: 18167
回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: [求救]如何寫程式?

引用:
最初由 HXS6988 發表
版主大人:

A,B,C,D,E,F,G,H
A, ,C, ,E, ,G, 代表"RSI金叉50"的點,
,B, ,D, ,F, ,H 代表"RSI死叉50"的點,

B跟後面的D比較收盤大小,若B大在B做記號,
D跟後面的F比較收盤大小,若D大在D做記號,
F跟後面的H比較收盤大小,若F大在F做記號,
這樣可以嗎?


N:=12;//請自行修改參數
LC:= REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
DCK:=cross(50,RSI);
SP2:=SUMBARS(DCK,2)-1;
CK:=DCK and ref(C,SP2)>C;
SEL:=SETVAL(CK,0,-SP2,1);
SEL:=SETVAL(CK,SEL,-SP2+1,0);
DRAWICON(SEL,L,12) pxdn5;

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

註冊日期: Nov 2011
來　　自:
文章數量: 64
回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: [求救]如何寫程式?

版主大人:

先再次謝謝你的程式.It is OK.

再請教一個新問題:如果條件變成以下,要如何修改程式? (我嘗試自己修改,但是太難了)

A,B,C,D,E,F,G,H,I,J,K
A, ,C, ,E, ,G, ,I, , K 代表"RSI金叉50"的點,
,B, ,D, ,F, ,H, J 代表"RSI死叉50"的點,

B跟後面的F比較收盤大小,若B大在B做記號,
D跟後面的H比較收盤大小,若D大在D做記號,
F跟後面的J比較收盤大小,若F大在F做記號,
......以此類推.

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

註冊日期: Oct 2003
來　　自:
文章數量: 18167
回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: [求救]如何寫程式?

引用:
最初由 HXS6988 發表
版主大人:

先再次謝謝你的程式.It is OK.

再請教一個新問題:如果條件變成以下,要如何修改程式? (我嘗試自己修改,但是太難了)

A,B,C,D,E,F,G,H,I,J,K
A, ,C, ,E, ,G, ,I, , K 代表"RSI金叉50"的點,
,B, ,D, ,F, ,H, J 代表"RSI死叉50"的點,

B跟後面的F比較收盤大小,若B大在B做記號,
D跟後面的H比較收盤大小,若D大在D做記號,
F跟後面的J比較收盤大小,若F大在F做記號,
......以此類推.


將
SP2:=SUMBARS(DCK,2)-1;
改為
SP2:=SUMBARS(DCK,3)-1;

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

註冊日期: Nov 2011
來　　自:
文章數量: 64
回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: [求救]如何寫程式?

版主大人:

光這樣改一行,好像不夠.請版主大人再費心.

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

註冊日期: Oct 2003
來　　自:
文章數量: 18167
回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: 回覆:回覆: [求救]如何寫程式?

引用:
最初由 HXS6988 發表
版主大人:

光這樣改一行,好像不夠.請版主大人再費心.


嗯, 有跨區設值(跨同條件), 必須在一個步驟完成, 否則會有 "疊" 問題
換成這樣的寫法, 應該就沒問題了

N:=12;//請自行修改參數
LC:= REF(CLOSE,1);
RSI:=SMA(MAX(CLOSE-LC,0),N,1)/SMA(ABS(CLOSE-LC),N,1)*100;
DCK:=cross(50,RSI);
SP2:=SUMBARS(DCK,3)-1;
CK:=DCK and ref(C,SP2)>C;
SEL:=SETVAL(CK,0,-SP2,barpos-SP2);
DRAWICON(SEL=barpos,L,12) pxdn5;

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

論壇跳轉:
主題評分:

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