커뮤니티
문의합니다
2019-03-09 12:46:01
162
글번호 126882
시스템 수식
input : ntime1(6),P(32);
var : S1(0),D1(0),TM(0),TF(0);
var : cnt(0),sum1(0),tmav1(0),tmav11(0),tmav12(0),tmav13(0);
Array : C1[500](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%ntime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
for cnt = 1 to 499
{
C1[cnt] = C1[cnt-1][1];
}
tmav11 = tmav1[1];
tmav12 = tmav11[1];
tmav13 = tmav12[1];
}
C1[0] = C;
if C1[P] > 0 then{
sum1 = 0;
for cnt = 0 to P-1{
sum1 = sum1+C1[cnt];
}
tmav1 = sum1/P;
if tmav13 < tmav12 and tmav12 < tmav11 and tmav11 < tmav1 and tmav13 > 0 Then
buy();
if tmav13 > tmav12 and tmav12 > tmav11 and tmav11 > tmav1 and tmav13 > 0 Then
sell();
}
}
지표수식
input : ntime1(20),P(20);
var : S1(0),D1(0),TM(0),TF(0);
var : cnt(0),sum1(0),mav1(0),mav11(0),mav12(0),mav13(0);
Array : C1[500](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%ntime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
for cnt = 1 to 499
{
C1[cnt] = C1[cnt-1][1];
}
mav11 = mav1[1];
mav12 = mav11[1];
mav13 = mav12[1];
}
C1[0] = C;
if C1[P] > 0 then{
sum1 = 0;
for cnt = 0 to P-1{
sum1 = sum1+C1[cnt];
}
mav1 = sum1/P;
plot1(mav1,"이평",iff(mav1 > mav11 and mav11 > mav12 and mav12 > mav13,red,BLUE));
}
}
1번 == 위 시스템 수식입니다
위 시스템 수식을 이용하여 6개 이평선을 이용할 수 있도록 시스템수식(매수매도)을 부탁합니다
예) input : ntime1(6),P(8),P(16),P(32),P(64),P(128),P(256);
예) 일반적으로 이평선 구하는 수식입니다
input : Period15(13),Period20(36),Period30(30),Period120(120),Period180(180),Period240(240);
var : mav15(0),mav20(0),mav30(0),mav120(0),mav180(0),mav240(0);
mav15 = ma(c, Period15);
mav20 = ma(c, Period20);
mav30 = ma(c, Period30);
mav120 = ma(c, Period120);
mav180 = ma(c, Period180);
mav240 = ma(c, Period240);
각 모든 이평선이 전봉 3개가 상승할 때 매수 진입하는 수식은 아래와 같이 표현합니다
mav15[3] < av15[2] and mav15[2] < mav15[1] and mav15[1] < mav15 and
mav20[3] < av20[2] and mav20[2] < mav20[1] and mav201] < mav20 and
mav30[3] < av30[2] and mav15[2] < mav15[1] and mav15[1] < mav15 and
mav120[3] < av120[2] and mav120[2] < mav120[1] and mav120[1] < mav120 and
mav180[3] < av180[2] and mav180[2] < mav180[1] and mav180[1] < mav180 and
mav240[3] < av240[2] and mav240[2] < mav240[1] and mav240[1] < mav240
---- 분봉 이평선을 틱봉에 적용하려면 어떤 수식이 필요하나요
(전봉 3개가 상승할 때 매수진입, 전봉 3개가 하락할 때 매도진입)
2번 == 위 지표수식을 이용하여 6개 이평선을 이용할 수 있도록 지료수식을 부탁합니다
예) input : ntime1(6),P(8),P(16),P(32),P(64),P(128),P(256);
감사합니다
답변 1
예스스탁 예스스탁 답변
2019-03-11 11:18:42
안녕하세요
예스스탁입니다.
1
input : ntime1(6),P1(8),P2(16),P3(32),P4(64),P5(128),P6(256);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : sum1(0),sum11(0),sum12(0),sum13(0),mav1(0),mav11(0),mav12(0),mav13(0);
var : sum2(0),sum21(0),sum22(0),sum23(0),mav2(0),mav21(0),mav22(0),mav23(0);
var : sum3(0),sum31(0),sum32(0),sum33(0),mav3(0),mav31(0),mav32(0),mav33(0);
var : sum4(0),sum41(0),sum42(0),sum43(0),mav4(0),mav41(0),mav42(0),mav43(0);
var : sum5(0),sum51(0),sum52(0),sum53(0),mav5(0),mav51(0),mav52(0),mav53(0);
var : sum6(0),sum61(0),sum62(0),sum63(0),mav6(0),mav61(0),mav62(0),mav63(0);
Array : C1[500](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%ntime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
for cnt = 1 to 499
{
C1[cnt] = C1[cnt-1][1];
}
}
C1[0] = C;
if C1[P6+3] > 0 then
{
sum1 = 0;
sum11 = 0;
sum12 = 0;
sum13 = 0;
sum2 = 0;
sum21 = 0;
sum22 = 0;
sum23 = 0;
sum3 = 0;
sum31 = 0;
sum32 = 0;
sum33 = 0;
sum4 = 0;
sum41 = 0;
sum42 = 0;
sum43 = 0;
sum5 = 0;
sum51 = 0;
sum52 = 0;
sum53 = 0;
sum6 = 0;
sum61 = 0;
sum62 = 0;
sum63 = 0;
for cnt = 0 to P6-1
{
if cnt < P1 then
{
sum1 = sum1+C1[cnt];
sum11 = sum11+C1[cnt+1];
sum12 = sum12+C1[cnt+2];
sum13 = sum13+C1[cnt+3];
}
if cnt < P2 then
{
sum2 = sum2+C1[cnt];
sum21 = sum21+C1[cnt+1];
sum22 = sum22+C1[cnt+2];
sum23 = sum23+C1[cnt+3];
}
if cnt < P3 then
{
sum3 = sum3+C1[cnt];
sum31 = sum31+C1[cnt+1];
sum32 = sum32+C1[cnt+2];
sum33 = sum33+C1[cnt+3];
}
if cnt < P4 then
{
sum4 = sum4+C1[cnt];
sum41 = sum41+C1[cnt+1];
sum42 = sum42+C1[cnt+2];
sum43 = sum43+C1[cnt+3];
}
if cnt < P5 then
{
sum5 = sum5+C1[cnt];
sum51 = sum51+C1[cnt+1];
sum52 = sum52+C1[cnt+2];
sum53 = sum53+C1[cnt+3];
}
if cnt < P6 then
{
sum6 = sum6+C1[cnt];
sum61 = sum61+C1[cnt+1];
sum62 = sum62+C1[cnt+2];
sum63 = sum63+C1[cnt+3];
}
}
mav1 = sum1/P1;
mav11 = sum11/P1;
mav12 = sum12/P1;
mav13 = sum13/P1;
mav2 = sum2/P2;
mav21 = sum21/P2;
mav22 = sum22/P2;
mav23 = sum23/P2;
mav3 = sum3/P3;
mav31 = sum31/P3;
mav32 = sum32/P3;
mav33 = sum33/P3;
mav4 = sum4/P4;
mav41 = sum41/P4;
mav42 = sum42/P4;
mav43 = sum43/P4;
mav5 = sum5/P5;
mav51 = sum51/P5;
mav52 = sum52/P5;
mav53 = sum53/P5;
mav6 = sum6/P6;
mav61 = sum61/P6;
mav62 = sum62/P6;
mav63 = sum63/P6;
if mav13 < mav12 and mav12 < mav11 and mav11 < mav1 and
mav23 < mav22 and mav22 < mav21 and mav21 < mav2 and
mav33 < mav32 and mav32 < mav31 and mav31 < mav3 and
mav43 < mav42 and mav42 < mav41 and mav41 < mav4 and
mav53 < mav52 and mav52 < mav51 and mav51 < mav5 and
mav63 < mav62 and mav62 < mav61 and mav61 < mav6 then
buy();
if mav13 > mav12 and mav12 > mav11 and mav11 > mav1 and
mav23 > mav22 and mav22 > mav21 and mav21 > mav2 and
mav33 > mav32 and mav32 > mav31 and mav31 > mav3 and
mav43 > mav42 and mav42 > mav41 and mav41 > mav4 and
mav53 > mav52 and mav52 > mav51 and mav51 > mav5 and
mav63 > mav62 and mav62 > mav61 and mav61 > mav6 then
sell();
}
}
2
input : ntime1(6),P1(8),P2(16),P3(32),P4(64),P5(128),P6(256);
var : S1(0),D1(0),TM(0),TF(0),cnt(0);
var : sum1(0),sum11(0),sum12(0),sum13(0),mav1(0),mav11(0),mav12(0),mav13(0);
var : sum2(0),sum21(0),sum22(0),sum23(0),mav2(0),mav21(0),mav22(0),mav23(0);
var : sum3(0),sum31(0),sum32(0),sum33(0),mav3(0),mav31(0),mav32(0),mav33(0);
var : sum4(0),sum41(0),sum42(0),sum43(0),mav4(0),mav41(0),mav42(0),mav43(0);
var : sum5(0),sum51(0),sum52(0),sum53(0),mav5(0),mav51(0),mav52(0),mav53(0);
var : sum6(0),sum61(0),sum62(0),sum63(0),mav6(0),mav61(0),mav62(0),mav63(0);
Array : C1[500](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%ntime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
for cnt = 1 to 499
{
C1[cnt] = C1[cnt-1][1];
}
}
C1[0] = C;
if C1[P6+3] > 0 then
{
sum1 = 0;
sum11 = 0;
sum12 = 0;
sum13 = 0;
sum2 = 0;
sum21 = 0;
sum22 = 0;
sum23 = 0;
sum3 = 0;
sum31 = 0;
sum32 = 0;
sum33 = 0;
sum4 = 0;
sum41 = 0;
sum42 = 0;
sum43 = 0;
sum5 = 0;
sum51 = 0;
sum52 = 0;
sum53 = 0;
sum6 = 0;
sum61 = 0;
sum62 = 0;
sum63 = 0;
for cnt = 0 to P6-1
{
if cnt < P1 then
{
sum1 = sum1+C1[cnt];
sum11 = sum11+C1[cnt+1];
sum12 = sum12+C1[cnt+2];
sum13 = sum13+C1[cnt+3];
}
if cnt < P2 then
{
sum2 = sum2+C1[cnt];
sum21 = sum21+C1[cnt+1];
sum22 = sum22+C1[cnt+2];
sum23 = sum23+C1[cnt+3];
}
if cnt < P3 then
{
sum3 = sum3+C1[cnt];
sum31 = sum31+C1[cnt+1];
sum32 = sum32+C1[cnt+2];
sum33 = sum33+C1[cnt+3];
}
if cnt < P4 then
{
sum4 = sum4+C1[cnt];
sum41 = sum41+C1[cnt+1];
sum42 = sum42+C1[cnt+2];
sum43 = sum43+C1[cnt+3];
}
if cnt < P5 then
{
sum5 = sum5+C1[cnt];
sum51 = sum51+C1[cnt+1];
sum52 = sum52+C1[cnt+2];
sum53 = sum53+C1[cnt+3];
}
if cnt < P6 then
{
sum6 = sum6+C1[cnt];
sum61 = sum61+C1[cnt+1];
sum62 = sum62+C1[cnt+2];
sum63 = sum63+C1[cnt+3];
}
}
mav1 = sum1/P1;
mav11 = sum11/P1;
mav12 = sum12/P1;
mav13 = sum13/P1;
mav2 = sum2/P2;
mav21 = sum21/P2;
mav22 = sum22/P2;
mav23 = sum23/P2;
mav3 = sum3/P3;
mav31 = sum31/P3;
mav32 = sum32/P3;
mav33 = sum33/P3;
mav4 = sum4/P4;
mav41 = sum41/P4;
mav42 = sum42/P4;
mav43 = sum43/P4;
mav5 = sum5/P5;
mav51 = sum51/P5;
mav52 = sum52/P5;
mav53 = sum53/P5;
mav6 = sum6/P6;
mav61 = sum61/P6;
mav62 = sum62/P6;
mav63 = sum63/P6;
plot1(mav1);
plot2(mav2);
plot3(mav3);
plot4(mav4);
plot5(mav5);
plot6(mav6);
}
}
즐거운 하루되세요
> 남산 님이 쓴 글입니다.
> 제목 : 문의합니다
> 시스템 수식
input : ntime1(6),P(32);
var : S1(0),D1(0),TM(0),TF(0);
var : cnt(0),sum1(0),tmav1(0),tmav11(0),tmav12(0),tmav13(0);
Array : C1[500](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%ntime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
for cnt = 1 to 499
{
C1[cnt] = C1[cnt-1][1];
}
tmav11 = tmav1[1];
tmav12 = tmav11[1];
tmav13 = tmav12[1];
}
C1[0] = C;
if C1[P] > 0 then{
sum1 = 0;
for cnt = 0 to P-1{
sum1 = sum1+C1[cnt];
}
tmav1 = sum1/P;
if tmav13 < tmav12 and tmav12 < tmav11 and tmav11 < tmav1 and tmav13 > 0 Then
buy();
if tmav13 > tmav12 and tmav12 > tmav11 and tmav11 > tmav1 and tmav13 > 0 Then
sell();
}
}
지표수식
input : ntime1(20),P(20);
var : S1(0),D1(0),TM(0),TF(0);
var : cnt(0),sum1(0),mav1(0),mav11(0),mav12(0),mav13(0);
Array : C1[500](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%ntime1;
if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then
{
for cnt = 1 to 499
{
C1[cnt] = C1[cnt-1][1];
}
mav11 = mav1[1];
mav12 = mav11[1];
mav13 = mav12[1];
}
C1[0] = C;
if C1[P] > 0 then{
sum1 = 0;
for cnt = 0 to P-1{
sum1 = sum1+C1[cnt];
}
mav1 = sum1/P;
plot1(mav1,"이평",iff(mav1 > mav11 and mav11 > mav12 and mav12 > mav13,red,BLUE));
}
}
1번 == 위 시스템 수식입니다
위 시스템 수식을 이용하여 6개 이평선을 이용할 수 있도록 시스템수식(매수매도)을 부탁합니다
예) input : ntime1(6),P(8),P(16),P(32),P(64),P(128),P(256);
예) 일반적으로 이평선 구하는 수식입니다
input : Period15(13),Period20(36),Period30(30),Period120(120),Period180(180),Period240(240);
var : mav15(0),mav20(0),mav30(0),mav120(0),mav180(0),mav240(0);
mav15 = ma(c, Period15);
mav20 = ma(c, Period20);
mav30 = ma(c, Period30);
mav120 = ma(c, Period120);
mav180 = ma(c, Period180);
mav240 = ma(c, Period240);
각 모든 이평선이 전봉 3개가 상승할 때 매수 진입하는 수식은 아래와 같이 표현합니다
mav15[3] < av15[2] and mav15[2] < mav15[1] and mav15[1] < mav15 and
mav20[3] < av20[2] and mav20[2] < mav20[1] and mav201] < mav20 and
mav30[3] < av30[2] and mav15[2] < mav15[1] and mav15[1] < mav15 and
mav120[3] < av120[2] and mav120[2] < mav120[1] and mav120[1] < mav120 and
mav180[3] < av180[2] and mav180[2] < mav180[1] and mav180[1] < mav180 and
mav240[3] < av240[2] and mav240[2] < mav240[1] and mav240[1] < mav240
---- 분봉 이평선을 틱봉에 적용하려면 어떤 수식이 필요하나요
(전봉 3개가 상승할 때 매수진입, 전봉 3개가 하락할 때 매도진입)
2번 == 위 지표수식을 이용하여 6개 이평선을 이용할 수 있도록 지료수식을 부탁합니다
예) input : ntime1(6),P(8),P(16),P(32),P(64),P(128),P(256);
감사합니다
다음글
이전글