 |
a9681054
資深會員
註冊日期: Nov 2008
來 自: 新北市
文章數量: 479 |
請教不要相連問題
kline(o,h,l,c,0);
//分時平均成本
SWCK:=TradeDate<>ref(TradeDate,1) or IsRegularFBar or barpos=1;
SP:=barslast(SWCK)+1;
VERTLINE(SWCK) ColorMAGENTA linedot; //標示換盤首根
//DECK:=REF(DATE,1)<>DATE or barpos=1;
//SP:=BARSLAST(DECK)+1;
WBC:=SUM((H+L+C*2)/4*V,SP)/SUM(V,SP);
//前N根取WBC,後續改取AMA(以WBC值起算AMA)
direction:=C-ref(c,N);
volatility:=sum(abs(C-ref(C,1)),N);
Efficiency_Ratio:=abs(direction/volatility);
Fastst:=2/(P+1);
Slowst:=2/(Q+1);
percentage:=Efficiency_Ratio * (Fastst-Slowst) + Slowst;
Constant:=percentage*percentage;
MM:C;
for i=N+1 to datacount do begin
if SP[i]<=N then begin
MM[i]:=WBC[i];
end else begin
MM[i]:=MM[i-1]+Constant[i]*(MM[i]-MM[i-1]);
end;
end;
需求:圖片打叉處不要相連
a9681054 附帶上了此圖片:
__________________
chiu
|
|
向版主報告此篇 |  |
|
2022-10-10 20:28 |
|
|
|  |
 |
cgjj
總版主

註冊日期: Oct 2003
來 自:
文章數量: 18091 |
回覆: 請教不要相連問題
引用: 最初由 a9681054 發表
kline(o,h,l,c,0);
//分時平均成本
SWCK:=TradeDate<>ref(TradeDate,1) or IsRegularFBar or barpos=1;
SP:=barslast(SWCK)+1;
VERTLINE(SWCK) ColorMAGENTA linedot; //標示換盤首根
//DECK:=REF(DATE,1)<>DATE or barpos=1;
//SP:=BARSLAST(DECK)+1;
WBC:=SUM((H+L+C*2)/4*V,SP)/SUM(V,SP);
//前N根取WBC,後續改取AMA(以WBC值起算AMA)
direction:=C-ref(c,N);
volatility:=sum(abs(C-ref(C,1)),N);
Efficiency_Ratio:=abs(direction/volatility);
Fastst:=2/(P+1);
Slowst:=2/(Q+1);
percentage:=Efficiency_Ratio * (Fastst-Slowst) + Slowst;
Constant:=percentage*percentage;
MM:C;
for i=N+1 to datacount do begin
if SP[i]<=N then begin
MM[i]:=WBC[i];
end else begin
MM[i]:=MM[i-1]+Constant[i]*(MM[i]-MM[i-1]);
end;
end;
需求:圖片打叉處不要相連
將
MM:C;
改為
MM:C linethick0;
底端追增
PARTLINE(SP>1,MM);
|
|
向版主報告此篇 |  |
|
2022-10-10 22:17 |
|
|
|  |
 |
a9681054
資深會員
註冊日期: Nov 2008
來 自: 新北市
文章數量: 479 |
可以了,感謝版主協助~
__________________
chiu
|
|
向版主報告此篇 |  |
|
2022-10-10 22:52 |
|
|
|  |
本站所有內容未經作者授權禁止轉貼節錄, 發表言論僅供參考勿作為投資決策依據。瀏覽本站請使用 IE 5.5 以上版本, 最佳瀏覽解析度 1024 x 768 全彩。
|
Powered by: vBulletin Version 2.3.0 - Copyright©2000-, Jelsoft Enterprises Limited.
簡愛洋行 製作 Copyright 2003-. All Rights Reserved. 聯絡我們
|