커뮤니티

행복; 수식 작성 바랍니다

프로필 이미지
행복한가방
2014-02-04 09:05:11
146
글번호 72137
답변완료
한국의 금융산업 발전을 위해 불철주야 애쓰시는 귀하의 노고를 높이 평가합니다 시스템식 작성 바랍니다 < 아래 1 >의 조건에 의한 시스템식이 < 아래 2 > 입니다. < 아래 1 >의 조건에 추가되어 < 아래 3 >의 조건으로 변경될 때 시스템식 작성 바랍니다 ==========< 아래 1 >================================================== 기준; 틱봉(일봉이 아닙니다) < 진입 조건 > - 진입방식; 피라미딩으로 진입한다 - 진입수량; 1회 진입할 때마다 전일 하루종일 거래량의 10,000분의 1을 진입한다 - 1차 진입; 매일 11시 23분 34초에 진입한다 - 2차 진입; 13시 이전에, 1차 진입가격(EntryPrice)에서 2틱을 하락하면 진입한다 - 3차 진입; 13시 이전에, 1차 진입가격(EntryPrice)에서 5틱을 하락하면 진입한다 < 청산 조건 > - 보유잔고를 3등분하여 분할 청산한다 - 1차 청산; 14시 11분 11초에 청산한다 - 2차 청산; 14시 31분 11초에 청산한다 - 3차 청산; 14시 51분 11초에 청산한다 =============================================================================== ==========< 아래 2 >================================================== input : 진입시점(101010) ; if MarketPosition == 0 and stime == 진입시점 then buy("b",OnClose,def,int(DayVolume(1)*0.0001)); if MarketPosition == 1 Then{ if stime < 130000 and countif(CurrentContracts < CurrentContracts[1],BarsSinceEntry) == 0 then{ buy("b1",Atlimit,EntryPrice-PriceScale*2,int(DayVolume(1)*0.0001)); buy("b2",Atlimit,EntryPrice-PriceScale*4,int(DayVolume(1)*0.0001)); } if stime == 141111 and countif(CurrentContracts < CurrentContracts[1],BarsSinceEntry) == 0 Then ExitLong("bx1",OnClose,def,"",Int(MaxContracts*(1/3)),1); if stime == 143111 and countif(CurrentContracts < CurrentContracts[1],BarsSinceEntry) == 1 Then ExitLong("bx2",OnClose,def,"",Int(MaxContracts*(1/3)),1); if stime == 145111 Then ExitLong("bx3"); } =============================================================================== ==========< 아래 3 >================================================== < 진입&손절매 조건 > - 진입방식; 피라미딩으로 진입한다 - 진입수량; 1회 진입할 때마다 전일 하루종일 거래량의 10,000분의 1을 진입한다 - 1차 진입; 매일 11시 23분 34초에 진입한다(1차 진입가격 = Var1) - 2차 진입; 13시 이전에, 1차 진입가격(Var1)보다 4틱을 상승하면 진입한다 - 2차 진입 후 손절매; 13시 30분 이전에, 2차 진입 후의 평균가격(AvgEnrtyPrice)에서 3틱 하락하면 보유잔고의 1/3을 손절매한다 - 3차 진입; 13시 이전에, 1차 진입가격(Var1)보다 5틱을 상승하면 진입한다 - 3차 진입 후 손절매; 14시 이전에, 3차 진입 후의 보유잔량의 평균가격에서 4틱 하락하면 보유잔고의 1/3을 손절매한다 < 시간에 의한 청산 조건 > - 보유잔고를 3등분하여 분할 청산한다 - 1차 청산; 14시 11분 11초에 청산한다 - 2차 청산; 14시 31분 11초에 청산한다 - 3차 청산; 14시 51분 11초에 청산한다 ============================================================================== 수고하십시요^^
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2014-02-04 10:24:04

안녕하세요 예스스탁입니다. #피라미딩- 다른진입신호만허용 input : 진입시점(112334) ; if MarketPosition == 0 and stime == 진입시점 then buy("b",OnClose,def,int(DayVolume(1)*0.0001)); if MarketPosition == 1 Then{ if stime >= 진입시점 and stime < 130000 and CurrentEntries == MaxEntries then{ buy("b1",AtStop,EntryPrice+PriceScale*4,int(DayVolume(1)*0.0001)); buy("b2",Atlimit,EntryPrice-PriceScale*5,int(DayVolume(1)*0.0001)); } if stime < 133000 and MaxEntries == 2 and countif(MaxEntries == 2 and CurrentContracts < CurrentContracts[1],BarsSinceEntry) < 1 Then ExitLong("bx1",AtStop,AvgEntryPrice-PriceScale*3,"",Int(MaxContracts*(1/3)),1); if stime < 140000 and MaxEntries == 3 and countif(MaxEntries == 3 and CurrentContracts < CurrentContracts[1],BarsSinceEntry) < 1 Then ExitLong("bx2",AtStop,AvgEntryPrice-PriceScale*4,"",Int(MaxContracts*(1/3)),1); if stime == 141111 Then ExitLong("tx1",OnClose,def,"",Int(MaxContracts*(1/3)),1); if stime == 143111 Then ExitLong("tx2",OnClose,def,"",Int(MaxContracts*(1/3)),1); if stime == 145111 Then ExitLong("tx3",OnClose,def,"",Int(MaxContracts*(1/3)),1); } 즐거운 하루되세요 > 행복한가방 님이 쓴 글입니다. > 제목 : 행복; 수식 작성 바랍니다 > 한국의 금융산업 발전을 위해 불철주야 애쓰시는 귀하의 노고를 높이 평가합니다 시스템식 작성 바랍니다 < 아래 1 >의 조건에 의한 시스템식이 < 아래 2 > 입니다. < 아래 1 >의 조건에 추가되어 < 아래 3 >의 조건으로 변경될 때 시스템식 작성 바랍니다 ==========< 아래 1 >================================================== 기준; 틱봉(일봉이 아닙니다) < 진입 조건 > - 진입방식; 피라미딩으로 진입한다 - 진입수량; 1회 진입할 때마다 전일 하루종일 거래량의 10,000분의 1을 진입한다 - 1차 진입; 매일 11시 23분 34초에 진입한다 - 2차 진입; 13시 이전에, 1차 진입가격(EntryPrice)에서 2틱을 하락하면 진입한다 - 3차 진입; 13시 이전에, 1차 진입가격(EntryPrice)에서 5틱을 하락하면 진입한다 < 청산 조건 > - 보유잔고를 3등분하여 분할 청산한다 - 1차 청산; 14시 11분 11초에 청산한다 - 2차 청산; 14시 31분 11초에 청산한다 - 3차 청산; 14시 51분 11초에 청산한다 =============================================================================== ==========< 아래 2 >================================================== input : 진입시점(101010) ; if MarketPosition == 0 and stime == 진입시점 then buy("b",OnClose,def,int(DayVolume(1)*0.0001)); if MarketPosition == 1 Then{ if stime < 130000 and countif(CurrentContracts < CurrentContracts[1],BarsSinceEntry) == 0 then{ buy("b1",Atlimit,EntryPrice-PriceScale*2,int(DayVolume(1)*0.0001)); buy("b2",Atlimit,EntryPrice-PriceScale*4,int(DayVolume(1)*0.0001)); } if stime == 141111 and countif(CurrentContracts < CurrentContracts[1],BarsSinceEntry) == 0 Then ExitLong("bx1",OnClose,def,"",Int(MaxContracts*(1/3)),1); if stime == 143111 and countif(CurrentContracts < CurrentContracts[1],BarsSinceEntry) == 1 Then ExitLong("bx2",OnClose,def,"",Int(MaxContracts*(1/3)),1); if stime == 145111 Then ExitLong("bx3"); } =============================================================================== ==========< 아래 3 >================================================== < 진입&손절매 조건 > - 진입방식; 피라미딩으로 진입한다 - 진입수량; 1회 진입할 때마다 전일 하루종일 거래량의 10,000분의 1을 진입한다 - 1차 진입; 매일 11시 23분 34초에 진입한다(1차 진입가격 = Var1) - 2차 진입; 13시 이전에, 1차 진입가격(Var1)보다 4틱을 상승하면 진입한다 - 2차 진입 후 손절매; 13시 30분 이전에, 2차 진입 후의 평균가격(AvgEnrtyPrice)에서 3틱 하락하면 보유잔고의 1/3을 손절매한다 - 3차 진입; 13시 이전에, 1차 진입가격(Var1)보다 5틱을 상승하면 진입한다 - 3차 진입 후 손절매; 14시 이전에, 3차 진입 후의 보유잔량의 평균가격에서 4틱 하락하면 보유잔고의 1/3을 손절매한다 < 시간에 의한 청산 조건 > - 보유잔고를 3등분하여 분할 청산한다 - 1차 청산; 14시 11분 11초에 청산한다 - 2차 청산; 14시 31분 11초에 청산한다 - 3차 청산; 14시 51분 11초에 청산한다 ============================================================================== 수고하십시요^^