커뮤니티
안녕하세요(삼육엄지손가락)
2016-12-11 17:24:05
117
글번호 80015
안녕하세요.반갑습니다
아래식에서첫번째2배수 동시만족. 두째 이동평균선을 추가하고자 합니다
(분봉용)
가)아래식 2배수 동시만족
var1 = AccumN(C-O,6);
var2 = AccumN(C-O,9);
var3 = (Highest(High,16) + Lowest(Low,16)) / 2;
if var1[1] > 0 and var2[1] > 0 and c > var3 Then
buy();
if var1[1] < 0 and var2[1] < 0 and C < var3 Then
sell();
나)위의식에서 60일 이동평군선추가
항상감사합니다
배수없이. 60선위368 조건식임
input : n1(6),n2(9),P1(16),P2(60);
var : cnt(0),Hv(0),Lv(0),sum(0),idx(0);
Array : OO[100](0),CC[100](0),HH[100](0),LL[100](0);
if dayindex == 0 or ( stime[1]) Then{
idx = idx+1;
OO[0] = O;
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99{
OO[cnt] = OO[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
CC[0] = C;
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
value1 = 0;
for cnt = 1 to n1{
value1 = value1+(CC[cnt]-OO[cnt]);
}
value2 = 0;
for cnt = 1 to n2{
value2 = value2+(CC[cnt]-OO[cnt]);
}
Hv = HH[0];
Lv = LL[0];
for cnt = 0 to P1-1{
if HH[cnt] > Hv Then
Hv = HH[cnt];
if LL[cnt] < Lv Then
Lv = LL[cnt];
}
value3 = (Hv+LV)/2;
sum = 0;
for cnt = 0 to P2-1{
sum = sum +CC[cnt];
}
value4 = sum/P2;
var1 = AccumN(C-O,n1);
var2 = AccumN(C-O,n2);
var3 = (Highest(High,P1) + Lowest(Low,P1)) / 2;
var4 = ma(c,P2);
if var1[1] > 0 and var2[1] > 0 and c > var3 and
value1 > 0 and value2 > 0 and C > value3 and c > value4 and idx >= 60 Then
buy();
if var1[1] < 0 and var2[1] < 0 and C < var3 and
value1 < 0 and value2 < 0 and C < value3 and c < value4 and idx >= 60 Then
sell();
답변 1
예스스탁 예스스탁 답변
2014-11-03 18:03:09
안녕하세요
예스스탁입니다.
1.
input : n1(6),n2(9),P1(16),P2(60);
var : TF(0),cnt(0),Hv(0),Lv(0),idx(0);
Array : OO[100](0),CC[100](0),HH[100](0),LL[100](0);
TF = TimeToMinutes(stime)%(BarInterval*2);
if dayindex == 0 or (TF < TF[1] and stime > stime[1]) Then{
idx = idx+1;
OO[0] = O;
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99{
OO[cnt] = OO[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
CC[0] = C;
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
value1 = 0;
for cnt = 1 to n1{
value1 = value1+(CC[cnt]-OO[cnt]);
}
value2 = 0;
for cnt = 1 to n2{
value2 = value2+(CC[cnt]-OO[cnt]);
}
Hv = HH[0];
Lv = LL[0];
for cnt = 0 to P1-1{
if HH[cnt] > Hv Then
Hv = HH[cnt];
if LL[cnt] < Lv Then
Lv = LL[cnt];
}
value3 = (Hv+LV)/2;
var1 = AccumN(C-O,n1);
var2 = AccumN(C-O,n2);
var3 = (Highest(High,P1) + Lowest(Low,P1)) / 2;
var4 = ma(c,P2);
if var1[1] > 0 and var2[1] > 0 and c > var3 and
value1 > 0 and value2 > 0 and C > value3 and value3 > 0 and idx >= P1 Then
buy();
if var1[1] < 0 and var2[1] < 0 and C < var3 and value1 < 0 and idx >= P1 and
value2 < 0 and C < value3 and value3 > 0 Then
sell();
2.
input : n1(6),n2(9),P1(16),P2(60);
var : TF(0),cnt(0),Hv(0),Lv(0),sum(0),idx(0);
Array : OO[100](0),CC[100](0),HH[100](0),LL[100](0);
TF = TimeToMinutes(stime)%(BarInterval*2);
if dayindex == 0 or (TF < TF[1] and stime > stime[1]) Then{
idx = idx+1;
OO[0] = O;
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99{
OO[cnt] = OO[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
}
}
CC[0] = C;
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
value1 = 0;
for cnt = 1 to n1{
value1 = value1+(CC[cnt]-OO[cnt]);
}
value2 = 0;
for cnt = 1 to n2{
value2 = value2+(CC[cnt]-OO[cnt]);
}
Hv = HH[0];
Lv = LL[0];
for cnt = 0 to P1-1{
if HH[cnt] > Hv Then
Hv = HH[cnt];
if LL[cnt] < Lv Then
Lv = LL[cnt];
}
value3 = (Hv+LV)/2;
sum = 0;
for cnt = 0 to P2-1{
sum = sum +CC[cnt];
}
value4 = sum/P2;
var1 = AccumN(C-O,n1);
var2 = AccumN(C-O,n2);
var3 = (Highest(High,P1) + Lowest(Low,P1)) / 2;
var4 = ma(c,P2);
if var1[1] > 0 and var2[1] > 0 and c > var3 and
value1 > 0 and value2 > 0 and C > value3 and c > value4 and idx >= 60 Then
buy();
if var1[1] < 0 and var2[1] < 0 and C < var3 and
value1 < 0 and value2 < 0 and C < value3 and c < value4 and idx >= 60 Then
sell();
즐거운 하루되세요
> jbouu123 님이 쓴 글입니다.
> 제목 : 안녕하세요
> 안녕하세요.반갑습니다
아래식에서첫번째2배수 동시만족. 두째 이동평균선을 추가하고자 합니다
(분봉용)
가)아래식 2배수 동시만족
var1 = AccumN(C-O,6);
var2 = AccumN(C-O,9);
var3 = (Highest(High,16) + Lowest(Low,16)) / 2;
if var1[1] > 0 and var2[1] > 0 and c > var3 Then
buy();
if var1[1] < 0 and var2[1] < 0 and C < var3 Then
sell();
나)위의식에서 60일 이동평군선추가
항상감사합니다