커뮤니티
행복; 수식 작성 바랍니다
2013-12-14 22:05:39
179
글번호 70472
한국의 금융산업 발전을 위해 불철주야 애쓰시는 귀하의 노고를 높이 평가합니다
시스템식 작성 바랍니다
[ 시스템식 1-1번 ]
주기; 5분봉(일봉이 아니고 분봉 입니다)
< 매수 조건 >
가. 매수하는 오늘을 D 데이 라고 할 때
나. 당일 D 데이의 종가(마지막 5분봉의 종가)에 1,000만원어치 진입한다
< 매도 조건 >
가. 매수 다음날인 D+1 데이에
첫번째 5분봉의 시초가(stime==90000)에 1/4 청산하고,
13번째 5분봉의 시초가(stime==100000)에 1/4 청산하고,
25번째 5분봉의 시초가(stime==110000)에 1/4 청산하고,
37번째 5분봉의 시초가(stime==120000)에 1/4 청산한다
(청산하는 시점을 시간으로도 작성해주시고, 가능하다면 dayindex로도 해주시기 바랍니다)
[ 시스템식 1-2번 ]
주기; 일봉
< 매수 조건 >
가. 매수하는 오늘을 D 데이 라고 할 때
나. 당일 D 데이의 종가에 1,000만원어치 진입한다
< 매도 조건 >
가. 매수 다음날인
D+1 데이의 시초가에 1/4 청산하고,
D+1 데이의 종가에 1/4 청산하고,
D+2 데이의 시초가에 1/4 청산하고,
D+2 데이의 종가에 1/4 청산한다
감사합니다
답변 1
예스스탁 예스스탁 답변
2013-12-16 12:46:39
안녕하세요
예스스탁입니다.
1.
input : 투입금액(10000000);
var : Evol(0),Xvol(0);
if CodeCategory == 1 Then{
if CodeCategoryEx == 11 and BasePrice < 50000 Then
Evol = int(int(투입금액/C)/10)*10;
Else
Evol = int(투입금액/C);
}
if CodeCategory == 2 Then
Evol = int(투입금액/C);
if stime == 150000 Then
buy("b",OnClose,def,Evol);
if MarketPosition == 1 Then{
if CodeCategoryEx == 11 and BasePrice < 50000 Then
Xvol = int(int(MaxContracts*0.25)/10)*10;
Else
Xvol = int(MaxContracts*0.25);
if stime == 090000 Then# dayindex+1 == 1
ExitLong("bx1",OnClose,def,"",Xvol,1);
if stime == 100000 Then# dayindex+1 == 13
ExitLong("bx2",OnClose,def,"",Xvol,1);
if stime == 110000 Then# dayindex+1 == 25
ExitLong("bx3",OnClose,def,"",Xvol,1);
if stime == 120000 Then# dayindex+1 == 37
ExitLong("bx4");
}
2.
input : 투입금액(10000000);
var : Evol(0),Xvol(0);
if CodeCategory == 1 Then{
if CodeCategoryEx == 11 and BasePrice < 50000 Then
Evol = int(int(투입금액/C)/10)*10;
Else
Evol = int(투입금액/C);
}
if CodeCategory == 2 Then
Evol = int(투입금액/C);
if MarketPosition == 0 Then{
buy("b",OnClose,def,Evol);
if CodeCategoryEx == 11 and BasePrice < 50000 Then
Xvol = int(int(Evol*0.25)/10)*10;
Else
Xvol = int(Evol*0.25);
ExitLong("bx1",AtMarket,def,"",Xvol,1);
}
if MarketPosition == 1 Then{
if CodeCategoryEx == 11 and BasePrice < 50000 Then
Xvol = int(int(MaxContracts*0.25)/10)*10;
Else
Xvol = int(MaxContracts*0.25);
if BarsSinceEntry == 1 Then{
ExitLong("bx2",OnClose,def,"",Xvol,1);
ExitLong("bx3",AtMarket,def,"",Xvol,1);
}
if BarsSinceEntry == 2 Then
ExitLong("bx4");
}
즐거운 하루되세요
> 행복한가방 님이 쓴 글입니다.
> 제목 : 행복; 수식 작성 바랍니다
> 한국의 금융산업 발전을 위해 불철주야 애쓰시는 귀하의 노고를 높이 평가합니다
시스템식 작성 바랍니다
[ 시스템식 1-1번 ]
주기; 5분봉(일봉이 아니고 분봉 입니다)
< 매수 조건 >
가. 매수하는 오늘을 D 데이 라고 할 때
나. 당일 D 데이의 종가(마지막 5분봉의 종가)에 1,000만원어치 진입한다
< 매도 조건 >
가. 매수 다음날인 D+1 데이에
첫번째 5분봉의 시초가(stime==90000)에 1/4 청산하고,
13번째 5분봉의 시초가(stime==100000)에 1/4 청산하고,
25번째 5분봉의 시초가(stime==110000)에 1/4 청산하고,
37번째 5분봉의 시초가(stime==120000)에 1/4 청산한다
(청산하는 시점을 시간으로도 작성해주시고, 가능하다면 dayindex로도 해주시기 바랍니다)
[ 시스템식 1-2번 ]
주기; 일봉
< 매수 조건 >
가. 매수하는 오늘을 D 데이 라고 할 때
나. 당일 D 데이의 종가에 1,000만원어치 진입한다
< 매도 조건 >
가. 매수 다음날인
D+1 데이의 시초가에 1/4 청산하고,
D+1 데이의 종가에 1/4 청산하고,
D+2 데이의 시초가에 1/4 청산하고,
D+2 데이의 종가에 1/4 청산한다
감사합니다
다음글