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

數值位置亂標

不知錯在哪裡 煩請指導 謝謝先

部分原碼如下

XN2:C*0,LINETHICK0;
FOR i=DATACOUNT DOWNTO 4 DO BEGIN
IF i<4 THEN BREAK;
IF (HA[i] OR HB[i]) THEN BEGIN // K棒下方有數值
FOR j=i-1 DOWNTO i-40 DO BEGIN
IF j<4 THEN BREAK;
XN2[j]:=0;
IF (HH[j]=H20[j] AND i-j<=5) THEN BEGIN //比對條件
XN3:=i-j;
FOR k=j-1 DOWNTO j-40 DO BEGIN
IF k<4 THEN BREAK;
IF HH[k]<=HH[j] THEN XN2[j]:=XN2[j]+1;
IF HH[k]>HH[j] THEN BREAK;
END;
END;
END;
XN2[i]:=XN2[j]+XN3;
END;
IF XN2[i]<20 THEN XN2[i]:=0;
END;
DRAWNUMBER(XN2>=20 AND XN2<40,H,XN2,0),COLORMAGENTA,ALIGN4;
DRAWTEXT(XN2=40,H,'40↑'),COLORMAGENTA,ALIGN4;

在K棒下方有數值後 開始比對條件
在圖的最上方 寫出XN2數值或文字

下圖 完全不對的XN2位置

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

如果主圖上方標示的位置 要由圖中目前標示的位置 改在K棒下方有數值(綠色箭頭)的主圖上方位置 該如何改

如圖

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

回覆: 數值位置亂標

引用:

---

最初由 peter109 發表
不知錯在哪裡 煩請指導 謝謝先

部分原碼如下

XN2:C*0,LINETHICK0;
FOR i=DATACOUNT DOWNTO 4 DO BEGIN
IF i<4 THEN BREAK;
IF (HA[i] OR HB[i]) THEN BEGIN // K棒下方有數值
FOR j=i-1 DOWNTO i-40 DO BEGIN
IF j<4 THEN BREAK;
XN2[j]:=0;
IF (HH[j]=H20[j] AND i-j<=5) THEN BEGIN //比對條件
XN3:=i-j;
FOR k=j-1 DOWNTO j-40 DO BEGIN
IF k<4 THEN BREAK;
IF HH[k]<=HH[j] THEN XN2[j]:=XN2[j]+1;
IF HH[k]>HH[j] THEN BREAK;
END;
END;
END;
XN2[i]:=XN2[j]+XN3;
END;
IF XN2[i]<20 THEN XN2[i]:=0;
END;
DRAWNUMBER(XN2>=20 AND XN2<40,H,XN2,0),COLORMAGENTA,ALIGN4;
DRAWTEXT(XN2=40,H,'40↑'),COLORMAGENTA,ALIGN4;

在K棒下方有數值後 開始比對條件
在圖的最上方 寫出XN2數值或文字

下圖 完全不對的XN2位置

---

謝謝版大的協助

寫法還真是我要學的
只是不知道什麼時候才能學會

繼續加油

再次感恩

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

引用:

---

最初由 peter109 發表
謝謝版大的協助

寫法還真是我要學的
只是不知道什麼時候才能學會

繼續加油

再次感恩

---