커뮤니티
삼각가중 Envelope
2020-06-12 19:14:26
2259
글번호 139814
항상 감사드립니다
1)_삼각가중이평을 이용해 Envelope 식을 만들고 싶습니다.
Input : Period(20), Percent(2);
var : center(0),UPline(0),DNline(0);
center = ma(C, Period);
UPline = EnvelopeUp(Period, Percent);
Dnline = EnvelopeDown(Period, Percent);
Plot1(center, "중앙선");
Plot2(UPline, "EnvelopeUp");
Plot3(Dnline, "EnvelopeDown");
2)_1)항에서 만들어진 삼각가중 엔벨로프식으로 타주기에 적용할수 있도록 변환 부탁드립니다.
감사합니다..
답변 1
예스스탁 예스스탁 답변
2020-06-15 10:33:03
안녕하세요
예스스탁입니다.
1
Input : Period(20), Percent(2);
var : TLen(0),center(0),UPline(0),DNline(0);
TLen = Ceiling((Period + 1) * .5);
center = ma(ma(C, TLen), TLen);
UPline = center*(1+Percent/100);
Dnline = center*(1-Percent/100);
Plot1(center, "중앙선");
Plot2(UPline, "EnvelopeUp");
Plot3(Dnline, "EnvelopeDown");
2.
input : ntime(30),Period(20),Percent(2);
var : S1(0),D1(0),TM(0),TF(0),cnt(0),TLen(0);
var : sum(0),center(0),UPline(0),Dnline(0);
Array : CC[100](0),Mav[100](0);
TLen = Ceiling((Period + 1) * .5);
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 ntime > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime) or
(Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then
{
for cnt = 1 to 99
{
CC[cnt] = CC[cnt-1][1];
mav[cnt] = mav[cnt-1][1];
}
}
CC[0] = C;
if CC[TLen] > 0 then
{
sum = 0;
for cnt = 0 to TLen-1
{
sum = sum+CC[cnt];
}
mav[0] = sum/TLen;
}
if mav[TLen] > 0 then
{
sum = 0;
for cnt = 0 to TLen-1
{
sum = sum+mav[cnt];
}
center = sum/TLen;
UPline = center*(1+Percent/100);
Dnline = center*(1-Percent/100);
Plot1(center, "중앙선");
Plot2(UPline, "EnvelopeUp");
Plot3(Dnline, "EnvelopeDown");
}
}
즐거운 하루되세요
> 조민철 님이 쓴 글입니다.
> 제목 : 삼각가중 Envelope
> 항상 감사드립니다
1)_삼각가중이평을 이용해 Envelope 식을 만들고 싶습니다.
Input : Period(20), Percent(2);
var : center(0),UPline(0),DNline(0);
center = ma(C, Period);
UPline = EnvelopeUp(Period, Percent);
Dnline = EnvelopeDown(Period, Percent);
Plot1(center, "중앙선");
Plot2(UPline, "EnvelopeUp");
Plot3(Dnline, "EnvelopeDown");
2)_1)항에서 만들어진 삼각가중 엔벨로프식으로 타주기에 적용할수 있도록 변환 부탁드립니다.
감사합니다..