奇狐社區論壇

總頁數 (2): [1] 2 »
在這個頁面顯示本主題全部的 26 個文章

奇狐社區論壇 (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=13800)

由 mori868 在 2010-06-17 13:59 發表:

請教

如何求 HHV(H,20) 之階梯線每個階梯必需大於H+15 煩請賜教謝謝

由 cgjj 在 2010-06-18 02:21 發表:

回覆: 請教

引用:
最初由 mori868 發表
如何求 HHV(H,20) 之階梯線每個階梯必需大於H+15 煩請賜教謝謝

原碼:


SM:=HHV(H,20); LB:=lbound(SM); FM:=SM[LB]; 

MM:SM;

for i=lbound(SM)+1 to datacount do begin

  if abs(SM[i]-FM)>=15 then FM:=SM[i];

  MM[i]:=FM;

end;

由 mori868 在 2010-06-18 08:13 發表:

回覆: 回覆: 請教

引用:

最初由 cgjj 發表

原碼:


SM:=HHV(H,20); LB:=lbound(SM); FM:=SM[LB]; 

MM:SM;

for i=lbound(SM)+1 to datacount do begin

  if abs(SM[i]-FM)>=15 then FM:=SM[i];

  MM[i]:=FM;

end;

請畫出該階梯線

由 cgjj 在 2010-06-19 00:21 發表:

回覆: 回覆: 回覆: 請教

引用:
最初由 mori868 發表
請畫出該階梯線

前面回答的公式, 其結果就已經是梯狀線了唷
請您再 Check 一次

由 Markchu7 在 2010-06-19 10:53 發表:

請問版主如果是H+MA(H-L,20)要如何處理?(因為不會FOR...END部份)另外LLV(L,20)-MA(H-L,20)是否也可以一起處理?感謝版主!

由 mori868 在 2010-06-19 22:16 發表:

回覆: 回覆: 請教

引用:

最初由 cgjj 發表

原碼:


SM:=HHV(H,20); LB:=lbound(SM); FM:=SM[LB]; 

MM:SM;

for i=lbound(SM)+1 to datacount do begin

  if abs(SM[i]-FM)>=15 then FM:=SM[i];

  MM[i]:=FM;

end;

很好正在應用中謝謝
又請教如何在轉折處顯示記號

由 peter109 在 2010-06-20 10:21 發表:

引用:
最初由 Markchu7 發表
請問版主如果是H+MA(H-L,20)要如何處理?(因為不會FOR...END部份)另外LLV(L,20)-MA(H-L,20)是否也可以一起處理?感謝版主!

將版大公式中 SM的H改為目前您希望計算的
因為有高低不同需求
所以分兩段分別處理

看看上述方式是否可得到您要的答案

__________________
至誠能勝天下至偽
至拙能勝天下至巧

由 mori868 在 2010-06-20 22:26 發表:

引用:
最初由 peter109 發表
將版大公式中 SM的H改為目前您希望計算的
因為有高低不同需求
所以分兩段分別處理

看看上述方式是否可得到您要的答案

P大好久不見有好康要相報等您好消息
既然公式已完成我希望每個轉折做一記號而已

由 cgjj 在 2010-06-20 22:47 發表:

回覆: 回覆: 回覆: 請教

引用:
最初由 mori868 發表
很好正在應用中謝謝
又請教如何在轉折處顯示記號

VERTLINE(ref(MM,1)<>MM)

由 Markchu7 在 2010-06-20 22:58 發表:

感謝大哥回答!因為FOR...END這個我不會所以請問 abs(SM[i]-FM)>=15要改嗎?要如何改?
LLV(L,20)-MA(H-L,20)FOR...END的部份又要如何寫呢?請大哥或版主指導!感謝!

由 cgjj 在 2010-06-21 09:52 發表:

引用:
最初由 Markchu7 發表
感謝大哥回答!因為FOR...END這個我不會所以請問 abs(SM[i]-FM)>=15要改嗎?要如何改?
LLV(L,20)-MA(H-L,20)FOR...END的部份又要如何寫呢?請大哥或版主指導!感謝!

您提的 H+MA(H-L,20) 是要取代那一部份呢
是 HHV(H,20) 還是 H+15 呢?

由 Markchu7 在 2010-06-21 13:45 發表:

H+15的部份,感謝版主!

由 cgjj 在 2010-06-21 14:43 發表:

引用:
最初由 Markchu7 發表
H+15的部份,感謝版主!

看看是否為您要的

原碼:


SM:=HHV(H,20); SS:=MA(H-L,20);

LB:=max(lbound(SM),lbound(SS)); FM:=SM[LB]; 

MM:SM;

for i=LB+1 to datacount do begin

  if abs(SM[i]-FM)>=SS[i] then FM:=SM[i];

  MM[i]:=FM;

end;

由 Markchu7 在 2010-06-21 16:05 發表:

感謝版主!

由 mori868 在 2010-06-23 09:58 發表:

LD:=LLV(C,20);
HD:=HHV(C,20);

LBL:=lbound(LD);
LBH:=lbound(HD);

FL:=LD[LBL];
FH:=HD[LBH];
//
LL:LD,coloryellow;
0,color111111,linethick0;
HH:HD,colorgreen;

for i=lbound(LD)+1 to datacount do begin
if abs(LD[i]-FL)>=4 then FL:=LD[i];
LL[i]:=FL;
end;

//
for i=lbound(HD)+1 to datacount do begin
if abs(HD[i]-FH)>=4 then FH:=HD[i];
HH[i]:=FH;
end;
希望只畫水平線既可不要畫階梯的連線
HH成立畫水平線至LL 相反亦同

全部時間均為台灣時間, 現在時間為13:33

總頁數 (2): [1] 2 »
在這個頁面顯示本主題全部的 26 個文章