![]() |
Á`¶¼Æ (2): « 1 [2] ¦b³oÓ¶±Åã¥Ü¥»¥DÃD¥þ³¡ªº 23 Ӥ峹 |
©_ª°ªÀ°Ï½×¾Â (http://www.chiefox.com.tw/bbs/index.php)
- °ÝÃD¥æ¬y (http://www.chiefox.com.tw/bbs/forumdisplay.php?forumid=28)
-- ®Ú¾Ú±ø¥ó¨Ì§Ç³B²z§e²{¶g´Á¼Æ (http://www.chiefox.com.tw/bbs/showthread.php?threadid=24190)
ÁÂÁÂÁ`ª©¥D¡Aק蠟«á¦¨¥\¦p§Ú©ÒÄ@!
½Ð±Ð t¼Æ¶g´Á´N¬O±N ³o®M [¥¿¶g´Á] ½Æ»s¶K¤W¡AµM«á×§ïùر¦³Ãö©ó t¶g´Áªº¬ÛÃö±ø¥óºtºâªk¶Ü?
§ï¦n¤§«á¶K¦b¤U¤è´N¥i¥H¶Ü? °j°éµ²ºc³£ì¤å·Ó§Û®@?
****************************************************************************ì½X¶}©l
U1:=Cross(¤@C,60) or barpos=0;//¥H¤UÁ`ª©¥D´£¨Ñ(20250125
U2:=Cross(¤GC,60) or barpos=0;
U3:=Cross(¤TC,60) or barpos=0;
U4:=Cross(¥|C,60) or barpos=0;
U5:=Cross(¤C,60) or barpos=0;
U6:=Cross(¤»C,60) or barpos=0;
U7:=Cross(¤CC,60) or barpos=0;
U8:=Cross(¤KC,60) or barpos=0;
Now:=0; OldNow:=0; Nowi:=0;
±µ´Î:=C*0 linethick;
±j«×:=±µ´Î linethick;
¶g´Á:=±µ´Î linethick;
for i=1 to datacount do begin
if U8[i] and Now<8 then Now:=8;
if U7[i] and Now<7 then Now:=7;
if U6[i] and Now<6 then Now:=6;
if U5[i] and Now<5 then Now:=5;
if U4[i] and Now<4 then Now:=4;
if U3[i] and Now<3 then Now:=3;
if U2[i] and Now<2 then Now:=2;
if U1[i] and Now=0 then Now:=1;
if OldNow=Now then begin
if Now=1 then begin if ¤@C[i]<=0 then Now:=0; end;
if Now=2 then begin if ¤GC[i]<=0 then Now:=0; end;
if Now=3 then begin if ¤TC[i]<=0 then Now:=0; end;
if Now=4 then begin if ¥|C[i]<=0 then Now:=0; end;
if Now=5 then begin if ¤C[i]<=0 then Now:=0; end;
if Now=6 then begin if ¤»C[i]<=0 then Now:=0; end;
if Now=7 then begin if ¤CC[i]<=0 then Now:=0; end;
if Now=8 then begin if ¤KC[i]<=0 then Now:=0; end;
if Now=0 then Nowi:=0;
end else begin
if Nowi=0 then Nowi:=i;
end;
±µ´Î[i]:=Now;
if Now=1 then ±j«×[i]:=¤@D[i];
if Now=2 then ±j«×[i]:=¤GD[i];
if Now=3 then ±j«×[i]:=¤TD[i];
if Now=4 then ±j«×[i]:=¥|D[i];
if Now=5 then ±j«×[i]:=¤D[i];
if Now=6 then ±j«×[i]:=¤»D[i];
if Now=7 then ±j«×[i]:=¤CD[i];
if Now=8 then ±j«×[i]:=¤KD[i];
if Nowi>0 then ¶g´Á[i]:=i-Nowi+1;
OldNow:=Now;
end;//¥H¤WÁ`ª©¥D´£¨Ñ
U1:=Cross(-60,¤@C) or barpos=0;//¥H¤U¦Û¦æ°Å¶K½Æ»s
U2:=Cross(-60,¤GC) or barpos=0;
U3:=Cross(-60,¤TC) or barpos=0;
U4:=Cross(-60,¥|C) or barpos=0;
U5:=Cross(-60,¤C) or barpos=0;
U6:=Cross(-60,¤»C) or barpos=0;
U7:=Cross(-60,¤CC) or barpos=0;
U8:=Cross(-60,¤KC) or barpos=0;
Now:=0; OldNow:=0; Nowi:=0;
±µ´Î:C*0 linethick;
±j«×:±µ´Î linethick;
¶g´Á:±µ´Î linethick;
for i=1 to datacount do begin
if U8[i] and Now<8 then Now:=8;
if U7[i] and Now<7 then Now:=7;
if U6[i] and Now<6 then Now:=6;
if U5[i] and Now<5 then Now:=5;
if U4[i] and Now<4 then Now:=4;
if U3[i] and Now<3 then Now:=3;
if U2[i] and Now<2 then Now:=2;
if U1[i] and Now=0 then Now:=1;
if OldNow=Now then begin
if Now=1 then begin if ¤@C[i]<=0 then Now:=0; end;
if Now=2 then begin if ¤GC[i]<=0 then Now:=0; end;
if Now=3 then begin if ¤TC[i]<=0 then Now:=0; end;
if Now=4 then begin if ¥|C[i]<=0 then Now:=0; end;
if Now=5 then begin if ¤C[i]<=0 then Now:=0; end;
if Now=6 then begin if ¤»C[i]<=0 then Now:=0; end;
if Now=7 then begin if ¤CC[i]<=0 then Now:=0; end;
if Now=8 then begin if ¤KC[i]<=0 then Now:=0; end;
if Now=0 then Nowi:=0;
end else begin
if Nowi=0 then Nowi:=i;
end;
±µ´Î[i]:=Now;
if Now=1 then ±j«×[i]:=¤@D[i];
if Now=2 then ±j«×[i]:=¤GD[i];
if Now=3 then ±j«×[i]:=¤TD[i];
if Now=4 then ±j«×[i]:=¥|D[i];
if Now=5 then ±j«×[i]:=¤D[i];
if Now=6 then ±j«×[i]:=¤»D[i];
if Now=7 then ±j«×[i]:=¤CD[i];
if Now=8 then ±j«×[i]:=¤KD[i];
if Nowi>0 then ¶g´Á[i]:=i-Nowi+1;
OldNow:=Now;
end;
***************************************************************ì½Xµ²§ô
Á`ª©¥D§Ú¦Û¤v °Å¶K¤U¤è t¶g´Á¥¢±Ñ...............¾ÉPì¨Óªº¥¿¶g´Á³£µLªk¥¿±`§e²{(³£¬O0)...................
§Ú©_ª°¥Î¤á¤Q´X¦~¤F¡A©l²×³£¨S¦³¾Ç·| °j°é¬ÛÃöªº¼gªk
«ô°UÁ`ª©¥DÀ°¦£×§ï
¤Þ¥Î:
³Ìªì¥Ñ tycoon868 µoªí
.........²¤.......
Á`ª©¥D§Ú¦Û¤v °Å¶K¤U¤è t¶g´Á¥¢±Ñ...............¾ÉPì¨Óªº¥¿¶g´Á³£µLªk¥¿±`§e²{(³£¬O0)...................
§Ú©_ª°¥Î¤á¤Q´X¦~¤F¡A©l²×³£¨S¦³¾Ç·| °j°é¬ÛÃöªº¼gªk
«ô°UÁ`ª©¥DÀ°¦£×§ï
ì½X:
U1:=Cross(¤@C,60) or barpos=0; U2:=Cross(¤GC,60) or barpos=0; U3:=Cross(¤TC,60) or barpos=0; U4:=Cross(¥|C,60) or barpos=0; U5:=Cross(¤C,60) or barpos=0; U6:=Cross(¤»C,60) or barpos=0; U7:=Cross(¤CC,60) or barpos=0; U8:=Cross(¤KC,60) or barpos=0; Now:=0; OldNow:=0; Nowi:=0; ¥¿±µ´Î:C*0 linethick; ¥¿±j«×:¥¿±µ´Î linethick; ¥¿¶g´Á:¥¿±µ´Î linethick; for i=1 to datacount do begin if U8[i] and Now<8 then Now:=8; if U7[i] and Now<7 then Now:=7; if U6[i] and Now<6 then Now:=6; if U5[i] and Now<5 then Now:=5; if U4[i] and Now<4 then Now:=4; if U3[i] and Now<3 then Now:=3; if U2[i] and Now<2 then Now:=2; if U1[i] and Now=0 then Now:=1; if OldNow=Now then begin if Now=1 then begin if ¤@C[i]<=0 then Now:=0; end; if Now=2 then begin if ¤GC[i]<=0 then Now:=0; end; if Now=3 then begin if ¤TC[i]<=0 then Now:=0; end; if Now=4 then begin if ¥|C[i]<=0 then Now:=0; end; if Now=5 then begin if ¤C[i]<=0 then Now:=0; end; if Now=6 then begin if ¤»C[i]<=0 then Now:=0; end; if Now=7 then begin if ¤CC[i]<=0 then Now:=0; end; if Now=8 then begin if ¤KC[i]<=0 then Now:=0; end; if Now=0 then Nowi:=0; end else begin if Nowi=0 then Nowi:=i; end; ¥¿±µ´Î[i]:=Now; if Now=1 then ¥¿±j«×[i]:=¤@D[i]; if Now=2 then ¥¿±j«×[i]:=¤GD[i]; if Now=3 then ¥¿±j«×[i]:=¤TD[i]; if Now=4 then ¥¿±j«×[i]:=¥|D[i]; if Now=5 then ¥¿±j«×[i]:=¤D[i]; if Now=6 then ¥¿±j«×[i]:=¤»D[i]; if Now=7 then ¥¿±j«×[i]:=¤CD[i]; if Now=8 then ¥¿±j«×[i]:=¤KD[i]; if Nowi>0 then ¥¿¶g´Á[i]:=i-Nowi+1; OldNow:=Now; end; D1:=Cross(-60,¤@C) or barpos=0; D2:=Cross(-60,¤GC) or barpos=0; D3:=Cross(-60,¤TC) or barpos=0; D4:=Cross(-60,¥|C) or barpos=0; D5:=Cross(-60,¤C) or barpos=0; D6:=Cross(-60,¤»C) or barpos=0; D7:=Cross(-60,¤CC) or barpos=0; D8:=Cross(-60,¤KC) or barpos=0; Now:=0; OldNow:=0; Nowi:=0; t±µ´Î:C*0 linethick; t±j«×:t±µ´Î linethick; t¶g´Á:t±µ´Î linethick; for i=1 to datacount do begin if D8[i] and Now<8 then Now:=8; if D7[i] and Now<7 then Now:=7; if D6[i] and Now<6 then Now:=6; if D5[i] and Now<5 then Now:=5; if D4[i] and Now<4 then Now:=4; if D3[i] and Now<3 then Now:=3; if D2[i] and Now<2 then Now:=2; if D1[i] and Now=0 then Now:=1; if OldNow=Now then begin if Now=1 then begin if ¤@C[i]>=0 then Now:=0; end; if Now=2 then begin if ¤GC[i]>=0 then Now:=0; end; if Now=3 then begin if ¤TC[i]>=0 then Now:=0; end; if Now=4 then begin if ¥|C[i]>=0 then Now:=0; end; if Now=5 then begin if ¤C[i]>=0 then Now:=0; end; if Now=6 then begin if ¤»C[i]>=0 then Now:=0; end; if Now=7 then begin if ¤CC[i]>=0 then Now:=0; end; if Now=8 then begin if ¤KC[i]>=0 then Now:=0; end; if Now=0 then Nowi:=0; end else begin if Nowi=0 then Nowi:=i; end; t±µ´Î[i]:=Now; if Now=1 then t±j«×[i]:=¤@D[i]; if Now=2 then t±j«×[i]:=¤GD[i]; if Now=3 then t±j«×[i]:=¤TD[i]; if Now=4 then t±j«×[i]:=¥|D[i]; if Now=5 then t±j«×[i]:=¤D[i]; if Now=6 then t±j«×[i]:=¤»D[i]; if Now=7 then t±j«×[i]:=¤CD[i]; if Now=8 then t±j«×[i]:=¤KD[i]; if Nowi>0 then t¶g´Á[i]:=i-Nowi+1; OldNow:=Now; end;
®M¤Jµ²ªG ¥¿t¶g´Á ¥¿½TµL»~¡A¦ýµo²{§ó²Ó¿°ªº°£¿ù¶µ¥Ø¦p¤U¹Ïªþ¥ó
¤p§Ì¹ê¦b¤£´±¦A¥´ÂZÁ`ª©¥D Ä_¶Q¦~°²¡A³oÓ×¥¿½ÐÁ`ª©¥D®É¶¡«D±`±q®eªº®ÉÔ ¦AÀ°§ÚµL§«®@!
¹ê¦b´ª¥Ì¤ß!
¤Þ¥Î:
³Ìªì¥Ñ tycoon868 µoªí
®M¤Jµ²ªG ¥¿t¶g´Á ¥¿½TµL»~¡A¦ýµo²{§ó²Ó¿°ªº°£¿ù¶µ¥Ø¦p¤U¹Ïªþ¥ó
¤p§Ì¹ê¦b¤£´±¦A¥´ÂZÁ`ª©¥D Ä_¶Q¦~°²¡A³oÓ×¥¿½ÐÁ`ª©¥D®É¶¡«D±`±q®eªº®ÉÔ ¦AÀ°§ÚµL§«®@!
¹ê¦b´ª¥Ì¤ß!
Âà¦VÁÙ¦³¥t¤@°ÝÃD
Âà¦V·í¤U¡A¥t¤@¦V¥i¯à¤w¸g¦³²Ö¿n©P´Á¼Æ¤F
¦¹®Én "¥ýÂk¹sµ¥«ÝCross¦A«·s°_ºâ" ©O?
ÁÙ¬Oª½±µ±µÄò "¬J¦³¸Ó¦V¤w²Ö¿n©P´Á¼Æ" ©O?
³B¸m³W«h·Ð½Ð¤@¨Ö«ä¦Ò§¹¾ã
·PÁÂÁ`ª©¥D®@! À°§Ú¦p¦¹²Ó¿°ªº³W¹º¡A§Ú¥ýªáÓ´X¤Ñ®É¶¡¬d¬Ý¾ú¥v¦æ±¡¡A½T¤Á§ä¥X»Ýn¸É±jªºÅÞ¿è±ø¥ó
·PÁ®@!
¥þ³¡®É¶¡§¡¬°¥xÆW®É¶¡, ²{¦b®É¶¡¬°11:45 | Á`¶¼Æ (2): « 1 [2] ¦b³oÓ¶±Åã¥Ü¥»¥DÃD¥þ³¡ªº 23 Ӥ峹 |
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
²·R¬v¦æ »s§@ Copyright 2003-. All Rights Reserved.