커뮤니티
수식좀 만들어주세요
2010-04-07 21:55:53
657
글번호 29211
수식좀 만들어주세요
30분챠트에서 60,50,40, 이평선이 역배열이고
20 분챠트에서 60,50,40, 이평선이 역배열이고
10 분챠트에서 60,50,40, 이평선이 역배열 일때
스토케스틱(10,6,6)이 골든크로스 시 진입하는시스템식좀부탁드립니다
답변 2
예스스탁 예스스탁 답변
2010-04-08 11:34:59
안녕하세요
예스스탁입니다.
Input : Period(12), Period1(5), Period2(5);
input : Atime1(30),Atime2(20),P1(40),P2(50),P3(60);
var : cnt1(0),count1(0),sum1(0),mav1(0),sum2(0),mav2(0),sum3(0),mav3(0);
var : cnt2(0),count2(0),sum11(0),mav11(0),sum22(0),mav22(0),sum33(0),mav33(0);
Array : CC1[100](0),CC2[100](0);
value1 = StochasticsK(Period,Period1);
value2 = StochasticsD(Period,Period1,Period2);
var1 = TimeToMinutes(stime)%Atime1;
var2 = TimeToMinutes(stime)%Atime2;
if dayindex == 0 or var1 <= var1[1] Then{
CC1[1] = C[1];
for cnt1 = 2 to 90{
CC1[cnt1] = CC1[cnt1-1][1];
}
sum1 = 0;
sum2 = 0;
sum3 = 0;
for count1 = 1 to P3{
if count1 < P1 Then
sum1 = sum1+CC1[count1];
if count1 < P2 Then
sum2 = sum2+CC1[count1];
if count1 < P3 Then
sum3 = sum3+CC1[count1];
}
}
if dayindex == 0 or var2 <= var2[1] Then{
CC2[1] = C[1];
for cnt2 = 2 to 90{
CC2[cnt2] = CC2[cnt2-1][1];
}
sum11 = 0;
sum22 = 0;
sum33 = 0;
for count2 = 1 to P3{
if count2 < P1 Then
sum11 = sum11+CC2[count2];
if count2 < P2 Then
sum22 = sum22+CC2[count2];
if count2 < P3 Then
sum33 = sum33+CC2[count2];
}
}
mav1 = (C+sum1)/P1;
mav2 = (C+sum2)/P2;
mav3 = (C+sum3)/P3;
mav11 = (C+sum11)/P1;
mav22 = (C+sum22)/P2;
mav33 = (C+sum33)/P3;
if mav1 < mav2 and mav2 < mav3 and mav11 < mav22 and mav22 < mav33 and
ma(c,40) < ma(c,50) and ma(C,50) < ma(C,60) and crossup(value1,value2) Then
buy();
사용되는 주기보다 낮은 주기의 어떤 값은 구할 수 없으므로
10분봉에 적용하셔야 합니다.
즐거운 하루되세요
> HI_coco 님이 쓴 글입니다.
> 제목 : 수식좀 만들어주세요
> 수식좀 만들어주세요
30분챠트에서 60,50,40, 이평선이 역배열이고
20 분챠트에서 60,50,40, 이평선이 역배열이고
10 분챠트에서 60,50,40, 이평선이 역배열 일때
스토케스틱(10,6,6)이 골든크로스 시 진입하는시스템식좀부탁드립니다
회원
2010-04-08 23:06:31
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 수식좀 만들어주세요
> 안녕하세요
예스스탁입니다.
Input : Period(12), Period1(5), Period2(5);
input : Atime1(30),Atime2(20),P1(40),P2(50),P3(60);
var : cnt1(0),count1(0),sum1(0),mav1(0),sum2(0),mav2(0),sum3(0),mav3(0);
var : cnt2(0),count2(0),sum11(0),mav11(0),sum22(0),mav22(0),sum33(0),mav33(0);
Array : CC1[100](0),CC2[100](0);
value1 = StochasticsK(Period,Period1);
value2 = StochasticsD(Period,Period1,Period2);
var1 = TimeToMinutes(stime)%Atime1;
var2 = TimeToMinutes(stime)%Atime2;
if dayindex == 0 or var1 <= var1[1] Then{
CC1[1] = C[1];
for cnt1 = 2 to 90{
CC1[cnt1] = CC1[cnt1-1][1];
}
sum1 = 0;
sum2 = 0;
sum3 = 0;
for count1 = 1 to P3{
if count1 < P1 Then
sum1 = sum1+CC1[count1];
if count1 < P2 Then
sum2 = sum2+CC1[count1];
if count1 < P3 Then
sum3 = sum3+CC1[count1];
}
}
if dayindex == 0 or var2 <= var2[1] Then{
CC2[1] = C[1];
for cnt2 = 2 to 90{
CC2[cnt2] = CC2[cnt2-1][1];
}
sum11 = 0;
sum22 = 0;
sum33 = 0;
for count2 = 1 to P3{
if count2 < P1 Then
sum11 = sum11+CC2[count2];
if count2 < P2 Then
sum22 = sum22+CC2[count2];
if count2 < P3 Then
sum33 = sum33+CC2[count2];
}
}
mav1 = (C+sum1)/P1;
mav2 = (C+sum2)/P2;
mav3 = (C+sum3)/P3;
mav11 = (C+sum11)/P1;
mav22 = (C+sum22)/P2;
mav33 = (C+sum33)/P3;
if mav1 < mav2 and mav2 < mav3 and mav11 < mav22 and mav22 < mav33 and
ma(c,40) < ma(c,50) and ma(C,50) < ma(C,60) and crossup(value1,value2) Then
buy();
사용되는 주기보다 낮은 주기의 어떤 값은 구할 수 없으므로
10분봉에 적용하셔야 합니다.
즐거운 하루되세요
> HI_coco 님이 쓴 글입니다.
> 제목 : 수식좀 만들어주세요
> 수식좀 만들어주세요
30분챠트에서 60,50,40, 이평선이 역배열이고
20 분챠트에서 60,50,40, 이평선이 역배열이고
10 분챠트에서 60,50,40, 이평선이 역배열 일때
스토케스틱(10,6,6)이 골든크로스 시 진입하는시스템식좀부탁드립니다