커뮤니티

문의드립니다.

프로필 이미지
마린187
2011-02-28 12:34:33
714
글번호 36130
답변완료
안녕하세요!!! 1. 갭보정한 RSI 2. 50 이상(상향돌파시) 매수 3. 50 이하(하향돌파시) 매도 4. 장시작후 5분후에 진입 (09:05분에 RSI가 50이상이라면 매수, 50이하라면 매도) 5. 15:00시 청산 시스템식 부탁드립니다..^^ 행복한 하루보내세요*^^*
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2011-02-28 14:09:39

안녕하세요 예스스탁입니다. Inputs: RSIPeriod(14); Variables: RSIcount(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0),RSIv(0); var : sumGap(0), gap(0), GO(0), GH(0), GL(0), GC(0); if date!=date[1] then { // 날짜가 변경되는 봉에서(분봉에서 첫번째 봉) gap = Open-Close[1]; // 일간갭 sumGap = sumGap+gap; // 일간갭 누적 } GO = O - sumGap;// 갭보정 시가 GH = H - sumGap;// 갭보정 고가 GL = L - sumGap;// 갭보정 저가 GC = C - sumGap; // 갭보정 종가 If CurrentBar == 1 AND RSIPeriod > 0 Then Begin UpSum = 0; DownSum = 0; For RSIcount = 0 To RSIPeriod - 1 Begin UpAmt = GC[RSIcount] - GC[RSIcount+1]; If UpAmt >= 0 Then DownAmt = 0; Else Begin DownAmt = -UpAmt; UpAmt = 0; End; UpSum = UpSum + UpAmt; DownSum = DownSum + DownAmt; End; UpAvg = UpSum / RSIPeriod; DownAvg = DownSum / RSIPeriod; End Else If CurrentBar > 1 AND RSIPeriod > 0 Then Begin UpAmt = GC[0] - GC[1]; If UpAmt >= 0 Then DownAmt = 0; Else Begin DownAmt = -UpAmt; UpAmt = 0; End; UpAvg = (UpAvg[1] * (RSIPeriod - 1) + UpAmt) / RSIPeriod; DownAvg = (DownAvg[1] * (RSIPeriod - 1) + DownAmt) / RSIPeriod; End; If UpAvg + DownAvg <> 0 Then RSIv = 100 * UpAvg / (UpAvg + DownAvg); Else RSIv = 0; if stime == 90500 Then{ if RSIV >= 50 Then buy(); if RSIV < 50 Then sell(); } if stime >= 90500 Then{ if crossup(RSIV,50) Then buy(); if CrossDown(RSIV,50) Then sell(); } SetStopEndofday(150000); 즐거운 하루되세요 > 마린187 님이 쓴 글입니다. > 제목 : 문의드립니다. > 안녕하세요!!! 1. 갭보정한 RSI 2. 50 이상(상향돌파시) 매수 3. 50 이하(하향돌파시) 매도 4. 장시작후 5분후에 진입 (09:05분에 RSI가 50이상이라면 매수, 50이하라면 매도) 5. 15:00시 청산 시스템식 부탁드립니다..^^ 행복한 하루보내세요*^^*