커뮤니티

수식 부탁드립니다.

프로필 이미지
gaintoga
2013-09-13 01:36:02
130
글번호 67530
답변완료
1분봉에서 거래량이 2000 개 이상이면서, 이평 5, 20 이 정방향 일때 매수, 10, 50 이평이 역방향일때 청산. 거래량이 1500개 이상이면서 , 5, 10 이평이 역방향 일때 매도. 10, 60 이평이 정방향일때 청산. 시초가 진입가능, 수익이 나면 하루 한번 매매, 손실이 나면 수익날때까지 당일 4번까지 배수(1, 2, 4, 8)로 진입. 하루 손실 폭 -3p도달 시 강제 청산 및 이후 진입금지. 위 내용으로 수식 부탁드립니다. 감사합니다 ^^
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2013-09-13 16:27:36

안녕하세요 예스스탁입니다. input : 당일손실(3); var : NP(0),PreNP(0),dayPL(0); var : cnt(0),count(0); NP = NetProfit; if date != date[1] Then PreNP = NP[1]; dayPL = NP-PreNP; count = 0; for cnt = 0 to 20{ if sdate == EntryDate(cnt) Then count = count+1; } var1 = ma(c,5); var2 = ma(c,10); var3 = ma(c,20); var4 = ma(c,50); var5 = ma(c,60); if V >= 2000 and var1 > var1[1] and var3 > var3[1] and daypl > -당일손실 Then{ if count == 0 Then buy("b1",OnClose,def,1); if count > 0 Then{ if MarketPosition == -1 and C > EntryPrice Then buy("b2",OnClose,def,min(CurrentContracts*2,8)); if MarketPosition == 0 and PositionProfit(1) < 0 Then buy("b3",OnClose,def,min(CurrentContracts[BarsSinceExit(1)+1]*2,8)); } } if MarketPosition == 1 and var2 < var2[1] and var4 < var4[1] Then exitlong(); if V >= 1500 and var1 < var1[1] and var2 < var2[1] and daypl > -당일손실 Then{ if count == 0 Then sell("s1",OnClose,def,1); if count > 0 Then{ if MarketPosition == 1 and C < EntryPrice Then sell("s2",OnClose,def,min(CurrentContracts*2,8)); if MarketPosition == 0 and PositionProfit(1) < 0 Then sell("s3",OnClose,def,min(CurrentContracts[BarsSinceExit(1)+1]*2,8)); } } if MarketPosition == 1 Then{ ExitLong("bx1",AtStop,EntryPrice-(당일손실+dayPL)); } if MarketPosition == -1 Then{ ExitShort("sx1",AtStop,EntryPrice+(당일손실+dayPL)); } 즐거운 하루되세요 > gaintoga 님이 쓴 글입니다. > 제목 : 수식 부탁드립니다. > 1분봉에서 거래량이 2000 개 이상이면서, 이평 5, 20 이 정방향 일때 매수, 10, 50 이평이 역방향일때 청산. 거래량이 1500개 이상이면서 , 5, 10 이평이 역방향 일때 매도. 10, 60 이평이 정방향일때 청산. 시초가 진입가능, 수익이 나면 하루 한번 매매, 손실이 나면 수익날때까지 당일 4번까지 배수(1, 2, 4, 8)로 진입. 하루 손실 폭 -3p도달 시 강제 청산 및 이후 진입금지. 위 내용으로 수식 부탁드립니다. 감사합니다 ^^