커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
7796
글번호 230811
답변완료
이동평균선 수렴후 주가상향돌파--재질문요
알려주신대로 해봤는데 잘안되서요
Input : shortPeriod(5), midPeriod(20), longPeriod(60), Percent(5);
Var : value1(0), value2(0), value3(0), value4(0), value5(0);
value1 = ma(C,shortPeriod);
value2 = ma(C,midPeriod);
value3 = ma(C,longPeriod);
value4 = highest(H,5);
If max(value1,value2,value3)<min(value1,value2,value3)*(1+Percent/100) &&
C > value4[1] && C[1] <= value4[2] Then
value5 =(C-C[1])/C[1]*100;
Else
value5 = 0;
Find(value5);
어떻게 해야되는지요
초보라 죄송!!!
2008-07-14
689
글번호 16185
답변완료
틱챠트 적용
그런데 틱챠트에서는 적용이 않되네요???
=========================================================================
안녕하세요
예스스탁입니다.
if Stime == 090000 Then
buy("매수",onclose);
은 첫봉이 완성 후 진입하는 식입니다.
즉 1분봉이라면 1분봉 첫봉이 완성될때 매수주문이라는 식입니다.
즐거운 하루되세요
> 마수거리 님이 쓴 글입니다.
> 제목 : 0900 진입
> if Stime == 090000 Then
buy("매수",onclose);
는 않되나요?
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : 0900 시가 진입
> 안녕하세요
예스스탁입니다.
if Stime == 151500 Then
buy("매수",AtMarket);
다일 마지막 봉에 무조건 조건을 만족시켜
다음날 첫봉시가에 주문을 내기위한 식입니다.
당일봉의 마지막 시간을 넣어주시기 바랍니다.
즐거운 하루되세요
> 마수거리 님이 쓴 글입니다.
> 제목 : 0900 시가 진입
> 09:00에 어떤 챠트이든지 시가 매수진입하려면 어떻게 해야 하나요?
2008-07-14
704
글번호 16184
답변완료
안녕하세요.
일단 TS 용 함수와 지표입니다. 두개로 분류되어져있습니다.
이 함수를 YT 형식으로.. 지표화 해보고 싶은데요.
좀 길지만.. 부탁드리겠습니다 ㅠㅠ
함수부터....
"PriceMTF"
Inputs: Factor( numericsimple ), Price( numericseries );
If Factor > 1 Then
Begin
If Price = High Then
PriceMTF = Highest( High, Factor )
Else If Price = Low Then
PriceMTF = Lowest( Low, Factor )
Else If Price = Div( ( High + Low ), 2 ) Then
PriceMTF = Div( ( Highest( High, Factor ) + Lowest( Low, Factor ) ), 2 )
Else If Price = Range Then
PriceMTF = ( Highest( High, Factor ) - Lowest( Low, Factor ) )
Else If Price = Div( ( High + Low + Close ), 3 ) Then
PriceMTF = Div( ( Highest( High, Factor ) + Lowest( Low, Factor ) + Close ), 3 )
Else If Price = Div( ( High + Low + Open + Close ), 4 ) Then
PriceMTF = Div( ( Highest( High, Factor ) + Lowest( Low, Factor ) + Open[ Factor ] + Close ), 4 )
Else
PriceMTF = Average( Price, Factor );
End
Else
PriceMTF = Price;
"MTF"
Inputs: Factor( numericsimple );
If FracPortion( Div( CurrentBar, Factor ) ) = 0 Then
MTF = True
Else
MTF = False;
"Div "
Inputs: Divend( numericsimple ), Divisor( numericsimple );
If Divend <> 0 AND Divisor <> 0 Then
Div = Divend / Divisor
Else
Div = 0;
"Natural "
Inputs: Vector( numericsimple );
Value1 = AbsValue( IntPortion( Vector ) );
If Value1 = 0 Then
Natural = 1
Else
Natural = Value1;
"Hilbert"
Inputs: Factor( numericsimple ), Price(numericseries);
Vars: Smoother(0), Detrender(0), i1(0),Q1(0),j1(0),Jq(0),i2(0),Q2(0),
x1(0),x2(0),y1(0),Y2(0),Re(0),iM(0),Period(0), p1(0), inphase( 0 ), Phase( 0 ), dp( 0 ), dp2( 0 ), quad( 0 );
If CurrentBar > 5 * Factor AND
MTF( Factor ) then
Begin
Smoother = ( 4 * Price + 3 * Price[ Factor ] + 2 * Price[ 2 * Factor ] + Price[ 3 * Factor ] ) / 10;
Detrender = ( .25 * Smoother + .75 * Smoother[ 2 * Factor ] - .75 * Smoother[ 4 * Factor ]- .25 * Smoother[ 6 * Factor ]) * ( .046 * Period[ Factor ] + .332 );
{Compute InPhase and Quadrature components}
Q1= ( .25 * Detrender + .75 * Detrender[ 2 * Factor ] - .75 * Detrender[ 4 * Factor ] - .25 * Detrender[ 6 * Factor ]) * (.046 * Period[ Factor ] + .332 );
i1 = Detrender[ 3 * Factor ];
{Advance the phase of i1 and Q1 by 90 degrees}
j1 = .25 * i1 + .75 * i1[ 2 * Factor ] - .75 * i1[ 2 * Factor ] - .25 * i1[ 2 * Factor ];
jQ = .25 * Q1 + .75 * Q1[ 2 * Factor ] - .75 * Q1[ 2 * Factor ] - .25 * Q1[ 2 * Factor ];
{Phasor addition to equalize amplitude due to
quadrature calculations (and 3 bar averaging}
i2 = i1 - jQ;
q2 = Q1 + j1;
{Smooth the i and Q components before applying the discrinator}
i2 = .15 * i2 + .85 * i2[ Factor ];
Q2 = .15 * Q2 + .85 * Q2[ Factor ];
{Homodyne Discriminator}
{Complex Conjugate Multiply}
X1 = i2 * i2[ Factor ];
x2 = i2 * Q2[ Factor ];
Y1 = Q2 * Q2[ Factor ];
Y2 = Q2 * i2[ Factor ];
Re = X1 + Y1;
im = X2 - Y2;
{Smooth to remove undesired cross products}
Re = .2 * Re + .8 * Re[ Factor ];
im = .2 * im + .8 * im[ Factor ];
{Compute Cycle Period}
If im <> 0 AND
Re <> 0 then
Period = Div( 360, ArcTangent( im / Re ) );
If Period > 1.5 * Period[ Factor ] then
Period = 1.5 * Period[ Factor ];
If Period < .67 * Period[ Factor ] then
Period = .67*Period[ Factor ];
If Period < 6 then
Period = 6;
If Period > 50 then
Period =50;
Period = .2 * Period + .8 * Period[ Factor ];
{end core code}
Hilbert=Period;
end;
"TypeAverageMTF "
Inputs: Factor( numericsimple ), Price( numericseries ), Length( numericsimple ), Type( numericsimple ), Optional( numericsimple );
Variables: Count( 0 ), Vector( 0 ),
b(0), b2(0), b3(0), e1(Price), e2(Price), e3(Price),
e4(Price), e5(Price), e6(Price), c1(0), c2(0), c3(0),
c4(0), f1(0), f2(0), Hot(0.7);
Vector = PriceMTF( Factor, Price );
If {Factor > 1 AND} MTF( Factor ) AND CurrentBar >= 2 * Factor * Length Then
Begin
If Type = 1 Then {SMA}
Begin
Value1 = 0;
For Count = 0 to Length - 1
Begin
Value1 = Value1 + Vector[ Count * Factor ];
End;
TypeAverageMTF = Div( Value1, Length );
End;
If Type = 2 Then {EMA}
Begin
If CurrentBar = Factor Then
TypeAverageMTF = Vector
Else
TypeAverageMTF = TypeAverageMTF[ Factor ] + Div( 2, ( Length + 1 ) ) * ( Price - TypeAverageMTF[ Factor ] );
End;
If Type = 3 Then {EMA - Orig}
Begin
If CurrentBar = Factor Then
TypeAverageMTF = Vector
Else
TypeAverageMTF = TypeAverageMTF[ Factor ] + Div( 1, Length ) * ( Price - TypeAverageMTF[ Factor ] );
End;
If Type = 4 Then {WMA}
Begin
Value1 = 0;
For Count = 0 to Length - 1
Begin
Value1 = Value1 + ( Length - Count ) * Vector[ Count * Factor ];
End;
Value2 = ( Length + 1 ) * Length * 0.5;
If Value2 > 0 Then
TypeAverageMTF = Div( Value1, Value2 );
End;
If Type = 5 Then {Triangular Average}
Begin
Value1 = Round( Div( Length, 2 ), 0 );
If MTF( Factor ) Then
Begin
Value2 = 0;
For Count = 0 to Length - 1 - Value1
Begin
Value2 = Value2 + Vector[ Count * Factor ];
End;
Value3 = Div( Value2, Length - Value1 );
Value2 = 0;
For Count = 0 to Value1 - 1
Begin
Value2 = Value2 + Value3[ Count * Factor ];
End;
TypeAverageMTF = Div( Value2, Value1 );
End
Else
TypeAverageMTF = TypeAverageMTF[1];
End;
If Type = 6 Then {Smoothed Average}
Begin
If CurrentBar = Factor Then
Begin
Value2 = 0;
For Count = 0 to Length - 1
Begin
Value2 = Value2 + Vector[ Count * Factor ];
End;
TypeAverageMTF = Div( Value2, Length );
End
Else
Begin
Value2 = 0;
For Count = 0 to Length - 1
Begin
Value2 = Value2 + Vector[ Count * Factor ];
End;
Value3 = Div( Value2, Length );
TypeAverageMTF = Div( ( Value3 * ( Length + 1 ) ) - TypeAverageMTF[ Factor ], Length );
End;
End;
If Type = 7 Then {IIR Lagless Average}
Begin
TypeAverageMTF = Div( 1, Length ) * ( 2 * Vector - Vector[ IntPortion( Div( 1, Div( 1, Length ) - 1 ) ) * Factor ] ) + ( 1 - Div( 1, Length ) ) * TypeAverageMTF[ 1 ];
End;
If Type = 8 Then {Linear Reg Line - Optional Input is TargetBar}
Begin
if Length > 1 then
Begin
Value1 = Length * ( Length - 1 ) * .5 ;
Value2 = Length * ( Length - 1 ) * ( 2 * Length - 1 ) / 6 ;
Value3 = Square( Value1 ) - Length * Value2 ;
Value4 = 0;
Value5 = 0;
for Value6 = 0 to Length - 1
begin
Value4 = Value4 + Value1 * Vector[ Value6 * Factor ] ;
Value5 = Value5 + Vector[ Value6 * Factor ];
end ;
Value7 = Div( ( Length * Value4 - Value1 * Value5), Value3 ) ;
Value8 = Div( ( Value5 - Value7 * Value1 ), Length ) ;
TypeAverageMTF = Value8 + Value7 * ( Length - 1 + - Optional ) ;
End
Else
TypeAverageMTF = 0;
End;
If Type = 9 Then {Regular MA with Optional Input as Lambda}
Begin
TypeAverageMTF =( TypeAverageMTF[Factor] * ( 1 + 2 * Optional ) + ( 2 / ( Length + 1 ) ) * ( Price - TypeAverageMTF[Factor] ) - Optional * TypeAverageMTF[2 * Factor]) / ( 1 + Optional );
End;
If Type = 10 Then {T3 Average with Optional = 1 > Series, otherwise Simple}
Begin
If Optional = 1 Then
Begin
if Length + 1 <> 0 then
begin
if CurrentBar <= 1 then
begin
b = Hot;
b2 = b * b;
b3 = b * b * b;
c1 = -b3;
c2 = 3 * b2 + 3 * b3;
c3 = -6 * b2 - 3 * b - 3 * b3;
c4 = 1 + 3 * b + b3 + 3 * b2;
f1 = 2 / (Length + 1);
f2 = 1 - f1;
end
else
begin
e1 = f1 * Vector + f2 * e1[1];
e2 = f1 * e1 + f2 * e2[1];
e3 = f1 * e2 + f2 * e3[1];
e4 = f1 * e3 + f2 * e4[1];
e5 = f1 * e4 + f2 * e5[1];
e6 = f1 * e5 + f2 * e6[1];
end;
TypeAverageMTF = c1 * e6 + c2 * e5 + c3 * e4 + c4 * e3;
end;
End
Else
Begin
if Length + 1 <> 0 then
begin
if CurrentBar <= 1 then
begin
b = Hot;
b2 = b * b;
b3 = b * b * b;
c1 = -b3;
c2 = 3 * b2 + 3 * b3;
c3 = -6 * b2 - 3 * b - 3 * b3;
c4 = 1 + 3 * b + b3 + 3 * b2;
end
else
begin
f1 = 2 / (Length + 1);
f2 = 1 - f1;
e1 = f1 * Vector + f2 * e1;
e2 = f1 * e1 + f2 * e2;
e3 = f1 * e2 + f2 * e3;
e4 = f1 * e3 + f2 * e4;
e5 = f1 * e4 + f2 * e5;
e6 = f1 * e5 + f2 * e6;
end;
TypeAverageMTF = c1 * e6 + c2 * e5 + c3 * e4 + c4 * e3;
End;
End;
End;
End
{Else If Factor = 1 Then
TypeAverageMTF = TypeAverage( Price, Length, Type, Optional )}
Else
TypeAverageMTF = TypeAverageMTF[1];
"_MACD "
inputs:
Factor( numericsimple ),
Price( numericseries ),
FastLength( numericsimple ), { this input assumed to be a constant >= 1 }
SlowLength( numericsimple ), { this input assumed to be a constant >= 1 }
Type( numericsimple );
Variables:
Series( 0 );
If MTF( Factor ) Then
Begin
Series = PriceMTF( Factor, Price );
_MACD = TypeAverageMTF( Factor, Series, FastLength, Type, 1 ) - TypeAverageMTF( Factor, Series, SlowLength, Type, 1 ) ;
End
Else
_MACD = _MACD[1];
"Schaff "
Input: Factor( numericsimple ),
Period( numericsimple ),{0 = Hilbert - For Stoch }
Fast( numeric ),{0 = Hilbert - For MACD }
Slow( numeric ) {0 = Hilbert - For MACD };
Variables: SFastK(0),
Series( 0 ),
StochLength( 0 ),
StochLength2( 0 ),
HH( 0 ),
LL( 0 ),
Num1( 0 ),
Den1( 0 ),
HH2( 0 ),
LL2( 0 ),
Num2( 0 ),
Den2( 0 ),Natura(0),Natura1(0), Natura2(0);
Natura=Natural( Hilbert( Factor, MedianPrice ));
If Fast<1 then
Natura1=Natura*.5
else
Natura1=fast;
If Slow<1 then
Natura2=Natura*2
else
Natura2=slow;
If MTF( Factor ) Then
Begin
Series = _MACD(Factor, medianprice, Natura1, Natura2 ,2 );
If Period < 1 Then
StochLength = Natural( Hilbert( Factor, Series ) ) * Factor / 2
Else
StochLength = Period * Factor;
If Series = Close OR
Series = medianprice Then
Begin
LL = Lowest( Low, StochLength ) ;
HH = Highest( High, StochLength ) ;
End
Else
Begin
LL = Lowest( Series, StochLength ) ;
HH = Highest( Series, StochLength ) ;
End;
Num1 = Series - LL ;
Den1 = HH - LL ;
SFastK = Div( Num1, Den1 ) * 100;
If Period < 1 Then
StochLength = Natural( Hilbert( Factor, SFastK ) ) * Factor / 2
Else
StochLength = Period * Factor;
LL2 = Lowest( SFastK, StochLength ) ;
HH2 = Highest( SFastK, StochLength ) ;
Num2 = SFastK - LL2 ;
Den2 = HH2 - LL2 ;
Schaff = Div( Num2, Den2 ) * 100 ;
End
Else
Schaff = Schaff[1]
여기까지는 함수 파일이구요
이제는 인디케이터입니다.. 파일은 하나구요.
"Schaff Indicator"
Inputs: Factor( 1 ),
Period( 0 ),
Fast( 5 ),
Slow( 34 ),
Type( 7 ),
Length( 3 ), OverSold( 20 ),
OverBought( 80 ),
OverSColor( Cyan ),
OverBColor( Red ) ;
If MTF( Factor ) Then
Begin
If Length < 1 Then
Value1 = Natural( Hilbert( Factor, Value2 ) * Factor )
Else
Value1 = Length;
Value2 = TypeAverageMTF( Factor, Schaff( Factor, Period, Fast, Slow ), Value1, Type, 0 );
Plot1( Value2, "DS" );
Plot2( OverSold, "OverSld" ) ;
Plot3( OverBought, "OverBot" ) ;
if Plot1 > OverBought then
SetPlotColor( 1, OverBColor )
else if Plot1 < OverSold then
SetPlotColor( 1, OverSColor ) ;
End;
메일로 답변 부탁드리겠습니다.
너무 수식이 길어서.. 짜증도 나실거란 생각이 드네요.. 정말 죄송합니다 ^^;
mp4dark@naver.com
2008-07-14
1269
글번호 16182
답변완료
if BarsSinceEntry(0)==2
if BarsSinceEntry(0)==4 이와 같이 가정하면
제1진입 후 제2진입 제3진입 이렇게 있고 셋다 청산이 안되었다고 할때
최종진입기준으로 판단되어 진입한후 4봉경과가 되나요? 아니면 제1진입을 기준으로 하여 4봉경과가 되나요?
도움말에 파라미딩인 경우에는 설명이 안되서요.
2008-07-14
841
글번호 16172
답변완료
수식문의 드립니다.
첨부챠트의 보조지표를 기준으로 매수신호를 만들고자 합니다.
보조지표가 전봉이 전전봉보다 크거나 같고 현재봉이 전봉보다 작게 될때
전봉(1,2,3,4,5와 같은 봉)을 기억했다가
그 봉의 보조지표를 상향돌파(A,B,C,D,E와 같은 봉)하면 매수하는 식을 부탁 드립니다..
청산및 손절은 매수한 지표값을 하향돌파할때 입니다.
감사합니다^^
2008-07-13
773
글번호 16171
답변완료
시스템 변수 최적화에서 질문..
빠른 최적화 << 이런게 있던데 뭐하는건가요?
기본 4회던데.. 무엇을 4회 한다는말인가요?..
2008-07-12
786
글번호 16170
답변완료
메일로문의드렸습니다.
보낸메일주소는 e52000@show.co.kr입니다.
확인해보시고 메일로 답변 부탁드리겠습니다.
매번 부탁만 드리는거같아서 많이 죄송합니다.
2008-07-12
919
글번호 16169
답변완료
제한된 봉 거래
매수 후에 최고 5봉 까지만 갖고 있으려고 하는 식을 알려주세요.
감사합니다.
2008-07-11
807
글번호 16168
답변완료
한번더 질문
수고하십니다
알려주신데로 해봤는데 제가 잘몰라서 안되네요
Input : Period1(5), Period2(10), Period3(20), Period4(60), Period5(120);
var : Sma1(0),Sma2(0),Sma3(0),Sma4(0),Sma5(0);
Sma1 = ma(C,Period1);
Sma2 = ma(C,Period2);
Sma3 = ma(C,Period3);
Sma4 = ma(C,Period4);
Sma5 = ma(C,Period5);
Plot1(Sma1, "이동평균1");
Plot2(Sma2, "이동평균2");
Plot3(Sma3, "이동평균3");
Plot4(Sma4, "이동평균4");
Plot5(Sma5, "이동평균5");
If max(value1,value2,value3)<min(value1,value2,value3)*(1+Percent/100) &&
C > value4[1] && C[1] <= value4[2] Then
value5 =(C-C[1])/C[1]*100;
Else
value5 = 0;
Find(value5);
2008-07-14
733
글번호 16167