커뮤니티
감사드립니다
2013-09-03 14:11:27
102
글번호 67127
32252 문의에서...
지표로.. 이평선 보이께끔.. 차트서 볼수있게 분봉이평들 나오게해주시는 수식하고여
옵션에서 32252 답변아래 부탁 다시함 드렸습니다.. 시스템으로 신호 나올수있게하는여..
그리고 삼오일 이평 전일 기준으로 하는걸 차트 돌려떠니.. 캔들은 안나오고 선만 나와여.. 에러인건지..제가 넘 몰라도 아무것도 모르는건지 ㅠ.ㅠ
잘부탁드립니다
답변 1
예스스탁 예스스탁 답변
2013-09-03 15:31:01
안녕하세요
예스스탁입니다.
이전의 수식에 빠진 부분이 있어 전체 다시 올려드립니다.
분봉이평선도 아래 같이 올려드립니다.
일봉이평도 아래식 다시 적용하시면 됩니다.
식상 다른값을 출력하게 작성이 되어 있었습니다.
1. 시스템
var : T1(0),T2(0),T3(0),T4(0),T5(0),T6(0),cnt(0);
var : sum1(0),mav1(0),sum2(0),mav2(0),sum3(0),mav3(0),sum4(0),mav4(0);
var : sum5(0),mav5(0),sum6(0),mav6(0),sum7(0),mav7(0),sum44(0),mav44(0);
var : Dsum1(0),Dsum2(0),Dmav1(0),Dmav2(0);
Array : C1[50](0),C2[50](0),C3[50](0),C4[50](0),C5[50](0),C6[50](0);
if date != date[1] Then
value1 = TimeToMinutes(stime);
T1 = TimeToMinutes(stime)%20;
T2 = TimeToMinutes(stime)%30;
T3 = TimeToMinutes(stime)%60;
T4 = TimeToMinutes(stime)%90;
T5 = (TimeToMinutes(stime)-value1)%120;
T6 = (TimeToMinutes(stime)-value1)%240;
if dayindex == 0 or T1 < T1[1] Then{
for cnt = 1 to 49{
C1[cnt] = C1[cnt-1][1];
}
}
C1[0] = C;
if dayindex == 0 or T2 < T2[1] Then{
for cnt = 1 to 49{
C2[cnt] = C2[cnt-1][1];
}
}
C2[0] = C;
if dayindex == 0 or T3 < T3[1] Then{
for cnt = 1 to 49{
C3[cnt] = C3[cnt-1][1];
}
}
C3[0] = C;
if dayindex == 0 or T4 < T4[1] Then{
for cnt = 1 to 49{
C4[cnt] = C4[cnt-1][1];
}
}
C4[0] = C;
if dayindex == 0 or T5 < T5[1] Then{
for cnt = 1 to 49{
C5[cnt] = C5[cnt-1][1];
}
}
C5[0] = C;
if dayindex == 0 or T6 < T6[1] Then{
for cnt = 1 to 49{
C6[cnt] = C6[cnt-1][1];
}
}
C6[0] = C;
//일봉 3이평
Dsum1 = 0;
for cnt = 0 to 2{
Dsum1 = Dsum1+DayClose(cnt);
}
DmaV1 = Dsum1 / 3;
//일봉 5이평
Dsum2 = 0;
for cnt = 0 to 4{
Dsum2 = Dsum2+DayClose(cnt);
}
DmaV2 = Dsum2 / 5;
//분봉이평
mav1 = ma(C,5);//5분봉 5이평
if C6[5] > 0 Then{
sum2 = 0;
sum3 = 0;
sum4 = 0;
sum5 = 0;
sum6 = 0;
sum7 = 0;
for cnt = 0 to 4{
sum2 = sum2 + C1[cnt];
sum3 = sum3 + C2[cnt];
sum4 = sum4 + C3[cnt];
sum5 = sum5 + C4[cnt];
sum6 = sum6 + C5[cnt];
sum7 = sum7 + C6[cnt];
}
mav2 = sum2/5;//20분봉 5이평
mav3 = sum3/5;//30분봉 5이평
mav4 = sum4/5;//60분봉 5이평
mav5 = sum5/5;//90분봉 5이평
mav6 = sum6/5;//120분봉 5이평
mav7 = sum7/5;//240분봉 5이평
sum44 = 0;
for cnt = 0 to 19{
sum44 = sum44 + C3[cnt];
}
mav44 = sum44/20;//60분봉 20이평
var1 = max(mav1,mav2,mav3,mav4,mav4,mav6,mav7);
var2 = min(mav1,mav2,mav3,mav4,mav4,mav6,mav7);
if var1 >= var2+0.5 and var1 <= var2+1.5 Then{
if crossup(c,mav4) Then
buy();
if crossup(mav4,Dmav1) or crossup(mav4,Dmav2) and
crossup(mav44,Dmav1) or crossup(mav44,Dmav2) Then
sell();
if CrossDown(c,mav7) or CrossDown(C,mav6) or CrossDown(c,mav5) Then
sell();
if CrossDown(mav4,Dmav1) or CrossDown(mav4,Dmav2) and
CrossDown(mav44,Dmav1) or CrossDown(mav44,Dmav2) Then
sell();
}
}
2. 아래식 검색식으로 작성해 차트에 적용하시면
수렴된 봉에 점을 찍어 표시합니다.
var : T1(0),T2(0),T3(0),T4(0),T5(0),T6(0),cnt(0);
var : sum1(0),mav1(0),sum2(0),mav2(0),sum3(0),mav3(0),sum4(0),mav4(0);
var : sum5(0),mav5(0),sum6(0),mav6(0),sum7(0),mav7(0),sum44(0),mav44(0);
var : Dsum1(0),Dsum2(0),Dmav1(0),Dmav2(0);
Array : C1[50](0),C2[50](0),C3[50](0),C4[50](0),C5[50](0),C6[50](0);
if date != date[1] Then
value1 = TimeToMinutes(stime);
T1 = TimeToMinutes(stime)%20;
T2 = TimeToMinutes(stime)%30;
T3 = TimeToMinutes(stime)%60;
T4 = TimeToMinutes(stime)%90;
T5 = (TimeToMinutes(stime)-value1)%120;
T6 = (TimeToMinutes(stime)-value1)%240;
if dayindex == 0 or T1 < T1[1] Then{
for cnt = 1 to 49{
C1[cnt] = C1[cnt-1][1];
}
}
C1[0] = C;
if dayindex == 0 or T2 < T2[1] Then{
for cnt = 1 to 49{
C2[cnt] = C2[cnt-1][1];
}
}
C2[0] = C;
if dayindex == 0 or T3 < T3[1] Then{
for cnt = 1 to 49{
C3[cnt] = C3[cnt-1][1];
}
}
C3[0] = C;
if dayindex == 0 or T4 < T4[1] Then{
for cnt = 1 to 49{
C4[cnt] = C4[cnt-1][1];
}
}
C4[0] = C;
if dayindex == 0 or T5 < T5[1] Then{
for cnt = 1 to 49{
C5[cnt] = C5[cnt-1][1];
}
}
C5[0] = C;
if dayindex == 0 or T6 < T6[1] Then{
for cnt = 1 to 49{
C6[cnt] = C6[cnt-1][1];
}
}
C6[0] = C;
//일봉 3이평
Dsum1 = 0;
for cnt = 0 to 2{
Dsum1 = Dsum1+DayClose(cnt);
}
DmaV1 = Dsum1 / 3;
//일봉 5이평
Dsum2 = 0;
for cnt = 0 to 4{
Dsum2 = Dsum2+DayClose(cnt);
}
DmaV2 = Dsum2 / 5;
//분봉이평
mav1 = ma(C,5);//5분봉 5이평
if C6[5] > 0 Then{
sum2 = 0;
sum3 = 0;
sum4 = 0;
sum5 = 0;
sum6 = 0;
sum7 = 0;
for cnt = 0 to 4{
sum2 = sum2 + C1[cnt];
sum3 = sum3 + C2[cnt];
sum4 = sum4 + C3[cnt];
sum5 = sum5 + C4[cnt];
sum6 = sum6 + C5[cnt];
sum7 = sum7 + C6[cnt];
}
mav2 = sum2/5;//20분봉 5이평
mav3 = sum3/5;//30분봉 5이평
mav4 = sum4/5;//60분봉 5이평
mav5 = sum5/5;//90분봉 5이평
mav6 = sum6/5;//120분봉 5이평
mav7 = sum7/5;//240분봉 5이평
sum44 = 0;
for cnt = 0 to 19{
sum44 = sum44 + C3[cnt];
}
mav44 = sum44/20;//60분봉 20이평
var1 = max(mav1,mav2,mav3,mav4,mav4,mav6,mav7);
var2 = min(mav1,mav2,mav3,mav4,mav4,mav6,mav7);
if var1 >= var2+0.5 and var1 <= var2+1.5 Then
plot1(H);
}
3.
수식은 현재봉 값으로 이전에 그릴수 없으므로
현재봉값으로 당일 수평선으로 그리게 할수는 없습니다.
첨부하신 그림은 일봉이평을 그리는데 전일값을 당일 그리는것 같습니다.
아래식은 전일기준 일봉이평을 당일그리는 식입니다.
아래내용이 아니면 다른 방법이 없습니다.
var : cnt(0),Dsum1(0),Dsum2(0),Dmav1(0),Dmav2(0),Dsum3(0),Dmav3(0);
//일봉 3이평
Dsum1 = 0;
for cnt = 1 to 3{
Dsum1 = Dsum1+DayClose(cnt);
}
DmaV1 = Dsum1 / 3;
//일봉 5이평
Dsum2 = 0;
for cnt = 1 to 5{
Dsum2 = Dsum2+DayClose(cnt);
}
DmaV2 = Dsum2 / 5;
//일봉 5이평
Dsum3 = 0;
for cnt = 1 to 20{
Dsum3 = Dsum3+DayClose(cnt);
}
DmaV3 = Dsum3 / 20;
plot1(DmaV1);
plot2(DmaV2);
plot3(DmaV3);
4. 분봉이평선 지표식
var : T1(0),T2(0),T3(0),T4(0),T5(0),T6(0),cnt(0);
var : sum1(0),mav1(0),sum2(0),mav2(0),sum3(0),mav3(0),sum4(0),mav4(0);
var : sum5(0),mav5(0),sum6(0),mav6(0),sum7(0),mav7(0),sum44(0),mav44(0);
var : Dsum1(0),Dsum2(0),Dmav1(0),Dmav2(0);
Array : C1[50](0),C2[50](0),C3[50](0),C4[50](0),C5[50](0),C6[50](0);
if date != date[1] Then
value1 = TimeToMinutes(stime);
T1 = TimeToMinutes(stime)%20;
T2 = TimeToMinutes(stime)%30;
T3 = TimeToMinutes(stime)%60;
T4 = TimeToMinutes(stime)%90;
T5 = (TimeToMinutes(stime)-value1)%120;
T6 = (TimeToMinutes(stime)-value1)%240;
if dayindex == 0 or T1 < T1[1] Then{
for cnt = 1 to 49{
C1[cnt] = C1[cnt-1][1];
}
}
C1[0] = C;
if dayindex == 0 or T2 < T2[1] Then{
for cnt = 1 to 49{
C2[cnt] = C2[cnt-1][1];
}
}
C2[0] = C;
if dayindex == 0 or T3 < T3[1] Then{
for cnt = 1 to 49{
C3[cnt] = C3[cnt-1][1];
}
}
C3[0] = C;
if dayindex == 0 or T4 < T4[1] Then{
for cnt = 1 to 49{
C4[cnt] = C4[cnt-1][1];
}
}
C4[0] = C;
if dayindex == 0 or T5 < T5[1] Then{
for cnt = 1 to 49{
C5[cnt] = C5[cnt-1][1];
}
}
C5[0] = C;
if dayindex == 0 or T6 < T6[1] Then{
for cnt = 1 to 49{
C6[cnt] = C6[cnt-1][1];
}
}
C6[0] = C;
//분봉이평
mav1 = ma(C,5);//5분봉 5이평
if C6[5] > 0 Then{
sum2 = 0;
sum3 = 0;
sum4 = 0;
sum5 = 0;
sum6 = 0;
sum7 = 0;
for cnt = 0 to 4{
sum2 = sum2 + C1[cnt];
sum3 = sum3 + C2[cnt];
sum4 = sum4 + C3[cnt];
sum5 = sum5 + C4[cnt];
sum6 = sum6 + C5[cnt];
sum7 = sum7 + C6[cnt];
}
mav2 = sum2/5;//20분봉 5이평
mav3 = sum3/5;//30분봉 5이평
mav4 = sum4/5;//60분봉 5이평
mav5 = sum5/5;//90분봉 5이평
mav6 = sum6/5;//120분봉 5이평
mav7 = sum7/5;//240분봉 5이평
sum44 = 0;
for cnt = 0 to 19{
sum44 = sum44 + C3[cnt];
}
mav44 = sum44/20;//60분봉 20이평
plot1(mav1);
plot2(mav2);
plot3(mav3);
plot4(mav4);
plot5(mav5);
plot6(mav6);
plot7(mav7);
}
즐거운 하루되세요
즐거운 하루되세요
> HI_hmp6678 님이 쓴 글입니다.
> 제목 : 감사드립니다
> 32252 문의에서...
지표로.. 이평선 보이께끔.. 차트서 볼수있게 분봉이평들 나오게해주시는 수식하고여
옵션에서 32252 답변아래 부탁 다시함 드렸습니다.. 시스템으로 신호 나올수있게하는여..
그리고 삼오일 이평 전일 기준으로 하는걸 차트 돌려떠니.. 캔들은 안나오고 선만 나와여.. 에러인건지..제가 넘 몰라도 아무것도 모르는건지 ㅠ.ㅠ
잘부탁드립니다
다음글
이전글