커뮤니티

예스랭귀지 Q&A

글쓰기
답변완료

종가기준 20일신고가

안녕하세요?수고 많으십니다 당일제외 종가기준 20일신고가 수식을 작성해보았는데 잘 안되고 있습니다 어디가 잘못일까요? INPUT:PERIOD(20); IF HIGHEST(C[1],20)==C[1] THEN VAR1=C[1]; PLOT1(VAR1);//비츠로테크24.6.28일기준19일전종가 9500이맞는데34일전종가에서 가격이 하락하면 따라 내려와야는데 안내려옵니다.== C[1]대신에== H를 넣어봐도 안되구요 ㅋ
프로필 이미지
트라이
2024-06-30
969
글번호 181080
지표
답변완료

추세 당일

input : Period(250); Var:j(0),T(0),tl(0),TL1(0),tx(0),txx(0) ,box(0),box1(0); Var: date11(0),date12(0),time11(0),time12(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0); Array: HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0); var :tx98count(0),tx99count(0),l1(0),l2(0),H1(0),H2(0); Plot1(value12,"value12",IFf(t==1,Red,Blue)); For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(c,highest(H,Period)[1]) Then T = 1; if CrossDown(c,Lowest(L,Period)[1]) Then T = -1; If T == -1 Then { If T[1] != -1 Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; } LoVal[0] = L; LoBar[0] = 0; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; box = Box_New(date11,time11,Value11,date12,time12,Value12); Text_SetSize(tx,25); Text_SetColor(Tx,Red); Text_SetStyle(tx,1,1); Text_SetBold(tx,1); if abs(value12[1]-value11[1]) < 0.5 Then Text_Delete(tx); tx = Text_New(sDate,stime,value12,NumToStr(value11-value12,2)); Text_SetColor(Tx,Blue); Text_SetStyle(tx,1,0); Text_SetSize(tx,25); Text_SetBold(tx,1); } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; date22 = date[0]; time22 = stime[0]; Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value11-value12,2)); Text_SetLocation(tx,sDate,sTime,value12); } if value12 > value11-0.7 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,50); } else if value12 <= value11-0.7 and value12 > value11-0.9 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,90); } else if value12 <= value11-0.9 and value12 > value11-1.3 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,60); } else if value12 <= value11-1.3 and value12 > value11-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,40); } else if value12 <= value11-1.6 and value12 > value11-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,20); } else { Box_SetColor(box,Yellow); Box_SetFill(box,true,60); } } If T == 1 Then { If T[1] != 1 Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; } HiVal[0] = H; HiBar[0] = 0; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; box = Box_New(date11,time11,Value11,date12,time12,Value12); Text_SetSize(tx,25); Text_SetColor(Tx,Blue); Text_SetStyle(tx,1,0); Text_SetBold(tx,1); if abs(value12[1]-value11[1]) < 0.5 Then Text_Delete(tx); tx = Text_New(sDate,stime,value12,NumToStr(value12-value11,2)); Text_SetColor(Tx,Red); Text_SetStyle(tx,1,1); Text_SetSize(tx,25); Text_SetBold(tx,1); } If HiVal[0] <H Then { HiVal[0] = H; HiBar[0] = 0; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; date32 = date[0]; time32 = stime[0]; Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value12-value11,2)); Text_SetLocation(tx,sDate,sTime,value12); } if Value12 > value11+1.1 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,60); } else if value12 >= value11+0.8 and value12 <= value11+1.1 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Orange); Box_SetFill(box,true,50); } } 전일은 연관없게 무시하고, 당일의 시초부터만 모든 지표 시작. 감사합니다.
프로필 이미지
고성
2024-06-30
704
글번호 181079
지표
답변완료

전환추세 당일

Input : 전환(0.55); Var:j(0),jj(0),HH(0),LL(0),hiBar(0),loBar(0),최종꼭지점(""),처리구분(""); Array:고[10,4](0),저[10,4](0); var : box(0),TX(0),TX2(0),TL(0),TL1(0); HH = H; LL = L; If Index == 0 or Bdate != Bdate[1] Then { 고[1,1] = HH; 고[1,2] = 0; 고[1,3] = sDate; 고[1,4] = sTime; 저[1,1] = LL; 저[1,2] = 0; 저[1,3] = sDate; 저[1,4] = sTime; 최종꼭지점 = ""; 처리구분 = ""; } If Index > 0 and Bdate == Bdate[1] Then { hiBar = hiBar + 1; loBar = loBar + 1; } If HH[hiBar] < HH Then hiBar = 0; If LL[loBar] > LL Then loBar = 0; Condition1 = 저[1,1]+전환 <= HH and hiBar == 0; Condition2 = 고[1,1]-전환 >= LL and loBar == 0; 처리구분 = ""; If Condition1 and Condition2 Then { If 최종꼭지점 == "저점" Then { If 저[1,1] > LL Then 처리구분 = "저점처리"; Else 처리구분 = "고점처리"; } Else If 최종꼭지점 == "고점" Then { If 고[1,1] < HH Then 처리구분 = "고점처리"; Else 처리구분 = "저점처리"; } } Else If Condition1 Then 처리구분 = "고점처리"; Else If Condition2 Then 처리구분 = "저점처리"; If 처리구분 == "고점처리" Then { If 최종꼭지점 == "저점" or 최종꼭지점 == "" Then { For j = 10 DownTo 2 { For jj = 1 To 4 { 고[j,jj] = 고[j-1,jj]; } } 고[1,1] = HH[hiBar]; 고[1,2] = Index - hiBar; 고[1,3] = sDate[hiBar]; 고[1,4] = sTime[hiBar]; hiBar = -1; loBar = -1; TL = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]); TL_SetSize(TL,1); TL_SetColor(TL,RED); TX = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1]-저[1,1],2)+" "); Text_SetSize(tx,25); Text_SetColor(tx,Red); Text_SetStyle(tx,2,1); Text_SetBold(tx,1); box = Box_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]); } If 고[1,1] < HH[hiBar] Then { 고[1,1] = HH[hiBar]; 고[1,2] = Index - hiBar; 고[1,3] = sDate[hiBar]; 고[1,4] = sTime[hiBar]; hiBar = -1; loBar = -1; TL_SetEnd(TL,고[1,3],고[1,4],고[1,1]); Text_SetString(TX,NumToStr(고[1,1]-저[1,1],2)+" "); Text_SetLocation(TX,고[1,3],고[1,4],고[1,1]); Box_SetEnd(box,고[1,3],고[1,4],고[1,1]); } if 고[1,1] >= 저[1,1]+1.3 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,40); } else if 고[1,1] < 저[1,1]+1.3 and 고[1,1] >= 저[1,1]+0.8 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,30); } else if 고[1,1] < 저[1,1]+0.8 and 고[1,1] >= 저[1,1]+0.7 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } else if 고[1,1] < 저[1,1]+0.7 and 고[1,1] >= 저[1,1]+0.45 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,70); } else { Box_SetColor(box,Magenta); Box_SetFill(box,true,50); } 최종꼭지점 = "고점"; Plot1(고[1,1]); NoPlot(2); } If 처리구분 == "저점처리" Then { If 최종꼭지점 == "고점" or 최종꼭지점 == "" Then { For j = 10 DownTo 2 { For jj = 1 To 4 { 저[j,jj] = 저[j-1,jj]; } } 저[1,1] = LL[loBar]; 저[1,2] = Index - loBar; 저[1,3] = sDate[loBar]; 저[1,4] = sTime[loBar]; hiBar = -1; loBar = -1; TL = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]); TL_SetSize(TL,1); TL_SetColor(TL,Green); TX = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(고[1,1]-저[1,1],2)+" "); Text_SetSize(tx,25); Text_SetColor(tx,Blue); Text_SetStyle(tx,2,0); Text_SetBold(tx,1); box = Box_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]); } If 저[1,1] > LL[loBar] Then { 저[1,1] = LL[loBar]; 저[1,2] = Index - loBar; 저[1,3] = sDate[loBar]; 저[1,4] = sTime[loBar]; hiBar = -1; loBar = -1; TL_SetEnd(TL,저[1,3],저[1,4],저[1,1]); Text_SetString(TX,NumToStr(고[1,1]-저[1,1],2)+" "); Text_SetLocation(TX,저[1,3],저[1,4],저[1,1]); Box_SetEnd(box,저[1,3],저[1,4],저[1,1]); } if 저[1,1] > 고[1,1]-0.45 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,80); } else if 저[1,1] <= 고[1,1]-0.45 and 저[1,1] > 고[1,1]-0.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,60); } else if 저[1,1] <= 고[1,1]-0.6 and 저[1,1] > 고[1,1]-0.9 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,90); } else if 저[1,1] <= 고[1,1]-0.9 and 저[1,1] > 고[1,1]-1.3 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,70); } else if 저[1,1] <= 고[1,1]-1.3 and 저[1,1] > 고[1,1]-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,60); } else if 저[1,1] <= 고[1,1]-1.6 and 저[1,1] > 고[1,1]-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,20); } else { Box_SetColor(box,Yellow); Box_SetFill(box,true,60); } 최종꼭지점 = "저점"; Plot2(저[1,1]); NoPlot(1); } 추세선이 발생한 시점의 고가가 기준이 되어야 하는데,첫봉의 고가가 고점의 기준이 됩니다. 상승추세선도 시점 최저가가 기준이 되어야 하는데, 당일 첫봉의 저가입니다. 첫봉이 기준이면 몇틱봉으로 조회하느냐에 따라 첫추세선의 수치가 다르게 나옵니다. 당일 첫추세선 기준점을, 전일은 무시하고 당일 첫봉이 아닌 당일 첫추세선 시점 최고가,최저가로 기준점을 수정 부탁드립니다.
프로필 이미지
고성
2024-06-30
911
글번호 181078
지표
답변완료

종목검색식 부탁드립니다.

키움 수식을 분봉에서 검색될 수 있도록 종목검색식 부탁드립니다. A=Valuewhen(1, Dayclose()>Predayclose()*multiple, Dayhigh()); B=Valuewhen(1, Dayclose()>Predayclose()*multiple, Daylow()); D=A-((A-B)/m); CrossUp(C, D) && Rsi(14)>50 && C>O && V>V(1)*배수 (지표변수) multiple: 0.9 / 배수: 0.5 / m: 2.7
프로필 이미지
비밀통로
2024-06-29
850
글번호 181077
종목검색
답변완료

수식수정

Inputs : Period(20), Sence(1.5), CC_DN(Yellow); Vars: VLineUp(0), VLineDn(0), HHighest(0), LLowest(0), JustChanged(FALSE), VLine(0), DBN(0),T(0); Array: Highs[35](0), Lows[35](0), RRange[35](0), UpWave[1](FALSE), DnWave[1](FALSE); If STime == 180000 Then DBN = 0; DBN = DBN + 1; Var1 = Period; Var2 = Var1 - 1; Var3 = Var1 - 2; Var5 = Sence; Var6 = H-L; JustChanged = FALSE; if CurrentBar <= Var2 then begin Highs[CurrentBar] = Close; Lows[CurrentBar] = Close; RRange[CurrentBar] = (H-L) /2; end; if CurrentBar == Var1 then begin if Highs[Var2] >= Highs[Var3] then begin UpWave[1] = TRUE; HHighest = Highs[Var2]; VLineUp = HHighest - (Var5 * MA(Var6,Var2)); #Plot1(VLineUp,"VLineUp"); end; if Highs[Var2] < Highs[Var3] then begin DnWave[1] = TRUE; LLowest = Lows[Var2]; VLineDn = LLowest + (Var5 * MA(Var6,Var2)); #Plot2(VLineDn,"VLineDn"); end; end; if CurrentBar > Var1 then begin if DnWave[1] and Close > VLineDn then begin DnWave[1] = FALSE; UpWave[1] = TRUE; JustChanged = TRUE; HHighest = Close; LLowest = 0; end; if UpWave[1] and Close < VLineUp and JustChanged == FALSE then begin UpWave[1] = FALSE; DnWave[1] = TRUE; JustChanged = TRUE; LLowest = Close; HHighest = 0; end; if JustChanged == FALSE then begin if Close > HHighest then HHighest = Close; else if Close < LLowest then LLowest = Close; end; VLineUp = HHighest - (Var5 * MA(Var6,Var2)); VLineDn = LLowest + (Var5 * MA(Var6,Var2)); if UpWave[1] then T = 1; else if DnWave[1] then T = -1; end; Input : BBP(20), MultiD(2); var : BBmd(0),BBup(0),BBdn(0); BBmd = ma(C,Period); BBup = BollBandUp(BBP,MultiD); BBdn = BollBandDown(BBP,MultiD); if CrossDown(C,BBup) and t == -1 Then sell(); if crossup(C,BBdn) and t == 1 Then buy(); 안녕하세요 위식적용결과 sw2선 음봉에서 매수가 발생됨니다 검토좀해주세요 Sw2양선 매수. 음선에서 매도. 첨부 sw2선 자유게시판 2109번
프로필 이미지
아트정
2024-06-29
689
글번호 181076
시스템
답변완료

RSI 침체와 과열을 이용한 질문을 보충 하여 드립니다

안녕 하세요? 이전에 올렸던 질문이 서툴러 두버째종목 검색식에 대한 문의 다시 드립니다, 아래 수식은 RSi 침체구간을 사용해 진입 위치를 잡고 수식 입니다, -------------------------------------------------- RSi(%기간%)침체 R = RSi(기간); if(R<=40, Valuewhen(1, L < L(1), L) *0.97, Valuewhen(1,CrossUp(R, 40) or CrossDown(R, 40), C)) 매수라인 R = RSi(기간); 회색라인(진입라인)/15분 Valuewhen(1, CrossUp(R, 40) or CrossDown(R, 40), C) -------------------------------------------------------- RSi(%기간%)과열, 지표 기간값 21 R = RSi(기간); if(R>60, Valuewhen(1, H > H(1), H) *1.03, Valuewhen(1,CrossUp(R, 60) or CrossDown(R, 60), C)) 매도라인(일목균형표) R = RSi(기간); Valuewhen(1, CrossUp(R, 60) or CrossDown(R, 60), C) 위 수식을 예스 트레이더 수식검색식으로 변환 될수 있도록 부탁 드립니다. 저의 질문 내용이 선생님께 잘 전달 되기 바라며 저의 짧은 지식 안에서 질문을 드려 봅니다 파일이 참고가 될수 있기를 바라 봅니다 노고에 늘 감사 드립니다
프로필 이미지
릴틱
2024-07-04
848
글번호 181075
검색
답변완료

수정부탁드립니다.

안녕하세요 늘 도움주심에 감사드립니다. 아래의 식은 제가 일부 수정하여 사용하고 있는데 지표부분은 없애고 하단부근의 원으로 색상표시 되는 부분을 시스템으로 수정 부탁드립니다. input : length(23); input : len2(13); input : showsignals(true); input : highlighting(true); var : upper(0),lower(0); lower = lowest(L,length); upper = highest(H,length); plot1(upper, "Upper"); plot2(lower, "Lower"); var : up(0),down(0),sup(0),sdown(0); var : k1(0),k2(0),k3(0),k4(0),i1(-1),i2(-1); up=highest(high,length); down=lowest(low,length); sup=highest(high,len2); sdown=lowest(low,len2); if high >= up[1] Then i1 = 0; Else { if i1 >= 0 Then i1 = i1+1; } if Low <= down[1] Then i2 = 0; Else { if i2 >= 0 Then i2 = i2+1; } K1=iff(i1 <=i2, down , up); K2=iff(i1 <= i2,sdown,sup); K3=iff(close>K1,down,nan); K4=iff(close<K1,up,nan); plot3(K1,"Trend Line",red); plot4(K2,"Exit Line",blue); var : buySignal(False),sellSignal(False),buyExit(False),sellExit(False); var : O1(-1),O2(-1),O3(-1),O4(-1); var : E1(-1),E2(-1),E3(-1),E4(-1); var : tx1(0),tx2(0),tx3(0),tx4(0); var : tx5(0),tx6(0),tx7(0),tx8(0); buySignal=high==upper[1] or CrossUp(high,upper[1]); sellSignal = low==lower[1] or CrossUp(lower[1],low); buyExit=low==sdown[1] or CrossUp(sdown[1],low); sellExit = high==sup[1] or CrossUp(high,sup[1]); if BuySignal == true Then var1 = Index; if sellSignal == true Then var2 = Index; if buyExit == true Then var3 = Index; if sellExit == true Then var4 = Index; O1= IFf(var1 > 0,Index-var1,-1); O2= IFf(var2 > 0,Index-var2,-1); O3= IFf(var3 > 0,Index-var3,-1); O4= IFf(var4 > 0,Index-var4,-1); if BuySignal[1] == true Then var5 = Index; if sellSignal[1] == true Then var6 = Index; if buyExit[1] == true Then var7 = Index; if sellExit[1] == true Then var8 = Index; E1= IFf(var5 > 0,Index-var5,-1); E2= IFf(var6 > 0,Index-var6,-1); E3= IFf(var7 > 0,Index-var7,-1); E4= IFf(var8 > 0,Index-var8,-1); if buySignal and O3<O1[1] Then { tx1 = Text_New(sDate,sTime,down,"●"); Text_SetColor(tx1,Red); } if buyExit and O1<O3[1] Then { tx5 = Text_New(sDate,sTime,up,"●"); Text_SetColor(tx5,Blue); }
프로필 이미지
라몬
2024-06-29
662
글번호 181074
시스템

cntbs 님에 의해서 삭제되었습니다.

프로필 이미지
cntbs
2024-06-29
276
글번호 181073
검색
답변완료

문의드립니다

월봉 피봇 구하는식 부탁드립니다 전월의 고저종가를 이용하여 피봇, 1차저항/2차저항, 1차지지/2차지지 구하는식 부탁드립니다 감사합니다
프로필 이미지
러블리
2024-06-29
908
글번호 181072
지표
답변완료

문의드립니다

봉카운트를 지표식으로 부탁드립니다 예를들어 국내선물 5분봉챠트라고 치면 9시5분봉 아래에 숫자 1를 넣어 주시고 9시 10분봉 아래에 숫자 2를 넣어주시고 9시 15분봉 아래에 3이라는 숫자가 챠트에서 보이게 넣어 주시면 됩니다 이런식으로 쭉 카운트 하다가 마지막봉인 n번째 봉에는 봉아래에 n을 표기해 주시면 됩니다 하루 단위로 리셋 되게 해주시면 됩니다 감사합니다
프로필 이미지
zmfha
2024-06-29
1023
글번호 181071
지표