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

註冊日期: Nov 2007
來  自:
文章數量: 1501

[問題]如何取?

請教總版主:有上2,上1,中,下1,下2 共五條水平線
壓力=要取收盤價上方最小值的那條線
支撐=要取收盤價下方最大值的那條線
請問要如取?謝謝!

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

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

回覆: [問題]如何取?

引用:
最初由 Markchu7 發表
請教總版主:有上2,上1,中,下1,下2 共五條水平線
壓力=要取收盤價上方最小值的那條線
支撐=要取收盤價下方最大值的那條線
請問要如取?謝謝!



您那五條有無可能?
收盤價上方沒有線 或 收盤價下方沒有線呢?

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

註冊日期: Nov 2007
來  自:
文章數量: 1501

其實是七條線啦!不敢太麻煩就說是五條線源碼如下:
當然也有可能行情激烈超出線的範圍,我會去算出漲跌幅度,把線加到應有的數目,感謝總版主的細心提醒!
VARA:=IF((C>150),91.3,0.913),LINETHICK,COLORYELLOW;
下R:=INTPART(CLOSE/VARA)*VARA,LINETHICK,COLORGREEN,PRECISION0;
上R:=(下R+VARA),LINETHICK,COLORYELLOW,PRECISION0;
平R:=((下R+上R)/2),LINETHICK,COLORWHITE,PRECISION0;
平R:=REF(平R,BARSLAST(CK)),LINETHICK,COLORYELLOW,PRECISION0;
上3:=平R+VARA*3/2,LINETHICK,COLORYELLOW,PRECISION0;
上2:=平R+VARA,LINETHICK,COLORYELLOW,PRECISION0;
上1:=平R+VARA/2,LINETHICK,COLORYELLOW,PRECISION0;
平:=平R,LINETHICK,COLORYELLOW,PRECISION0;
下1:=平R-VARA/2,LINETHICK,COLORYELLOW,PRECISION0;
下2:=平R-VARA,LINETHICK,COLORYELLOW,PRECISION0;
下3:=平R-VARA*3/2,LINETHICK,COLORYELLOW,PRECISION0;

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

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

以五條為例:

支撐:=-1;
支撐:=if(C>下2,下2,支撐);
支撐:=if(C>下1,下1,支撐);
支撐:=if(C>中,中,支撐);
支撐:=if(C>上1,上1,支撐);
支撐:=if(C>上2,上2,支撐);

壓力:=-1;
壓力:=if(C<上2,上2,壓力);
壓力:=if(C<上1,上1,壓力);
壓力:=if(C<中,中,壓力);
壓力:=if(C<下1,下1,壓力);
壓力:=if(C<下2,下2,壓力);

//若值為 -1, 代表沒有線符合可取

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

註冊日期: Nov 2007
來  自:
文章數量: 1501

感謝總版主解答!
那如果是會變動的均線要如何寫呢?感謝總版主!

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

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

引用:
最初由 Markchu7 發表
感謝總版主解答!
那如果是會變動的均線要如何寫呢?感謝總版主!



原碼:
N1:MA(C,3); N2:MA(C,6); N3:MA(C,9); N4:MA(C,12); N5:MA(C,15); N6:MA(C,18); MaxLB1:=max(lbound(N3),max(lbound(N1),lbound(N2))); MaxLB2:=max(lbound(N6),max(lbound(N4),lbound(N5))); MaxLB:=max(MaxLB1,MaxLB2); BAry:=C*0; CC:=C; MaxNo:=6; //均線總數 if datacount<MaxNo then exit; //K棒數不足均線總數 支撐:BAry linethick; 壓力:BAry linethick; for i = MaxLB to datacount do begin BAry[1]:=N1[i]; BAry[4]:=N4[i]; BAry[2]:=N2[i]; BAry[5]:=N5[i]; BAry[3]:=N3[i]; BAry[6]:=N6[i]; x:=SORT(BAry,1,1,MaxNo); 支撐[i]:=-1; 壓力[i]:=-1; for j = 1 to MaxNo do begin k:=MaxNo-j+1; if CC[i]>BAry[k] then 支撐[i]:=BAry[k]; if CC[i]<BAry[j] then 壓力[i]:=BAry[j]; end; end;

//關鍵字:排序範例

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

註冊日期: Nov 2007
來  自:
文章數量: 1501

感謝總版主!謝謝啦!

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

註冊日期: Sep 2010
來  自: 桃園
文章數量: 81

相關問題請教

在本問題中如代入
N1:PEAK(1,0.12,1)LINETHICK2,Coloryellow;
N2:=PEAK(1,0.12,2);N3:=PEAK(1,0.12,3);N4:=PEAK(1,0.12,4);N5:=PEAK(1,0.12,5);N6:=PEAK(1,0.12,6); ~N12;
如何只取大於C且大於最近轉折頸線之高點(如N1,N2,N3)

sunnyjboy1960 附帶上了此圖片:

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

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

回覆: 相關問題請教

引用:
最初由 sunnyjboy1960 發表
在本問題中如代入
N1:PEAK(1,0.12,1)LINETHICK2,Coloryellow;
N2:=PEAK(1,0.12,2);N3:=PEAK(1,0.12,3);N4:=PEAK(1,0.12,4);N5:=PEAK(1,0.12,5);N6:=PEAK(1,0.12,6); ~N12;
如何只取大於C且大於最近轉折頸線之高點(如N1,N2,N3)



轉折頸線 是指那一條線呢?

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

註冊日期: Sep 2010
來  自: 桃園
文章數量: 81

問題續

本圖中粗藍線為使用排序後取得之最近壓力,黃圈為近期頸線高點,但是只要是過前高之後,之前的壓力線都失去作用,只有近期高點或是更遠的更高點才是有效壓力,試過使用更多的轉折1~12點,但是沒有想出更好更快的程式寫法,請總版主指點一下。

sunnyjboy1960 附帶上了此圖片:

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

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

回覆: 問題續

引用:
最初由 sunnyjboy1960 發表
本圖中粗藍線為使用排序後取得之最近壓力,黃圈為近期頸線高點,但是只要是過前高之後,之前的壓力線都失去作用,只有近期高點或是更遠的更高點才是有效壓力,試過使用更多的轉折1~12點,但是沒有想出更好更快的程式寫法,請總版主指點一下。


很抱歉
您所給的資訊不足, 此問題有看沒有懂
麻煩請重新描述問題, 謝謝

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

註冊日期: Sep 2010
來  自: 桃園
文章數量: 81

問題續2

N1:=PEAK(1,0.12,1);
N2:=PEAK(1,0.12,2);
N3:=PEAK(1,0.12,3);
N4:=PEAK(1,0.12,4);
N5:=PEAK(1,0.12,5);
N6:=PEAK(1,0.12,6);
1.如何取大於本根K棒收盤,且大於N1~N6之K棒高點,及距本K棒之距離數
2. 從1.之結果K棒位置,向前取得7根k棒內之最高價及距本K棒之距離數

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

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

回覆: 問題續2

引用:
最初由 sunnyjboy1960 發表
N1:=PEAK(1,0.12,1);
N2:=PEAK(1,0.12,2);
N3:=PEAK(1,0.12,3);
N4:=PEAK(1,0.12,4);
N5:=PEAK(1,0.12,5);
N6:=PEAK(1,0.12,6);
1.如何取大於本根K棒收盤,且大於N1~N6之K棒高點,及距本K棒之距離數
2. 從1.之結果K棒位置,向前取得7根k棒內之最高價及距本K棒之距離數



仍然不是個完整的問題

判斷大於, 要有兩者才能去比, 例如: A 大於 B
A 和 B 就是兩者

誰大於本根K棒收盤??
誰大於大於N1~N6之K棒高點??
您並未說明唷

向版主報告此篇 | 查IP位址
Old Post 2011-06-07 13:01
cgjj 現在離線 點選這裡查看 cgjj 的個人資料 點選這裡給 cgjj 傳送一條短訊 查找更多關於 cgjj 的文章 增加 cgjj 至你的好友列表 編輯/刪除訊息 引用回覆
全部時間均為台灣時間, 現在時間為22: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.  聯絡我們