커뮤니티
문의드립니다.
2018-06-26 09:46:35
194
글번호 120030
1. 기타
58337 재질문 답변 부탁드립니다.
2. 기타
[기초]
a-종가가 200일 이동평균선 위
b-a인 상태에서 7일 최저가에 도달하면 매수 진입
c-b 매수한 시점에서 7일 최고가를 갱신하면 b 매수청산
d-(포지션제한)초기금액(외부변수)의 5분의 1이상은 개별 포지션에 투입하지 않음
e-투입금액은 d금액(초기설정금액/5)/ 20일 ATR * n(외부변수)
답변 1
예스스탁 예스스탁 답변
2018-06-26 18:00:06
안녕하세요
예스스탁입니다.
1-1
수정한 식입니다.
input : 시작시간(070000),종료시간(050000),n(5);
var : T(0),Tcond(false);
if bdate != bdate[1] Then
{
var1 = 0;
var2 = 0;
var31 = var3[1];
T = 0;
}
var1 = var1+(H-L);
var2 = var2+1;
var3 = var1/var2;
if (sdate != sdate[1] and stime >= 시작시간) or
(sdate == sdate[1] and stime >= 시작시간 and stime[1] < 시작시간) Then
Tcond = true;
if (sdate != sdate[1] and stime >= 종료시간) or
(sdate == sdate[1] and stime >= 종료시간 and stime[1] < 종료시간) Then
Tcond = false;
if tcond == true then
{
if H-L >= var31*2 Then
{
value1 = H;
value2 = L;
if C > O Then
T = 1;
if C < O Then
T = -1;
}
}
if T == 1 and MarketPosition <= 0 and H < value1+PriceScale*n Then
buy("b",AtStop,value1+PriceScale*n);
if T == -1 and MarketPosition >= 0 and L > value2-PriceScale*n Then
sell("s",AtStop,value2-PriceScale*n);
if MarketPosition == 1 and T == 1 Then
ExitLong("bx",AtStop,value1);
if MarketPosition == -1 and T == -1 Then
ExitShort("sx",AtStop,value1);
1-2
예 같은 결과입니다.
2
input : 초기금액(100000000),n(2);
var : vol(0);
var1 = ma(c,200);
vol = (초기금액/5)/(atr(20)*n);
if MarketPosition <= 0 and C > ma(c,200) Then
buy("b",atlimit,lowest(L,7),vol);
if MarketPosition == 1 Then
ExitLong("bx",atlimit,highest(h,7));
즐거운 하루되세요
> 잡다백수 님이 쓴 글입니다.
> 제목 : 문의드립니다.
> 1. 기타
58337 재질문 답변 부탁드립니다.
2. 기타
[기초]
a-종가가 200일 이동평균선 위
b-a인 상태에서 7일 최저가에 도달하면 매수 진입
c-b 매수한 시점에서 7일 최고가를 갱신하면 b 매수청산
d-(포지션제한)초기금액(외부변수)의 5분의 1이상은 개별 포지션에 투입하지 않음
e-투입금액은 d금액(초기설정금액/5)/ 20일 ATR * n(외부변수)
다음글
이전글