커뮤니티
데이타2 을 이용한 시스템식 수정
2013-12-27 06:38:59
164
글번호 70832
항상감사 드립니다
아래 시스템식은 옵션챠트에 적용되는 시스템식입니다
이시스템식에서 참조데이타2를 추가해서 시스템식을 보완하고 싶습니다
아래시스템식은 옵션챠트에 적용하고
똑같은 조건을 참조데이타2에 선물에 적용해서
두가지조건이 만족할때 시스템식을 발생시키고 싶습니다.
1.옵션시스템
var : cond(0),XX(0),cnt(0);
var1 = ma(c,9);
var2 = ma(c,26);
if CrossDown(var1,var2) Then
value1 = var2;
if var2 < value1 Then
value1 = var2; #매도라인#
if CrossUp(var1,var2) Then
value2 = var2;
if var2 > value2 Then
value2 = var2; #매수라인#
value3 = var2; #중간값#
if date != date[1] Then{
value11 = value1[1];
value21 = value2[1];
value31 = value3[1];
}
if date != date[1] Then{
cond = 0;
cnt = 0;
}
if cond >= 0 and value2==value21 Then{
value7 = value2; #매도라인1#
cnt = cnt+1;
if stime < 90500 and cnt < 2 Then{
cond = -1;
xx = value7;
}
}
if cond <= 0 and value1==value11 Then{
value6 = value1; #매수라인1#
cnt = cnt+1;
if stime < 90500 and cnt < 2 Then{
cond = 1;
XX = value6;
}
}
##### 삼각가중 이평 #####
VAR: Length1(36),Length2(66);
Variables: TLen1(0),TRIma1(0),TLen2(0),TRIma2(0);
TLen1 = Ceiling((Length1 + 1) * 0.5);
TLen2 = Ceiling((Length2 + 1) * 0.5);
var23 = ma(ma(H, TLen1), TLen1); # 삼각가중 36이평_고가#
var22 = ma(ma(C, TLen1), TLen1); # 삼각가중 36이평_종가#
var21 = ma(ma(L, TLen1), TLen1); # 삼각가중 36이평_저가#
##### 트릭스 #####
Input : Period(12), sigPeriod(9);
var : TRIXv(0),TRIXsig(0);
TRIXv = TRIX(Period);
TRIXsig = ema(TRIX(Period),sigPeriod);
if crossup(TRIXv,0) Then
var1=1;
if CrossDown(TRIXv,0) Then
var1=-1;
######## 시스템식 #########
if C>XX AND c>var23 and trixv>0 Then
buy("B1");
if C<XX AND c<var21 and trixv<0 Then
sell("S1");
감사합니다
답변 1
예스스탁 예스스탁 답변
2013-12-27 16:16:49
안녕하세요
예스스탁입니다.
var : cond(0),XX(0),cnt(0);
var1 = data1(ma(c,9));
var2 = data1(ma(c,26));
if CrossDown(var1,var2) Then
value1 = var2;
if var2 < value1 Then
value1 = var2; #매도라인#
if CrossUp(var1,var2) Then
value2 = var2;
if var2 > value2 Then
value2 = var2; #매수라인#
value3 = var2; #중간값#
if data1(date != date[1]) Then{
value11 = value1[1];
value21 = value2[1];
value31 = value3[1];
}
if data1(date != date[1]) Then{
cond = 0;
cnt = 0;
}
if cond >= 0 and value2==value21 Then{
value7 = value2; #매도라인1#
cnt = cnt+1;
if data1(stime < 90500 and cnt < 2) Then{
cond = -1;
xx = value7;
}
}
if cond <= 0 and value1==value11 Then{
value6 = value1; #매수라인1#
cnt = cnt+1;
if data1(stime < 90500 and cnt < 2) Then{
cond = 1;
XX = value6;
}
}
var : cond1(0,data2),XXX(0,data2),cnt1(0);
var : V1(0,data2),V2(0,data2),val1(0,data2),val2(0,data2),val3(0,data2);
var : val11(0,data2),val21(0,data2),val31(0,data2),val6(0,data2),val7(0,data2);
var : v23(0,data2),v22(0,data2),v21(0,data2);
v1 = data2(ma(c,9));
v2 = data2(ma(c,26));
if CrossDown(v1,v2) Then
val1 = v2;
if v2 < val1 Then
val1 = v2;
if CrossUp(v1,v2) Then
val2 = v2;
if v2 > val2 Then
val2 = v2;
val3 = v2;
if data2(date != date[1]) Then{
val11 = val1[1];
val21 = val2[1];
val31 = val3[1];
}
if data2(date != date[1]) Then{
cond1 = 0;
cnt1 = 0;
}
if cond1 >= 0 and val2==val21 Then{
val7 = val2; #매도라인1#
cnt1 = cnt1+1;
if data2(stime < 90500 and cnt1 < 2) Then{
cond1 = -1;
xxx = val7;
}
}
if cond1 <= 0 and val1==val11 Then{
val6 = val1;
cnt1 = cnt1+1;
if data2(stime < 90500 and cnt1 < 2) Then{
cond1 = 1;
XXX = val6;
}
}
##### 삼각가중 이평 #####
VAR : Length1(36),Length2(66);
Var : TLen1(0),TRIma1(0),TLen2(0),TRIma2(0);
TLen1 = Ceiling((Length1 + 1) * 0.5);
TLen2 = Ceiling((Length2 + 1) * 0.5);
var23 = data1(ma(ma(H, TLen1), TLen1)); # 삼각가중 36이평_고가#
var22 = data1(ma(ma(C, TLen1), TLen1)); # 삼각가중 36이평_종가#
var21 = data1(ma(ma(L, TLen1), TLen1)); # 삼각가중 36이평_저가#
Var : TL1(0,data2),Tma1(0,data2),TL2(0,data2),Tma2(0,data2);
TL1 = Ceiling((Length1 + 1) * 0.5);
TL2 = Ceiling((Length2 + 1) * 0.5);
v23 = data2(ma(ma(H, TL1), TL1)); # 삼각가중 36이평_고가#
v22 = data2(ma(ma(C, TL1), TL1)); # 삼각가중 36이평_종가#
v21 = data2(ma(ma(L, TL1), TL1)); # 삼각가중 36이평_저가#
##### 트릭스 #####
Input : Period(12), sigPeriod(9);
var : TRIXv(0),TRIXsig(0);
TRIXv = data1(TRIX(Period));
TRIXsig = data1(ema(TRIX(Period),sigPeriod));
if crossup(TRIXv,0) Then
var1=1;
if CrossDown(TRIXv,0) Then
var1=-1;
var : TRXv(0,data2),TRXsig(0,data2);
TRXv = data2(TRIX(Period));
TRXsig = data2(ema(TRIX(Period),sigPeriod));
if crossup(TRXv,0) Then
v1=1;
if CrossDown(TRXv,0) Then
v1=-1;
######## 시스템식 #########
if data1(C>XX AND c>var23 and trixv>0) and data2(C > XXX AND c>v23 and trxv>0) Then
buy("B1");
if data1(C<XX AND c<var21 and trixv<0) and data2(C<XXX AND c<v21 and trxv<0) Then
sell("S1");
즐거운 하루되세요
> 조민철 님이 쓴 글입니다.
> 제목 : 데이타2 을 이용한 시스템식 수정
> 항상감사 드립니다
아래 시스템식은 옵션챠트에 적용되는 시스템식입니다
이시스템식에서 참조데이타2를 추가해서 시스템식을 보완하고 싶습니다
아래시스템식은 옵션챠트에 적용하고
똑같은 조건을 참조데이타2에 선물에 적용해서
두가지조건이 만족할때 시스템식을 발생시키고 싶습니다.
1.옵션시스템
var : cond(0),XX(0),cnt(0);
var1 = ma(c,9);
var2 = ma(c,26);
if CrossDown(var1,var2) Then
value1 = var2;
if var2 < value1 Then
value1 = var2; #매도라인#
if CrossUp(var1,var2) Then
value2 = var2;
if var2 > value2 Then
value2 = var2; #매수라인#
value3 = var2; #중간값#
if date != date[1] Then{
value11 = value1[1];
value21 = value2[1];
value31 = value3[1];
}
if date != date[1] Then{
cond = 0;
cnt = 0;
}
if cond >= 0 and value2==value21 Then{
value7 = value2; #매도라인1#
cnt = cnt+1;
if stime < 90500 and cnt < 2 Then{
cond = -1;
xx = value7;
}
}
if cond <= 0 and value1==value11 Then{
value6 = value1; #매수라인1#
cnt = cnt+1;
if stime < 90500 and cnt < 2 Then{
cond = 1;
XX = value6;
}
}
##### 삼각가중 이평 #####
VAR: Length1(36),Length2(66);
Variables: TLen1(0),TRIma1(0),TLen2(0),TRIma2(0);
TLen1 = Ceiling((Length1 + 1) * 0.5);
TLen2 = Ceiling((Length2 + 1) * 0.5);
var23 = ma(ma(H, TLen1), TLen1); # 삼각가중 36이평_고가#
var22 = ma(ma(C, TLen1), TLen1); # 삼각가중 36이평_종가#
var21 = ma(ma(L, TLen1), TLen1); # 삼각가중 36이평_저가#
##### 트릭스 #####
Input : Period(12), sigPeriod(9);
var : TRIXv(0),TRIXsig(0);
TRIXv = TRIX(Period);
TRIXsig = ema(TRIX(Period),sigPeriod);
if crossup(TRIXv,0) Then
var1=1;
if CrossDown(TRIXv,0) Then
var1=-1;
######## 시스템식 #########
if C>XX AND c>var23 and trixv>0 Then
buy("B1");
if C<XX AND c<var21 and trixv<0 Then
sell("S1");
감사합니다