• 커뮤니티
  • 질의응답
  • 예스랭귀지 Q&A

커뮤니티

시스템식

프로필 이미지
회원
2012-06-26 21:22:30
354
글번호 52398
답변완료
2분봉 챠트를 보며, 급등하던 종목 일봉 챠트를 참조하여 5일 이동평균선을 이탈하면 바로 매수하고 상한가에 매도하는 수식(또는 당일 최고가)에 매도하는 수식 부탁드립니다. 지표식도 함께 부탁드립니다.
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2012-06-27 08:40:40

안녕하세요 예스스탁입니다. 1. 전일종가대비 per%이상 상승중이고 5이동평균을 하향이탈하면 매수하고 상한가에 청산하는 식입니다. input : P1(5),per(5); var : sumV(0), maV(0), count(0); var : 상한가(0), UpLimit(0); var : up1(0), up2(0), up3(0), up4(0), up5(0),up6(0); if date >= 19981207 then { if date < 20050328 && CodeCategory() == 2 then UpLimit = (BP[0] * 1.12); Else UpLimit = (BP[0] * 1.15); if CodeCategory() == 2 then { if date >= 20030721 then { up1 = int(UpLimit/100+0.00001)*100; up2 = int(UpLimit/100+0.00001)*100; up3 = int(UpLimit/100+0.00001)*100; up4 = int(UpLimit/50+0.00001)*50; up5 = int(UpLimit/10+0.00001)*10; up6 = int(UpLimit/5+0.00001)*5; } else { up1 = int(UpLimit/1000+0.00001)*1000; up2 = int(UpLimit/500+0.00001)*500; up3 = int(UpLimit/100+0.00001)*100; up4 = int(UpLimit/50+0.00001)*50; up5 = int(UpLimit/10+0.00001)*10; up6 = int(UpLimit/10+0.00001)*10; } } Else { up1 = int(UpLimit/1000+0.00001)*1000; up2 = int(UpLimit/500+0.00001)*500; up3 = int(UpLimit/100+0.00001)*100; up4 = int(UpLimit/50+0.00001)*50; up5 = int(UpLimit/10+0.00001)*10; up6 = int(UpLimit/5+0.00001)*5; } if CodeCategory() == 1 || CodeCategory() == 2 then { If BP >= 500000 Then 상한가 = up1; Else If BP >= 100000 Then 상한가 = iff(up2>=500000, up1, up2); Else If BP >= 50000 Then 상한가 = iff(up3>=100000, up2, up3); Else If BP >= 10000 Then 상한가 = iff(up4>=50000, up3, up4); Else If BP >= 5000 Then 상한가 = iff(up5>=10000, up4, up5); Else 상한가 = iff(up6>=5000, up5, up6); } else if CodeCategory() == 8 || CodeCategory() == 9 then { // ETF 상한가 = up6; } } sumV = 0; for count = 0 to P1-1 { sumV = sumV+DayClose(count); } maV = sumV / P1; IF CrossDown(C,MAV) and C > DayClose(1)*(1+Per/100) Then BUY(); if MarketPosition == 1 Then exitlong("bx",atlimit, 상한가); 2. 아래식 적용하시면 상한가와 일간 5이평을 차트에 그려보실 수 있습니다 input : P1(5),per(5); var : sumV(0), maV(0), count(0); var : 상한가(0), UpLimit(0); var : up1(0), up2(0), up3(0), up4(0), up5(0),up6(0); if date >= 19981207 then { if date < 20050328 && CodeCategory() == 2 then UpLimit = (BP[0] * 1.12); Else UpLimit = (BP[0] * 1.15); if CodeCategory() == 2 then { if date >= 20030721 then { up1 = int(UpLimit/100+0.00001)*100; up2 = int(UpLimit/100+0.00001)*100; up3 = int(UpLimit/100+0.00001)*100; up4 = int(UpLimit/50+0.00001)*50; up5 = int(UpLimit/10+0.00001)*10; up6 = int(UpLimit/5+0.00001)*5; } else { up1 = int(UpLimit/1000+0.00001)*1000; up2 = int(UpLimit/500+0.00001)*500; up3 = int(UpLimit/100+0.00001)*100; up4 = int(UpLimit/50+0.00001)*50; up5 = int(UpLimit/10+0.00001)*10; up6 = int(UpLimit/10+0.00001)*10; } } Else { up1 = int(UpLimit/1000+0.00001)*1000; up2 = int(UpLimit/500+0.00001)*500; up3 = int(UpLimit/100+0.00001)*100; up4 = int(UpLimit/50+0.00001)*50; up5 = int(UpLimit/10+0.00001)*10; up6 = int(UpLimit/5+0.00001)*5; } if CodeCategory() == 1 || CodeCategory() == 2 then { If BP >= 500000 Then 상한가 = up1; Else If BP >= 100000 Then 상한가 = iff(up2>=500000, up1, up2); Else If BP >= 50000 Then 상한가 = iff(up3>=100000, up2, up3); Else If BP >= 10000 Then 상한가 = iff(up4>=50000, up3, up4); Else If BP >= 5000 Then 상한가 = iff(up5>=10000, up4, up5); Else 상한가 = iff(up6>=5000, up5, up6); } else if CodeCategory() == 8 || CodeCategory() == 9 then { // ETF 상한가 = up6; } } sumV = 0; for count = 0 to P1-1 { sumV = sumV+DayClose(count); } maV = sumV / P1; plot1(상한가); plot2(mav); 즐거운 하루되세요 > 악돌 님이 쓴 글입니다. > 제목 : 시스템식 > 2분봉 챠트를 보며, 급등하던 종목 일봉 챠트를 참조하여 5일 이동평균선을 이탈하면 바로 매수하고 상한가에 매도하는 수식(또는 당일 최고가)에 매도하는 수식 부탁드립니다. 지표식도 함께 부탁드립니다.
등록