커뮤니티

문의드립니다.

프로필 이미지
잡다백수
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(외부변수)