커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
7216
글번호 230811
답변완료
수식 부탁드립니다
안녕하세요 새해 복 많이 받으세요 아래수식은 고저점파동수식입니다
이수식을
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));
}
}
최종꼭지점 = "저점";
}
2018-12-30
235
글번호 124849
답변완료
print 파일
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);
감사합니다.
2018-12-29
428
글번호 124848
qha71 님에 의해서 삭제되었습니다.
2018-12-29
14
글번호 124847
답변완료
수식점검 부탁드립니다
*안녕하세요, 새해 복 많이 받으세요.
#,아래수식은 당일 중심기준 피봇대칭선을 표시하고저 작성한수식인데요 차트적용이 잘 안되네
요,지표속성창에서 조절을 해봐도 역시 안됩니다, 관리자님 도움 부탁드립니다.
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)));
$,언제나 늘 고맙습니다.
2018-12-29
241
글번호 124846
답변완료
문의드립니다
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%하락돌파시 레드색수평선 하나만 나오게(돌파하지않았을떄는나오지않게,돌파시만수평선유지) 반대로 지그재그선이 하락점을찍고 23.6%상승시블루색수평선 하나만나오게 수정부탁드립니다~~미리감사드립니다
2018-12-29
266
글번호 124845
답변완료
수식 부탁드립니다
input : len(11), period(200);
var : Lbar1(0), Lbar2(0), Lval1(0), Lval2(0), Hbar1(0), Hbar2(0), Hval1(0), Hval2(0);
var : UpTrend(0), DnTrend(0);
Lbar1 = swinglowbar(1, low, len, len, period);
Lbar2 = swinglowbar(2, low, len, len, period);
Lval1 = swinglow(1, low, len, len, period);
Lval2 = swinglow(2, low, len, len, period);
Hbar1 = swinghighbar(1, high, len, len, period);
Hbar2 = swinghighbar(2, high, len, len, period);
Hval1 = swinghigh(1, high, len, len, period);
Hval2 = swinghigh(2, high, len, len, period);
If Lval1 > Lval2 Then {
UpTrend = (Lval1 - Lval2)/(Lbar2 - Lbar1)*Lbar1 + Lval1;
plot1(UpTrend, "상승추세선");
}
If Hval1 < Hval2 Then {
DnTrend = (Hval1 - Hval2)/(Hbar2 - Hbar1)*Hbar1 + Hval1 ;
plot2(DnTrend, "하락추세선");
}
현재 이 지표 잘 사용중인데 기능을 하나 더 추가하고 싶습니다.
1, 상승추세선을 깨고 하락시 직전 고점에서 추세선 붕괴시점의 지수를 뺀 폭만큼의 지수를
수평선으로 표시하고 싶습니다.
2, 반대로 하락추세선을 돌파하고 상승시 직전 저점에서 돌파시점의 지수를 더한만큼의 지수를 수평선으로 표시하고 싶습니다.
부탁드립니다.
2019-01-02
274
글번호 124844
답변완료
문의
안녕하세요
1. 일간차트 선물용 인데요
Input: aa(-1.5),bb(1.5)
매수가대비 (aa) 가 -1.5p 하락 하면 매수
매도가대비 (bb) 가 1.5p 상승 하면 매도
위 내용을 랜코 식에서 반올림 반내림으로
거래하고싶네요
2.
일간차트 합니다 현물용
랜코 식 을 아래와같이 변경
매수가 대비 반내림 은 매수
매도가 대비 반올림 은 매도
감사합니다^^
연휴 건강하십시요
2018-12-29
206
글번호 124843
답변완료
수식 문의드립니다.
안녕하세요
아래와 같은 수식 문의드립니다.
1.
매수 진입 "BUY" 진입후에
50틱 초과시 수익이 아니라,
50틱 이상 수익이 난 상황에서 50틱 이하로 떨어지는 경우 청산하고자 합니다.
50틱 이상 올라간 경우... 최소 50틱은 챙기는게 목적입니다.
이럴때 어떻게 수식을 구성해야 할지 문의드립니다.
2.
항셍의 경우,
10시 15분에 장 시작하고 새벽 5시 까지 열리는것으로 알고 있습니다.
새벽 장 종료시까지는 정상 매매가 되고,
10시 15분 장 시작시 바로 진입이 안되게 수식 문의드립니다.
5분봉에서 10시 15분은 진입 안되고 10시 20분부터 진입을 했으면 합니다.
날씨 추운데 항상 도움 감사드립니다.
2019-01-01
212
글번호 124842
답변완료
터틀s1 문의
터틀s1수식 부탁드립니다.
손절은 전날20atr로욥
--
★시스템 1
원칙 : 4주간 (20일) 최고점을 돌파하면 매수, 2주간(10일) 최저점이 붕괴되면 매도
추가규칙
① 바로 직전 4주 신호를 보고 거래를 해서 (가상거래포함)이익을 봤다면, 현재 새롭게 나온 4주 신호는 무시한다.
② 직전 4주 신호에 따라 거래를 시작했는데 2N (변동성)손실을 기록했다면, 현재 새롭게 나온 4주 신호는 받아들인다.
2019-01-02
264
글번호 124841