커뮤니티
문의드립니다
2016-11-23 12:24:26
110
글번호 104274
Input : 분봉주기(10), Length1(20);
Var : TF(0),TLen1(0),cnt(0),sum(0),sum1(0),Tma(0);
Array : CC[100](0),mav[100](0);
TLen1 = Ceiling((Length1 + 1) * .5);
TF = TimeToMinutes(stime)%분봉주기;
if bdate != Bdate[1] or (bdate == bdate[1] and TF < TF[1]) Then{
for cnt = 1 to 99{
CC[cnt] = CC[cnt-1][1];
mav[cnt] = mav[cnt-1][1];
}
}
CC[0] = C;
if CC[Tlen1] > 0 then{
sum = 0;
for cnt = 0 to TLen1-1{
sum = sum + CC[cnt];
}
mav[0] = sum/Tlen1;
}
if mav[Tlen1] > 0 then{
sum1 = 0;
for cnt = 0 to TLen1-1{
sum1 = sum1 + mav[cnt];
}
Tma = sum1/Tlen1;
plot1(Tma);
}
위 수식을 이용하여 시스템하나부탁드립니다
1. 2가지의 선을 받고싶습니다 현제 Input : 분봉주기(10), Length1(20);
이거를 하나더 추가해서 Input : 분봉주기(5), Length1(20); 만든다음
2가지가 크로스될경우 분봉주기5가 분봉주기10을 상향할경우 매수신호
매도는 그반대
추가해주셨으면하는것
# 20틱청산 40틱청산 60틱청산 80틱청산 100틱청산 텍스트표시 (20틱 씩 부탁드립니다)
답변 1
예스스탁 예스스탁 답변
2016-11-23 14:50:32
안녕하세요
예스스탁입니다.
Input : 분봉주기1(5), Length1(20);
input : 분봉주기2(10), Length2(20);
Var : TF1(0),TLen1(0),cnt(0),sum11(0),sum12(0),Tma1(0);
Var : TF2(0),TLen2(0),sum21(0),sum22(0),Tma2(0),rr(0),tx(0);
Array : C1[100](0),mav1[100](0);
Array : C2[100](0),mav2[100](0);
TLen1 = Ceiling((Length1 + 1) * .5);
TF1 = TimeToMinutes(stime)%분봉주기1;
if bdate != Bdate[1] or (bdate == bdate[1] and TF1 < TF1[1]) Then{
for cnt = 1 to 99{
C1[cnt] = C1[cnt-1][1];
mav1[cnt] = mav1[cnt-1][1];
}
}
C1[0] = C;
if C1[Tlen1] > 0 then{
sum11 = 0;
for cnt = 0 to TLen1-1{
sum11 = sum11 + C1[cnt];
}
mav1[0] = sum11/Tlen1;
}
if mav1[Tlen1] > 0 then{
sum12 = 0;
for cnt = 0 to TLen1-1{
sum12 = sum12 + mav1[cnt];
}
Tma1 = sum12/Tlen1;
}
TLen2 = Ceiling((Length2 + 1) * .5);
TF2 = TimeToMinutes(stime)%분봉주기2;
if bdate != Bdate[1] or (bdate == bdate[1] and TF2 < TF2[1]) Then{
for cnt = 1 to 99{
C2[cnt] = C2[cnt-1][1];
mav2[cnt] = mav2[cnt-1][1];
}
}
C2[0] = C;
if C2[Tlen2] > 0 then{
sum21 = 0;
for cnt = 0 to TLen2-1{
sum21 = sum21 + C2[cnt];
}
mav2[0] = sum21/Tlen2;
}
if mav2[Tlen2] > 0 then{
sum22 = 0;
for cnt = 0 to TLen2-1{
sum22 = sum22 + mav2[cnt];
}
Tma2 = sum22/Tlen2;
}
if Tma1 > 0 and Tma2 > 0 then{
if crossup(Tma1,Tma2) Then
buy();
if CrossDown(Tma1,Tma2) Then
sell();
}
if MarketPosition == 1 then{
rr = Floor((highest(H,BarsSinceEntry)-EntryPrice)/(PriceScale*20));
if rr > rr[1] Then{
tx = Text_New(sdate,stime,H,NumToStr(RR*20,0)+"틱");
Text_SetStyle(tx,2,2);
}
}
if MarketPosition == -1 then{
rr = Floor((EntryPrice-lowest(L,BarsSinceEntry))/(PriceScale*20));
if rr > rr[1] Then{
tx = Text_New(sdate,stime,H,NumToStr(RR*20,0)+"틱");
Text_SetStyle(tx,2,2);
}
}
즐거운 하루되세요
> 곽민수 님이 쓴 글입니다.
> 제목 : 문의드립니다
> Input : 분봉주기(10), Length1(20);
Var : TF(0),TLen1(0),cnt(0),sum(0),sum1(0),Tma(0);
Array : CC[100](0),mav[100](0);
TLen1 = Ceiling((Length1 + 1) * .5);
TF = TimeToMinutes(stime)%분봉주기;
if bdate != Bdate[1] or (bdate == bdate[1] and TF < TF[1]) Then{
for cnt = 1 to 99{
CC[cnt] = CC[cnt-1][1];
mav[cnt] = mav[cnt-1][1];
}
}
CC[0] = C;
if CC[Tlen1] > 0 then{
sum = 0;
for cnt = 0 to TLen1-1{
sum = sum + CC[cnt];
}
mav[0] = sum/Tlen1;
}
if mav[Tlen1] > 0 then{
sum1 = 0;
for cnt = 0 to TLen1-1{
sum1 = sum1 + mav[cnt];
}
Tma = sum1/Tlen1;
plot1(Tma);
}
위 수식을 이용하여 시스템하나부탁드립니다
1. 2가지의 선을 받고싶습니다 현제 Input : 분봉주기(10), Length1(20);
이거를 하나더 추가해서 Input : 분봉주기(5), Length1(20); 만든다음
2가지가 크로스될경우 분봉주기5가 분봉주기10을 상향할경우 매수신호
매도는 그반대
추가해주셨으면하는것
# 20틱청산 40틱청산 60틱청산 80틱청산 100틱청산 텍스트표시 (20틱 씩 부탁드립니다)