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

量棒

那是自設指標主圖內的量棒.碼
請把它.原寬度.原色.寫成可放於副圖

謝謝..


STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,8,0),Color0000B7;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,7,0),Color0000D5;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,6,0),Color0000EC;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,5,0),Color0000FF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,4,0),Color2F2FFF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,3,0),Color4444FF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,2,0),Color5B5BFF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,1,0),Color7575FF;


STICKLINE(CLOSE<REF(CLOSE,1),e,vx,8,0),Color262626;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,7,0),Color262626;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,6,0),Color333333;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,5,0),Color3A3A3A;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,4,0),Color4C4C4C;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,3,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,2,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,1,0),ColorB0B0B0;
{==========================================================}


STICKLINE(CLOSE<REF(CLOSE,1),e,vx,8,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,7,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,6,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,5,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,4,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,3,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,2,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,1,0),ColorB0B0B0;

回覆: 量棒

引用:

---

最初由 qaq1689 發表
那是自設指標主圖內的量棒.碼
請把它.原寬度.原色.寫成可放於副圖

謝謝..


STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,8,0),Color0000B7;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,7,0),Color0000D5;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,6,0),Color0000EC;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,5,0),Color0000FF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,4,0),Color2F2FFF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,3,0),Color4444FF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,2,0),Color5B5BFF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,1,0),Color7575FF;


STICKLINE(CLOSE<REF(CLOSE,1),e,vx,8,0),Color262626;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,7,0),Color262626;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,6,0),Color333333;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,5,0),Color3A3A3A;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,4,0),Color4C4C4C;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,3,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,2,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,1,0),ColorB0B0B0;
{==========================================================}


STICKLINE(CLOSE<REF(CLOSE,1),e,vx,8,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,7,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,6,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,5,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,4,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,3,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,2,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,1,0),ColorB0B0B0;

---

我把它全拿到副圖去
是可以看..但坐標量數字不對稱
請把它修改一 下

a:=SYSPARAM(4)-SYSPARAM(5);
ab:=SYSPARAM(4)+a/3;
Q1:=0;
Q2:=VOL;
S1:=SYSPARAM(2);
S2:=SYSPARAM(3);
FOR I=S1 TO S2 DO
BEGIN
IF Q1<Q2[I] THEN
Q1:= Q2[I];
END;
b:=Q1;//最大量
d:=b/a*2.5;
e:=SYSPARAM(4)-a/0.986;
vx:=VOL/d+e;


STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,8,0),Color0000B7;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,7,0),Color0000D5;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,6,0),Color0000EC;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,5,0),Color0000FF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,4,0),Color2F2FFF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,3,0),Color4444FF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,2,0),Color5B5BFF;
STICKLINE(CLOSE>=REF(CLOSE,1),e,vx,1,0),Color7575FF;



STICKLINE(CLOSE<REF(CLOSE,1),e,vx,8,0),Color262626;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,7,0),Color262626;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,6,0),Color333333;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,5,0),Color3A3A3A;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,4,0),Color4C4C4C;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,3,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,2,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,1,0),ColorB0B0B0;



STICKLINE(CLOSE<REF(CLOSE,1),e,vx,8,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,7,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,6,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,5,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,4,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,3,0),Color717171;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,2,0),Color8F8F8F;
STICKLINE(CLOSE<REF(CLOSE,1),e,vx,1,0),ColorB0B0B0

引用:

---

最初由 qaq1689 發表
我把它全拿到副圖去
是可以看..但坐標量數字不對稱
請把它修改一 下

a:=SYSPARAM(4)-SYSPARAM(5);
ab:=SYSPARAM(4)+a/3;
Q1:=0;
Q2:=VOL;
S1:=SYSPARAM(2);
S2:=SYSPARAM(3);
FOR I=S1 TO S2 DO
BEGIN
IF Q1<Q2[I] THEN
Q1:= Q2[I];
END;
b:=Q1;//最大量
d:=b/a*2.5;
e:=SYSPARAM(4)-a/0.986;
vx:=VOL/d+e;
...............

---