커뮤니티
문의
2024-03-29 10:12:34
911
글번호 178084
아래는 타주기분(30) 이평 지표인데 타주기분(60)도 같이 묶어서 지표 하나로 가능할까요?
서로 다른 주기의 이평선끼리 색상 채우기 기능을 사용하고 싶어서요.
input : 타주기분(30),P1(5),P2(20),P3(60),P4(120),P5(120),P6(300);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : sum1(0),mav1(0);
var : sum2(0),mav2(0);
var : sum3(0),mav3(0);
var : sum4(0),mav4(0);
var : sum5(0),mav5(0);
var : sum6(0),mav6(0);
Array : C1[400](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%타주기분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 타주기분 > 1 and TM >= TM[1]+타주기분) or
(Bdate == Bdate[1] and 타주기분 == 1 and TM > TM[1]) Then
{
for cnt = 1 to 399
{
C1[cnt] = C1[cnt-1][1];
}
}
C1[0] = C;
if C1[P1-1] > 0 then
{
sum1 = 0;
for cnt = 0 to P1-1
{
sum1 = sum1+C1[cnt];
}
mav1 = sum1/P1;
plot1(mav1,"이평1");
}
if C1[P2-1] > 0 then
{
sum2 = 0;
for cnt = 0 to P2-1
{
sum2 = sum2+C1[cnt];
}
mav2 = sum2/P2;
plot2(mav2,"이평2");
}
if C1[P3-1] > 0 then
{
sum3 = 0;
for cnt = 0 to P3-1
{
sum3 = sum3+C1[cnt];
}
mav3 = sum3/P3;
plot3(mav3,"이평3");
}
if C1[P4-1] > 0 then
{
sum4 = 0;
for cnt = 0 to P4-1
{
sum4 = sum4+C1[cnt];
}
mav4 = sum4/P4;
plot4(mav4,"이평4");
}
if C1[P5-1] > 0 then
{
sum5 = 0;
for cnt = 0 to P5-1
{
sum5 = sum5+C1[cnt];
}
mav5 = sum5/P5;
plot5(mav5,"이평5");
}
if C1[P6-1] > 0 then
{
sum6 = 0;
for cnt = 0 to P6-1
{
sum6 = sum6+C1[cnt];
}
mav6 = sum6/P6;
plot6(mav6,"이평6");
}
}
답변 1
예스스탁 예스스탁 답변
2024-04-01 14:05:51
안녕하세요
예스스탁입니다.
input : 타주기분1(30), 타주기분2(60),P1(5),P2(20),P3(60),P4(120),P5(120),P6(300);
var : S1(0),D1(0),TM(0),TF1(0),TF2(0),cnt(0);
var : sum1(0),mav1(0);
var : sum2(0),mav2(0);
var : sum3(0),mav3(0);
var : sum4(0),mav4(0);
var : sum5(0),mav5(0);
var : sum6(0),mav6(0);
var : accum1(0),avg1(0);
var : accum2(0),avg2(0);
var : accum3(0),avg3(0);
var : accum4(0),avg4(0);
var : accum5(0),avg5(0);
var : accum6(0),avg6(0);
Array : C1[400](0),c2[400](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;
TF1 = TM%타주기분1;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분1 > 1 and TF1 < TF1[1]) or
(Bdate == Bdate[1] and 타주기분1 > 1 and TM >= TM[1]+타주기분1) or
(Bdate == Bdate[1] and 타주기분1 == 1 and TM > TM[1]) Then
{
for cnt = 399 downto 1
{
C1[cnt] = C1[cnt-1];
}
}
C1[0] = C;
if C1[P1-1] > 0 then
{
sum1 = 0;
for cnt = 0 to P1-1
{
sum1 = sum1+C1[cnt];
}
mav1 = sum1/P1;
plot1(mav1,"타주기분1이평1");
}
if C1[P2-1] > 0 then
{
sum2 = 0;
for cnt = 0 to P2-1
{
sum2 = sum2+C1[cnt];
}
mav2 = sum2/P2;
plot2(mav2,"타주기분1이평2");
}
if C1[P3-1] > 0 then
{
sum3 = 0;
for cnt = 0 to P3-1
{
sum3 = sum3+C1[cnt];
}
mav3 = sum3/P3;
plot3(mav3,"타주기분1이평3");
}
if C1[P4-1] > 0 then
{
sum4 = 0;
for cnt = 0 to P4-1
{
sum4 = sum4+C1[cnt];
}
mav4 = sum4/P4;
plot4(mav4,"타주기분1이평4");
}
if C1[P5-1] > 0 then
{
sum5 = 0;
for cnt = 0 to P5-1
{
sum5 = sum5+C1[cnt];
}
mav5 = sum5/P5;
plot5(mav5,"타주기분1이평5");
}
if C1[P6-1] > 0 then
{
sum6 = 0;
for cnt = 0 to P6-1
{
sum6 = sum6+C1[cnt];
}
mav6 = sum6/P6;
plot6(mav6,"타주기분1이평6");
}
TF2 = TM%타주기분2;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분2 > 1 and TF2 < TF2[1]) or
(Bdate == Bdate[1] and 타주기분2 > 1 and TM >= TM[1]+타주기분2) or
(Bdate == Bdate[1] and 타주기분2 == 1 and TM > TM[1]) Then
{
for cnt = 399 downto 1
{
C2[cnt] = C2[cnt-1];
}
}
C2[0] = C;
if C2[P1-1] > 0 then
{
accum1 = 0;
for cnt = 0 to P1-1
{
accum1 = accum1+C2[cnt];
}
avg1 = accum1/P1;
plot7(avg1,"타주기분2이평1");
}
if C2[P2-1] > 0 then
{
accum2 = 0;
for cnt = 0 to P2-1
{
accum2 = accum2+C2[cnt];
}
avg2 = accum2/P2;
plot8(avg2,"타주기분2이평2");
}
if C2[P3-1] > 0 then
{
accum3 = 0;
for cnt = 0 to P3-1
{
accum3 = accum3+C2[cnt];
}
avg3 = accum3/P3;
plot9(avg3,"타주기분2이평3");
}
if C2[P4-1] > 0 then
{
accum4 = 0;
for cnt = 0 to P4-1
{
accum4 = accum4+C2[cnt];
}
avg4 = accum4/P4;
plot10(avg4,"타주기분2이평4");
}
if C2[P5-1] > 0 then
{
accum5 = 0;
for cnt = 0 to P5-1
{
accum5 = accum5+C2[cnt];
}
avg5 = accum5/P5;
plot11(avg5,"타주기분2이평5");
}
if C2[P6-1] > 0 then
{
accum6 = 0;
for cnt = 0 to P6-1
{
accum6 = accum6+C2[cnt];
}
avg6 = accum6/P6;
plot12(avg6,"타주기분2이평6");
}
}
즐거운 하루되세요
> 육각수 님이 쓴 글입니다.
> 제목 : 문의
> 아래는 타주기분(30) 이평 지표인데 타주기분(60)도 같이 묶어서 지표 하나로 가능할까요?
서로 다른 주기의 이평선끼리 색상 채우기 기능을 사용하고 싶어서요.
input : 타주기분(30),P1(5),P2(20),P3(60),P4(120),P5(120),P6(300);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : sum1(0),mav1(0);
var : sum2(0),mav2(0);
var : sum3(0),mav3(0);
var : sum4(0),mav4(0);
var : sum5(0),mav5(0);
var : sum6(0),mav6(0);
Array : C1[400](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%타주기분;
if Bdate != Bdate[1] or
(Bdate == Bdate[1] and 타주기분 > 1 and TF < TF[1]) or
(Bdate == Bdate[1] and 타주기분 > 1 and TM >= TM[1]+타주기분) or
(Bdate == Bdate[1] and 타주기분 == 1 and TM > TM[1]) Then
{
for cnt = 1 to 399
{
C1[cnt] = C1[cnt-1][1];
}
}
C1[0] = C;
if C1[P1-1] > 0 then
{
sum1 = 0;
for cnt = 0 to P1-1
{
sum1 = sum1+C1[cnt];
}
mav1 = sum1/P1;
plot1(mav1,"이평1");
}
if C1[P2-1] > 0 then
{
sum2 = 0;
for cnt = 0 to P2-1
{
sum2 = sum2+C1[cnt];
}
mav2 = sum2/P2;
plot2(mav2,"이평2");
}
if C1[P3-1] > 0 then
{
sum3 = 0;
for cnt = 0 to P3-1
{
sum3 = sum3+C1[cnt];
}
mav3 = sum3/P3;
plot3(mav3,"이평3");
}
if C1[P4-1] > 0 then
{
sum4 = 0;
for cnt = 0 to P4-1
{
sum4 = sum4+C1[cnt];
}
mav4 = sum4/P4;
plot4(mav4,"이평4");
}
if C1[P5-1] > 0 then
{
sum5 = 0;
for cnt = 0 to P5-1
{
sum5 = sum5+C1[cnt];
}
mav5 = sum5/P5;
plot5(mav5,"이평5");
}
if C1[P6-1] > 0 then
{
sum6 = 0;
for cnt = 0 to P6-1
{
sum6 = sum6+C1[cnt];
}
mav6 = sum6/P6;
plot6(mav6,"이평6");
}
}