항상 감사드립니다 키움용 수식입니다 예스트레이더 수식으로 변경 부탁드립니다 행복한 하루 되세요 파동추세기준선 A=(H+L+C)/3; B=eavg(A,9); D=eavg(abs(A-B),9); E=(A-B)/(D*0.015); w1=eavg(E,20); w2=wavg(w1,3); a1=crossup(w1,w2); a2=crossdown(w1,w2); valuewhen(1,a1 or a2,o)

지그재그 선 부탁드립니다. 박스색상종료시 input :Peodd(10),d색상두께(50),d두께c(1),긁씨크기d(10); Var:상승색j(Red), 하락색j(LimE); Var:JW(0),JWT(0),dTL5사각(0),dText1사각(0); Var: h고11(0),h고12(0),h시간11(0),h시간12(0),H선TL1(0),H선TL(0),pvv(0),dTL(0), h고21(0),h고22(0),h시간21(0),h시간22(0),hVlue11(0),hVlue12(0), h고31(0),h고32(0),h시간31(0),h시간32(0); Array:h고Val[20](0),L저val[20](0),h고Bar[20](0),L저Bar[20](0); Array:Ldr[7](0),Ldfr[7](0); var : Udbox(0),Udbox1(0); Ldr[0] = 0; Ldr[1] = 2; Ldr[2] = 3.; Ldr[3] = -1; Ldr[4] = -2.; Ldr[5] = 1; Ldr[6] = 0.5; For JW = 0 To 19 { h고Bar[JW] = h고Bar[JW] + 1; L저Bar[JW] = L저Bar[JW] + 1; } if crossup(c,highest(H,Peodd)[1]) Then JWT = 1; if CrossDown(c,Lowest(L,Peodd)[1]) Then JWT = -1; If JWT == -1 Then { If JWT[1] != -1 Then { For JW = 18 DownTo 0 { L저val[JW+1] = L저val[JW]; L저Bar[JW+1] = L저Bar[JW]; //ZZ[j+1] = ZZ[j]; } L저val[0] = L; L저Bar[0] = 0; //ZZ[0] = L; h고11 = Date[h고Bar[0]]; h시간11 = stime[h고Bar[0]]; hVlue11 = h고Val[0]; h고12 = Date[L저Bar[0]]; h시간12 = stime[L저Bar[0]]; hVlue12 = L저val[0]; h고21 = Date[h고Bar[0]]; h시간21 = stime[h고Bar[0]]; h고22 = Date[0]; h시간22 = stime[0]; for JW = 0 to 6 { Ldfr[JW] = L저val[1] + ((h고Val[0] - L저val[1]) * Ldr[JW]); } Box_SetEnd(Udbox,h고11,h시간11,hVlue11); Udbox = box_new(h고11,h시간11,hVlue11,h고12,h시간12,hVlue12); Box_SetColor(Udbox,하락색j); Box_SetFill(Udbox,true,d색상두께); TL_SetSize(dTL5사각,d두께c); TL_SetColor(dTL5사각,Blue); } If L저val[0] > L Then { L저val[0] = L; L저Bar[0] = 0; //ZZ[0] = L; h고12 = Date[L저Bar[0]]; h시간12 = stime[L저Bar[0]]; hVlue12 = L저val[0]; h고22 = Date[0]; h시간22 = stime[0]; // Box_SetEnd(Udbox,h고12,h시간12,hVlue12); } Box_SetEnd(Udbox,NextBarSdate,NextBarStime,hVlue12); } If JWT == 1 Then { If JWT[1] != 1 Then { For JW = 18 DownTo 0 { h고Val[JW+1] = h고Val[JW]; h고Bar[JW+1] = h고Bar[JW]; //ZZ[j+1] = ZZ[j]; } h고Val[0] = H; h고Bar[0] = 0; //ZZ[0] = H; h고11 = Date[L저Bar[0]]; h시간11 = stime[L저Bar[0]]; hVlue11 = L저val[0]; h고12 = Date[h고Bar[0]]; h시간12 = stime[h고Bar[0]]; hVlue12 = h고Val[0]; h고31 = Date[L저Bar[0]]; h시간31 = stime[L저Bar[0]]; h고32 = Date[0]; h시간32 = stime[0]; for JW = 0 to 5 { Ldfr[JW] = L저val[0] + ((h고Val[1] - L저val[0]) * Ldr[JW]); } Box_SetEnd(Udbox,h고11,h시간11,hVlue12); Udbox = box_new(h고11,h시간11,hVlue11,h고12,h시간12,hVlue12); Box_SetColor(Udbox,상승색j); Box_SetFill(Udbox,true,d색상두께); TL_SetSize(dTL5사각,d두께c); TL_SetColor(dTL5사각,Red); } If h고Val[0] < H Then { h고Val[0] = H; h고Bar[0] = 0; //ZZ[0] = H; h고12 = Date[h고Bar[0]]; h시간12 = stime[h고Bar[0]]; hVlue12 = h고Val[0]; h고32 = Date[0]; h시간32 = stime[0]; // Box_SetEnd(Udbox,h고12,h시간12,hVlue12); } Box_SetEnd(Udbox,NextBarSdate,NextBarStime,hVlue12); }

주간변동폭 Condition1 = H >= L*1.10; var1 = CountIf(Condition1==true,52); var2 = Ceiling(52*0.6); if var1 >= Var2 and V >= 1000000 Then Find(1); 답글주신 종목검색수식 적용해본 결과 잘 검색되었습니다. 그런데 이렇게 검색된 종목에대해 검증할 필요가 있습니다. 전부는 아니더라도 검색된 종목중 몇개라도 검증하려는데 이 검증에 필요한 수식 부탁드립니다. 감사합니다

RSI 50넘으면 색이 레드로 50무너지면 색이 파랑으로 또한,, MACD골드이며 MACD오실레이터가 양의 값을 가질때 RSI80넘고, 볼린저밴드 중간선 돌파하는 시스템식 부탁합니다.

첫번째 수식에서 조건이, rsi70이상이 되면 다음봉이 음봉,음봉,음봉,양봉 이렇게 되어도 4번째 양봉에서 매도진입 입니다만 작성해 주신 수식은 rsi70 이후 다음봉이 음봉이 되고 rsi70밑으로 내려가 버린 경우 T값이 다시 0이 되어서 차후 양봉이 나와도 신호가 발생하지 않는듯 합니다. 수식 검토 부탁드립니다.~~ ---------------------------------------------------------- input : RSIP(14); var : T(0),S(0); var1 = RSI(RSIP); if CrossUp(var1,70) Then { T = 1; S = 0; } else if CrossDown(var1,70) Then T = -1; else { if T == 1 Then { if C > O Then { S = S+1; if S == 1 Then Sell("S1"); } } } if CrossUp(var1,75) Then Sell("S2"); SetStopProfittarget(1,PercentStop); 즐거운 하루되세요 > 끄억 님이 쓴 글입니다. > 제목 : 수식 문의 드립니다 > 수동으로 매수 진입한 포지션이 있을때 1. rsi70 이상인 경우 다음봉부터 최초로 나온 양봉 종가에 or 2. rsi 75 이상인 경우 해당봉 종가에 청산해라 부탁 드립니다 혹시 수동진입 자동청산이 되지 않는다면 (매도진입) 1. rsi70 이상인 경우 다음봉부터 최초로 나온 양봉 종가에 or 2. rsi 75 이상인 경우 해당봉 종가에 매도해라 (청산식) 1% 이상 수익나면 환매수 해라 부탁 드립니다