답변완료
수식 문의 드립니다.
안녕하세요
Var1= mov(close,len1,s)
Var2= mov(close,len2,s)
Var3= mov(close,len3,s)
If Var1>var2 And Var2>var3 Then
Call buy("매수")
Elseif Var1<var2 And Var2<var3 Then
Call sell("매도")
End If
위와 같은 Swing 전략의 경우,
매수로 진입했는데 지수는 하락할 경우를 대비해
"매수 진입 지수 -( )point"를 기준선으로 하여
이 기준선 이하로 지수가 하락시 매수청산, 이 기준선을 돌파하여 상승시 다시 매수하게 할 경우의
수식을 알려주시면 감사하겠습니다. 단, 상기 전략에 의하여 "매도"로 포지션 바뀔때 까지만요.
마찬가지로, 매도로 진입했는데 지수는 상승할 경우를 대비해
"매도 진입 지수 +( )point"를 기준선으로 하여
이 기준선 이상으로 지수가 상승시 매도청산, 이 기준선을 돌파하여 하락시 다시 매도하게 할 경우의
수식도 알려주시면 감사하겠습니다. 단, 상기 전략에 의하여 "매수"로 포지션 바뀔때 까지만요.
2023-02-04
788
글번호 166001
시스템
답변완료
수정부탁드립니다
텍스트 위치 우즉 끝자리로이동 방법부탁드립니다.
Input:기간(10000),
구간개수(20); //최대 20
Var:최대(0),최소(0),j(0),행번호(0),총거래량(0),가격대거래량(0),kValue1(0),
시작번호(0),끝번호(0);
Array:가격대[21](0),거래량[21](0),비율[21](0),Text[21](0),TL[21](0);
#----------------------------------------------------------------------------------#
# 가격대를 배열변수에 세팅한다.
#----------------------------------------------------------------------------------#
//if CurrentDate == sDate Then //당일기준
//{
var1 = DateToJulian(CurrentDate)-1;
IF DayOfWeek(CurrentDate) == 1 Then
Var1 = Var1-2;
if sDate >= JulianToDate(var1) Then
{
TL_Delete(TL[j]);
최대 = Highest(H,기간-1);
최소 = Lowest(L,기간-1);
kValue1 = Round((최대-최소)/구간개수,0);
가격대[0] = 최대;
For 행번호 = 0 To 구간개수-1 {
가격대[행번호+1] = 가격대[행번호] - kValue1;
거래량[행번호] = 0;
비율[행번호] = 0;
}
총거래량 = 0;
For j = 0 To 기간-2 {
총거래량 = 총거래량 + V[j];
#----------------------------------------------------------------------------------#
# 거래량을 걸쳐있는 가격대에 분배
#----------------------------------------------------------------------------------#
for 행번호 = 0 To 구간개수-1 {
if 가격대[행번호] >= H[j] and 가격대[행번호+1] < H[j] then 시작번호 = 행번호;
if 가격대[행번호] >= L[j] and 가격대[행번호+1] < L[j] then 끝번호 = 행번호;
}
가격대거래량 = V[j]/(끝번호-시작번호+1);
for 행번호 = 시작번호 To 끝번호 {
거래량[행번호] = 거래량[행번호] + 가격대거래량;
}
}
#----------------------------------------------------------------------------------#
# 비율 계산
#----------------------------------------------------------------------------------#
for 행번호 = 0 To 구간개수-1 {
비율[행번호] = 거래량[행번호] * 100 / 총거래량;
}
#----------------------------------------------------------------------------------#
# 지표출력
#----------------------------------------------------------------------------------#
for j = 0 to 구간개수-1 {
Text_Delete(Text[j]);
Text[j] = Text_New(date[0], stime[0], (가격대[j]+가격대[j+1])/2,NumToStr(거래량[j],0)+"("+NumToStr(비율[j],2)+"%)("+NumToStr(가격대[j+1],0)+" ~ "+NumToStr(가격대[j],0)+")");
Text_SetStyle(Text[j], 1, 2);
}
j = 구간개수;
}
2023-02-03
952
글번호 165995
지표