奇狐社區論壇 - 如何將五個數據排出最大值

奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- 如何將五個數據排出最大值 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=23753)

由 tycoon868 在 2023-09-19 15:29 發表:

如何將五個數據排出最大值

原碼###############

M2:=MA(C,30),linethick0,colorff00ff,precision3;
M3:=MA(C,60),linethick0,colorblue,precision3;
M4:=MA(C,120),linethick0,colorff0066,precision3;
M5:=MA(C,240),linethick0,colorred,precision3;
M6:=MA(C,480),linethick0,color0066ff,precision3;

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

原碼###################

請總版主支援以下需求:

1. 根據 M2P~M6P 五個數值，取其 [絕對值} 排出每一根K棒的最大值以及第二大值

2. 分別輸出為 PMAX1、PMAX2，假設該最大值M2P為負值，則忠實呈現該 M2P的數值

感謝

由 cgjj 在 2023-09-19 15:49 發表:

回覆: 如何將五個數據排出最大值

引用:
最初由 tycoon868 發表
原碼###############

M2:=MA(C,30),linethick0,colorff00ff,precision3;
M3:=MA(C,60),linethick0,colorblue,precision3;
M4:=MA(C,120),linethick0,colorff0066,precision3;
M5:=MA(C,240),linethick0,colorred,precision3;
M6:=MA(C,480),linethick0,color0066ff,precision3;

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

原碼###################

請總版主支援以下需求:

1. 根據 M2P~M6P 五個數值，取其 [絕對值} 排出每一根K棒的最大值以及第二大值

2. 分別輸出為 PMAX1、PMAX2，假設該最大值M2P為負值，則忠實呈現該 M2P的數值

感謝

各均線起點不同，並非一直都有五個數讓你做排序

由 cgjj 在 2023-09-21 11:57 發表:

僅算五條都有的區域，範例如下:

原碼:M2:=MA(C,30),linethick0,colorff00ff,precision3;
M3:=MA(C,60),linethick0,colorblue,precision3;
M4:=MA(C,120),linethick0,colorff0066,precision3;
M5:=MA(C,240),linethick0,colorred,precision3;
M6:=MA(C,480),linethick0,color0066ff,precision3;

M2P:=(M2-ref(M2,1))*100,linethick1,precision1,colorff00ff;
M3P:=(M3-ref(M3,1))*100,linethick1,precision1,colorblue;
M4P:=(M4-ref(M4,1))*100,linethick1,precision1,colorff0066;
M5P:=(M5-ref(M5,1))*100,linethick1,precision1,colorred;
M6P:=(M6-ref(M6,1))*100,linethick1,precision1,color0066ff;

Tmp2:=ABS(M2P);
Tmp3:=ABS(M3P);
Tmp4:=ABS(M4P);
Tmp5:=ABS(M5P);
Tmp6:=ABS(M6P);
Max1:=if(Tmp3>Tmp2,Tmp3,Tmp2);
Max1:=if(Tmp4>Max1,Tmp4,Max1);
Max1:=if(Tmp5>Max1,Tmp5,Max1);
Max1:=if(Tmp6>Max1,Tmp6,Max1);
MaxP:=if(Tmp3>Tmp2,3,2);
MaxP:=if(Tmp4>Max1,4,MaxP);
MaxP:=if(Tmp5>Max1,5,MaxP);
MaxP:=if(Tmp6>Max1,6,MaxP);
PMAX1:if(MaxP=3,M3P,M2P);
PMAX1:=if(MaxP=4,M4P,PMAX1);
PMAX1:=if(MaxP=5,M5P,PMAX1);
PMAX1:=if(MaxP=6,M6P,PMAX1);

Tmp2:=if(MaxP=2,0,Tmp2);
Tmp3:=if(MaxP=3,0,Tmp3);
Tmp4:=if(MaxP=4,0,Tmp4);
Tmp5:=if(MaxP=5,0,Tmp5);
Tmp6:=if(MaxP=6,0,Tmp6);
Max2:=if(Tmp3>Tmp2,Tmp3,Tmp2);
Max2:=if(Tmp4>Max2,Tmp4,Max2);
Max2:=if(Tmp5>Max2,Tmp5,Max2);
Max2:=if(Tmp6>Max2,Tmp6,Max2);
MaxP:=if(Tmp3>Tmp2,3,2);
MaxP:=if(Tmp4>Max2,4,MaxP);
MaxP:=if(Tmp5>Max2,5,MaxP);
MaxP:=if(Tmp6>Max2,6,MaxP);
PMax2:if(MaxP=3,M3P,M2P);
PMax2:=if(MaxP=4,M4P,PMax2);
PMax2:=if(MaxP=5,M5P,PMax2);
PMax2:=if(MaxP=6,M6P,PMax2);

全部時間均為台灣時間, 現在時間為04:17

在這個頁面顯示本主題全部的 3 個文章