커뮤니티
이격도 매매요청
2019-01-18 06:53:27
211
글번호 125379
* 좋은 주말 되십시요.
* 아래 식으로 이격도가 99 이하면 매수 100이상이면 매도 수식좀 요청드립니다.
input : Atime(10),P(10),w1(50);
var : cnt(0),sum(0),mav(0);
Array : OO[100](0),HH[100](0),LL[100](0),CC[100](0);
var1 = TimeToMinutes(stime)%Atime;
if dayindex() == 0 or (var1 < var1[1] and stime > stime[1]) Then{
OO[0] = O;
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99{
OO[cnt] = OO[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
CC[0] = C;
if CC[P] > 0 Then{
sum = 0;
for cnt = 0 to P-1{
sum = sum+(OO[cnt]+HH[cnt]+LL[cnt]+CC[cnt])/4;
}
mav = sum/P;
}
var1 = ma(mav,w1) ;
var2 = C/(var1*100);
plot1(var2); ## 이격도
답변 1
예스스탁 예스스탁 답변
2019-01-18 13:14:10
안녕하세요
예스스탁입니다.
input : Atime(10),P(10),w1(50);
var : cnt(0),sum(0),mav(0);
Array : OO[100](0),HH[100](0),LL[100](0),CC[100](0);
var1 = TimeToMinutes(stime)%Atime;
if bdate != bdate[1] or (var1 < var1[1] and Bdate == bdate[1]) Then
{
OO[0] = O;
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99{
OO[cnt] = OO[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
CC[0] = C;
if CC[P] > 0 Then
{
sum = 0;
for cnt = 0 to P-1{
sum = sum+(OO[cnt]+HH[cnt]+LL[cnt]+CC[cnt])/4;
}
mav = sum/P;
}
var1 = ma(mav,w1) ;
var2 = C/(var1*100);
if CrossDown(var2,99) Then
buy();
if crossup(var2,100) Then
sell();
즐거운 하루되세요
> 요타 님이 쓴 글입니다.
> 제목 : 이격도 매매요청
> * 좋은 주말 되십시요.
* 아래 식으로 이격도가 99 이하면 매수 100이상이면 매도 수식좀 요청드립니다.
input : Atime(10),P(10),w1(50);
var : cnt(0),sum(0),mav(0);
Array : OO[100](0),HH[100](0),LL[100](0),CC[100](0);
var1 = TimeToMinutes(stime)%Atime;
if dayindex() == 0 or (var1 < var1[1] and stime > stime[1]) Then{
OO[0] = O;
HH[0] = H;
LL[0] = L;
for cnt = 1 to 99{
OO[cnt] = OO[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
CC[0] = C;
if CC[P] > 0 Then{
sum = 0;
for cnt = 0 to P-1{
sum = sum+(OO[cnt]+HH[cnt]+LL[cnt]+CC[cnt])/4;
}
mav = sum/P;
}
var1 = ma(mav,w1) ;
var2 = C/(var1*100);
plot1(var2); ## 이격도