커뮤니티

random test

프로필 이미지
새로운세상
2014-02-05 11:39:17
180
글번호 72193
답변완료
안녕하세요~ 다음 수식 부탁드립니다. random청산 test를 하기 위하여 다음과 같은 수식이 있을 때, 이 수식은 무조건 첫봉에서 진입이 발생하고 이후 청산을 random test하게 됩니다. input: RanTest(1000); //최적화 기능을 사용하여 1,000회의 Random test를 수행 If dayindex==0 Then {if C>O then Buy("B"); else Sell("S");} If date<>date[1] Then var1 = Int(Random(dayindex[1]+1)); If dayindex==var1 Then { ExitLong("XB"); ExitShort("XS"); } 위의 수식을 다음의 내용으로 변형하고 싶습니다. 1) 이평선교차 시스템처럼 장중에 진입이 발생할 경우 다음 진입이 발생하기전 random청산하는 수식. 즉, 각 진입의 진입시점이 확정되지 않은 상태에서 다음 진입이 발생하기 전 random청산하는 것으로 당연히 청산시점은 진입시점보다 뒤에 있습니다. 2) 1)과 반대로 random으로 진입이 있고. 이평선교차에 의해 청산하는 수식 마찬가지로 random진입이 항상 청산보다 우선합니다. 3) 1),2) 모두 조건만 만족되면 random진입,random 청산이 여러번 발생할 수 있습니다. 연결선물 분봉을 사용하며, 당일청산입니다. 그럼 부탁드리겠습니다. 감사합니다 !!!
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2014-02-05 16:02:35

안녕하세요 예스스탁입니다. 1. 이평크로스 진입, 랜덤 청산 input: RanTest(1000); //최적화 기능을 사용하여 1,000회의 Random test를 수행 var : idx(0),mav1(0),mav2(0); mav1 = ma(c,5); mav2 = ma(C,20); If date<>date[1] Then Idx = dayindex[1]+1; If CrossUp(mav1,mav2) Then Buy("B"); if CrossDown(mav2,mav2) Then Sell("S"); #진입후 var2봉 이후 청산 If MarketPosition != 0 Then{ if MarketPosition != MarketPosition[1] Then var2 = Int(Random(idx)); if BarsSinceEntry == var2 Then { ExitLong("XB"); ExitShort("XS"); } } SetStopEndofday(150000); 2. 랜덤진입, 크로스 청산 input: RanTest(1000); //최적화 기능을 사용하여 1,000회의 Random test를 수행 var : Bong(0),idx1(0),idx2(0),mav1(0),mav2(0); mav1 = ma(c,5); mav2 = ma(C,20); If date<>date[1] Then Bong = dayindex[1]+1; Idx1 = Int(Random(Bong)); If dayindex == Idx1 and Idx1%2 == 0 Then #짝수 Buy("B"); if dayindex == Idx1 and Idx1%2 != 0 Then #홀수 Sell("S"); If MarketPosition != 0 Then{ if CrossDown(mav1,mav2) Then ExitLong("XB"); if crossup(mav1,mav2) then ExitShort("XS"); } SetStopEndofday(150000); 3.랜덤진입청산 input: RanTest(1000); //최적화 기능을 사용하여 1,000회의 Random test를 수행 var : Bong(0),idx1(0),idx2(0); If date<>date[1] Then Bong = dayindex[1]+1; Idx1 = Int(Random(Bong)); If dayindex == Idx1 and Idx1%2 == 0 Then #짝수 Buy("B"); if dayindex == Idx1 and Idx1%2 != 0 Then #홀수 Sell("S"); #진입후 var2봉 이후 청산 If MarketPosition != 0 Then{ if MarketPosition != MarketPosition[1] Then idx2 = Int(Random(Bong)); if BarsSinceEntry == idx2 Then { ExitLong("XB"); ExitShort("XS"); } } SetStopEndofday(150000); 즐거운 하루되세요 > 새로운세상 님이 쓴 글입니다. > 제목 : random test > 안녕하세요~ 다음 수식 부탁드립니다. random청산 test를 하기 위하여 다음과 같은 수식이 있을 때, 이 수식은 무조건 첫봉에서 진입이 발생하고 이후 청산을 random test하게 됩니다. input: RanTest(1000); //최적화 기능을 사용하여 1,000회의 Random test를 수행 If dayindex==0 Then {if C>O then Buy("B"); else Sell("S");} If date<>date[1] Then var1 = Int(Random(dayindex[1]+1)); If dayindex==var1 Then { ExitLong("XB"); ExitShort("XS"); } 위의 수식을 다음의 내용으로 변형하고 싶습니다. 1) 이평선교차 시스템처럼 장중에 진입이 발생할 경우 다음 진입이 발생하기전 random청산하는 수식. 즉, 각 진입의 진입시점이 확정되지 않은 상태에서 다음 진입이 발생하기 전 random청산하는 것으로 당연히 청산시점은 진입시점보다 뒤에 있습니다. 2) 1)과 반대로 random으로 진입이 있고. 이평선교차에 의해 청산하는 수식 마찬가지로 random진입이 항상 청산보다 우선합니다. 3) 1),2) 모두 조건만 만족되면 random진입,random 청산이 여러번 발생할 수 있습니다. 연결선물 분봉을 사용하며, 당일청산입니다. 그럼 부탁드리겠습니다. 감사합니다 !!!