커뮤니티
문의 드립니다.
2013-12-19 11:47:44
142
글번호 70640
예제에 보니까 적합이동평균이 있던데 수식좀 부탁 드립니다.
적합이동평균(예10선)을 A라 하고 이평선(5일선)을 B라 할때
매수조건은 A와B가 골든 입니다.
감사합니다.
답변 1
예스스탁 예스스탁 답변
2013-12-19 15:02:33
안녕하세요
예스스탁입니다.
적합이동평균은 수식에서 직접 계산해서 사용하셔야 합니다.
아래는 지표식과 시스템식입니다.
1. 지표식
Inputs: Period1(5),Period2(10);
Vars: Noise1(0), Signal1(0), Diff1(0), efRatio1(0), Smooth1(1), Fastest1(0.6667), Slowest1(0.0645), AdaptMA1(0);
Vars: Noise2(0), Signal2(0), Diff2(0), efRatio2(0), Smooth2(1), Fastest2(0.6667), Slowest2(0.0645), AdaptMA2(0);
Diff1 = AbsValue(Close - Close[1]);
IF index <= Period1 Then
AdaptMA1 = Close;
IF index > Period1 Then Begin
Signal1 = AbsValue(Close - Close[Period1]);
Noise1 = accumN(Diff1, Period1);
efRatio1 = Signal1 / Noise1;
Smooth1 = Power(efRatio1 * (Fastest1 - Slowest1) + Slowest1, 2);
AdaptMA1 = AdaptMA1[1] + Smooth1 * (Close - AdaptMA1[1]);
End;
Diff2 = AbsValue(Close - Close[1]);
IF index <= Period2 Then
AdaptMA2 = Close;
IF index > Period2 Then Begin
Signal2 = AbsValue(Close - Close[Period2]);
Noise2 = accumN(Diff2, Period2);
efRatio2 = Signal2 / Noise2;
Smooth2 = Power(efRatio2 * (Fastest2 - Slowest2) + Slowest2, 2);
AdaptMA2 = AdaptMA2[1] + Smooth2 * (Close - AdaptMA2[1]);
End;
plot1(AdaptMA1);
plot2(AdaptMA2);
2. 시스템식
Inputs: Period1(5),Period2(10);
Vars: Noise1(0), Signal1(0), Diff1(0), efRatio1(0), Smooth1(1), Fastest1(0.6667), Slowest1(0.0645), AdaptMA1(0);
Vars: Noise2(0), Signal2(0), Diff2(0), efRatio2(0), Smooth2(1), Fastest2(0.6667), Slowest2(0.0645), AdaptMA2(0);
Diff1 = AbsValue(Close - Close[1]);
IF index <= Period1 Then
AdaptMA1 = Close;
IF index > Period1 Then Begin
Signal1 = AbsValue(Close - Close[Period1]);
Noise1 = accumN(Diff1, Period1);
efRatio1 = Signal1 / Noise1;
Smooth1 = Power(efRatio1 * (Fastest1 - Slowest1) + Slowest1, 2);
AdaptMA1 = AdaptMA1[1] + Smooth1 * (Close - AdaptMA1[1]);
End;
Diff2 = AbsValue(Close - Close[1]);
IF index <= Period2 Then
AdaptMA2 = Close;
IF index > Period2 Then Begin
Signal2 = AbsValue(Close - Close[Period2]);
Noise2 = accumN(Diff2, Period2);
efRatio2 = Signal2 / Noise2;
Smooth2 = Power(efRatio2 * (Fastest2 - Slowest2) + Slowest2, 2);
AdaptMA2 = AdaptMA2[1] + Smooth2 * (Close - AdaptMA2[1]);
End;
if CrossUp(AdaptMA1,AdaptMA2) Then
buy();
if CrossDown(AdaptMA1,AdaptMA2) Then
sell();
즐거운 하루되세요
> WT_yu**** 님이 쓴 글입니다.
> 제목 : 문의 드립니다.
> 예제에 보니까 적합이동평균이 있던데 수식좀 부탁 드립니다.
적합이동평균(예10선)을 A라 하고 이평선(5일선)을 B라 할때
매수조건은 A와B가 골든 입니다.
감사합니다.