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

아래의 수식에서 파동선의 꼭지점에 표시되는 가격에 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);

시가를 표현할려면 plot1(dayopen);이라고 표현하는데 그시가선이 나올때 시가라는 글이 나올려면 어떻게 수식을 적어야하나요?

1. 오전 9시 주간장 시작후 첫 5분안에 시가+0.4 터치할 경우 시가+0.4,시가+0.8,시가+1.6 표시 오전 9시 주간장 시작후 첫 5분안에 시가-0.4 터치할 경우 시가-0.4,시가-0.8,시가-1.6 표시 2. 오전 9시 주간장 시작후 첫 30분안에 시가+0.8 터치할 경우 시가-0.4,시가+2.6,시가+3.2 표시 오전 9시 주간장 시작후 첫 30분안에 시가-0.8 터치할 경우 시가+0.4,시가-2.6,시가-3.2 표시 감사합니다