커뮤니티
지표 사용
2013-01-10 17:42:52
264
글번호 58015
혹시 적합 이동 평균선 ,,, 수정할 수 있나요
[사용자함수]
사용자함수명 : AMA
input : Price(numericseries),
EffRatioLength(numericsimple);
variable : NetChg(0),TotChg(0),EffRatio(0),ScaledSFSqr(0),SlowAvgSF(0),FastAvgSF(0),SFDiff(0);
SLowAvgSF = 2/(2+1);
FastAvgSF = 2/(30+1);
SFDiff = FastAvgSF-SlowAvgSF;
if CurrentBar == 1 then
AMA = Price;
else {
NetChg = AbsValue(Price - Price[EffRatioLength]); //가격방향성
TotChg = Accumn(Abs(Price-Price[1]), EffRatioLength); //변동성
if TotChg > 0 then
EffRatio = NetChg / TotChg;
else
EffRatio = 0 ;
ScaledSFSqr = Square( SlowAvgSF + EffRatio * SFDiff ) ;
AMA = AMA[1] + ScaledSFSqr * ( Price - AMA[1] ) ;
}
[지표식]
input: EffRatioLength(10);
vars : MAA(0);
MAA = AMA(C,EffRatioLength);
Plot1( MAA, "MAA" ) ;
답변 1
예스스탁 예스스탁 답변
2013-01-11 09:18:00
안녕하세요
예스스탁입니다.
어떻게 수정하실지 내용을 올려주시기 바랍니다.
즐거운 하루되세요
> 구다이전설 님이 쓴 글입니다.
> 제목 : 지표 사용
> 혹시 적합 이동 평균선 ,,, 수정할 수 있나요
[사용자함수]
사용자함수명 : AMA
input : Price(numericseries),
EffRatioLength(numericsimple);
variable : NetChg(0),TotChg(0),EffRatio(0),ScaledSFSqr(0),SlowAvgSF(0),FastAvgSF(0),SFDiff(0);
SLowAvgSF = 2/(2+1);
FastAvgSF = 2/(30+1);
SFDiff = FastAvgSF-SlowAvgSF;
if CurrentBar == 1 then
AMA = Price;
else {
NetChg = AbsValue(Price - Price[EffRatioLength]); //가격방향성
TotChg = Accumn(Abs(Price-Price[1]), EffRatioLength); //변동성
if TotChg > 0 then
EffRatio = NetChg / TotChg;
else
EffRatio = 0 ;
ScaledSFSqr = Square( SlowAvgSF + EffRatio * SFDiff ) ;
AMA = AMA[1] + ScaledSFSqr * ( Price - AMA[1] ) ;
}
[지표식]
input: EffRatioLength(10);
vars : MAA(0);
MAA = AMA(C,EffRatioLength);
Plot1( MAA, "MAA" ) ;