奇狐社區論壇 - 如何作出指標數據的排名次?

奇狐社區論壇 : Powered by vBulletin version 2.3.0

奇狐社區論壇 > 指標公式 > 問題交流 > 如何作出指標數據的排名次?

上一主題下一主題

作者

主題

tycoon868
資深會員

註冊日期: Oct 2008
來　　自:
文章數量: 313

如何作出指標數據的排名次?

原碼開始

M1:=MA(C,20),linethick0,colorff6633,precision2;
M2:=MA(C,40),linethick0,colorff00ff,precision2;
M3:=MA(C,80),linethick0,colorblue,precision2;
M4:=MA(C,160),linethick0,colorff0066,precision2;
M5:=MA(C,320),linethick0,colorred,precision2;
M6:=MA(C,640),linethick0,color0066ff,precision2;

Partline(1,M1),colorgreen,LINETHICK1; //註:每一條均線需要對應到左列的顏色，粗細度一共分為六級，由名次決定粗細度//
Partline(1,M2),colorff00ff,LINETHICK2;
Partline(1,M3),colorblue,LINETHICK10;
Partline(1,M4),colorff0066,LINETHICK8;
Partline(1,M5),colorred,LINETHICK5;
Partline(1,M6),color0066ff,LINETHICK3;

M1P:M1-ref(M1,1),linethick0,colorgreen,precision3;
M2P:M2-ref(M2,1),linethick0,colorff00ff,precision3;
M3P:M3-ref(M3,1),linethick0,colorblue,precision3;
M4P:M4-ref(M4,1),linethick0,colorff0066,precision3;
M5P:M5-ref(M5,1),linethick0,colorred,precision3;
M6P:M6-ref(M6,1),linethick0,color0066ff,precision3;

原碼結束

想請總版主支援以下: 請您直接給我原碼，感謝!

1. 根據 M1P~M6P 六個數據的絕對值，排出第一~第六名，並且根據這六個名次畫出六條均線，六條均線請依照上方註解所使用的顏色，粗細度則根據名次來決定(一共有六種粗細度 10、8、5、3、2、1)，例如: 第一名採用10號粗細度，第四名則採用3號。

2. 畫線的名次規則一律以不啟用游標的畫面最右方那一筆數據(註:啟用游標不改變畫面上的均線排名與粗細度)

3. 將名次輸出國字一~六到畫面最右方往前推算30筆的均線下方(註:不啟用游標的的名次標示位置)

4. 承3. 允許啟用游標後，動態輸出該游標所在的六個MP名次(採用絕對值排序)，名次的輸出位置放在該游標所在的六條均線下方

向版主報告此篇 |

2023-08-25 11:01

cgjj
總版主

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

回覆: 如何作出指標數據的排名次?

引用:
最初由 tycoon868 發表
原碼開始

M1:=MA(C,20),linethick0,colorff6633,precision2;
M2:=MA(C,40),linethick0,colorff00ff,precision2;
M3:=MA(C,80),linethick0,colorblue,precision2;
M4:=MA(C,160),linethick0,colorff0066,precision2;
M5:=MA(C,320),linethick0,colorred,precision2;
M6:=MA(C,640),linethick0,color0066ff,precision2;

Partline(1,M1),colorgreen,LINETHICK1; //註:每一條均線需要對應到左列的顏色，粗細度一共分為六級，由名次決定粗細度//
Partline(1,M2),colorff00ff,LINETHICK2;
Partline(1,M3),colorblue,LINETHICK10;
Partline(1,M4),colorff0066,LINETHICK8;
Partline(1,M5),colorred,LINETHICK5;
Partline(1,M6),color0066ff,LINETHICK3;

M1P:M1-ref(M1,1),linethick0,colorgreen,precision3;
M2P:M2-ref(M2,1),linethick0,colorff00ff,precision3;
M3P:M3-ref(M3,1),linethick0,colorblue,precision3;
M4P:M4-ref(M4,1),linethick0,colorff0066,precision3;
M5P:M5-ref(M5,1),linethick0,colorred,precision3;
M6P:M6-ref(M6,1),linethick0,color0066ff,precision3;

原碼結束

想請總版主支援以下: 請您直接給我原碼，感謝!

1. 根據 M1P~M6P 六個數據的絕對值，排出第一~第六名，並且根據這六個名次畫出六條均線，六條均線請依照上方註解所使用的顏色，粗細度則根據名次來決定(一共有六種粗細度 10、8、5、3、2、1)，例如: 第一名採用10號粗細度，第四名則採用3號。

2. 畫線的名次規則一律以不啟用游標的畫面最右方那一筆數據(註:啟用游標不改變畫面上的均線排名與粗細度)

3. 將名次輸出國字一~六到畫面最右方往前推算30筆的均線下方(註:不啟用游標的的名次標示位置)

4. 承3. 允許啟用游標後，動態輸出該游標所在的六個MP名次(採用絕對值排序)，名次的輸出位置放在該游標所在的六條均線下方

Re1:
未必可行，先釐清一下
六條均線您是畫 M1P~M6P ? 還是畫 M1~M6 ?

Re2:
最右方那一筆數據?? 語意不明
您要歷史最末根? 還是畫面最末根?
兩者是不一定是相同的!
因為畫面最末根未必是歷史最末根

Re3:
畫面最右方往前推算30筆?
不建議如此做，因為畫面不一定都有30根以上的K棒
建議直接標示在最末的右方

向版主報告此篇 |

2023-08-25 11:51

tycoon868
資深會員

註冊日期: Oct 2008
來　　自:
文章數量: 313

ANS1:
六條均線是畫 M1~M6

ANS2:
我要的是畫面最末根(手動拖曳畫面時的最右方那筆數據)，不必然是歷史最後一根

ANS3:
1. 不啟用游標時，請直接標示在最末的右方
2. 啟用游標時，則標示在游標那一根
3. 國字一~六請比照該MA的顏色(重疊太相近的時候方便比對)

感謝

向版主報告此篇 |

2023-08-25 12:45

cgjj
總版主

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

引用:
最初由 tycoon868 發表
ANS1:
六條均線是畫 M1~M6

ANS2:
我要的是畫面最末根(手動拖曳畫面時的最右方那筆數據)，不必然是歷史最後一根

ANS3:
1. 不啟用游標時，請直接標示在最末的右方
2. 啟用游標時，則標示在游標那一根
3. 國字一~六請比照該MA的顏色(重疊太相近的時候方便比對)

感謝

如果您是要輸出成
M1:xxx M2:xxx M3:xxx ...(略)
然後依據M1P~M6P排名，去改變 M1~M6 均線的顏色和粗細
這是不可行的!!!
因為變數直接繪出的線，是無法中途變換顏色或粗細的(其為固定)

若您是要輸出成
S1:xxx S2:xxx S3:xxx ...(略)
S1 為畫面最末根排名第1名之相對應的 Mn，採第1名之顏色和粗細繪製
S2 為畫面最末根排名第2名之相對應的 Mn，採第2名之顏色和粗細繪製
這是可行的!
因為S1~S6 粗細和顏色是固定的，例如:
畫面最末根排名第1的是 M3P，那麼 S1 這條線會相等於M3那條均線，採第1名之顏色和粗細繪製
畫面最末根排名第2的是 M1P，那麼 S2 這條線會相等於M1那條均線，採第2名之顏色和粗細繪製
畫面最末根排名第3的是 M2P，那麼 S3 這條線會相等於M2那條均線，採第3名之顏色和粗細繪製
...(略)

此外
用到 LINETHICK10 這麼粗的線
K棒可能被遮蔽不少部分，且可能會線疊線，難以觀看
您可要先想清楚呀~~

向版主報告此篇 |

2023-08-25 13:37

tycoon868
資深會員

註冊日期: Oct 2008
來　　自:
文章數量: 313

請忽略以上，我重新規劃以下需求

原碼開始

M1:=MA(C,20),linethick0,colorff6633,precision2;
M2:=MA(C,40),linethick0,colorff00ff,precision2;
M3:=MA(C,80),linethick0,colorblue,precision2;
M4:=MA(C,160),linethick0,colorff0066,precision2;
M5:=MA(C,320),linethick0,colorred,precision2;
M6:=MA(C,640),linethick0,color0066ff,precision2;

Partline(1,M1),colorgreen,LINETHICK3;
Partline(1,M2),colorff00ff,LINETHICK3;
Partline(1,M3),colorblue,LINETHICK3;
Partline(1,M4),colorff0066,LINETHICK3;
Partline(1,M5),colorred,LINETHICK3;
Partline(1,M6),color0066ff,LINETHICK3;

M1P:M1-ref(M1,1),linethick0,precision3;
M2P:M2-ref(M2,1),linethick0,precision3;
M3P:M3-ref(M3,1),linethick0,precision3;
M4P:M4-ref(M4,1),linethick0,precision3;
M5P:M5-ref(M5,1),linethick0,precision3;
M6P:M6-ref(M6,1),linethick0,precision3;

原碼結束

想請總版主支援以下: 請您直接給我原碼，感謝!

1. 根據 M1P~M6P 六個數據的絕對值，由大到小排出第一~第六名

2. 不啟用游標時，排名的依據為畫面上最末根數值(允取手動拖曳畫面時的最右方那筆數據)，請將名次輸出到最末根的均線右方處

3. 啟用游標時則排名的依據為該游標處，名次輸出在各自均線的下方處

4. 承第2、3點國字一~六請比照該MA的顏色(重疊太相近的時候方便比對)

5. 以上的六條均線粗細、顏色都採用原碼方式，無須作改變，只需輸出名次

向版主報告此篇 |

2023-08-25 14:47

cgjj
總版主

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

引用:
最初由 tycoon868 發表
請忽略以上，我重新規劃以下需求

原碼開始

M1:=MA(C,20),linethick0,colorff6633,precision2;
M2:=MA(C,40),linethick0,colorff00ff,precision2;
M3:=MA(C,80),linethick0,colorblue,precision2;
M4:=MA(C,160),linethick0,colorff0066,precision2;
M5:=MA(C,320),linethick0,colorred,precision2;
M6:=MA(C,640),linethick0,color0066ff,precision2;

Partline(1,M1),colorgreen,LINETHICK3;
Partline(1,M2),colorff00ff,LINETHICK3;
Partline(1,M3),colorblue,LINETHICK3;
Partline(1,M4),colorff0066,LINETHICK3;
Partline(1,M5),colorred,LINETHICK3;
Partline(1,M6),color0066ff,LINETHICK3;

M1P:M1-ref(M1,1),linethick0,precision3;
M2P:M2-ref(M2,1),linethick0,precision3;
M3P:M3-ref(M3,1),linethick0,precision3;
M4P:M4-ref(M4,1),linethick0,precision3;
M5P:M5-ref(M5,1),linethick0,precision3;
M6P:M6-ref(M6,1),linethick0,precision3;

原碼結束

想請總版主支援以下: 請您直接給我原碼，感謝!

1. 根據 M1P~M6P 六個數據的絕對值，由大到小排出第一~第六名

2. 不啟用游標時，排名的依據為畫面上最末根數值(允取手動拖曳畫面時的最右方那筆數據)，請將名次輸出到最末根的均線右方處

3. 啟用游標時則排名的依據為該游標處，名次輸出在各自均線的下方處

4. 承第2、3點國字一~六請比照該MA的顏色(重疊太相近的時候方便比對)

5. 以上的六條均線粗細、顏色都採用原碼方式，無須作改變，只需輸出名次

原碼:M1:=MA(C,20),linethick0,colorff6633,precision2;
M2:=MA(C,40),linethick0,colorff00ff,precision2;
M3:=MA(C,80),linethick0,colorblue,precision2;
M4:=MA(C,160),linethick0,colorff0066,precision2;
M5:=MA(C,320),linethick0,colorred,precision2;
M6:=MA(C,640),linethick0,color0066ff,precision2;

Partline(1,M1),colorgreen,LINETHICK3;
Partline(1,M2),colorff00ff,LINETHICK3;
Partline(1,M3),colorblue,LINETHICK3;
Partline(1,M4),colorff0066,LINETHICK3;
Partline(1,M5),colorred,LINETHICK3;
Partline(1,M6),color0066ff,LINETHICK3;

M1P:M1-ref(M1,1),linethick0,precision3;
M2P:M2-ref(M2,1),linethick0,precision3;
M3P:M3-ref(M3,1),linethick0,precision3;
M4P:M4-ref(M4,1),linethick0,precision3;
M5P:M5-ref(M5,1),linethick0,precision3;
M6P:M6-ref(M6,1),linethick0,precision3;

PP:=SYSPARAM(1);
if PP<lbound(M6P) or lbound(M6P)=0 then exit;
VARIABLE:SS[6]=0; slist:='一二三四五六';
SS[1]:=ABS(M1P[PP]); SS[2]:=ABS(M2P[PP]);
SS[3]:=ABS(M3P[PP]); SS[4]:=ABS(M4P[PP]);
SS[5]:=ABS(M5P[PP]); SS[6]:=ABS(M6P[PP]);
X:=SORTPOS(SS,1,1,6);
EXPLAIN(1,strmid(slist,SS[3]*2-1,2));
CK:=(barpos=PP)*((PP=SYSPARAM(3))+1);
DRAWTEXT(CK=1,M1,strmid(slist,SS[1]*2-1,2)) colorgreen pxdn8;
DRAWTEXT(CK=2,M1,strmid(slist,SS[1]*2-1,2)) colorgreen shift1;
DRAWTEXT(CK=1,M2,strmid(slist,SS[2]*2-1,2)) colorff00ff pxdn8;
DRAWTEXT(CK=2,M2,strmid(slist,SS[2]*2-1,2)) colorff00ff shift1;
DRAWTEXT(CK=1,M3,strmid(slist,SS[3]*2-1,2)) colorblue pxdn8;
DRAWTEXT(CK=2,M3,strmid(slist,SS[3]*2-1,2)) colorblue shift1;
DRAWTEXT(CK=1,M4,strmid(slist,SS[4]*2-1,2)) colorff0066 pxdn8;
DRAWTEXT(CK=2,M4,strmid(slist,SS[4]*2-1,2)) colorff0066 shift1;
DRAWTEXT(CK=1,M5,strmid(slist,SS[5]*2-1,2)) colorred pxdn8;
DRAWTEXT(CK=2,M5,strmid(slist,SS[5]*2-1,2)) colorred shift1;
DRAWTEXT(CK=1,M6,strmid(slist,SS[6]*2-1,2)) color0066ff pxdn8;
DRAWTEXT(CK=2,M6,strmid(slist,SS[6]*2-1,2)) color0066ff shift1;

向版主報告此篇 |

2023-08-25 15:46

全部時間均為台灣時間, 現在時間為03:56

上一主題下一主題

顯示可列印版本 |

訂閱此主題

論壇跳轉:

主題評分:

論壇規定:

你不可以發表新主題
你不可以回覆文章
你不可以上傳附件
你不可以編輯自己的文章

HTML語法禁止
vB 語法核准
表情符號核准
貼圖語法[IMG]核准

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