커뮤니티
안녕하세요
2014-01-15 12:56:52
128
글번호 71409
안녕하세요
반갑습니다
아래식은 전번에 만들어진것입니다
아래식을 현재챠트로(분봉용)
1)현재챠트. 2)2배수챠트' 3)4배수챠트
3개동시만족시:매수
반대면:매도
감사합니다
var1 = (Highest(High, 26) + Lowest(Low, 26)) / 2;
var2 = accumn(C-O,3);
var3 = AccumN(C-O,5);
if C > var1 and var2 > 0 and var3 > 0 Then
buy();
if C < var1 and var2 < 0 and var3 < 0 Then
sell();
답변 1
예스스탁 예스스탁 답변
2014-01-15 15:53:21
안녕하세요
예스스탁입니다.
input : p1(26),P2(3),P3(5);
var : TM(0),TF1(0),TF2(0),cnt(0);
var : sum21(0),sum22(0),sum41(0),sum42(0);
var : HH2(0),HH4(0),LL2(0),LL4(0);
Array : C2[50](0),O2[50](0),H2[50](0),L2[50](0);
Array : C4[50](0),O4[50](0),H4[50](0),L4[50](0);
if date != date[1] Then
TM = TimeToMinutes(stime);
TF1 = (TimeToMinutes(stime)-TM)%(BarInterval*2);
TF2 = (TimeToMinutes(stime)-TM)%(BarInterval*4);
if dayindex() == 0 or (TF1 < TF1[1] and stime > stime[1]) Then{
O2[0] = O;
H2[0] = O;
L2[0] = O;
for cnt = 1 to 49{
O2[cnt] = O2[cnt-1][1];
C2[cnt] = C2[cnt-1][1];
H2[cnt] = H2[cnt-1][1];
L2[cnt] = L2[cnt-1][1];
}
}
C2[0] = C;
if H > H2[0] Then H2[0] = H;
if L < L2[0] Then L2[0] = L;
if dayindex() == 0 or (TF2 < TF2[1] and stime > stime[1]) Then{
O4[0] = O;
for cnt = 1 to 49{
O4[cnt] = O4[cnt-1][1];
C4[cnt] = C4[cnt-1][1];
}
}
C4[0] = C;
if H > H4[0] Then H4[0] = H;
if L < L4[0] Then L4[0] = L;
var1 = (Highest(High, P1) + Lowest(Low, P1)) / 2;
var2 = accumn(C-O,P2);
var3 = AccumN(C-O,P3);
if H2[P1-1] > 0 and H4[P1-1] > 0 Then{
HH2 = H2[0];
HH4 = H4[0];
LL2 = H2[0];
HH4 = H4[0];
for cnt = 0 to P1-1{
if H2[cnt] > HH2 Then
HH2 = H2[cnt];
if H4[cnt] > HH4 Then
HH4 = H4[cnt];
if L2[cnt] < LL2 Then
LL2 = L2[cnt];
if L4[cnt] < LL4 Then
LL4 = L4[cnt];
}
sum21 = 0;
sum41 = 0;
for cnt = 0 to P2-1{
sum21 = sum21+(C2[cnt]-O2[cnt]);
sum41 = sum41+(C4[cnt]-O4[cnt]);
}
sum22 = 0;
sum42 = 0;
for cnt = 0 to P3-1{
sum22 = sum22+(C2[cnt]-O2[cnt]);
sum42 = sum42+(C4[cnt]-O4[cnt]);
}
if C > (HH2+LL2)/2 and sum21 > 0 and sum22 > 0 And
C > (HH4+LL4)/2 and sum41 > 0 and sum42 > 0 And
C > var1 and var2 > 0 and var3 > 0 Then
buy();
if C < (HH2+LL2)/2 and sum21 < 0 and sum22 < 0 And
C < (HH4+LL4)/2 and sum41 < 0 and sum42 < 0 And
C < var1 and var2 < 0 and var3 < 0 Then
sell();
}
즐거운 하루되세요
> jbouu123 님이 쓴 글입니다.
> 제목 : 안녕하세요
> 안녕하세요
반갑습니다
아래식은 전번에 만들어진것입니다
아래식을 현재챠트로(분봉용)
1)현재챠트. 2)2배수챠트' 3)4배수챠트
3개동시만족시:매수
반대면:매도
감사합니다
var1 = (Highest(High, 26) + Lowest(Low, 26)) / 2;
var2 = accumn(C-O,3);
var3 = AccumN(C-O,5);
if C > var1 and var2 > 0 and var3 > 0 Then
buy();
if C < var1 and var2 < 0 and var3 < 0 Then
sell();
다음글
이전글