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

120봉간의 고가중 최고가 발생캔들이 최근 60봉이내에는 없어야 한다라는 조건을 수식으로 작성했는데 수정요망합니다. CountIf(Highest(H, 120),60) == 0

input : Period(20),weight(6); var : sma(0),lsma(0); var : sub(0),p(0),d(0),sum(0),divider(0),i(0),lwma(0); sma = ma(C,Period); lsma = LRL(c, Period); sub = (weight/period)-1; sum = 0; divider = 0; for i = 0 to period-1 { p = c[i] * ((weight-i)-sub); d = (weight-i)-sub; sum = sum + p; divider = divider + d; } lwma = sum / divider; plot1(sma); plot2(lsma); plot3(lwma); ============================ 1. 위의 수식에 대해 감사합니다. 위의 수식에서 sma를 smoothed moving average(혹은 smoothed simple moving average)로 바꾸고자 합니다. 2. 1번에서 만들어진 이평선들을 10분봉에 적용하고, 10분봉에서의 이평선을 틱봉차트에 나타내고자 합니다. 어떻게 작성하는지요? 분봉의 기간값(10분 30분 60분 처럼)과 각 이평선의 조건값은 수정가능하게 부탁드립니다. 다시 한번 감사드립니다. 수고하세요!

input : Period(130); Var:j(0),T(0),tx(0),tx1(0),box(0),TL(0),TL1(0),TL2(0),upt(0),dnt(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); 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 { TL_Delete(TL2); 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]; Text_Delete(dnt); var1 = loval[0]-loval[1]; dnt = Text_New(date12,time12,value12,NewLine+NumToStr(abs(var1/PriceScale),0)+" "+NewLine); Text_SetColor(dnt,iff(var1>0,Magenta,Blue)); Text_SetStyle(dnt,1,2); Text_SetSize(dnt,35); Text_SetBold(dnt,1); Condition1 = False; box = Box_New(date11,time11,Value11,date12,time12,Value12); if abs(value12[1]-value11[1]) < 0.8 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]; var1 = loval[0]-loval[1]; Text_SetLocation(dnt,date12,time12,value12); Text_SetString(dnt,NewLine+NumToStr(abs(var1/PriceScale),0)+" "); Text_SetColor(dnt,iff(var1>0,Magenta,Blue)); Text_SetStyle(dnt,1,2); Text_SetSize(dnt,35); Text_SetBold(dnt,1); Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value11-value12,2)); Text_SetLocation(tx,sDate,sTime,value12); } if value12 > value11-0.5 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,90); } else if value12 <= value11-0.5 and value12 > value11-0.7 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,50); } else if value12 <= value11-0.7 and value12 > value11-0.8 Then { Box_SetColor(box,Yellow); Box_SetFill(box,true,150); } else if value12 <= value11-0.8 and value12 > value11-1.2 Then { Box_SetColor(box,Lime); Box_SetFill(box,true,80); } else if value12 <= value11-1.2 and value12 > value11-1.6 Then { Box_SetColor(box,Cyan); Box_SetFill(box,true,80); } else if value12 <= value11-1.6 and value12 > value11-1.9 Then { Box_SetColor(box,Blue); Box_SetFill(box,true,30); } else { Box_SetColor(box,Yellow); Box_SetFill(box,true,80); } if Condition1 == False and hival[0] < hival[1] and hival[1] < hival[2] and Loval[0] < loval[1] and Loval[1] < loval[2] Then { Condition1 = true; tx1 = Text_New(sDate,sTime,L+0.6,"●"); Text_SetStyle(tx1,2,2); Text_SetColor(tx1,Red); Text_SetSize(tx1,40); Sell(); } TL_Delete(TL1); if C <= Loval[1]+PriceScale*2 and C >= loval[1]-PriceScale*3 Then { TL1 = TL_New(sDate,sTime,0,sDate,sTime,999); TL_SetColor(TL1,Gold); TL_SetSize(TL1,3); } } If T == 1 Then { If T[1] != 1 Then { TL_Delete(TL1); 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]; Text_Delete(upt); var1 = hival[0]-hival[1]; upt = Text_New(date12,time12,value12,NumToStr(abs(var1/PriceScale),0)+" "+NewLine); Text_SetColor(upt,iff(var1>0,Magenta,Blue)); Text_SetStyle(upt,1,2); Text_SetSize(upt,35); Text_SetBold(upt,1); Condition2 = False; box = Box_New(date11,time11,Value11,date12,time12,Value12); if abs(value12[1]-value11[1]) < 0.8 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]; var1 = hival[0]-hival[1]; Text_SetLocation(upt,date12,time12,value12); Text_SetString(upt,NumToStr(abs(var1/PriceScale),0)+" "+NewLine); Text_SetColor(upt,iff(var1>0,Magenta,Blue)); Text_SetStyle(upt,1,2); Text_SetSize(upt,35); Text_SetBold(upt,1); Box_SetEnd(box,date12,time12,Value12); Text_SetString(tx,NumToStr(value12-value11,2)); Text_SetLocation(tx,sDate,sTime,value12); } if Value12 >= value11+1.9 Then { Box_SetColor(box,Pink); Box_SetFill(box,true,70); } else if value12 >= value11+1.2 and value12 < value11+1.9 Then { Box_SetColor(box,Gray); Box_SetFill(box,true,60); } else if value12 >= value11+0.8 and value12 < value11+1.2 Then { Box_SetColor(box,Magenta); Box_SetFill(box,true,40); } else if value12 >= value11+0.5 and value12 < value11+0.8 Then { Box_SetColor(box,Orange); Box_SetFill(box,true,100); } Else { Box_SetColor(box,Gold); Box_SetFill(box,true,150); } if Condition2 == False and loval[0] > loval[1] and loval[1] > loval[2] and hival[0] > hival[1] and hival[1] > hival[2] Then { Condition2 = true; tx1 = Text_New(sDate,sTime,H-0.6,"●"); Text_SetStyle(tx1,2,2); Text_SetColor(tx1,Blue); Text_SetSize(tx1,40); Sell(); } TL_Delete(TL2); if C <= hival[1]+PriceScale*3 and C >= hival[1]-PriceScale*2 Then { TL2 = TL_New(sDate,sTime,0,sDate,sTime,999); TL_SetColor(TL2,Gold); TL_SetSize(TL2,3); } } if MarketPosition == 1 and BarsSinceEntry == 1 Then ExitLong(); if MarketPosition == -1 and BarsSinceEntry == 1 Then ExitShort(); text 추가는 상관 없는데, 삭제하는 (TL_Delete(TL2);) 세로선을 (하단 쪽) 추가하면 박스와 충돌이 자주 생깁니다. 지표에서는 상관 없는데, 시스템에서는 세로선과 박스가 충돌되어 박스 일부만 표시됩니다. 선물 10틱 차트에서 확인 부탁드립니다.

오늘 종가로 내일의 이동평균 3일 5일 10일 20일의 값을 계산하여 각 이동평균과 근접한 종목을 찾는 검색식을 원합니다.

M20=ma(C,20,가중); M60=ma(C,60,가중); M240=ma(C,240,가중); Mn=min(M20,M240); Mnn=min(M20,M60); 기준=min(Mn,Mnn); CrossUp(C,기준) 일봉 종목검색 부탁 드립니다.

먼저 베풀어주시는 은혜에 깊은 감사를 드립니다. 앞번에 작성해주신 수식에 큰도움을 받고 있습니다. 수식중에. 손절후 재진입을 하고 싶은데 어려움을 겪고 있습니다. 몇날 며칠을 헛짓거리만 하고 있네요. 도움을 부탁드리겠습니다. 항상 따뜻한 배려에 깊은 감사의 말씀을 올립니다. 수고 하십시오^^

예를 들어 100분봉으로 하루의 거래를 나누었을 경우, 매100분봉의 시작가격에서 매수하고 해당봉의 종가에 (또는 다음봉의 시가에) 청산하고 동시에 매수를 하고 해당 봉의 종가 (또는 다음봉의 시가)에 청산하는 매수만의 프로그램과 또 다른 프로그램으로 위와 같은 방식으로 매도만 하는 프로그램을 부탁합니다.