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

* 새해에도 건강 하시고 복 많이 받으십시요^^ * 요청사항 : 매매(매도,매수)후 수익이 50딕 넘었다가 30딕이하로 떨어지면 청산 하는 수식좀 부탁 드립니다. SetStopTrailing(30,50,PercentStop,0); 이게 아닌가요?? * 고맙 습니다^^

아래의 조건 1,2,3을 만족시키는 종목 검색식을 부탁드립니다. (조건1) 현재봉으로부터 N(15)봉 내에 장대양봉(20% 이상)이 있고 JD_V : 장대양봉의 거래량 JD_O : 장대양봉의 시가 (조건2) 그 장대양봉 이후부터는 JD_V*0.7보다 적은 거래량만 발생하고 ( 장대양봉이후 한 번이라도 JD_V*0.7보다 많은 거래량 발생시 조건검색에서 제외) (조건3) 1봉전의 종가가 JD_O(장대양봉의 시가)보다 낮은 상태에서 0봉전의 종가가 5이평을 상향돌파하는 종목 input : N(15); var : JD_V(0), JD_O(0) ;

항상 고맙습니다 아래수식에서 주간을 구분하는 수직선이 일반적인 해선종목에서는 정상이나 항셍 종목에서는 비 정상으로 나타 납니다. 어디를 수정 하여야 하는지요? var:tl51(0); if DayOfWeek(bdate) == 1 and bdate != bdate[1] Then{ tl51=TL_New_self(sdate[0],stime[0],99999,sdate[0],stime[0],-9999999); }

input : Period(50),d1(1),d2(2); var : T(0); var1 = BollBandUp(period,d2); var2 = BollBandUp(period,d1); var3 = ma(c,Period); var4 = BollBandDown(period,d1); var5 = BollBandDown(period,d2); if var3 > var3[1] Then T = 1; if var3 < var3[1] Then T = -1; if T == 1 Then{ plot1(var1,"상단2"); plot2(var2,"상단1"); plot3(var3,"중단",RED); plot4(var4,"하단1"); plot5(var5,"하단2"); } Else{ plot1(var1,"상단2"); plot2(var2,"상단1"); plot3(var3,"중단",BLUE); plot4(var4,"하단1"); plot5(var5,"하단2"); } 위수식으로 시스템을 하나 부탁드립니다.. 위 수식중 중단 에 현제 색깔이 칠해져있습니다 상승할경우 빨강 하락할경우 파랑 1. 상승.하락이 바뀌는 경우 2번째 캔들봉 종가에서 신호 발생 상승 하락 부분에 사진첨부처럼 아닐경우는 패스 신호가. 2. 상승,하락 부분에 신호가 나올경우 10틱/20틱/30틱 순으로 표기 좀 부탁드립니다. 3. 계약수(),1차 청산() ,2차청산() 3차청산() 한뒤 신호가 바뀔경우 전량청산후 다시 진입 가능하게 조절부탁드립니다. 계약수,청산 부분만 넣어주시면 감사하겠습니다 나머지는 수정은 제가 해보겠습니다 감사합니다.

안녕하세요 새해 복 많이 받으세요 아래수식은 고저점파동수식입니다 이수식을 1. 고점발생직후 종가(C)가 고점발생점보다 계속 상승하면 삼각형상그래프가 발생하고 반대로 종가가 고점발생점보다 하락하면 삼각형하그래프가 발생 2. 저점발생직후 종가(C)가 저점발생점보다 계속 하락하면 삼각형하그래프가 발생하고 반대로 종가가 고점발생점보다 상승하면 삼각형상그래프가 발생 되도록 수식 수정부탁드립니다 Input:length(2),종가사용여부(0),파동선두께(2),수치표시(1) ; Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""), TL1(0),Text1(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 { 최종고가 = 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]); If 수치표시 == 1 Then { Text1 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1],2)); Text_SetStyle(Text1, 2, 1); Text_SetSize(Text1, 15); Text_SetColor(Text1,BLACK); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,BLACK); } 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]); // 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임 If 수치표시 == 1 Then { Text_SetLocation(Text1,고[1,3],고[1,4],고[1,1]); Text_SetString(Text1,NumToStr(고[1,1],2)); } } 최종꼭지점 = "고점"; } #==========================================# If 처리구분 == "저점처리" Then { 최종저가 = 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]); If 수치표시 == 1 Then { Text1 = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(저[1,1],2)); Text_SetStyle(Text1, 2, 2); Text_SetSize(Text1, 15); Text_SetColor(Text1,BLACK); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,BLACK); } 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]); If 수치표시 == 1 Then { Text_SetLocation(Text1,저[1,3],저[1,4],저[1,1]); Text_SetString(Text1,NumToStr(저[1,1],2)); } } 최종꼭지점 = "저점"; }

data를 파일로 출력하려고 다음을 차트에 적용하였는데, c:￦NHTrader￦YesLang 밑에 아무런 파일이 생성되지 않습니다. 무엇이 잘못 되었을까요? 참고로 윈도즈는 Windows 7 Professional, Service Pack 1이고, 64비트 운영체계입니다. if index==0 then print("c:￦NHTrader￦YesLang￦test.txt",", A, B"); if mod(index,1000)==1 then print("c:￦NHTrader￦YesLang￦test.txt",", %.2f, %.2f",O, C); 감사합니다.

*안녕하세요, 새해 복 많이 받으세요. #,아래수식은 당일 중심기준 피봇대칭선을 표시하고저 작성한수식인데요 차트적용이 잘 안되네 요,지표속성창에서 조절을 해봐도 역시 안됩니다, 관리자님 도움 부탁드립니다. input : Per1(11.8),Per2(23.6),per3(38.2),per4(50),per5(61.8),per6(76.4),per7(100); Var : pivot(0),S1(0),S2(1),S3(1),S4(1); S1 = (dayhigh(0)+daylow(0))/2; S2 = (dayhigh(1)+daylow(1))/2; S3 = dayhigh(1); S4 = daylow(1); plot1(10^(LOG10(DayOpen))); plot2(10^(LOG10((dayhigh(0)+(daylow(0))/2))+(LOG10(S3)-LOG10(S4))*(Per1/100))); plot3(10^(LOG10((dayhigh(0)+(daylow(0))/2))-(LOG10(S3)-LOG10(S4))*(Per1/100))); plot4(10^(LOG10((dayhigh(0)+(daylow(0))/2))+(LOG10(S3)-LOG10(S4))*(Per2/100))); plot5(10^(LOG10((dayhigh(0)+(daylow(0))/2))-(LOG10(S3)-LOG10(S4))*(Per2/100))); plot6(10^(LOG10((dayhigh(0)+(daylow(0))/2))+(LOG10(S3)-LOG10(S4))*(Per3/100))); plot7(10^(LOG10((dayhigh(0)+(daylow(0))/2))-(LOG10(S3)-LOG10(S4))*(Per3/100))); plot8(10^(LOG10((dayhigh(0)+(daylow(0))/2))+(LOG10(S3)-LOG10(S4))*(Per4/100))); plot9(10^(LOG10((dayhigh(0)+(daylow(0))/2))-(LOG10(S3)-LOG10(S4))*(Per4/100))); plot10(10^(LOG10((dayhigh(0)+(daylow(0))/2))+(LOG10(S3)-LOG10(S4))*(Per5/100))); plot11(10^(LOG10((dayhigh(0)+(daylow(0))/2))-(LOG10(S3)-LOG10(S4))*(Per5/100))); plot12(10^(LOG10((dayhigh(0)+(daylow(0))/2))+(LOG10(S3)-LOG10(S4))*(Per6/100))); plot13(10^(LOG10((dayhigh(0)+(daylow(0))/2))-(LOG10(S3)-LOG10(S4))*(Per6/100))); plot14(10^(LOG10((dayhigh(0)+(daylow(0))/2))+(LOG10(S3)-LOG10(S4))*(Per7/100))); plot15(10^(LOG10((dayhigh(0)+(daylow(0))/2))-(LOG10(S3)-LOG10(S4))*(Per7/100))); $,언제나 늘 고맙습니다.

Input : length(12),추세선굵기(2);#굵기(0~6사이의 정수) input : 고저점값표시(1);#1이면 표시, 0이면 표시안함 input : 피보값표시(1);#1이면 표시, 0이면 표시안함 Var : j(0),lastHiVal(0),lastLoVal(0),turnPntBit(""),TL1(0),T(0); var : tx(0),tx1(0),tx2(0),tx3(0),tx4(0),tx5(0),tx6(0),tx7(0); Array:valArr[20](0),barArr[20](0),turnPntArr[20](""),r[10](0); // 봉이 새로 생겼으므로 봉개수 관리하는 변수들의 봉개수 값 1씩 증가 For j = 0 To 19 { barArr[j] = barArr[j] + 1; } // 고점조건 = 현재 봉의 고가가 기간최고가이면서 최고가 갱신되었을 때; // 저점조건 = 현재 봉의 저가가 기간최저가이면서 최저가 갱신되었을 때; // 고점,저점조건 만족시 현재 봉의 고[저]가를 변수에 저장 Condition1 = Highest(H,length) == H and lastHiVal <> H; Condition2 = Lowest(L,length) == L and lastLoVal <> L; If Condition1 Then lastHiVal = H; If Condition2 Then lastLoVal = L; // 전환점구분 null값으로 초기화; // if 고점조건, 저점조건 동시 만족시 { // if 전환점배열의 현재(배열상 1번째)값이 고점이면 전환점구분 = 저점; // else if 전환점배열의 현재 값이 저점이면 전환점구분 = 고점; // else if 고점조건 만족하면 전환점구분 = 고점; // else if 저점조건 만족하면 전환점구분 = 저점; turnPntBit = ""; If Condition1 and Condition2 Then { If turnPntArr[1] == "Hi" Then turnPntBit = "Lo"; Else If turnPntArr[1] == "Lo" Then turnPntBit = "Hi"; } Else If Condition1 Then turnPntBit = "Hi"; Else If Condition2 Then turnPntBit = "Lo"; // if 전환점구분에 값이 있을 때만 then 아래 실행, 없으면 통과 // if 신규 전환점구분이 현재(전환점배열 1번째)와 다르면 then // 배열값들을 이전값으로 Move; If turnPntBit == "Hi" or turnPntBit == "Lo" Then { If turnPntBit <> turnPntArr[1] Then { for j = 18 downto 1 { valArr[j+1] = valArr[j]; barArr[j+1] = barArr[j]; turnPntArr[j+1] = turnPntArr[j]; } } // if 전환점구분이 바뀌었거나 또는 // (전환점구분은 안바뀌었는데 // (이전 고점보다 높은 고점이 발생했거나 또는 // 이전 저점보다 낮은 저점이 발생했으면)) then If turnPntBit <> turnPntArr[1] or (turnPntBit == turnPntArr[1] and ((turnPntBit == "Hi" and valArr[1] < H) or (turnPntBit == "Lo" and valArr[1] > L))) Then { // 값 배열에는 고점 또는 저점을 대입; // 봉개수 배열에는 0값 대입; // 전환점 배열에 전환점구분값을 대입; valArr[1] = IFF(turnPntBit == "Hi",H,L); barArr[1] = 0; turnPntArr[1] = turnPntBit; // if 이전봉대비 전환점구분이 바뀌었다면 추세선 새로 그리고; // else 전환점구분이 안바뀌었으면 값만 바뀐거므로 추세선 연장; If turnPntArr[1][1] <> turnPntArr[1][0] Then { TL1 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2],sDate[barArr[1]],sTime[barArr[1]],valArr[1]); if turnPntArr[1][0] == "Hi" Then { T = 1; } if turnPntArr[1][0] == "Lo" Then { T = -1; } if 고저점값표시 == 1 and T != T[1] Then { tx = Text_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2],NumToStr(valArr[2],2)); if t == 1 then { Text_SetStyle(tx,2,0); Text_SetColor(tx,BLACK); } Else { Text_SetStyle(tx,2,1); Text_SetColor(tx,BLACK); } } } Else TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]); } } TL_SetSize(TL1,추세선굵기); TL_SetColor(TL1,iff(t== 1,GRAY,GRAY)); var : TTL1(0),TTL2(0),TTL3(0),TTL4(0),TTL5(0),TTL6(0),TTL7(0); if T == -1 then { r[0] = 0; r[1] = 0.236; r[2] = 0.382; r[3] = 0.50; r[4] = 0.618; r[5] = 0.764; r[6] = 1; var1 = valArr[1]+(valArr[2]-valArr[1])*R[0]; var2 = valArr[1]+(valArr[2]-valArr[1])*R[1]; var3 = valArr[1]+(valArr[2]-valArr[1])*R[2]; var4 = valArr[1]+(valArr[2]-valArr[1])*R[3]; var5 = valArr[1]+(valArr[2]-valArr[1])*R[4]; var6 = valArr[1]+(valArr[2]-valArr[1])*R[5]; var7 = valArr[1]+(valArr[2]-valArr[1])*R[6]; TL_Delete(TTL1); TL_Delete(TTL2); TL_Delete(TTL3); TL_Delete(TTL4); TL_Delete(TTL5); TL_Delete(TTL6); TL_Delete(TTL7); TTL1 = TL_New(sDate[barArr[1]],sTime[barArr[1]],valArr[1]+(valArr[2]-valArr[1])*R[0],sdate,stime,valArr[1]+(valArr[2]-valArr[1])*R[0]); TTL2 = TL_New(sDate[barArr[1]],sTime[barArr[1]],valArr[1]+(valArr[2]-valArr[1])*R[1],sdate,stime,valArr[1]+(valArr[2]-valArr[1])*R[1]); TTL3 = TL_New(sDate[barArr[1]],sTime[barArr[1]],valArr[1]+(valArr[2]-valArr[1])*R[2],sdate,stime,valArr[1]+(valArr[2]-valArr[1])*R[2]); TTL4 = TL_New(sDate[barArr[1]],sTime[barArr[1]],valArr[1]+(valArr[2]-valArr[1])*R[3],sdate,stime,valArr[1]+(valArr[2]-valArr[1])*R[3]); TTL5 = TL_New(sDate[barArr[1]],sTime[barArr[1]],valArr[1]+(valArr[2]-valArr[1])*R[4],sdate,stime,valArr[1]+(valArr[2]-valArr[1])*R[4]); TTL6 = TL_New(sDate[barArr[1]],sTime[barArr[1]],valArr[1]+(valArr[2]-valArr[1])*R[5],sdate,stime,valArr[1]+(valArr[2]-valArr[1])*R[5]); TTL7 = TL_New(sDate[barArr[1]],sTime[barArr[1]],valArr[1]+(valArr[2]-valArr[1])*R[6],sdate,stime,valArr[1]+(valArr[2]-valArr[1])*R[6]); TL_SetExtRight(TTL1,true); TL_SetExtRight(TTL2,true); TL_SetExtRight(TTL3,true); TL_SetExtRight(TTL4,true); TL_SetExtRight(TTL5,true); TL_SetExtRight(TTL6,true); TL_SetExtRight(TTL7,true); TL_SetExtRight(TTL7,true); TL_SetColor(TTL1,GRAY); TL_SetColor(TTL2,MAGENTA); TL_SetColor(TTL3,MAGENTA); TL_SetColor(TTL4,BLACK); TL_SetColor(TTL5,MAGENTA); TL_SetColor(TTL6,MAGENTA); TL_SetColor(TTL7,GRAY); if 피보값표시 == 1 then { } } #--하락적용--- if T == 1 Then { r[0] = 0; r[1] = 0.236; r[2] = 0.382; r[3] = 0.50; r[4] = 0.618; r[5] = 0.764; r[6] = 1; var1 = valArr[1]-(valArr[1]-valArr[2])*R[0]; var2 = valArr[1]-(valArr[1]-valArr[2])*R[1]; var3 = valArr[1]-(valArr[1]-valArr[2])*R[2]; var4 = valArr[1]-(valArr[1]-valArr[2])*R[3]; var5 = valArr[1]-(valArr[1]-valArr[2])*R[4]; var6 = valArr[1]-(valArr[1]-valArr[2])*R[5]; var7 = valArr[1]-(valArr[1]-valArr[2])*R[6]; TL_Delete(TTL1); TL_Delete(TTL2); TL_Delete(TTL3); TL_Delete(TTL4); TL_Delete(TTL5); TL_Delete(TTL6); TL_Delete(TTL7); TTL1 = TL_New(sDate[barArr[1]],sTime[barArr[1]],var1,sdate,stime,var1); TTL2 = TL_New(sDate[barArr[1]],sTime[barArr[1]],var2,sdate,stime,var2); TTL3 = TL_New(sDate[barArr[1]],sTime[barArr[1]],var3,sdate,stime,var3); TTL4 = TL_New(sDate[barArr[1]],sTime[barArr[1]],var4,sdate,stime,var4); TTL5 = TL_New(sDate[barArr[1]],sTime[barArr[1]],var5,sdate,stime,var5); TTL6 = TL_New(sDate[barArr[1]],sTime[barArr[1]],var6,sdate,stime,var6); TTL7 = TL_New(sDate[barArr[1]],sTime[barArr[1]],var7,sdate,stime,var7); TL_SetExtRight(TTL1,true); TL_SetExtRight(TTL2,true); TL_SetExtRight(TTL3,true); TL_SetExtRight(TTL4,true); TL_SetExtRight(TTL5,true); TL_SetExtRight(TTL6,true); TL_SetExtRight(TTL7,true); if 피보값표시 == 1 then { TL_SetColor(TTL1,GRAY); TL_SetColor(TTL2,BLUE); TL_SetColor(TTL3,BLUE); TL_SetColor(TTL4,BLACK); TL_SetColor(TTL5,BLUE); TL_SetColor(TTL6,BLUE); TL_SetColor(TTL7,GRAY); } } 위수식에서 약간변경하고십습니다 ,지그재그선이 상승점을찍고 피보나치선이 나오는데 76.4%하락돌파시 레드색수평선 하나만 나오게(돌파하지않았을&#46468;는나오지않게,돌파시만수평선유지) 반대로 지그재그선이 하락점을찍고 23.6%상승시블루색수평선 하나만나오게 수정부탁드립니다~~미리감사드립니다