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

1밴드상단(일목균형표) ( avg((C+H+L)/3,20)+2*stdev((C+H+L)/3,20)+ avg((C+H+L)/3,33)+2*stdev((C+H+L)/3,33)+ avg((C+H+L)/3,40)+2*stdev((C+H+L)/3,40)+ avg((C+H+L)/3,73)+2*stdev((C+H+L)/3,73) )/4 밴드 하단 ( avg((C+H+L)/3,20) - 2*stdev((C+H+L)/3,20)+ avg((C+H+L)/3,33) - 2*stdev((C+H+L)/3,33)+ avg((C+H+L)/3,40) - 2*stdev((C+H+L)/3,40)+ avg((C+H+L)/3,73) - 2*stdev((C+H+L)/3,73) 상단저항 Max( avg((C+H+L)/3,20)+2*stdev((C+H+L)/3,20), avg((C+H+L)/3,33)+2*stdev((C+H+L)/3,33), avg((C+H+L)/3,40)+2*stdev((C+H+L)/3,40), avg((C+H+L)/3,73)+2*stdev((C+H+L)/3,73) ) 상단지지 Min( avg((C+H+L)/3,20)+2*stdev((C+H+L)/3,20), avg((C+H+L)/3,33)+2*stdev((C+H+L)/3,33), avg((C+H+L)/3,40)+2*stdev((C+H+L)/3,40), avg((C+H+L)/3,73)+2*stdev((C+H+L)/3,73) ) )/4 조건 Period 20 D1 2 2밴드하단 (일목균형표) 하단 저항 Max( avg((C+H+L)/3,20)-2*stdev((C+H+L)/3,20), avg((C+H+L)/3,33)-2*stdev((C+H+L)/3,33), avg((C+H+L)/3,40)-2*stdev((C+H+L)/3,40), avg((C+H+L)/3,73)-2*stdev((C+H+L)/3,73) ) 하단지지 Min( avg((C+H+L)/3,20)-2*stdev((C+H+L)/3,20), avg((C+H+L)/3,33)-2*stdev((C+H+L)/3,33), avg((C+H+L)/3,40)-2*stdev((C+H+L)/3,40), avg((C+H+L)/3,73)-2*stdev((C+H+L)/3,73) ) 조건 Period 20 D1 2

안녕하세요. 보통 지표를 만들면 차트상 불러온 데이터에서 최소봉수 이후부터 무조건 계산하기 시작하는데, 중첩 for문에 배열을 사용하다보니 로딩에 너무 많은 시간이 걸려서, 혹시 불러온차트데이터가 2000개라면, 현재봉에서 -500봉 부터 배열에 값을 저장하도록 할 수 있나요?

안녕하세요~ 수식을 거의 잘 몰라 그러는데요~ C >= C[1]*1.02 => 이전 종가보다 2퍼이상 이란뜻 이잖아요! -2퍼 ~ 2.9퍼로 끝난 종가를 수식표현 부탁드립니다~ (마이너스) 부터 (플러스) 감사해요~

아래식 시간변수에서 ( CME 해외선물) 8시에서 0시끼지는 설정 시간변수에 맞게 설정된 시간내에서 매매가 이루어지는데 이래와 같이 0시이후 시간설정 할 때에는 1시무터 3시까지만 매매되지 않고 다른 시간대도 매매가 이루어지고 있어 검토 바랍니다. input : 진입틱수(5); input : StartTime1(10000),EndTime1(30000); var : Tcond(false); var : OO(0),HH(0),LL(0); if (sdate != sdate[1] and stime >= EndTime1) or (sdate == sdate[1] and stime >= EndTime1 and stime[1] < EndTime1) Then { Tcond = False; if MarketPosition == 1 Then ExitLong(); if MarketPosition == -1 Then ExitShort(); } if (sdate != sdate[1] and stime >= StartTime1) or (sdate == sdate[1] and stime >= StartTime1 and stime[1] < StartTime1) Then { Tcond = true; OO = O; HH = H; LL = L; } if (sdate != sdate[1] and stime >= EndTime2) or (sdate == sdate[1] and stime >= EndTime2 and stime[1] < EndTime2) Then { Tcond = False; } if ( sdate != sdate[1] and stime >= StartTime2) or (sdate == sdate[1] and stime >= StartTime2 and stime[1] < StartTime2) Then { Tcond = true; OO = O; HH = H; LL = L; } if (sdate != sdate[1] and stime >= EndTime3) or (sdate == sdate[1] and stime >= EndTime3 and stime[1] < EndTime3) Then { Tcond = False; } if (sdate != sdate[1] and stime >= StartTime3) or (sdate == sdate[1] and stime >= StartTime3 and stime[1] < StartTime3) Then { Tcond = true; OO = O; HH = H; LL = L; } if (sdate != sdate[1] and stime >= EndTime4) or (sdate == sdate[1] and stime >= EndTime4 and stime[1] < EndTime4) Then { Tcond = False; } if ( sdate != sdate[1] and stime >= StartTime4) or (sdate == sdate[1] and stime >= StartTime4 and stime[1] < StartTime4) Then { Tcond = true; OO = O; HH = H; LL = L; } if Tcond == true Then { if L < LL Then LL = L; if H > HH Then HH = H; if MarketPosition == 0 and OO > 0 and LL > OO-PriceScale*진입틱수 Then Sell("시작매도",AtLimit,LL+PriceScale*진입틱수); if MarketPosition == 0 and OO > 0 and HH < OO+PriceScale*진입틱수 Then Buy("시작메수",AtLimit,HH-PriceScale*진입틱수); }

input : Period(10),선두께(1),pt(0.35); Var:상승색(Red), 하락색(Blue); 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); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0); Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0); var : txx(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]; } 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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,하락색); 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]); } Condition1 = False; if max(LoVal[1],LoVal[2]) <= min(LoVal[1],LoVal[2])+pt Then { txx = Text_New(sdate[HiBar[0]],sTime[HiBar[0]],Hival[0],"●"); Text_SetColor(txx,Green); Text_SetSize(txx,30); Text_SetStyle(txx,2,1); Condition1 = true; } } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[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); } if Condition1 == true and LoVal[0] < max(LoVal[1],LoVal[2])-pt Then { Condition1 = False; Text_Delete(txx); } } If T == 1 Then { If T[1] != 1 Then { text_Delete(txx); 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]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,상승색); 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]); } } If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; 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); } } TL_SetSize(TL1,선두께); 79311에서 알려주신 수식을 여기에 일부 추가. 직전저점 깨지는지 실시간 보기위한 지표입니다. 1.추세선이 음전환되면 그 상단에 동그라미 표시. 2.동그라미 삭제시점. a.직전저점을 안깨고 양전환되면 삭제. b.직전저점 깨지면 직저 -1틱 도달시 삭제.(동그라미는 생성과 삭제 반복) 감사합니다.

거래대금상위 예스랭귀지를 알려주세요 다른것과 같이 쓰려고 하는데 부탁드려요

Input : af(0.02), maxAF(0.2),상(1),하(1); Var : Sarv(0),tl(0),T(0); Sarv = sar(af,maxAF); If crossup(c,Sarv) Then { T = 1; var1 = Sarv; Var2 = var1[1]; Condition1 = False; if var1 <= var2+PriceScale*상 and var1 >= var2-PriceScale*하 and var2 > 0 Then { Condition1 = true; TL = TL_New(sDate,sTime,0,sDate,sTime,99999999); TL_SetColor(TL,Red); TL_SetSize(TL,0.5); } } if CrossDown(C,sarv) Then T = -1; Else { if T == 1 Then { if sarv < var1 Then { var1 = sarv; if Condition1 == False and var1 <= var2+PriceScale*상 and var1 >= var2-PriceScale*하 and var2 > 0 Then { Condition1 = true; TL = TL_New(sDate,sTime,0,sDate,sTime,99999999); TL_SetColor(TL,Red); TL_SetSize(TL,0.5); } } } } 1,작은 횡보 파동을 인식하는 현재 방식을 기본으로 하여, 쌍바닥을 쓰리바닥으로 수정. 2,같은 원리로 쓰리봉 별도. 감사합니다.

안녕하세요! 아래 "수식1"과 "수식2"가 일치시 선이 발생토록 수정 부탁드립니다 * 수식1의 추세전환지점과 수식2의 가로선이 일치하는 선이 될것같네요 매번 도움주심에 항상 감사할 따름입니다 ---------------------------------------------------------------------------------------- <수식 1> Var:Period(20),선두께(4),상승색(blue), 하락색(blue); 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); 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,magenta); Text_SetStyle(Tx,2,2); Text_SetSize(tx,12); //tx = Text_New(date11,time11,Value11,NumToStr(value11,2)+NewLine+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],RED); #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],RED); //TL2[6] = TL_New(date21,time21,fr[6],date22,time22,fr[6]); //TL_SetColor(TL2[6],MAGENTA); } 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); } } 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,white); Text_SetStyle(Tx1,2,2); Text_SetSize(tx1,12); //tx = Text_New(date11,time11,Value11,NewLine+NumToStr(value11,2)+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],BLUE); #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],BLUE); //TL3[6] = TL_New(date31,time31,fr[6],date32,time32,fr[6]); //TL_SetColor(TL3[6],cyan); } 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); } } TL_SetSize(TL1,선두께); TL_SetEnd(tl,NextBarSdate,NextBarStime,NextBarOpen); TL_SetSize(TL,3); TL_SetColor(TL,white); <수식 2> var : V1(Data1(C),data1); if crossup(data11(H),data16(L)) or CrossDown(data11(L),data16(H)) Then { v1 = data1(C); } if crossup(data11(H),data16(L)) or CrossDown(data11(L),data16(H)) Then { v1 = data1(C); } plot1(v1); plot2(v1);

사용지표 : 볼린져 밴드(5, 2)/ 볼린져밴드(20,2) 지표조건 : 5 볼린져밴드 상단이 20 볼린져밴드 상단보다 위에 있으며 차트바탕에 분홍색으로 표시되는 지표식 부탁합니다