 |
wengd469
資深會員
註冊日期: May 2021
來 自:
文章數量: 328 |
|
不要彩虹K棒,要正常的就好
//
fo:=o;fh:=h;fl:=l;fc:=c;
fc[1]:=(2*fc[1]+fh[1]+fl[1])/4;
for i=2 to datacount do begin
fo[i]:=(fo[i-1]+fc[i-1])/2;
if fo[i]>fh[i] then fh[i]:=fo[i];
if fo[i]<fl[i] then fl[i]:=fo[i];
fc[i]:=(2*fc[i]+fh[i]+fl[i])/4;
end;
KK:=IF(fc>=fo AND (fc>=ref(fc,1) or ref(fc,1)>=ref(fo,1)),1,IF(fc<fo AND (fc<ref(fo,1) or ref(fc,1)<ref(fo,1)),-1,0));
fcfo:=fc-fo;
kks1:=KK=1 AND fc>=fo OR KK=1 AND fc<fo;
STICKLINE(fc>fo,fh,fc,0.4,0),COLOR0000FF;{上影線}
STICKLINE(fc>fo,fo,fl,0.4,0),COLOR00FFFF;{下影線}
STICKLINE(kks1,fo,fc,8,0),COLOR00CCFF;
STICKLINE(kks1,fo+fcfo/4,fc,8,0),COLOR0099FF;
STICKLINE(kks1,fo+fcfo*2/4,fc,8,0),COLOR0066FF;
STICKLINE(kks1,fo+fcfo*3/4,fc,8,0),COLOR0033FF;
fofc:=fo-fc;
kks2:=KK<=0 AND fc>=fo OR KK<=0 AND fc<fo;
STICKLINE(fo>fc,fh,fo,0.4,0),COLORFFFF33;{上影線}
STICKLINE(fo>fc,fc,fl,0.4,0),COLORFF0033;{下影線}
STICKLINE(kks2,fo,fc,8,0),COLORFF3300;
STICKLINE(kks2,fo,fc+fofc/4,8,0),COLORFF6600;
STICKLINE(kks2,fo,fc+fofc*2/4,8,0),COLORFF9900;
STICKLINE(kks2,fo,fc+fofc*3/4,8,0),COLORFFCC00;
要如何修改呢??
|
|
向版主報告此篇 |  |
|
2024-11-05 14:12 |
|
|
| |
|
cgjj
總版主
註冊日期: Oct 2003
來 自:
文章數量: 18116 |
|
回覆: 不要彩虹K棒,要正常的就好
引用:
最初由 wengd469 發表
//
fo:=o;fh:=h;fl:=l;fc:=c;
fc[1]:=(2*fc[1]+fh[1]+fl[1])/4;
for i=2 to datacount do begin
fo[i]:=(fo[i-1]+fc[i-1])/2;
if fo[i]>fh[i] then fh[i]:=fo[i];
if fo[i]<fl[i] then fl[i]:=fo[i];
fc[i]:=(2*fc[i]+fh[i]+fl[i])/4;
end;
KK:=IF(fc>=fo AND (fc>=ref(fc,1) or ref(fc,1)>=ref(fo,1)),1,IF(fc<fo AND (fc<ref(fo,1) or ref(fc,1)<ref(fo,1)),-1,0));
fcfo:=fc-fo;
kks1:=KK=1 AND fc>=fo OR KK=1 AND fc<fo;
STICKLINE(fc>fo,fh,fc,0.4,0),COLOR0000FF;{上影線}
STICKLINE(fc>fo,fo,fl,0.4,0),COLOR00FFFF;{下影線}
STICKLINE(kks1,fo,fc,8,0),COLOR00CCFF;
STICKLINE(kks1,fo+fcfo/4,fc,8,0),COLOR0099FF;
STICKLINE(kks1,fo+fcfo*2/4,fc,8,0),COLOR0066FF;
STICKLINE(kks1,fo+fcfo*3/4,fc,8,0),COLOR0033FF;
fofc:=fo-fc;
kks2:=KK<=0 AND fc>=fo OR KK<=0 AND fc<fo;
STICKLINE(fo>fc,fh,fo,0.4,0),COLORFFFF33;{上影線}
STICKLINE(fo>fc,fc,fl,0.4,0),COLORFF0033;{下影線}
STICKLINE(kks2,fo,fc,8,0),COLORFF3300;
STICKLINE(kks2,fo,fc+fofc/4,8,0),COLORFF6600;
STICKLINE(kks2,fo,fc+fofc*2/4,8,0),COLORFF9900;
STICKLINE(kks2,fo,fc+fofc*3/4,8,0),COLORFFCC00;
要如何修改呢??
把您貼出來的這些程式碼，全部都刪掉就OK
|
|
向版主報告此篇 | |
|
|
2024-11-05 14:41 |
|
|
| |
|
wengd469
資深會員
註冊日期: May 2021
來 自:
文章數量: 328 |
|
引用:
最初由 cgjj 發表
你是用在主圖嗎?
若是請在[編輯公式]中將[主圖]取消打勾，就會顯示系統內建的K棒
若為副圖公式，則需加入以下這一行:
KLINE(O,H,L,C,0);
謝謝您!可以了
|
|
向版主報告此篇 | |
|
|
2024-11-06 02:14 |
|
|
| |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|
