奇狐社區論壇 - 畫線問題

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

由 mori868 在 2008-08-15 04:34 發表:

畫線問題

設高點:=PEAKBARS(4,1,1)=0;
1: 以站上高點的那支K線為基準
2: 若又有站上那支K線高點時就從那支K線高點畫水平線至站上處並顯示價位
敬請賜教謝謝

由 cgjj 在 2008-08-15 08:54 發表:

回覆: 畫線問題

引用:
最初由 mori868 發表
設高點:=PEAKBARS(4,1,1)=0;
1: 以站上高點的那支K線為基準
2: 若又有站上那支K線高點時就從那支K線高點畫水平線至站上處並顯示價位
敬請賜教謝謝

原碼:


HH:=H;

高點:PEAKBARS(4,1,1)=0;

DWSP:=C*0;

for i=lbound(高點) to datacount do begin

  if 高點[i] then begin

    for j=i to datacount do begin

      if HH[j]>HH[i] then begin

        DWSP[i]:=j-i; break;

      end;

    end;

  end;

end;

VERTLINE(高點) linedot;

DRAWSL(高點 and DWSP,H,0,DWSP,3);

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

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