 |
qaq1689
資深會員

註冊日期: Oct 2006
來 自: 中部
文章數量: 293 |
|
量棒
那是自設指標主圖內的量棒.碼
請把它.原寬度.原色.寫成可放於副圖
謝謝..
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;
|
|
向版主報告此篇 |  |
|
2016-04-29 16:02 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18235 |
|
回覆: 量棒
引用: 最初由 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;
這段公式源碼並不完整
自揭示的源碼來看,它並無限制只能於主圖看
故看不出有任何修改之必要
|
|
向版主報告此篇 |  |
|
2016-04-29 16:17 |
|
|
|  |
 |
qaq1689
資深會員

註冊日期: Oct 2006
來 自: 中部
文章數量: 293 |
|
我把它全拿到副圖去
是可以看..但坐標量數字不對稱
請把它修改一 下
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 附帶上了此圖片:
|
|
向版主報告此篇 |  |
|
2016-04-29 17:15 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|