奇狐社區論壇 (http://www.chiefox.com.tw/bbs/index.php)
- 問題交流 (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- [問題]限制K棒數之主圖疊加成交量橫條圖 排序 (http://www.chiefox.com.tw/bbs/showthread.php?threadid=22571)

[問題]限制K棒數之主圖疊加成交量橫條圖 排序

N:=10; CC:=C; VV:=V; KK:=144;
KL:=datacount-KK+1; KR:=datacount; if KR<KK then exit;
KN:=barpos-KL; KZ:=KR-KL;
PH:=HHV(H,60); PH:=PH[datacount];
PL:=LLV(L,60); PL:=PL[datacount];
PS:=(PH-PL)/10;
VARIABLE:MH[N]=0,MZ[N]=0,ML[N]=0,MP[N]=0;
PS2:=PS/2; VZ:=0; MaxMZ:=0;
for i=1 to N do begin
MH[i]:=PH-PS*(i-1);
for k=KL to KR do begin
if CC[k]<=MH[i] and CC[k]>MH[i]-PS-PS*(i=N) then MZ[i]:=MZ[i]+VV[k];
end;
VZ:=VZ+MZ[i]; if MZ[i]>MaxMZ then MaxMZ:=MZ[i];
end;
for i=1 to N do begin
ML[i]:=MZ[i]/MaxMZ; MP[i]:=MZ[i]/VZ*100;
end;
DW:=barpos>KL;
RT:=barpos<KL+KZ*0.25;

以上源碼為版主所指導之限制K棒數之主圖疊加成交量橫條圖!
請版主協助取得最大量的高與低的數據!謝謝!

回覆: [問題]限制K棒數之主圖疊加成交量橫條圖 排序

引用:

---

最初由 Markchu7 發表
N:=10; CC:=C; VV:=V; KK:=144;
KL:=datacount-KK+1; KR:=datacount; if KR<KK then exit;
KN:=barpos-KL; KZ:=KR-KL;
PH:=HHV(H,60); PH:=PH[datacount];
PL:=LLV(L,60); PL:=PL[datacount];
PS:=(PH-PL)/10;
VARIABLE:MH[N]=0,MZ[N]=0,ML[N]=0,MP[N]=0;
PS2:=PS/2; VZ:=0; MaxMZ:=0;
for i=1 to N do begin
MH[i]:=PH-PS*(i-1);
for k=KL to KR do begin
if CC[k]<=MH[i] and CC[k]>MH[i]-PS-PS*(i=N) then MZ[i]:=MZ[i]+VV[k];
end;
VZ:=VZ+MZ[i]; if MZ[i]>MaxMZ then MaxMZ:=MZ[i];
end;
for i=1 to N do begin
ML[i]:=MZ[i]/MaxMZ; MP[i]:=MZ[i]/VZ*100;
end;
DW:=barpos>KL;
RT:=barpos<KL+KZ*0.25;

以上源碼為版主所指導之限制K棒數之主圖疊加成交量橫條圖!
請版主協助取得最大量的高與低的數據!謝謝!

---

報告版主:您提到的這個回覆是[當沖之疊加]!
其中有個'MPS[i]:=MP[i];'是本公式所沒有的!是否依樣的加入即可?
謝謝!

引用:

---

最初由 Markchu7 發表
報告版主:您提到的這個回覆是[當沖之疊加]!
其中有個'MPS[i]:=MP[i];'是本公式所沒有的!是否依樣的加入即可?
謝謝!

---

感謝!若有疑問再行請教!