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

//// 이것을 조합하니 않되네요 - 아이디어는 1분봉 교차때 3 계약 사고 청산은 3분봉 으로 하나는 90틱에 10틱 스탑트레일링 하나는 40틱에 10틱 스탑트레일일 나머지는 한계약은 교차시 , 스탑트레일링이 오지 않으면 교차시 , 손절은 14틱 .. - 매도도 3계약 , 매도청산도 같은 방법 .. 1분봉 차트에 동일종목으로 3분봉 데이타를 참조데이타로 추가하고 식 적용하셔야 합니다. 1 var : XClose1(0,data1),Xopen1(0,data1),Xhigh1(0,data1),Xlow1(0,data1); var : XClose2(0,data2),Xopen2(0,data2),Xhigh2(0,data2),Xlow2(0,data2); var : idx(0,data2); xClose1 = data1((Open+High+Low+Close)/4); xOpen1 = data1((Open[1] + Close[1])/2); xHigh1 = data1(Max(High, xOpen1, xClose1)); xLow1 = data1(Min(Low, xOpen1, xClose1)); xClose2 = data2((Open+High+Low+Close)/4); xOpen2 = data2((Open[1] + Close[1])/2); xHigh2 = data2(Max(High, xOpen2, xClose2)); xLow2 = data2(Min(Low, xOpen2, xClose2)); if MarketPosition == 0 and xClose1 > xOpen1 Then { buy("b",OnClose,def,3); idx = data2(index); } if MarketPosition >= 1 and xClose2 < xOpen2 and data2(index) > idx Then { idx = data2(index); exitlong("bx",OnClose,def,"",1,2); } 2 atstop,atlimit은 지정한 가겨과 현재가를 비교해 즉시 신호를 발생하는 내용입니다. 지정한 가격과 기본종목의 현재가하고만 비교합니다. 손절은 변경해 드릴 내용이 없고 트레일링스탑만 수익체크만 data2를 참고하게 변경해 드립니다. input : n(20); var : h2(0,data1),L2(0,data1); h2 = data2(h); l2 = data2(l); if MarketPosition == 1 Then { ExitLong("bx",AtStop,EntryPrice-PriceScale*n); if highest(H2,BarsSinceEntry) >= EntryPrice+PriceScale*40 Then ExitLong("bp1",AtStop,highest(H2,BarsSinceEntry)-PriceScale*10,"",1,1); if highest(H2,BarsSinceEntry) >= EntryPrice+PriceScale*90 Then ExitLong("bp2",AtStop,highest(H2,BarsSinceEntry)-PriceScale*10,"",1,1); } if MarketPosition == -1 Then { ExitShort("sx",AtStop,EntryPrice+PriceScale*n); if Lowest(L2,BarsSinceEntry) <= EntryPrice-PriceScale*40 Then ExitShort("sp1",AtStop,Lowest(L2,BarsSinceEntry)+PriceScale*10,"",1,1); if Lowest(L2,BarsSinceEntry) <= EntryPrice-PriceScale*90 Then ExitShort("sp2",AtStop,Lowest(L2,BarsSinceEntry)+PriceScale*10,"",1,1); }

매번 성실한 답변 감사드립니다. 분봉기준 거래량이 전봉대비 500%이상인 캔들이 발생한 모든종목을 오전11시 까지는 11시 이전에 조건만족한 종목이 검색되고 11시 이후에는 11시 이후 조건에 만족하는 종목만 검색되는 검색식 부탁드립니다. 감사합니다.

아래의 수식에서 파동선의 꼭지점에 표시되는 가격에 1.가격 2.전환대비가(직전꼭지점에서 최종꼭지점 까지의 틱수 3.상승파동 일 때 직전 고점돌파시 직전 고점대비 틱수/하락파동일때 직전 저점붕괴 시 저점대비 틱수 4.직전파동대비 % 예] 30000(100,55, 128.00%) 29900(-100, 105, 61.00%) 이렇게 문자가 출력되도록 부탁드립니다 Input:전환가격(50),종가사용여부(1),파동선두께(2),수치표시(1),소수(0); Var:j(0),jj(0),HH(0),LL(0),hiBar(0),loBar(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,2] = 0; 고[1,3] = sDate; 고[1,4] = sTime; 저[1,1] = LL; 저[1,2] = 0; 저[1,3] = sDate; 저[1,4] = sTime; } If Index > 0 Then { hiBar = hiBar + 1; loBar = loBar + 1; } If HH[hiBar] < HH Then hiBar = 0; If LL[loBar] > LL Then loBar = 0; Condition1 = 저[1,1] + 전환가격 < HH and hiBar == 0; Condition2 = 고[1,1] - 전환가격 > LL and loBar == 0; 처리구분 = ""; 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 { If 최종꼭지점 == "저점" Then { For j = 10 DownTo 2 { For jj = 1 To 4 { 고[j,jj] = 고[j-1,jj]; } } 고[1,1] = HH[hiBar]; 고[1,2] = Index - hiBar; 고[1,3] = sDate[hiBar]; 고[1,4] = sTime[hiBar]; hiBar = -1; loBar = -1; 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],소수)); Text_SetStyle(Text1, 2, 1); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,Red); } Else If 고[1,1] < HH[hiBar] Then // 1번 고점보다 높은 고가 출현 { 고[1,1] = HH[hiBar]; 고[1,2] = Index - hiBar; 고[1,3] = sDate[hiBar]; 고[1,4] = sTime[hiBar]; hiBar = -1; loBar = -1; 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],소수)); } } 최종꼭지점 = "고점"; } If 처리구분 == "저점처리" Then { If 최종꼭지점 == "고점" Then { For j = 10 DownTo 2 { For jj = 1 To 4 { 저[j,jj] = 저[j-1,jj]; } } 저[1,1] = LL[loBar]; 저[1,2] = Index - loBar; 저[1,3] = sDate[loBar]; 저[1,4] = sTime[loBar]; hiBar = -1; loBar = -1; 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],소수)); Text_SetStyle(Text1, 2, 0); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,Blue); } Else If 저[1,1] > LL[loBar] Then { 저[1,1] = LL[loBar]; 저[1,2] = Index - loBar; 저[1,3] = sDate[loBar]; 저[1,4] = sTime[loBar]; hiBar = -1; loBar = -1; 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],소수)); } } 최종꼭지점 = "저점"; }

zigzag oscillator 지료표와 챠트를 구현 할 수 있나요 ?

안녕하세요 관리자님!! 아래서식은 관리자님이 작성해주신 수식인데 차트에 실행하니 선이 표현이 안됩니다. 기간을 극단적으로 줄여도 나오질 않습니다. 다시한번 검토 부탁드립니다. - 아 래 - input : P(520); var : OO(0),CC(0),ww(0),cnt(0); var : sum(0),mav(0),sumsqrt(0),stdv(0); Array : W1[600](0),W2[600](0),W3[600](0),W4[600](0),W5[600](0); if (sdate != sdate[1] and stime >= 101500) or (sdate == sdate[1] and stime >= 101500 and stime[1] < 101500) Then { ww = DayOfWeek(sdate); OO = O; if ww == 1 then { for cnt = 1 to 599 { W1[cnt] = W1[cnt-1][1]; } } if ww == 21 then { for cnt = 1 to 599 { W2[cnt] = W1[cnt-1][1]; } } if ww == 3 then { for cnt = 1 to 599 { W3[cnt] = W1[cnt-1][1]; } } if ww == 4 then { for cnt = 1 to 599 { W4[cnt] = W1[cnt-1][1]; } } if ww == 5 then { for cnt = 1 to 599 { W5[cnt] = W1[cnt-1][1]; } } } if stime >= 101500 or stime <= 20000 Then CC = C; if ww == 1 Then { W1[0] = OO-CC; if W1[p] > 0 then { sum = 0; for cnt = 0 to P-1 { sum = sum + W1[cnt]; } mav = sum/P; SumSqrt = 0; For cnt = 0 To P - 1 { SumSqrt = SumSqrt + (W1[cnt]-mav)^2; } Stdv = SquareRoot(SumSqrt / P); plot1(mav); plot2(mav+stdv*2); plot3(mav+stdv*1); plot4(mav-stdv*1); plot5(mav-stdv*2); } } if ww == 2 Then { W2[0] = OO-CC; W1[0] = OO-CC; if W2[p] > 0 then { sum = 0; for cnt = 0 to P-1 { sum = sum + W2[cnt]; } mav = sum/P; SumSqrt = 0; For cnt = 0 To P - 1 { SumSqrt = SumSqrt + (W2[cnt]-mav)^2; } Stdv = SquareRoot(SumSqrt / P); plot1(mav); plot2(mav+stdv*2); plot3(mav+stdv*1); plot4(mav-stdv*1); plot5(mav-stdv*2); } } if ww == 3 Then { W3[0] = OO-CC; if W3[p] > 0 then { sum = 0; for cnt = 0 to P-1 { sum = sum + W3[cnt]; } mav = sum/P; SumSqrt = 0; For cnt = 0 To P - 1 { SumSqrt = SumSqrt + (W3[cnt]-mav)^2; } Stdv = SquareRoot(SumSqrt / P); plot1(mav); plot2(mav+stdv*2); plot3(mav+stdv*1); plot4(mav-stdv*1); plot5(mav-stdv*2); } } if ww == 4 Then { W4[0] = OO-CC; if W4[p] > 0 then { sum = 0; for cnt = 0 to P-1 { sum = sum + W4[cnt]; } mav = sum/P; SumSqrt = 0; For cnt = 0 To P - 1 { SumSqrt = SumSqrt + (W4[cnt]-mav)^2; } Stdv = SquareRoot(SumSqrt / P); plot1(mav); plot2(mav+stdv*2); plot3(mav+stdv*1); plot4(mav-stdv*1); plot5(mav-stdv*2); } } if ww == 5 Then { W5[0] = OO-CC; if W5[p] > 0 then { sum = 0; for cnt = 0 to P-1 { sum = sum + W5[cnt]; } mav = sum/P; SumSqrt = 0; For cnt = 0 To P - 1 { SumSqrt = SumSqrt + (W5[cnt]-mav)^2; } Stdv = SquareRoot(SumSqrt / P); plot1(mav); plot2(mav+stdv*2); plot3(mav+stdv*1); plot4(mav-stdv*1); plot5(mav-stdv*2); } }

Inputs: FastLen(5), MedLen(20), SlowLen(60); Variables: FastAvg(0), MedAvg(0), SlowAvg(0); FastAvg = MA(Close, FastLen); MedAvg = MA(Close, MedLen); SlowAvg = MA(Close, SlowLen); If (FastAvg[1] < MedAvg[1] OR MedAvg[1] < SlowAvg[1]) AND (FastAvg > MedAvg AND MedAvg > SlowAvg) Then Buy ("MAC3_LE"); If (FastAvg[1] > MedAvg[1] OR MedAvg[1] > SlowAvg[1]) AND (FastAvg < MedAvg AND MedAvg < SlowAvg) Then Sell ("MAC3_SE"); 안녕하세요 위에수식에서 손실을제하고20틱수익일때 청산하라는수식부탁합니다

해외선물인데.. 30분봉에서 진입하고 60분봉에 청산할수 있나요??? 가능하다면 다음 글에 수식 부탁드릴께요~~

아래와 같이 작성해주신 수식에서 다음 항을 추가하고 싶습니다. 양봉발생후 n봉(20봉) 이내에서만 진입하고, 전량 청산후에는 초기화 되서 다시조건 만족의 양봉 발생하기 전까지는 진입금지 이후 다시 양봉발생시 다시 발생한 양봉을 기준으로 20봉이내에서만 진입 하도록 수정부탁드립니다. var : mav(0); mav = ma(c,5); #10%이상 양봉발생시 시고저종가 저장 if C >= O*1.10 Then { var1 = O; var2 = H; var3 = L; var4 = C; } #무포지션(첫진입)이고 최근 10%이상 양봉이 발생한적이 있고 #10%양봉의 중심가까지 하향하면 매수 if MarketPosition == 0 and var4 > 0 Then { buy("b1",atlimit,(var2+var3)/2); } #매수후 if MarketPosition == 1 Then { #첫진입이후 10%양봉 종가까지 가격상승하면 매수 if MaxEntries == 1 Then buy("b2",AtStop,var4[BarsSinceEntry]); #두번&#51760; 진입 후 종가가 이평보다 작으면 매수 if MaxEntries == 2 and c < mav Then buy("b3"); #세번째 진입 후 평단가에서 10% 하락하면 매수 if MaxEntries == 3 Then buy("b4",atlimit,AvgEntryPrice*0.90); #평단가에서 10%상승하면 전체청산 ExitLong("bx1",atlimit,AvgEntryPrice*1.10);