답변완료
문의드립니다
input : short_len(50);input : long_len(150);input : retest_sig(false);input : candle_color(true);input : upper_col(Green);input : lower_col(Maroon);var : alpha(0),AR(0),A(0);var : R(0.01),Q(0.1);var : short_estimate(Nan),short_error_est(1.0),short_error_meas(R * (short_len));var : short_kalman_gain(0),short_prediction(Nan),short_kalman(0);var : Long_estimate(Nan),Long_error_est(1.0),Long_error_meas(R * (Long_len));var : Long_kalman_gain(0),Long_prediction(Nan),Long_kalman(0);var : trend_up(False);var : trend_col(0),trend_col1(0),candle_col(0);var : tx1(0),tx2(0),box1(0),box2(0);alpha = 1 / 200 ;A = iff(IsNan(A[1]) == true , ma(TrueRange, 200) , alpha * TrueRange + (1 - alpha) * iff(IsNan(A[1]) == true,0,A[1]));AR = A*0.5;if isnan(short_estimate) == true Then short_estimate = C[1];short_prediction = short_estimate;short_kalman_gain = short_error_est / (short_error_est + short_error_meas);short_estimate = short_prediction + short_kalman_gain * (C - short_prediction);short_error_est = (1 - short_kalman_gain) * short_error_est + Q / (short_len);short_kalman = short_estimate;if isnan(Long_estimate) == true Then Long_estimate = C[1];Long_prediction = Long_estimate;Long_kalman_gain = Long_error_est / (Long_error_est + Long_error_meas);Long_estimate = Long_prediction + Long_kalman_gain * (C - Long_prediction);Long_error_est = (1 - Long_kalman_gain) * Long_error_est + Q / (Long_len);Long_kalman = Long_estimate;trend_up = short_kalman > long_kalman;trend_col = iff(trend_up , upper_col , lower_col);trend_col1 = iff(short_kalman > short_kalman[2] , upper_col , lower_col);candle_col = iff(candle_color , IFf(trend_up == true and short_kalman > short_kalman[2] , upper_col , iff(trend_up == False and short_kalman < short_kalman[2] , lower_col , gray)) , Black);if Crossup(short_kalman,long_kalman) Then{ tx1 = text_new(sDate,sTime,min(L,long_kalman),"▲"); tx2 = text_new(sDate,sTime,min(L,long_kalman),NewLine+NumToStr(C,2)); Text_SetStyle(tx1,2,0); Text_SetStyle(tx2,2,0); Text_SetColor(tx1,trend_col); Text_SetColor(tx2,trend_col); var1 = Low+AR; var2 = Low; box1 = Box_New(sDate,sTime,var1,NextBarSdate,NextBarStime,var2); Box_SetColor(box1,trend_col); Box_SetFill(box1,true);}Else Box_SetEnd(box1,sDate,stime,var2);if CrossDown(short_kalman,long_kalman) Then{ tx1 = text_new(sDate,sTime,max(H,long_kalman),"▼"); tx2 = text_new(sDate,sTime,max(H,long_kalman),NumToStr(C,2)+NewLine); Text_SetStyle(tx1,2,1); Text_SetStyle(tx2,2,1); Text_SetColor(tx1,trend_col); Text_SetColor(tx2,trend_col); var3 = high; var4 = high-A; box2 = Box_New(sDate,sTime,var3,NextBarSdate,NextBarStime,var4); Box_SetColor(box2,trend_col); Box_SetFill(box2,true);}Else Box_SetEnd(box2,sDate,stime,var4);plot1(short_kalman, "Short Kalman", trend_col1);plot2(long_kalman, "Long Kalman", trend_col);수고많으십니다 문의드릴 내용은 위 수식에서 Short Kalman이 Long Kalman보다높은 값이면 매수진입 매도청산낮은 값이면 매도진입 매수청산이런 수식을 부탁드립니다 항상 감사드립니다
답변완료
종목 검색식 부탁드립니다
// 단기 지표A1=eavg(C,5);A2=eavg(C,20);D=A1-A2;U=if(D>D(1),D-D(1),0);Dn=if(D<D(1),D(1)-D,0);Au=eavg(U,15);Ad=eavg(Dn,15);R=if(Ad!=0,Au/Ad,100);R1=100-(100/(1+R));S=R1-50;// 장기 지표A3=eavg(C,20);U2=if(A3>A3(1),A3-A3(1),0);Dn2=if(A3<A3(1),A3(1)-A3,0);Au2=eavg(U2,15);Ad2=eavg(Dn2,15);R2=if(Ad2!=0,Au2/Ad2,100);R22=100-(100/(1+R2));L=R22-50;// 6중 EMAx1=eavg(S,5);x2=eavg(x1,5);x3=eavg(x2,5);x4=eavg(x3,5);x5=eavg(x4,5);x6=eavg(x5,5);// 최종 지표M=-0.343*x6+1.029*x5-6.069*x4+4.913*x3;// 검색 조건//(M<=0) and (M>M(1)and M(1)<=M(2)) and (L>L(1))and(S>S(1))(M<=0) and (M>M(1)and M(1)<=M(2)) and L>0 and S>0종목검색식 부탁드립니다
답변완료
수식 문의
안녕하세요?데이용 시스템식에서 수식에 의한 청산 규칙 외에도 SetStopLoss, SetStopProfittarget, SetStopTrailing 을 사용합니다.예컨대, 매수 진입해서 익절이 되었는데, 여전히 매수신호가 유지중이면SetStopProfittarget으로 익절된 봉에 다시 매수 진입을 하는데,이걸 한번 익절이나 손절이 되면다음 신호에나 진입하도록 하고 싶습니다.즉, 매수로 진입했다가 익절/손절되면현재 유지되고 있는 매수신호 말고,새로운 매수/매도신호까지 기다렸다가 진입하기를 원합니다.테스트용: 5분봉, 코스피200 선물에 적용1) 09시 20분 ~ 14시30분까지만 진입, 정규장 마감 10분전에 다 청산2) input: 매매횟수(3);=> 하루 최대 3번까지만 진입매수신호 = 5, 20, 60이평이 정배열매수청산 = 5, 20 이평 데드크로스매도신호 = 5, 20, 60 이평이 역배열매도청산 = 5, 20 이평 골드크로스SetStopLoss(st,PointStop);SetStopProfittarget(tp,PointStop);SetStopTrailing(t1,t2,PointStop,0);감사합니다.