奇狐社區論壇 - 請問板主

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

由 wqew2002 在 2012-10-25 16:28 發表:

請問板主

請問板主

我想要只算從今天開盤開始算的AMA要怎麼寫

由 cgjj 在 2012-10-26 09:39 發表:

回覆: 請問板主

引用:
最初由 wqew2002 發表
請問板主

我想要只算從今天開盤開始算的AMA要怎麼寫

原碼:
................請見後續修正的原碼..........

由 wqew2002 在 2012-10-26 15:22 發表:

不好意思板主他一開始可以

但之後就不行

會說

第7行腳本錯誤
說明: 溢位

執行腳本失敗
返回碼 =80004005

由 cgjj 在 2012-10-26 16:11 發表:

引用:
最初由 wqew2002 發表
不好意思板主他一開始可以

但之後就不行

會說

第7行腳本錯誤
說明: 溢位

執行腳本失敗
返回碼 =80004005

修正如下:

原碼:DE:=DATE;
LB:=lbound(BARSSINCE(DE=DE[datacount]));
SCC:=CLOSE;
x:=SETLBOUND(SCC,LB);
Direction:=SCC - REF( SCC , N ) ; 
XX:=ABS( SCC - REF( SCC , 1 ) ) ; 
Volatility:=SUM( XX , N ) ; 
ER:=ABS( Direction / Volatility ) ; 
FastC:= 2 / ( p + 1 ) ; 
SlowC:= 2 / ( q + 1 ) ; 
SSC:=ER * ( FastC - SlowC ) + SlowC ; 
Constant :=SSC * SSC , Linethick0; 
YY:=REF( SCC , 1 ) + Constant * ( SCC - REF( SCC , 1 ) ) ; 
BB:=BarsLast(barpos=LB+N); 
DD:=REF( SCC , BB ) ; 
CC:=SCC , Linethick0 ; 
for m=lbound(DD)+1 to datacount do begin
  DD[m]:=DD[m-1]+Constant[m]*(CC[m]-DD[m-1]);
end
AMA:DD linethick;
MX:=LLV(AMA,0);
MY:=MX[DATACOUNT];
AMB:=AMA+ABS(MY);
FFilter:=( K / 100 ) * Std( AMB - REF( AMB , 1 ) , N ) ; 
XA:=IF( AMB<REF( AMB , 1 ) , AMB , 0 ) ; 
XN:=BarsLast( XA>0 ) ; 
AMALow :=REF( AMB , XN ) ; 
YA:=IF( AMB>REF( AMB , 1 ) , AMB , 0 ) ; 
YN:=BarsLast( YA>0 ) ; 
AMAHigh :=REF( AMB , YN ) ; 
RR:=IF( AMAHigh - AMB > FFilter , -1 , 0 ) ; 
TT:=IF( AMB - AMALow > FFilter , 1 , RR ) ; 
PartLine(TT=1,AMA) , ColorRed , Linethick2; 
PartLine(TT= -1,AMA) , ColorGreen , Linethick2; 
PartLine(TT= 0,AMA) , ColorFFFEEE , Linethick2;

由 wqew2002 在 2012-10-26 17:10 發表:

謝謝

全部時間均為台灣時間, 現在時間為03:07

在這個頁面顯示本主題全部的 5 個文章