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

안녕하세요... 시스템 수식 문의좀 드립니다.. 아래는 만들어주신 수식입니다. input : P(5); var : mav(0),T(0); mav = ma(C,P); if mav > mav[1] Then T = 1; if mav < mav[1] Then T = -1; plot1(mav,"이평",iff(T==1,RED,BLUE)); 이렇게 만들어주신 수식을 이용해서요... 5일 이평선이 색이 변할때 신호 수식을 나타내고 싶습니다. 근데 다른 조건이 하나 있는데.. 색이 변할때 60일선 위에서 5일선이 빨간색으로 변하는곳과 60일선 아래에서 5일선이 파란색으로 변하는곳에 신호가 나오게 하고 싶습니다. 도움좀 부탁드립니다. 감사합니다.

지표식을 시스템 부탁 드립니다. input: period(20),봉수(2); Var:선두께(0),상승색(BLUE), 하락색(RED),예비선색상(white),상승세로선색상(red),하락세로선색상(blue),세로선두께(0); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0),idx(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0)/*,ZZ[20](0)*/; Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0); r[0] = 0; r[1] = 2; r[2] = 3.; r[3] = -1; r[4] = -2.; r[5] = 1; r[6] = 0.5; 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]; //ZZ[j+1] = ZZ[j]; } LoVal[0] = l; LoBar[0] = 0; //ZZ[0] = l; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,상승색); Tx = Text_New(date11,time11,Value11,"▼"); #동그라미 색상, 빨강 Text_SetColor(Tx,blue); Text_SetStyle(Tx,2,1); Text_SetSize(tx,12); tx = Text_New(date11,time11,Value11,NumToStr(value11,2)+NewLine); Text_SetStyle(tx,2,1); date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); } TL2[0] = TL_New(date21,time21,fr[0],date22,time22,fr[0]); TL_SetColor(TL2[0],white); #TL2[1] = TL_New(date21,time21,fr[1],date22,time22,fr[1]); #TL_SetColor(TL2[1],RED); #TL_SetStyle(TL2[1], 3); #TL2[2] = TL_New(date21,time21,fr[2],date22,time22,fr[2]); #TL_SetColor(TL2[2],red); #TL_SetSize(TL2[2],1); #TX2[2] = Text_New(date22,time22,fr[2],NumToStr(fr[2],2)); #Text_SetColor(Tx2[2],BWHITE); #Text_SetStyle(TX2[2],1,1); #TL2[3] = TL_New(date21,time21,fr[3],date22,time22,fr[3]); #TL_SetColor(TL2[3],RED); #TL_SetStyle(TL2[3], 3); #TL2[4] = TL_New(date21,time21,fr[4],date22,time22,fr[4]); #TL_SetColor(TL2[4],red); #TL_SetSize(TL2[4],1); #TX2[4] = Text_New(date22,time22,fr[4],NumToStr(fr[4],2)); #Text_SetColor(Tx2[4],BWHITE); #Text_SetStyle(TX2[4],1,0); TL2[5] = TL_New(date21,time21,fr[5],date22,time22,fr[5]); TL_SetColor(TL2[5],white); TL2[6] = TL_New(date21,time21,fr[6],date22,time22,fr[6]); TL_SetColor(TL2[6],MAGENTA); idx = 0; } If LoVal[0] > l Then { LoVal[0] = l; LoBar[0] = 0; //ZZ[0] = l; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; //Tx = Text_New_Self(date12,time12,Value12,NumToStr(abs(value11-value12)/PriceScale,0)+" "); #동그라미 색상, 빨강 //Text_SetColor(Tx,BLUE); //Text_SetStyle(Tx,1,0); TL_SetEnd(TL2[0],date22,time22,fr[0]); TL_SetEnd(TL2[1],date22,time22,fr[1]); TL_SetEnd(TL2[2],date22,time22,fr[2]); Text_SetLocation(TX2[2],date22,time22,fr[2]); TL_SetEnd(TL2[3],date22,time22,fr[3]); TL_SetEnd(TL2[4],date22,time22,fr[4]); Text_SetLocation(TX2[4],date22,time22,fr[4]); TL_SetEnd(TL2[5],date22,time22,fr[5]); TL_SetEnd(TL2[6],date22,time22,fr[6]); TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); idx = 0; } } If T == 1 Then { If T[1] != 1 Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; //ZZ[j+1] = ZZ[j]; } HiVal[0] = h; HiBar[0] = 0; //ZZ[0] = h; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,하락색); Tx1 = Text_New(date11,time11,Value11,"▲"); #동그라미 색상, 파랑 Text_SetColor(Tx1,red); Text_SetStyle(Tx1,2,5); Text_SetSize(tx1,12); tx = Text_New(date11,time11,Value11,NewLine+NumToStr(value11,2)); Text_SetStyle(tx,2,0); date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 5 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); } TL3[0] = TL_New(date31,time31,fr[0],date32,time32,fr[0]); TL_SetColor(TL3[0],white); #TL3[1] = TL_New(date31,time31,fr[1],date32,time32,fr[1]); #TL_SetColor(TL3[1],BLUE); #TL_SetStyle(TL3[1], 3); #TL3[2] = TL_New(date31,time31,fr[2],date32,time32,fr[2]); #TL_SetColor(TL3[2],BLUE); #TL_SetSize(TL3[2],1); #TX3[2] = Text_New(date32,time32,fr[2],NumToStr(fr[2],2)); #Text_SetColor(Tx3[2],BWHITE); #Text_SetStyle(TX3[2],1,1); #TL3[3] = TL_New(date31,time31,fr[3],date32,time32,fr[3]); #TL_SetColor(TL3[3],BLUE); #TL_SetStyle(TL3[3], 3); #TL3[4] = TL_New(date31,time31,fr[4],date32,time32,fr[4]); #TL_SetColor(TL3[4],BLUE); #TL_SetSize(TL3[4],1); #TX3[4] = Text_New(date32,time32,fr[4],NumToStr(fr[4],2)); #Text_SetColor(Tx3[4],BWHITE); #Text_SetStyle(TX3[4],1,0); TL3[5] = TL_New(date31,time31,fr[5],date32,time32,fr[5]); TL_SetColor(TL3[5],white); TL3[6] = TL_New(date31,time31,fr[6],date32,time32,fr[6]); TL_SetColor(TL3[6],cyan); idx = 0; } If HiVal[0] < h Then { HiVal[0] = h; HiBar[0] = 0; //ZZ[0] = h; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; //Tx = Text_New_Self(date12,time12,Value12,NumToStr(abs(value11-value12)/PriceScale,0)+" "); #동그라미 색상, 빨강 //Text_SetColor(Tx,RED); //Text_SetStyle(Tx,1,1); TL_SetEnd(TL3[0],date32,time32,fr[0]); TL_SetEnd(TL3[1],date32,time32,fr[1]); TL_SetEnd(TL3[2],date32,time32,fr[2]); Text_SetLocation(TX3[2],date32,time32,fr[2]); TL_SetEnd(TL3[3],date32,time32,fr[3]); TL_SetEnd(TL3[4],date32,time32,fr[4]); Text_SetLocation(TX3[4],date32,time32,fr[4]); TL_SetEnd(TL3[5],date32,time32,fr[5]); TL_SetEnd(TL3[6],date32,time32,fr[6]); TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); idx = 0; } } idx = idx+1; TL_SetSize(tL,선두께); TL_SetSize(tL1,선두께); TL_SetColor(tL,예비선색상); var : VTL(0); if idx == 봉수 Then { TL_Delete(VTL);//최근것만 표시하고자 할경우 이 내용을 삭제하시면 됩니다. VTL = TL_New(sdate,stime,999999999,sDate,stime,0); TL_SetColor(VTL,iff(T == -1,상승세로선색상,하락세로선색상)); TL_SetSize(VTL,세로선두께); }

너무궁금해서요 그간의 질문과 해주셨던 답변들로 검색식을 만들어가고있습니다 근데 하면할수록 식이 많아져서요 질문은! 바로 "검색의 소요시간"입니다 제가 쓰는 검색식은 대충 이러합니다 3봉전 3봉간 거래량 얼마이상 And 3봉전 3봉간 틱수 얼마이상 And 3봉전 3봉간 거래대금 얼마이상 And . . . . 버슷한것들 대강 50개정도의 식을만듭니다 그리고 분을바꾸어서 6봉전 6봉간...이렇게 50개정도 조건에 맞으면 검색되고 또는 9봉전 9봉간 (50개의식) 또는 12봉전 12봉간 (50개의식) 또는 15봉전 15봉간 (50개의식) . . . 또는 150봉전 150봉간 (50개의식) 쭉해서 150봉전 150봉간 조건에 맞으면 검색. 이렇게 50개정도의 식을 3분간 간격을주어 150봉까지 적용했더니 대충해도 50개식×50개식이되어버려 2000개의 식이 넘어갑니다 단순한거같지만 식이 너무 많아 검색하는데 시간이 오래걸릴것같은 생각이 들어서요... 1분이 넘어갈까요? 10초 20초 정도걸리는건 괜찮은데 1분이 넘어가면 안되서요... 제발 답변부탁드립니다ㅜㅜ 참고로 식은 많지만 조건들은 거래량 틱수 거래대금 가격 이렇게 4개가 거의여서 복잡한식은 없습니다

var1 = Accum(V); If bDate!=bDate[1] Then var2 = var1[1]; var3 = var1-var2; 이게 분봉에다가 당일 누적 거래량을 표시하는 수식인데요 여기다가 전날의 완성된 누적거래량까지 합해서 분봉에 표시하는 방법은 없나요? 예를 들어 전날을 1일로 치고 1일 마지막 봉까지 누적된 거래량이 100만이라면 당일(2일) 첫봉 거래량이 10만일 경우 누적 110만, 2봉 거래량이 20만이라면 누적 130만... 이런식으로 표시되게 할 수 있을까요? 여기다가 그 다음날(3일)이 되면 그 앞(1일)의 누적거래량은 제외하고 완성된 2일 누적거래량에 3일 거래량이 누적... 반복되는 방법을 알고 싶습니다 DayVolume 사용하는 거 말고 위에 있는 수식을 기반으로 해주시면 감사드리겠습니다

예스프로그램 기본 시스템의 Var : value(0); value = 0; # 매수 / 매도청산 If CCI(9) > 0 Then value = 1; If MACD(12,26) > 0 Then value = value+1; If DIPlus(14) > DIMinus(14) Then value = value+1; If StochasticsK(12,5) > StochasticsD(12,5,5) Then value = value+1; # 매수/매도청산 If value >= 3 Then { Buy("매수"); } value = 0; # 매도/매수청산 If CCI(9) < 0 Then value = 1; If MACD(12,26) < 0 Then value = value+1; If DIPlus(14) < DIMinus(14) Then value = value+1; If StochasticsK(12,5) < StochasticsD(12,5,5) Then value = value+1; If value >= 3 Then { Sell("매도"); } 위조건에 기본 시스템 파라볼릭 Input : af(0.02), maxAF(0.2); Var : value(0); value = sar(af,maxAF); # 매수/매도청산 If C > value Then { Buy(); } # 매도/매수청산 If C < value Then { Sell(); } 을 합성 부탁 드립니다.

안녕하세요? 매매횟수를 넣는 답변 잘받았습니다. 그부분은 작동이 잘 되는것 같은데, 손절을 외부변수에 넣어놓으면 되었는데, 지금 안되네요. 손절이 작동할수있도록 수정 부탁드립니다. 감사합니다. Input : 단기(5), 장기(20), profit_pt(0.5), loss_pt(0.5), 장종료청산(151000),진입횟수(3); Variable : ent_position(0),entry(0); if MarketPosition == 0 Then{ var1 = 0; ent_position = 0; entry = 0; } if (MarketPosition != 0 and MarketPosition != MarketPosition[1]) or (MarketPosition == MarketPosition[1] and TotalTrades > TotalTrades[1]) then entry = entry+1; //If ma(C,단기)>ma(C,장기) and ( C>O and L==O ) or ( C[1]<O[1] and H[1]==O[1] and C>O ) Then { If ma(C,단기)>ma(C,장기) and ( C>O and L==O ) and ent_position == 0 and entry < 진입횟수 Then { Buy("매수",AtMarket); Var1 = NextBarOpen; ent_position = 1; } //If ma(C,단기)<ma(C,장기) and ( C<O and H==O ) or ( C[1]>O[1] and L[1]==O[1] and C<O ) Then { If ma(C,단기)<ma(C,장기) and ( C<O and H==O ) and ent_position == 0 and entry < 진입횟수 Then { Sell("매도",AtMarket); Var1 = NextBarOpen; ent_position = -1; } if PositionProfit >= profit_pt and ent_position<>0 Then{ if ent_position == 1 and C<O Then { ExitLong("매수청산"); } if ent_position == -1 and C>O Then { ExitLong("매도청산"); } }

항상 수고 많으십니다. 종가 매수인데 종목의 종가가 상한가이면 매수가 들어가지 않게끔 할려면 어떻게 해야하나요?? 감사합니다.

하나만 더 수정 해주세요 10분에 60분봉의 가중도 알려 주세요 Input : Length1(5),Length2(20); Var : TLen1(0),TLen2(0),i1(0),i2(0); var : Hsum1(0),Hsum2(0),Havg1(0),Hma1(0); var : Lsum1(0),Lsum2(0),Lavg1(0),Lma1(0); var : HLsum1(0),HLsum2(0),HLavg1(0),HLma1(0); var : Hcum1(0),Hcum2(0),Havg2(0),Hma2(0); var : Lcum1(0),Lcum2(0),Lavg2(0),Lma2(0); var : HLcum1(0),HLcum2(0),HLavg2(0),HLma2(0); TLen1 = Ceiling((Length1 + 1) * .5); TLen2 = Ceiling((Length2 + 1) * .5); Hsum2 = 0; Lsum2 = 0; HLsum2 = 0; for i1 = 0 to TLen1-1 { Hsum1 = 0; Lsum1 = 0; HLsum1 = 0; for i2 = i1+0 to TLen1-1+i1 { Hsum1 = Hsum1 + DayHigh(i2); Lsum1 = Lsum1 + DayLow(i2); HLsum1 = HLsum1 + (DayHigh(i2)+DayLow(i2))/2; } Havg1 = Hsum1/TLen1; Hsum2 = Hsum2 + Havg1; Lavg1 = Lsum1/TLen1; Lsum2 = Lsum2 + Lavg1; HLavg1 = HLsum1/TLen1; HLsum2 = HLsum2 + HLavg1; } Hma1 = Hsum2/TLen1; Lma1 = Lsum2/TLen1; HLma1 = HLsum2/TLen1; Hcum2 = 0; Lcum2 = 0; HLcum2 = 0; for i1 = 0 to TLen2-1 { Hcum1 = 0; Lcum1 = 0; HLcum1 = 0; for i2 = i1+0 to TLen2-1+i1 { Hcum1 = Hcum1 + DayHigh(i2); Lcum1 = Lcum1 + DayLow(i2); HLcum1 = HLcum1 + (DayHigh(i2)+DayLow(i2))/2; } Havg2 = Hcum1/TLen2; Hcum2 = Hcum2 + Havg2; Lavg2 = Lcum1/TLen2; Lcum2 = Lcum2 + Lavg2; HLavg2 = HLcum1/TLen2; HLcum2 = HLcum2 + HLavg2; } Hma2 = Hcum2/TLen2; Lma2 = Lcum2/TLen2; HLma2 = HLcum2/TLen2; Plot1(Hma1, "고가삼각가중1"); Plot2(Hma2, "고가삼각가중2"); Plot3(Lma1, "저가삼각가중1"); Plot4(Lma2, "저가삼각가중2"); Plot5(HLma1, "중간삼각가중1"); Plot6(HLma2, "중간삼각가중2"); Plot7(Hma2+abs(Hma2-Lma2), "20고가+진동폭"); Plot8(Lma2-abs(Hma2-Lma2), "20저가-진동폭");