cgjj
總版主
註冊日期: Oct 2003
來 自:
文章數量: 18091 |
|
引用:
最初由 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;
|
|
向版主報告此篇 |  |
|
2012-10-25 16:28
