커뮤니티
문의드립니다.
2017-10-24 12:08:03
102
글번호 113575
아래에 만들어진 선을 a라 할때,
1.단순이평 20선과 비교하여, 단순이평 20선이 a선보다 위에 있으면 차트화면에 세로로 분홍색채우기를 하고, 밑에 있으면 세로로 파란색으로 채우기를 하고자 합니다.
수식을 어떻게 작성해야 하는지요?
2.위 1처럼 삼각가중평균 30선과 a선을 비교하여 세로로 채우기를 하고자 합니다.
3. 위 1처럼 지수이평 100선과 a선을 비교해여 세로로 채우기를 하고자 합니다.
수식을 부탁드립니다. (기간값은 수정가능하게 부탁드립니다.)
===== 아래 ===========
Input : Length1(5);
Var : TF(0),TLen1(0),cnt(0),sum(0),sum1(0),Tma(0);
Array : CC[100](0),mav[100](0);
TLen1 = Ceiling((Length1 + 1) * .5);
TF = TimeToMinutes(stime)%1.2;
if bdate != Bdate[1] or (bdate == bdate[1] and TF < TF[1]) Then{
for cnt = 1 to 99{
CC[cnt] = CC[cnt-1][1];
mav[cnt] = mav[cnt-1][1];
}
}
CC[0] = C;
if CC[Tlen1] > 0 then{
sum = 0;
for cnt = 0 to TLen1-1{
sum = sum + CC[cnt];
}
mav[0] = sum/Tlen1;
}
if mav[Tlen1] > 0 then{
sum1 = 0;
for cnt = 0 to TLen1-1{
sum1 = sum1 + mav[cnt];
}
Tma = sum1/Tlen1;
plot1(Tma);
}
답변 1
예스스탁 예스스탁 답변
2017-10-24 15:14:53
안녕하세요
예스스탁입니다.
1.
Input : Length1(5),P(20);
Var : TF(0),TLen1(0),cnt(0),sum(0),sum1(0),Tma(0),T(0),vv(0);
Array : CC[100](0),mav[100](0);
vv = ma(c,P);
TLen1 = Ceiling((Length1 + 1) * .5);
TF = TimeToMinutes(stime)%1.2;
if bdate != Bdate[1] or (bdate == bdate[1] and TF < TF[1]) Then{
for cnt = 1 to 99{
CC[cnt] = CC[cnt-1][1];
mav[cnt] = mav[cnt-1][1];
}
}
CC[0] = C;
if CC[Tlen1] > 0 then{
sum = 0;
for cnt = 0 to TLen1-1{
sum = sum + CC[cnt];
}
mav[0] = sum/Tlen1;
}
if mav[Tlen1] > 0 then{
sum1 = 0;
for cnt = 0 to TLen1-1{
sum1 = sum1 + mav[cnt];
}
Tma = sum1/Tlen1;
if vv > tma then{
plot1(999999999,"라인1");
plot2(0,"라인2");
}
else{
plot1(0,"라인1");
plot2(999999999,"라인2");
}
}
2
Input : Length1(5),P(30);
Var : TF(0),TLen1(0),cnt(0),sum(0),sum1(0),Tma(0),T(0),vv(0),T1(0);
Array : CC[100](0),mav[100](0);
T1 = Ceiling((P + 1) * .5);
vv = ma(ma(C, T1), T1);
TLen1 = Ceiling((Length1 + 1) * .5);
TF = TimeToMinutes(stime)%1.2;
if bdate != Bdate[1] or (bdate == bdate[1] and TF < TF[1]) Then{
for cnt = 1 to 99{
CC[cnt] = CC[cnt-1][1];
mav[cnt] = mav[cnt-1][1];
}
}
CC[0] = C;
if CC[Tlen1] > 0 then{
sum = 0;
for cnt = 0 to TLen1-1{
sum = sum + CC[cnt];
}
mav[0] = sum/Tlen1;
}
if mav[Tlen1] > 0 then{
sum1 = 0;
for cnt = 0 to TLen1-1{
sum1 = sum1 + mav[cnt];
}
Tma = sum1/Tlen1;
if vv > tma then{
plot1(999999999,"라인1");
plot2(0,"라인2");
}
else{
plot1(0,"라인1");
plot2(999999999,"라인2");
}
}
3
Input : Length1(5),P(100);
Var : TF(0),TLen1(0),cnt(0),sum(0),sum1(0),Tma(0),T(0),vv(0);
Array : CC[100](0),mav[100](0);
vv = ema(c,P);
TLen1 = Ceiling((Length1 + 1) * .5);
TF = TimeToMinutes(stime)%1.2;
if bdate != Bdate[1] or (bdate == bdate[1] and TF < TF[1]) Then{
for cnt = 1 to 99{
CC[cnt] = CC[cnt-1][1];
mav[cnt] = mav[cnt-1][1];
}
}
CC[0] = C;
if CC[Tlen1] > 0 then{
sum = 0;
for cnt = 0 to TLen1-1{
sum = sum + CC[cnt];
}
mav[0] = sum/Tlen1;
}
if mav[Tlen1] > 0 then{
sum1 = 0;
for cnt = 0 to TLen1-1{
sum1 = sum1 + mav[cnt];
}
Tma = sum1/Tlen1;
if vv > tma then{
plot1(999999999,"라인1");
plot2(0,"라인2");
}
else{
plot1(0,"라인1");
plot2(999999999,"라인2");
}
}
즐거운 하루되세요
> 해암 님이 쓴 글입니다.
> 제목 : 문의드립니다.
> 아래에 만들어진 선을 a라 할때,
1.단순이평 20선과 비교하여, 단순이평 20선이 a선보다 위에 있으면 차트화면에 세로로 분홍색채우기를 하고, 밑에 있으면 세로로 파란색으로 채우기를 하고자 합니다.
수식을 어떻게 작성해야 하는지요?
2.위 1처럼 삼각가중평균 30선과 a선을 비교하여 세로로 채우기를 하고자 합니다.
3. 위 1처럼 지수이평 100선과 a선을 비교해여 세로로 채우기를 하고자 합니다.
수식을 부탁드립니다. (기간값은 수정가능하게 부탁드립니다.)
===== 아래 ===========
Input : Length1(5);
Var : TF(0),TLen1(0),cnt(0),sum(0),sum1(0),Tma(0);
Array : CC[100](0),mav[100](0);
TLen1 = Ceiling((Length1 + 1) * .5);
TF = TimeToMinutes(stime)%1.2;
if bdate != Bdate[1] or (bdate == bdate[1] and TF < TF[1]) Then{
for cnt = 1 to 99{
CC[cnt] = CC[cnt-1][1];
mav[cnt] = mav[cnt-1][1];
}
}
CC[0] = C;
if CC[Tlen1] > 0 then{
sum = 0;
for cnt = 0 to TLen1-1{
sum = sum + CC[cnt];
}
mav[0] = sum/Tlen1;
}
if mav[Tlen1] > 0 then{
sum1 = 0;
for cnt = 0 to TLen1-1{
sum1 = sum1 + mav[cnt];
}
Tma = sum1/Tlen1;
plot1(Tma);
}