커뮤니티
문의드립니다.
2018-08-25 13:15:18
207
글번호 121593
선물차트 기준으로 문의드립니다.
2분봉차트의 적합이동평균 90선을 틱차트에 나타내고 싶습니다.
분봉차트의 시간값과 적합이동평균의 기간값은 수정가능하게 부탁드립니다.
항상 감사드립니다. 수고하세요!!!
답변 1
예스스탁 예스스탁 답변
2018-08-27 11:41:04
안녕하세요
예스스탁입니다.
input : ntime(2),Period(20);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : Signal(0),Noise(0),efRatio(0);
var : Smooth(1), Fastest(0.6667), Slowest(0.0645), AMA(0),AMA1(0);
Array : CC[100](0),diff[100](0);
if Bdate != Bdate[1] Then
{
S1 = TimeToMinutes(stime);
D1 = sdate;
}
if D1 > 0 then{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TF = TM%ntime;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
for cnt = 1 to 49
{
CC[cnt] = CC[cnt-1][1];
}
AMA1 = AMA[1];
}
CC[0] = C;
if CC[Period] > 0 then
{
Signal = Abs(CC[0] - CC[Period]);
Noise = 0;
for cnt = 0 to Period-1
{
Noise = Noise + abs(CC[cnt]-CC[cnt+1]);
}
efRatio = Signal / Noise;
Smooth = Power(efRatio * (Fastest - Slowest) + Slowest, 2);
AMA = AMA1 + Smooth * (CC[0] - AMA1);
MessageLog("%.10f",ama1);
}
else
AMA = C;
plot1(AMA);
}
즐거운 하루되세요
> 해암 님이 쓴 글입니다.
> 제목 : 문의드립니다.
> 선물차트 기준으로 문의드립니다.
2분봉차트의 적합이동평균 90선을 틱차트에 나타내고 싶습니다.
분봉차트의 시간값과 적합이동평균의 기간값은 수정가능하게 부탁드립니다.
항상 감사드립니다. 수고하세요!!!