안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.

안녕하세요. 현재 예스랭귀지에서 지원하는 TL 함수를 이용해 추세선을 그려둔 상태인데 각 봉의 위치에 따른 추세선의 y축 값을 구하는게 가능한지 궁금합니다. 예를 들면 첨부파일의 맨 마지막봉의 종가는 389.96 이지만 가장 낮은 붉은 추세선의 값은 390.30 주변인데 각 봉의 위치마다 추세선의 값을 구하는게 가능한지 궁금합니다. 감사합니다.

항상 감사드립니다. 응용을 해보고 있는데요. 아래 수식에 문제점이 있는 거 같습니다. 확인 및 수정 부탁드립니다. input : n1(10),n2(30); input : StartTime(223000),EndTime(235000); input : 익절틱수(80),손절틱수(0); var : Tcond(false); Array : H1[50](0),L1[50](0),H2[50](0),L2[50](0); if (sdate != sdate[1] and stime >= EndTime) or (sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then Tcond = False; if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then Tcond = true; if Tcond == true Then { #봉완성 매수 if C > H1[n1]+PriceScale*1 and C > H2[n2]+PriceScale*1 and C > O Then Buy("b"); #봉완성 매도 if C < L1[N1]-PriceScale*1 and C < L2[N2]-PriceScale*1 and C < O Then Sell("s"); #즉시 매수 if NextBarOpen <= H1[n1] and NextBarOpen <= H2[n2] Then Buy("b1",AtStop,H1[n1]+PriceScale*1 and H2[n2]+PriceScale*1); #즉시 매도 if NextBarOpen >= L1[n1] and NextBarOpen >= L2[n2] Then Sell("s1",AtStop,L1[n1]-PriceScale*1 and L2[n2]-PriceScale*1); #매수진입 후 매수봉의 저가보다 1틱이상 낮은 시세 발생하면 청산 if MarketPosition == 1 Then ExitLong("bx",AtStop,L[BarsSinceEntry]-PriceScale*1); #매도진입 후 매도봉의 고가보다 1틱이상 높은 시세 발생하면 청산 if MarketPosition == -1 Then ExitShort("sx",AtStop,H[BarsSinceEntry]+PriceScale*1); #매수진입 후 매수봉의 다음봉의 저가보다 1틱이상 낮은 시세 발생하면 청산 if MarketPosition == 1 Then ExitLong("bx",AtStop,L-PriceScale*1); #매도진입 후 매도봉의 다음봉의 고가보다 1틱이상 높은 시세 발생하면 청산 if MarketPosition == -1 Then ExitShort("sx",AtStop,H+PriceScale*1); } SetStopProfittarget(PriceScale*익절틱수,PointStop); SetStopLoss(PriceScale*손절틱수,PointStop); IF Endtime > starttime Then SetStopEndofday(Endtime); Else { if sDate != sDate[1] Then SetStopEndofday(Endtime); } if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then { IF Endtime <= starttime Then { SetStopEndofday(0); } }

지난번에 수식 검증을 한번 받은 것인데, 오늘 잘못되어 나오는 부분이 있어 다시 한번 확인 부탁드립니다. # 15분 시작에 매수 신호가 나왔어도, 매수는 양봉에만 진입하는 것이므로 18분봉에 진입하지 않아야 하는데 진입되었습니다. 혹시 거래시간을 101200으로 해서 그런건지요? 조건이 만족할 시 매수는 양봉에만, 매도는 음봉에만 진입하는 것이 적용된 것인지요? 수식에 주석 달아 주시면 좋겠습니다. # 추가로 종가에 매수 매도 신호가 나오고 다음 봉에서 진입할 때에 진입가격을 재 돌파할 시 매수 매도 들어가게 하는 수식에 대해 별도로 주시면 좋겠습니다. --- 아래에 해당 수식과 거래된 파일 자료 남겨드립니다. 감사합니다~~ input : StartTime(101200),EndTime(114000); input : Length(20), D1(2); input : 익절1(30),손절1(30),청산구분시간(103000),익절2(50),손절2(30),익절연속횟수(3),손절연속횟수(2); var : Tcond(false),profit(0),loss(0); if (sdate != sdate[1] and stime >= EndTime) or (sdate == sdate[1] and stime >= EndTime and stime[1] < EndTime) Then Tcond = False; if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then { Tcond = true; profit = 0; loss = 0; } if TotalTrades > TotalTrades[1] Then { if IsExitName("bp1.",1) or IsExitName("bp2.",21) or IsExitName("bp1",1) or IsExitName("bp2",21) or IsExitName("sp1.",1) or IsExitName("sp2.",1) or IsExitName("sp1",1) or IsExitName("sp2",1) Then profit = profit+1; Else profit = 0; if IsExitName("bl1.",1) or IsExitName("bl2.",1) or IsExitName("bl1",1) or IsExitName("bl2",1) or IsExitName("sl1.",1) or IsExitName("sl2.",1) or IsExitName("sl1",1) or IsExitName("sl2",1) Then loss = loss+1; Else loss = 0; } var1 = BollBandUp(Length,D1); var2 = BollBandDown(Length,D1); if Tcond == true Then { If CrossUP(H,var1) and (c > o or (C==O and C >= C[1])) and profit < 익절연속횟수 and loss < 손절연속횟수 then { Buy("b",OnClose,DEF,1); if sTime >= StartTime and sTime < 청산구분시간 Then { ExitLong("bp1.",AtLimit,C+PriceScale*익절1,"",1,1); ExitLong("bl1.",AtStop,C-PriceScale*손절1,"",1,1); } if sTime >= 청산구분시간 and sTime < Endtime Then { ExitLong("bp2.",AtLimit,C+PriceScale*익절2,"",1,1); ExitLong("bl2.",AtStop,C-PriceScale*손절2,"",1,1); } } If CrossDown(L,Var2) and (C < O or (C==O and C < C[1])) and profit < 익절연속횟수 and loss < 손절연속횟수 then { Sell("s",OnClose,DEF,1); if sTime >= StartTime and sTime < 103000 Then { ExitShort("sp1.",AtLimit,C-PriceScale*익절1,"",1,1); ExitShort("sl1.",AtStop,C+PriceScale*손절1,"",1,1); } if sTime >= 103000 and sTime < Endtime Then { ExitShort("sp2.",AtLimit,C-PriceScale*익절2,"",1,1); ExitShort("sl2.",AtStop,C+PriceScale*손절2,"",1,1); } } } if MarketPosition == 1 Then { if sTime >= StartTime and sTime < 청산구분시간 Then { ExitLong("bp1",AtLimit,EntryPrice+PriceScale*익절1,"",1,1); ExitLong("bl1",AtStop,EntryPrice-PriceScale*손절1,"",1,1); } if sTime >= 청산구분시간 and sTime < Endtime Then { ExitLong("bp2",AtLimit,EntryPrice+PriceScale*익절2,"",1,1); ExitLong("bl2",AtStop,EntryPrice-PriceScale*손절2,"",1,1); } } if MarketPosition == -1 Then { if sTime >= StartTime and sTime < 103000 Then { ExitShort("sp1",AtLimit,EntryPrice-PriceScale*익절1,"",1,1); ExitShort("sl1",AtStop,EntryPrice+PriceScale*손절1,"",1,1); } if sTime >= 103000 and sTime < Endtime Then { ExitShort("sp2",AtLimit,EntryPrice-PriceScale*익절2,"",1,1); ExitShort("sl2",AtStop,EntryPrice+PriceScale*손절2,"",1,1); } } IF Endtime > starttime Then SetStopEndofday(Endtime); Else { if sDate != sDate[1] Then SetStopEndofday(Endtime); } if (sdate != sdate[1] and stime >= StartTime) or (sdate == sdate[1] and stime >= StartTime and stime[1] < StartTime) Then { IF Endtime <= starttime Then { SetStopEndofday(0); } }

안녕하세요. 아래와 같은 수식을 문의드리고 싶습니다. ----------------------------------- n일전, 분봉에서, 마지막 종가에 해당하는 볼린저 밴드 상단선 볼린저 밴드 하단선 가격을 n-1일의 분봉에 고정시켜 횡선으로 긋고 싶습니다. 또한, n-2일의 분봉 n-3일의 분봉 n-4일의 분봉 n-5일의 분봉 n-6일의 분봉 n-7일의 분봉 n-8일의 분봉 n-9일의 분봉 n-10일의 분봉에도 n일의 가격을 횡선으로 표현하고 싶습니다. ---------------------------- 항상 친절한 답변 감사드립니다. 위와 비슷한 형태의 수식을 도움 받은바 있는데 실력이 미천하여 변용하지 못하겠어 다시 문의 드립니다. 참고 하시기 바랍니다. -------참고---------- ## n봉기간 동안 늘려라 if bdate != bdate[1] Then { idx = 0; value[0] = 0; for cnt = 1 to 19 { value[cnt] = value[cnt-1][1]; } } idx = idx+1; ## 시간대 설정 if (sdate != sdate[1] and stime >= 100000) or (sdate == sdate[1] and stime >= 100000 and stime[1] < 100000) then { Tcond = true; Condition1 = false; } if (sdate != sdate[1] and stime >= 040000) or (sdate == sdate[1] and stime >= 040000 and stime[1] < 040000) then { Tcond = False; } ## 골드 & 데드 if Tcond == true Then { if crossup(c,x1) or CrossDown(c,y1) Then { Condition1 = true; var1 = x1; } if Condition1 == true Then value[0] = var1; Else value[0] = x1; } if idx <= n then { if value[1] > 0 Then plot1(value[1],"1"); if value[2] > 0 Then plot2(value[2],"2",iff(value[2] > dayopen,RGB(255,216,216),RGB(217,229,255))); if value[3] > 0 Then plot3(value[3],"3",iff(value[3] > dayopen,RGB(255,167,167),RGB(178,204,255))); if value[4] > 0 Then plot4(value[4],"4",iff(value[4] > dayopen,RGB(241,95,095),RGB(103,153,255))); if value[5] > 0 Then plot5(value[5],"5",iff(value[5] > dayopen,RGB(204,061,061),RGB(67,116,217))); if value[6] > 0 then plot6(value[6],"6",iff(value[6] > dayopen,RGB(152,000,000),RGB(0,51,153))); if value[7] > 0 Then plot7(value[7],"7",iff(value[7] > dayopen,RGB(152,000,000),RGB(0,51,153))); if value[8] > 0 Then plot8(value[8],"8",iff(value[8] > dayopen,RGB(152,000,000),RGB(0,51,153))); if value[9] > 0 Then plot9(value[9],"9",iff(value[9] > dayopen,RGB(152,000,000),RGB(0,51,153))); if value[10] > 0 Then plot10(value[10],"10",iff(value[10] > dayopen,RGB(152,000,000),RGB(0,51,153))); }

항상 도움에 감사 드립니다. 타주기 수식 부탁 드립니다. 1)분봉지표를 분봉차트에서 2)틱봉지표를 틱봉차트에서 3)일봉지표를 분봉차트에서 4)주봉지표를 분봉차트에서 미리 감사 드립니다... 질문수식) input:p(30); input:sig(5); var1=(c-trl)*v; VAR2=trh-trl; Var3=var1/Var2; Var4=ma(Var3,p); Var5=ma(v,p); var6=(var4/Var5)*100; Var7=ma(Var6,sig); 참고1) TRL=min(C[1],L); TRH=max(C[1],H); 참고2) input : ntime(numeric),P(numeric),sig(numeric); var : S1(0),D1(0),TM(0),TF(0),cnt(0),sum1(0),sum2(0); var : v2(0),v4(0),pre(0),C1(0),idx(0),vv(0); Array : v1[100](0),v3[100](0); if Bdate != Bdate[1] Then { S1 = TimeToMinutes(stime); D1 = sdate; } if D1 > 0 then { if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%ntime; if Bdate != Bdate[1] or (Bdate == Bdate[1] and ntime > 1 and TF < TF[1]) or (Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime) or (Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then { idx = idx+1; C1 = C[1]; vv = 0; pre = v1[0][1]; For cnt = 1 to 99 { v1[cnt] = v1[cnt-1][1]; v3[cnt] = v3[cnt-1][1]; } } vv = vv + v; 참고3) input : ntime(numeric),P(numeric),sig(numeric); var : D1(0),TF(0),cnt(0),sum1(0),sum2(0); var : v2(0),v4(0),pre(0),C1(0),idx(0),Didx(0),vv(0); Array : v1[100](0),v3[100](0); if Bdate != Bdate[1] Then { D1 = sdate; Didx = 0; } Else Didx = Didx+1; if D1 > 0 then { TF = Didx%ntime; if Bdate != bdate[1] or (TF < TF[1] and Bdate == Bdate[1]) Then { idx = idx+1; C1 = C[1]; vv = 0; pre = v1[0][1]; For cnt = 1 to 99 {

20이평돌파 매수 20이평 깨지면 매도.. 1.한번매매이고 매수후 20이평깨지면 매수청산후 매매 없음. 매수후 20이평 깨지지 않으면 15시30분청산. 2.매수후 20이평 깨지면 스위칭 매도후 진입없음. 20이평 돌파시 매도청산 후 매매없음.매도진입후 20이평돌파없으면 15시30분 청산.입니다...

Input:length(2),종가사용여부(0),파동선두께(1),파동선두께고저선(0),수치표시(0); Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""), TL1(0),Text1(0),tl2(0),T(0),sumv(0),sumi(0),mav(0); Array:고[10,4](0),저[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime #==========================================# HH = IFF(종가사용여부==1,C,H); LL = IFF(종가사용여부==1,C,L); If Index == 0 Then { 고[1,1] = HH; 저[1,1] = LL; } Condition1 = Highest(HH,length) == HH and 최종고가 <> HH; Condition2 = Lowest (LL,length) == LL and 최종저가 <> LL; 처리구분 = ""; 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 { T = 1; 최종고가 = HH; // 신규고점을 체크하기 위해 저장 If 최종꼭지점 == "저점" Then { For j = 10 DownTo 2 { For jj = 1 To 4 { 고[j,jj] = 고[j-1,jj]; } } 고[1,1] = HH; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]); TL2 = TL_New(고[2,3],고[2,4],고[2,1],고[1,3],고[1,4],고[1,1]); If 수치표시 == 1 Then { Text1 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1],2)); Text_SetStyle(Text1, 2, 2); Text_SetColor(Text1,RED); Text_SetSize(Text1, 15); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,RED); TL_SetSize(TL2,파동선두께고저선); TL_SetColor(TL2,RGB(129,129,129)); } Else If 고[1,1] < HH Then // 1번 고점보다 높은 고가 출현 { 고[1,1] = HH; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]); TL_SetEnd(TL2,고[1,3],고[1,4],고[1,1]); // 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임 If 수치표시 == 1 Then { Text_SetLocation(Text1,고[1,3],고[1,4],고[1,1]); Text_SetString(Text1,NumToStr(고[1,1],2)); } } 최종꼭지점 = "고점"; } #==========================================# If 처리구분 == "저점처리" Then { T = -1; 최종저가 = LL; If 최종꼭지점 == "고점" then { For j = 10 DownTo 2 { For jj = 1 To 4 { 저[j,jj] = 저[j-1,jj]; } } 저[1,1] = LL; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]); TL2 = TL_New(저[2,3],저[2,4],저[2,1],저[1,3],저[1,4],저[1,1]); If 수치표시 == 1 Then { Text1 = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(저[1,1],2)); Text_SetStyle(Text1, 2, 0); Text_SetColor(Text1,BLUE); Text_SetSize(Text1, 15); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,BLUE); TL_SetSize(TL2,파동선두께고저선); TL_SetColor(TL2,RGB(129,129,129)); } Else If 저[1,1] > LL then { 저[1,1] = LL; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]); TL_SetEnd(TL2,저[1,3],저[1,4],저[1,1]); If 수치표시 == 1 Then { Text_SetLocation(Text1,저[1,3],저[1,4],저[1,1]); Text_SetString(Text1,NumToStr(저[1,1],2)); } } 최종꼭지점 = "저점"; } if T != T[1] Then { sumv = 0; sumi = 0; } sumv = sumv+c; sumi = sumi+1; mav = sumv/sumi; var1 = (mav); if var1 > var1[1] Then value1 = 1; if var1 < var1[1] Then value1 = -1; if value1 == 1 Then plot1(var1,"1",RED); if value1 == -1 Then plot1(var1,"1",BLUE); plot1(mav); ........................................................................................................... 1-1 상기식을 데이타2 용으로 가공해 주세요 1-2 상기식에서 plot1의 색깔이 변하면 경보음이 나올수 있도록 가공해 주세요 2. 참조챠트 데이타2의 봉에서 시가가 나오면 본챠트에 그시가선을(참조챠트의 시가) 수평으로 그어 주세요