커뮤니티

예스랭귀지 Q&A

글쓰기
답변완료

문의 드립니다

일봉이 20봉 이상 60이평 위에 있고 그중 60이평이랑 이격도가 10프로이상인 봉이 10개 이상이고 그 기간중 120봉 신고가를 경신하고 60이평을 데드크로스하는 지점의 시가의 선을 60봉동안 표시하고 싶습니다. 감사합니다.
프로필 이미지
무패
2024-02-14
504
글번호 176630
지표
답변완료

추세 박스

1번수식. input : Period(250); Var:TL(0),j(0),T(0),tx(0) ,box(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); 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_Self(date11,time11,Value11,date12,time12,Value12); Condition99 = False; tx99count = 0; } Else { 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); { } 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,70); } 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-2 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,20); } else { Box_SetColor(box,Yellow); Box_SetFill(box,true,50); } Condition99 = False; } Else { if Condition99 == False and value12 <= value11-0.9 and H >= value12+PriceScale*3 Then { Condition99 = true; tx99count = tx99count+1; if tx99count >= 1 Then { TL= TL_New_Self(sDate,sTime,H+0.15,sDate,sTime,999); TL_SetColor(TL,Magenta); TL_SetSize(TL,1); } } } } } 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_Self(date11,time11,Value11,date12,time12,Value12); Condition98 = False; tx98count = 0; } 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); { } if Value12 >= value11+1.3 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,70); } else if value12 >= value11+0.8 and value12 < value11+1.3 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Orange); Box_SetFill(box,true,60); } Condition98 = False; } Else { if Condition98 == False and value12 >= value11+0.9 and L <= value12-PriceScale*3 Then { Condition98 = true; tx98count = tx98count+1; if tx98count >= 1 Then { TL= TL_New_Self(sDate,sTime,H-0.15,sDate,sTime,-999); TL_SetColor(TL,Blue); TL_SetSize(TL,1); } } } } 2번수식. input : Period(250); Var:TL(0),j(0),T(0),tx(0) ,box(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); 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); } 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); } 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,70); } 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-2 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,20); } else { Box_SetColor(box,Yellow); Box_SetFill(box,true,50); } } 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); } 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); } if Value12 >= value11+1.3 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,70); } else if value12 >= value11+0.8 and value12 < value11+1.3 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,30); } Else { Box_SetColor(box,Orange); Box_SetFill(box,true,60); } } 윗 그림은 박스만 있는 2번 수식이고, 정상입니다. 아래 그림은 그 박스 수식에, 3틱 변동시 세로선 추가하면 오류 나오는 1번 수식입니다. 선물 10틱 차트에서, 1번 수식 박스 세로선 모두 구현되게 수정 부탁드립니다. 다른 수식에서도 분봉은 정상이나 틱차트에서 오류 나올 때가 가끔 있습니다. 정상 박스는 처음부터 테두리가 없는데, 오류가 생길 때는 네모 테두리가 생겼다가 정상으로 되기도하나 그대로 테두리만 끝까지 존재합니다.
프로필 이미지
고성
2024-02-14
718
글번호 176629
지표

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

프로필 이미지
hakona
2024-02-15
14
글번호 176628
지표
답변완료

수식 문의드립니다,

CrossUp(CCI(기간),기준) &&CrossUp(Diplus(Period), DiMinus(Period)) &&v>v(1)*배수 이고 지표변수는 기간 : 20 기준 : 0 period : 14 배수 : 2 입니다. 위 수식으로 파워종목검색을 하고 싶습니다. 항상 감사드립니다.
프로필 이미지
카카피피
2024-02-14
550
글번호 176627
검색
답변완료

수정부탁드립니다.

안녕하세요 아래의 수식중 일부 수정 부탁드립니다.. 매수신호가 나오면 다음에 매도신호가 나옵니다.(반대로 매도다음 매수) 매도신호가 나오면 다음에 매수 신호가 나오는것이 계속 반복됩니다. 여기서 메수 신호와 매도신호 사이를 3등분(신호의 고,중,저) 해서 우측으로 연장하고 다음 신호가 나오기 까지 유지하고 다음 신호 나오면 그 신호와 이전 신호를 3등분 해서 우측으로 연장 부탁드립니다. var : mav1(0),mav2(0),mav3(0),T1(0),T2(0),T3(0); mav1 = ma(c,5); mav2 = ma(c,20); mav3 = ma(c,60); if mav1 > mav1[1] Then T1 = 1; if mav1 < mav1[1] Then T1 = -1; if T1 == 1 and T1[1] != 1 Then var1 = 0; // if T1 == 1 and C > O and (C+O)/2 >= mav1 and mav2 > mav2[1] and mav3 > mav3[1] Then{ 60이평포함 if T1 == 1 and C > O and (C+O)/2 >= mav1 and mav2 > mav2[1] and mav1 > mav2 Then{ var1 = var1+1; if var1 == 1 Then buy("5매수"); } if T1 == -1 and T1[1] != -1 Then var2 = 0; // if T1 == -1 and C < O and (C+O)/2 <= mav1 and mav2 < mav2[1] and mav3 < mav3[1] Then{ 60이평포함 if T1 == -1 and C < O and (C+O)/2 <= mav1 and mav2 < mav2[1] and mav1 < mav2 Then{ var2 = var2+1; if var2 == 1 Then sell("5매도"); }
프로필 이미지
라몬
2024-02-14
567
글번호 176626
시스템
답변완료

수식 변환 부탁드립니다.

안녕하십니까? K사에서 쓰는 신호수식인데요 예스로 종목 검색을 하고싶습니다. S = StochasticsSlow(12, 5); R = RSi(14); 조건 = 상한가_D() && 거래대금 > 30000 && S >=70 && R >=70; 상C = ValueWhen(1, 조건, C); M10 = ma(C, 10); cnt = CountSince(조건, C>o && C<M10); cnt == 1 && cnt(1) == 0 && 상C * 0.8 > H 감사합니다.
프로필 이미지
매일대박
2024-02-14
693
글번호 176620
종목검색
답변완료

수식 변환 부탁드립니다.

안녕하십니까? 키움에서 쓰는 신호인데 예스로 종목검색을 하고 싶어요 가능할까요? 캔들조건 = C > C(1) * 1.09 && 거래대금 > 10000; VV = Valuewhen(1, 캔들조건, V); S = sum(VV > V, 5) == 5; V조건 = C < ma(C, 5) && S; Bcnt = CountSince(캔들조건, V조건); Bcnt == 1 && Bcnt(1)==0 감사합니다.
프로필 이미지
매일대박
2024-02-14
523
글번호 176619
종목검색
답변완료

고생 많으십니다.

안녕하세요:) 답변해주신 매매전략을 입력해봤는데 계획했던 진입 시점에 진입을 하지 않아서 문의드립니다:) 답변해주신 글 참고하실 수 있게 아래에 붙여 넣었습니다. 사진을 첨부하여 말씀드리겠습니다:) 예를 하나 들자면 2월13일 신성델타테크의 경우 당일 누적 거래대금 800억 이상, 역사적 신고가 119,500원을 돌파하였는데 진입 신호가 생기지 않아서요:) 왜 진입이 되지 않는지 혹시 알려주실 수 있으신가요? 가능하다면 문제가 해결될 수 있게 수식 개선을 도와주시면 정말 감사드리겠습니다. ------------------------------------------------------------------------------------ 안녕하세요 예스스탁입니다. input : 금액(2000000); var : HisH(0,Data2),cnt(0),YH6(0,Data2),trade(False),dm(0,Data1),entry(0); var : Rebuy(False,Data1),NegCnt(0,Data1); Array : YH[20](0,Data2); #역사적 신고가(참조데이터의 전체봉 중 최고가) if HisH == 0 or (HisH > 0 and Data2(H) > HisH) Then HisH = data2(H); #연간 최고가 계산 if data2(Bdate > Bdate[1]+1000) Then { For cnt = 19 DownTo 1 { YH[cnt] = YH[cnt-1]; } YH[0] = Data2(H); } if YH[0] > 0 and Data2(H) > YH[0] Then YH[0] = Data2(H); if Bdate != Bdate[1] Then { trade = true; entry = 0; dm = 0; } dm = dm + v; if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or (MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) Then entry = entry+1; if TotalTrades > TotalTrades[1] Then { if IsExitName("bl1",1) == true or IsExitName("bl2",1) == true Then trade = False; ReBuy = False; NegCnt = 0; } if Bdate == Bdate[1] Then { if h > DayHigh(0)[1] Then { rebuy = true; NegCnt = 0; } if rebuy == true and C < O Then NegCnt = NegCnt+1; } if MarketPosition == 0 and trade == true and sTime >= 91000 and sTime < 150000 and dm >= 80000000000 Then { #역사적 신고가+1틱이상이면 매수 Buy("b1",AtStop,HisH+PriceScale*1,Floor(금액/max(NextBarOpen,HisH+PriceScale*1))); if YH[5] > 0 and entry == 0 Then { #6년 최고가 계산 YH6 = 0; For cnt = 0 to 5 { if YH6 == 0 or (YH6 > 0 and YH[cnt] > YH6) Then YH6 = YH[cnt]; } #6년 최고가 +1틱이면 매수 if YH6 > 0 Then Buy("b2",AtStop,YH6+PriceScale*1,Floor(금액/max(NextBarOpen,YH6+PriceScale*1))); } if entry >= 1 and reBuy == true and NegCnt >= 3 Then { Buy("b3",AtStop,DayHigh+PriceScale*1,Floor(금액/max(NextBarOpen,DayHigh+PriceScale*1))); } } if MarketPosition == 1 Then { if IsEntryName("b1") == true Then var1 = HisH[BarsSinceEntry]; if IsEntryName("b2") == true Then var1 = YH6[BarsSinceEntry]; if IsEntryName("b3") == true Then var1 = dayhigh[BarsSinceEntry]; if CurrentContracts == MaxContracts Then ExitLong("bx1",AtLimit,var1*1.02,"",Floor(MaxContracts*0.5),1); Else ExitLong("bx2",AtLimit,var1*1.04); ExitLong("bl1",AtStop,var1*0.985); ExitLong("bl2",AtStop,EntryPrice*0.96); } 즐거운 하루되세요 > 노아 님이 쓴 글입니다. > 제목 : 시스템 개선 문의 > 안녕하세요. 최근에 시스템 작성 문의에 대해 답변을 받았었는데, 해당 매매전략을 개선하고 싶어 문의드리게 되었습니다^^ 기존 전략에서 2가지 개선하고 싶은 부분이 있습니다. 1) 참고로 해당 전략은 상승돌파매매 시스템이고, 진입조건을 개선하고 싶습니다. 종목의 역사적 신고가 및 6년 신고가 가격의 한틱 위를 돌파할 때 시장가로 진입하고 싶습니다. 또한 당일 재진입의 경우, 보유 비중이 전량 매도된 이후에만 재진입할 것 입니다. 재진입은 1분봉 기준, 당일 신고가 이후 음봉 3개 출현 이후에 신고가 재돌파시 신고가 가격의 한틱 위를 돌파할 때 시장가로 진입하고 싶습니다. 그리고 진입 후 손절을 하게 되면, 당일 진입 조건을 달성해도 재진입을 하지 않게 하고 싶습니다. 2) 그리고 당일 누적 거래대금이 800억 이상일 경우에만 매매를 하고 싶습니다.
프로필 이미지
노아
2024-02-14
566
글번호 176618
시스템

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

프로필 이미지
고성
2024-02-14
20
글번호 176615
지표
답변완료

부탁드립니다

1. 종가가 전일 시가 및 고가보다 높으면 빨강색으로, 전일 시가 및 저가보다 낮으면 파란색으로 구현해 주세요 2. 본차트에 선물지수, 보조1에 콜옵션, 보조2에 풋옵션인 챠트 상태에서 당일 보조1 콜이 보조2 풋보다 높은 가격에서 시작하여 보조1 콜의 가격이 보조2 풋 가격보다 낮아지면 본차트 선물지수에 파란색 봉으로, 당일 보조1 콜의 가격이 보조2 풋의 가격보다 낮은 가격에서 시작하여 보조1 콜의 가격이 보조2 풋의 가격보다 높아지면 본차트 선물지수에 빨강색으로 구현해 주세요 고맙습니다.
프로필 이미지
서태공
2024-02-14
641
글번호 176582
강조