커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
4415
글번호 230811
답변완료
부탁 드립니다.
도움주심에 깊이 감사 드립니다.
그림과 같이 부탁 드립니다.
Input:length(10);
Var:TL1(0),TL2(0),TL2_exist(0),color(0),
종가사용여부(0), // 종가로 계산하려면 1로 설정한다.
TL_NewBit(0), // 1:NewLine 2:SetEndLine
slope(0),mid_idx(0),mid_val(0);
Array:고[10,4](0),저[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime
#==========================================#
Value1 = HiLoLineZigZag(length,종가사용여부,고,저,TL_NewBit);
// HiLoLineZigZag는 사용자함수입니다. 링크에서 내려받으세요..
If Value1 == 1 Then { // 고점
If TL_NewBit == 1 Then { // 신규
If 고[2,1] < 고[1,1] Then { // 신규 고점이 이전 고점을 상향 돌파
// y = 기울기 * x + 절편
// x = (y - 절편) / 기울기
// y = 고[2,1]
// 절편 = 저[1,1]
slope = (고[1,1] - 저[1,1]) / (고[1,2] - 저[1,2]); // 추세선의 기울기
mid_idx = Floor((고[2,1] - 저[1,1]) / slope); // 고[2,1]과 만나는 지점
mid_val = slope * mid_idx + 저[1,1];
Var1 = Index - (저[1,2] + mid_idx); // 추세선의 중간지점 x좌표
TL1 = TL_New(저[1,3],저[1,4],저[1,1],sDate[Var1],sTime[Var1],mid_val);
TL2 = TL_New(sDate[Var1],sTime[Var1],mid_val,고[1,3],고[1,4],고[1,1]);
Var2 = Index - 저[1,2]; // 이전 색깔을 따라감
TL_SetColor(TL1,color[Var2]);
color = RED; // 상향 돌파했으므로 빨간색으로 전환
TL_SetColor(TL2,color);
TL2_exist = 1; // 추세선 2개를 연결해서 그린 것이므로 추세선이 2개임을 저장
} Else {
TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
TL_SetColor(TL1,color);
TL2_exist = 0;
}
}
If TL_NewBit == 2 Then { // 연장
TL_Delete(TL1);
If TL2_exist == 1 Then TL_Delete(TL2); // 추세선이 2개면 두번째 추세선도 삭제
If 고[2,1] < 고[1,1] Then {
slope = (고[1,1] - 저[1,1]) / (고[1,2] - 저[1,2]);
mid_idx = Floor((고[2,1] - 저[1,1]) / slope);
mid_val = slope * mid_idx + 저[1,1];
Var1 = Index - (저[1,2] + mid_idx);
TL1 = TL_New(저[1,3],저[1,4],저[1,1],sDate[Var1],sTime[Var1],mid_val);
TL2 = TL_New(sDate[Var1],sTime[Var1],mid_val,고[1,3],고[1,4],고[1,1]);
Var2 = Index - 저[1,2];
TL_SetColor(TL1,color[Var2]);
color = RED;
TL_SetColor(TL2,color);
TL2_exist = 1;
} Else {
TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
TL_SetColor(TL1,color);
TL2_exist = 0;
}
}
} Else If Value1 == -1 Then { // 저점
If TL_NewBit == 1 Then { // 신규
If 저[2,1] > 저[1,1] Then {
slope = (저[1,1] - 고[1,1]) / (저[1,2] - 고[1,2]);
mid_idx = Floor((저[2,1] - 고[1,1]) / slope);
mid_val = slope * mid_idx + 고[1,1];
Var1 = Index - (고[1,2] + mid_idx);
TL1 = TL_New(고[1,3],고[1,4],고[1,1],sDate[Var1],sTime[Var1],mid_val);
TL2 = TL_New(sDate[Var1],sTime[Var1],mid_val,저[1,3],저[1,4],저[1,1]);
Var2 = Index - 고[1,2];
TL_SetColor(TL1,color[Var2]);
color = BLUE;
TL_SetColor(TL2,color);
TL2_exist = 1;
} Else {
TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
TL_SetColor(TL1,color);
TL2_exist = 0;
}
}
If TL_NewBit == 2 Then { // 연장
TL_Delete(TL1);
If TL2_exist == 1 Then TL_Delete(TL2);
If 저[2,1] > 저[1,1] Then {
slope = (저[1,1] - 고[1,1]) / (저[1,2] - 고[1,2]);
mid_idx = Floor((저[2,1] - 고[1,1]) / slope);
mid_val = slope * mid_idx + 고[1,1];
Var1 = Index - (고[1,2] + mid_idx);
TL1 = TL_New(고[1,3],고[1,4],고[1,1],sDate[Var1],sTime[Var1],mid_val);
TL2 = TL_New(sDate[Var1],sTime[Var1],mid_val,저[1,3],저[1,4],저[1,1]);
Var2 = Index - 고[1,2];
TL_SetColor(TL1,color[Var2]);
color = BLUE;
TL_SetColor(TL2,color);
TL2_exist = 1;
} Else {
TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
TL_SetColor(TL1,color);
TL2_exist = 0;
}
}
}
TL_SetSize(TL1,2);
TL_SetSize(TL2,2);
함수식)
#==========================================#
# 사용자함수 : 고저라인 지그재그 파동
# 버 전 : 1.2
# 작 성 자 : 수식지왕
# 블 로 그 : http://yahoosir.blog.me
#==========================================#
Input:Length(NumericSimple),useCLprice(NumericSimple),
oHiZZ[MaxSize1,MaxSize2](NumericArrayRef), // 열번호 1:가격,2:Index,3:sDate,4:sTime
oLoZZ[MaxSize3,MaxSize4](NumericArrayRef),
oTL_NewBit(NumericRef); // 1:NewLine 2:SetEndLine
Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분("");
#==========================================#
HH = IFF(useCLprice==1,C,H);
LL = IFF(useCLprice==1,C,L);
If Index == 0 Then {
oHiZZ[1,1] = HH;
oLoZZ[1,1] = LL;
}
Condition1 = Highest(HH,length) == HH and 최종고가 <> HH;
Condition2 = Lowest (LL,length) == LL and 최종저가 <> LL;
처리구분 = "";
If Condition1 and Condition2 Then { // 기간고점과 기간저점 동시 발생
If oHiZZ[1,1] < HH and oLoZZ[1,1] > LL Then { // 기존의 파동을 벗어난 경우
If HH - oHiZZ[1,1] > oLoZZ[1,1] - LL Then // 많이 벗어난 쪽으로 처리
처리구분 = "고점처리";
Else If HH - oHiZZ[1,1] < oLoZZ[1,1] - LL Then
처리구분 = "저점처리";
Else If 최종꼭지점 == "저점" Then // 벗어난 정도가 동일하면 지그재그 순서대로
처리구분 = "고점처리";
Else
처리구분 = "저점처리";
} Else If oLoZZ[1,1] > LL Then 처리구분 = "저점처리";
Else If oHiZZ[1,1] < HH Then 처리구분 = "고점처리";
Else If 최종꼭지점 == "저점" Then 처리구분 = "고점처리";
Else 처리구분 = "저점처리";
} Else If Condition1 Then 처리구분 = "고점처리";
Else If Condition2 Then 처리구분 = "저점처리";
oTL_NewBit = 0;
#==========================================#
If 처리구분 == "고점처리" Then {
최종고가 = HH; // 신규고점을 체크하기 위해 저장
If 최종꼭지점 == "저점" Then {
For j = 10 DownTo 2 {
For jj = 1 To 4 {
oHiZZ[j,jj] = oHiZZ[j-1,jj];
}
}
oHiZZ[1,1] = HH;
oHiZZ[1,2] = Index;
oHiZZ[1,3] = sDate;
oHiZZ[1,4] = sTime;
oTL_NewBit = 1;
} Else If oHiZZ[1,1] < HH Then { // 1번 고점보다 높은 고가 출현
oHiZZ[1,1] = HH;
oHiZZ[1,2] = Index;
oHiZZ[1,3] = sDate;
oHiZZ[1,4] = sTime;
oTL_NewBit = 2;
}
최종꼭지점 = "고점";
}
#==========================================#
If 처리구분 == "저점처리" Then {
최종저가 = LL;
If 최종꼭지점 == "고점" then {
For j = 10 DownTo 2 {
For jj = 1 To 4 {
oLoZZ[j,jj] = oLoZZ[j-1,jj];
}
}
oLoZZ[1,1] = LL;
oLoZZ[1,2] = Index;
oLoZZ[1,3] = sDate;
oLoZZ[1,4] = sTime;
oTL_NewBit = 1;
} Else If oLoZZ[1,1] > LL then {
oLoZZ[1,1] = LL;
oLoZZ[1,2] = Index;
oLoZZ[1,3] = sDate;
oLoZZ[1,4] = sTime;
oTL_NewBit = 2;
}
최종꼭지점 = "저점";
}
If 최종꼭지점 == "고점" Then HiLoLineZigZag = 1;
Else If 최종꼭지점 == "저점" Then HiLoLineZigZag = -1;
Else HiLoLineZigZag = 0;
2018-07-16
265
글번호 120544
답변완료
문의드립니다.~
input : 분주기(30),P(5),분주기1(15),분주기2(5);
var : S1(0),D1(0),TM(0),TF(0);
var : cnt(0),sum(0),mav(0),tf1(0),TFF(0),entry(false),tf2(0);
Array : CC[100](0),OO[100](0),HH[100](0),LL[100](0),TT[100](0),ii[100](0),O2[100](0);
Array : C1[100](0),T1[100](0);
if (sdate != sdate[1] and stime >= 100000) or
(sdate == sdate[1] and (Stime == 100000 or (stime > 100000 and stime[1] < 100000))) Then{
S1 = TimeToMinutes(100000);
D1 = sdate;
}
if D1 > 0 then{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TFF = TM%60;
TF = TM%분주기;
if (sdate != sdate[1] and stime >= 100000) or
(sdate == sdate[1] and (Stime == 100000 or (stime > 100000 and stime[1] < 100000))) or
(TF < TF[1]) Then{
OO[0] = o;
HH[0] = H;
LL[0] = L;
TT[0] = stime;
ii[0] = 0;
for cnt = 1 to 99{
OO[cnt] = OO[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
TT[cnt] = TT[cnt-1][1];
ii[cnt] = ii[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
CC[0] = C;
ii[0] = ii[0]+1;
TF1 = TM%분주기1;
if (sdate != sdate[1] and stime >= 100000) or
(sdate == sdate[1] and (Stime == 100000 or (stime > 100000 and stime[1] < 100000))) or
(TF1 < TF1[1]) Then{
T1[0] = stime;
for cnt = 1 to 99{
C1[cnt] = C1[cnt-1][1];
T1[cnt] = T1[cnt-1][1];
}
}
C1[0] = C;
TF2 = TM%분주기2;
if (sdate != sdate[1] and stime >= 100000) or
(sdate == sdate[1] and (Stime == 100000 or (stime > 100000 and stime[1] < 100000))) or
(TF2 < TF2[1]) Then{
O2[0] = o;
for cnt = 1 to 99{
O2[cnt] = O2[cnt-1][1];
}
}
}
질문사항:
항생에서 30분봉의 5일이평선을 구할려고 합니다.~
위 식을 가지고 var72 = (c+oo[0]+oo[1]+oo[2]+oo[3])/5 ;
이렇게 해서 30분봉의 5일이평선을 구하게 되면은
나스닥은 괜찮은데 항생에서 문제가 있거든요..
영웅문w 그림에서 보면은 전날 새벽1시30분부터 시작된 30분봉이 새벽1시30분~새벽2시 사이에 완성이 되고 그리고나서 새로운30분봉은 다음날 항생시가~10시30분까지완성된 봉으로 나타납니다.
따라서 만약10시50분에 30분봉의5일이평선을 구할려면
10시50분의종가+10시30분종가+전일새벽2시경종가+전일새벽1시30분종가+전일새벽1시종가/5
이렇게 구해야 되는데 즉 영웅문w그림에서 30분봉의5개의 평균으로 구해야 되는데
문제점이 그림에서 보면은 항생시가가격으로 분주기표현식에 표현이 되어서 10시15분의 종가 가격이 포함이 되면 안되는데 포함되어버리는 부분이랑
전일의1시30분~2시까지의 30분봉의 종가가격도 분주기표현식에 포함이 안되는걸로 계산이 되더라구요.
계산해 보면은 전일1시30분종가가격 다음에 바로 당일10시15분종가가격으로 계산이 되는 문제점이 있습니다.
이부분 해결할 방법이 있을까요?
즉 분주기표현식으로 10시50분에 30분봉의 5일이평선가격을 구할때에
위에 표현해 놓은대로
10시50분종가+10시30분종가+전일새벽2시경종가+전일새벽1시30분종가+전일1시종가/5
이렇게 적용할 수 있는 방법이 있을까요?
10시30분부터 30분봉의5개봉이 지나는 시점부터는 문제가 없습니다.
그리고 이전문의 식 구해주셔서 너무너무 감사합니다ㅜ
매번 도움주셔서 너무 감사한 마음이에요~
////////////////////
이전질문과 동일한 내용이구요.
수정해 주신식으로 적용해 보니 원하는대로 나옵니다.
그런데 문제가 전일1시30~2시까지 봉이 틱봉으로 계산되는거라
어떤날은 2시경에 틱봉이 완성봉이 나오면 다음날 시초가가 반영이 안되고 바로 10시30분으로 넘어오는데 어떤날은 2시경에 틱봉이 완성이 안되면 다음날시초가로 전일의 1시30분봉의 완성봉이 넘어와 버려서요`
얘기해 주신대로 당일시작가격을10시30분으로 하고
전일끝나는 시간을1시50분으로 매일 고정해서 사용할 수 는 없을까요?
즉 1시30분에 시작되어서 2시에 완성되는 봉은 1시50분에 끝나고
이후로 다시 오전10시30분부터 시작되는걸로요~
상관은 없지만 이전식에서 전일12시봉이 생성되지 않아서 위 식으로 다시 문의드립니다
분주기식은 여러번 봤는데 이해하기가 어려워서요
손을 못대겠습니다.
위 식에서 30분 분주기만 사용할려면
TF = TM%분주기; ->이거밑으로는 그냥 삭제하고 사용하면 되는거죠?
30분 분주기만 해서 적용부탁드립니다. 감사합니다.~
2018-07-12
178
글번호 120542
답변완료
문의 드립니다
늘 소중하고 신속한 답변 감사드립니다
1.
어제 질문드린 것을 다시 설명하여 문의드립니다
위의 그림에서
IF BW_SEVEN>=BW_SEVEN[1] and BW_SEVEN[1]>=BW_SEVEN[2] and BW_SEVEN[2]>=BW_SEVEN[3]
Then buy
라는 식은
바이너리 7이 지속적으로 3회 같거나 상승할때 매수하라라는 식입니다
그런데 동그라미 부분
즉 바이너리 7이 -5~-7 구간은 몇번을 반복하더라도 1회로 표시가 되고 -5를 빠져나왔을때 부터 2회 3회가 같거나 상승할때 매수하라라고 만들고 싶습니다
-5~-7 또는 5~7 구간을 제외한 구간에서는 위의 식을 만족하고고요
제가 설명이 많이 부족하죠
번거롭게 해드려 죄송합니다
감사합니다
2018-07-12
151
글번호 120541
답변완료
수익나는 시스템
수많은 시스템이 있는데 꾸준히 수익나는 시스템이 있을까요?
있으면 하나만 부탁드립니다...
2018-07-12
154
글번호 120540
답변완료
지표
첨부파일에 있는 그림처럼 예스 수식은 없나요..
참고로 이베스트 입니다
2018-07-12
226
글번호 120538
답변완료
질문드립니다
1
특정 종목검색식과 매매시스템을 사용해서 과거의 특정 기간 또는 날짜를 정하여 전체수익률이나 승률(총 매매회수 중 매수가이상 청산한 비율) 매매회수 등
결과값을 출력할 수 있는지 문의드립니다
매일 종목이 바뀌어서 검증에 어려움이 있네요
구현 가능하다면 예제나 가이드라인 부탁드립니다
현재 일봉주기로 검색하고 분봉주기로 매매하고 있습니다
2
매수후 며칠뒤에 매도하는 시스템의 경우 시스템은 구현가능하나 날짜가 바뀌어서 종목검색에 동종목이
나오지 않아 전략사용에 어려움이 있네요
스팟에서 매일 종목검색과 함께 확장차트로 매매를 하고 있는데요..해결방법 잇을까요?
예를 들어 전일 종목검색 후 종가 매수하면 스팟에서 당일 종목검색에 동종목이 나오지 않습니다
매수날짜에서 +n일후에도 종목검색결과가 나오게 할수 있나요
간단하게 아래종목검색식에서 어떤 항목을 추가해야하나요
if countif(O < C) == 3 then
find(1);
그리고 또 문제가...위 방법이 될경우 전일 매수했던 종목이 당일에도 매수가 될텐데 해결방법이 있을까요
input : 매수금액(10000);
var : dd(0),ED(0);
if bdate != bdate[1] Then
dd = dd+1;
if stime >= 151600 Then
{
if MarketPosition == 0 Then
{
buy("b",AtMarket,def,Floor(매수금액/C));
ED = dd;
}
}
#매수후 1일후부터 동작
if MarketPosition == 1 and dd >= ED+1 then
{
sell();
}
3
종목검색식 부탁드립니다
20일봉전 envelop(20,20) 종가가 envelop 상한선이상
1일봉전 envelop(20,20) 종가가 envelop 하하선이하
EnvelopeUp(20,20)[20]<C[20]
EnvelopeDown(20,20)[1]>C[1]
인가요?
2018-07-13
153
글번호 120535
답변완료
문의드립니다 .
1. 기타
이전에 물어본 것 같은데 기억이 잘 안 나서 다시 물어 봅니다.
해선용
-n시부터 n2시까지
a- 봉 시작시 무조건 매수
b-봉 끝날 때 a 무조건 청산
2018-07-12
143
글번호 120526
답변완료
수식문의드립니다.
해외선물 100틱 차트에서
30분봉 20일선 60일선
60분봉 20일선 50일선
120분봉 20일선
일봉 10일선 을
100틱차트에서 보일 수 있도록 설정하고 싶습니다.
수식 부탁드립니다.
2018-07-12
169
글번호 120524
답변완료
주식 검색 되나요
주식 종목을 일일히 찾기에 시간없네요
종목들중에서 1월2월3월4월5월6월 즉
1월부터 6개월 있습니다
종목선정은 현재가가 전월달부터
6개월전 최고점 돌파시
바로검색 가능한식 있나요?
최고점 찾기 기능요
감사합니다^^
2018-07-12
145
글번호 120515