커뮤니티
제가 부탁한 수식이...
2016-03-02 16:50:18
136
글번호 95942
46685번 과 46684 수식부탁드린게 이평선이 5개가 나오는대 6개가 표시되게 부탁드려요
즉,5-10-20-60-120-240 이평선이 표시되게 부탁드립니다.
감사합니다
답변 1
예스스탁 예스스탁 답변
2016-03-02 18:29:56
안녕하세요
예스스탁입니다.
1. 주봉
input : P1(5),P2(10),P3(20),P4(60),P5(120),P6(240);
var : cnt(0),count(0);
var : sum1(0),sum2(0),sum3(0),sum4(0),sum5(0),sum6(0);
var : mav1(0),mav2(0),mav3(0),mav4(0),mav5(0),mav6(0);
Array : CC[300](0);
if DayOfWeek(sdate) < DayOfWeek(sdate[1]) Then{
for cnt = 1 to 299{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[P1-1] > 0 Then{
sum1 = 0;
for count = 0 to P1-1{
sum1 = sum1+CC[count];
}
mav1 = sum1/P1;
plot1(mav1,"P2이평");
}
if CC[P2-1] > 0 Then{
sum2 = 0;
for count = 0 to P2-1{
sum2 = sum2+CC[count];
}
mav2 = sum2/P2;
plot2(mav2,"P2이평");
}
if CC[P3-1] > 0 Then{
sum3 = 0;
for count = 0 to P3-1{
sum3 = sum3+CC[count];
}
mav3 = sum3/P3;
plot3(mav3,"P3이평");
}
if CC[P4-1] > 0 Then{
sum4 = 0;
for count = 0 to P4-1{
sum4 = sum4+CC[count];
}
mav4 = sum4/P4;
plot4(mav4,"P4이평");
}
if CC[P5-1] > 0 Then{
sum5 = 0;
for count = 0 to P5-1{
sum5 = sum5+CC[count];
}
mav5 = sum5/P5;
plot5(mav5,"P5이평");
}
if CC[P6-1] > 0 Then{
sum6 = 0;
for count = 0 to P6-1{
sum6 = sum6+CC[count];
}
mav6 = sum6/P6;
plot6(mav6,"P6이평");
}
2. 월봉
input : P1(5),P2(10),P3(20),P4(60),P5(120),P6(240);
var : cnt(0),count(0);
var : sum1(0),sum2(0),sum3(0),sum4(0),sum5(0),sum6(0);
var : mav1(0),mav2(0),mav3(0),mav4(0),mav5(0),mav6(0);
Array : CC[300](0);
if sdate > sdate[1]+30 Then{
for cnt = 1 to 299{
CC[cnt] = CC[cnt-1][1];
}
}
CC[0] = C;
if CC[P1-1] > 0 Then{
sum1 = 0;
for count = 0 to P1-1{
sum1 = sum1+CC[count];
}
mav1 = sum1/P1;
plot1(mav1,"P2이평");
}
if CC[P2-1] > 0 Then{
sum2 = 0;
for count = 0 to P2-1{
sum2 = sum2+CC[count];
}
mav2 = sum2/P2;
plot2(mav2,"P2이평");
}
if CC[P3-1] > 0 Then{
sum3 = 0;
for count = 0 to P3-1{
sum3 = sum3+CC[count];
}
mav3 = sum3/P3;
plot3(mav3,"P3이평");
}
if CC[P4-1] > 0 Then{
sum4 = 0;
for count = 0 to P4-1{
sum4 = sum4+CC[count];
}
mav4 = sum4/P4;
plot4(mav4,"P4이평");
}
if CC[P5-1] > 0 Then{
sum5 = 0;
for count = 0 to P5-1{
sum5 = sum5+CC[count];
}
mav5 = sum5/P5;
plot5(mav5,"P5이평");
}
if CC[P6-1] > 0 Then{
sum6 = 0;
for count = 0 to P6-1{
sum6 = sum6+CC[count];
}
mav6 = sum6/P6;
plot6(mav6,"P6이평");
}
즐거운 하루되세요
> 앙이 님이 쓴 글입니다.
> 제목 : 제가 부탁한 수식이...
> 46685번 과 46684 수식부탁드린게 이평선이 5개가 나오는대 6개가 표시되게 부탁드려요
즉,5-10-20-60-120-240 이평선이 표시되게 부탁드립니다.
감사합니다
이전글