커뮤니티

수식문의 드립니다.

프로필 이미지
쭈니오빠
2016-08-29 03:42:58
98
글번호 101429
답변완료
특정일자는 변수로 집어넣고 특정일의 종가가 조건1보다 크고 특정일 다음날은 분봉에서 일봉rsi의 값이 70이상인경우 매수1,2,3 에서 매수하고 특정일 다음날부터는 매수1,2,3조건 만족시 매수하고 싶습니다. 매수 1 매수 2 매수 3 감사합니다.
시스템
답변 1
프로필 이미지

예스스탁 예스스탁 답변

2016-08-30 11:39:42

안녕하세요 예스스탁입니다. Inputs: Length(14),특정일(20160801); Var : Counter(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0); var : RSIv(0),didx(0), UpAvg1(0), DownAvg1(0); #일봉 RSI계산 if date != date[1] Then{ didx = didx+1; UpAvg1 = UpAvg[1]; DownAvg1 = DownAvg[1]; } If didx <= 1 AND Length > 0 Then Begin UpSum = 0; DownSum = 0; For Counter = 0 To Length - 1 Begin UpAmt = DayClose(Counter) - DayClose(Counter+1); If UpAmt >= 0 Then DownAmt = 0; Else Begin DownAmt = -UpAmt; UpAmt = 0; End; UpSum = UpSum + UpAmt; DownSum = DownSum + DownAmt; End; UpAvg = UpSum / Length; DownAvg = DownSum / Length; End Else If didx > 1 AND Length > 0 Then Begin UpAmt = DayClose(0) - DayClose(1); If UpAmt >= 0 Then DownAmt = 0; Else Begin DownAmt = -UpAmt; UpAmt = 0; End; UpAvg = (UpAvg1 * (Length - 1) + UpAmt) / Length; DownAvg = (DownAvg1 * (Length - 1) + DownAmt) / Length; End; If UpAvg + DownAvg <> 0 Then RSIv = 100 * UpAvg / (UpAvg + DownAvg); Else RSIv = 0; if sdate == 특정일 Then var1 = C; if sdate != sdate[1] and sdate == 특정일 Then Didx = 0; if sdate != sdate[1] and sdate > 특정일 Then Didx = Didx+1; if (Didx == 1 and RSIV >= 70 and var1 > 조건1) or (Didx1 and var1 > 조건1) Then{ if 매수1 then buy("b1"); if 매수2 then buy("b2"); if 매수3 then buy("b3"); } 즐거운 하루되세요 > 쭈니오빠 님이 쓴 글입니다. > 제목 : 수식문의 드립니다. > 특정일자는 변수로 집어넣고 특정일의 종가가 조건1보다 크고 특정일 다음날은 분봉에서 일봉rsi의 값이 70이상인경우 매수1,2,3 에서 매수하고 특정일 다음날부터는 매수1,2,3조건 만족시 매수하고 싶습니다. 매수 1 매수 2 매수 3 감사합니다.