커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
7447
글번호 230811
답변완료
부탁드립니다.
늘 만족한 답변에 감사드립니다.
수식 상단부분의
smoothHP = (HP + 2*HP[1] + 3*HP[2] + 3*HP[3] + 2*HP[4] + HP[5]) / 12;
을
SmoothHP = (HP + 2*HP[1] + 3*HP[2] + 4*HP[3] + 5*HP[4] + 6*HP[5] + 7*HP[6] +8* HP[7] + 8*HP[8] + 7*HP[9] + 6*HP[10] + 5*HP[11] + 4*HP[12] + 3*HP[13] + 2*HP[14]+ HP[15] ) / 72;
로 변경하면
그외 다른 부분을 어떻게 변경하는것이 타당한지요?
(적용:해선)
미리감사 드립니다.
/* Corona Chart Trend Vigor
written by John F. Ehlers copyright(c) 2008
Once the dominant cycle period is known, the instantaneous trend
is just the momentum across the full cycle period. This measurement
is invariant with the position within the cycle. The trend slope
is the same whether measured from cycle peak to cycle peak or cycle
valley to cycle valley. The trend slope is normalized to the amplitude
of the dominant cycle. A value of +2 means the trend slope is twice the
dominant cycle amplitude, and therefore cautions you not to trade against
the upslope. Similarly, a value of -2 means the trend slope is down and
therefore cautions you not to buy against the downslope.
*/
Vars:Price(0),delta(0.1),gamma(0),alpha(0),beta(0),N(0),Period(0),MaxAmpl(0),Num(0),Denom(0),DC(0),DomCyc(0),Color1(0),Color2(0),Color3(0),alpha1(0),HP(0),SmoothHP(0),delta1(.1),gamma1(0),alpha2(0),beta1(0),IP(0),Q1(0),Ampl2(0),Trend(0),Ratio(0),TV(0),Width(0),tv20(0);;
Arrays:II[60](0),OldI[60](0),OlderI[60](0),Q[60](0),OldQ[60](0),OlderQ[60](0),Real[60](0),OldReal[60](0),OlderReal[60](0),Imag[60](0),OldImag[60](0),OlderImag[60](0),Ampl[60](0),OldAmpl[60](0),DB[60](0),OldDB[60](0),Raster[50](0),OldRaster[50](0);
if CurrentBar > 1 then {
price = (H+L)/2;
alpha1 = (1 - Sine (360 / 30)) / Cosine(360 / 30);
HP = .5*(1 + alpha1)*(Price - Price[1]) + alpha1*HP[1];
//SmoothHP = (HP + 2*HP[1] + 3*HP[2] + 3*HP[3] + 2*HP[4] + HP[5]) / 12;
//변경한 부분
//변경한 부분
//변경한 부분
SmoothHP = (HP + 2*HP[1] + 3*HP[2] + 4*HP[3] + 5*HP[4] + 6*HP[5] + 7*HP[6] +8* HP[7] + 8*HP[8] + 7*HP[9] + 6*HP[10] + 5*HP[11] + 4*HP[12] + 3*HP[13] + 2*HP[14]+ HP[15] ) / 72;
IF CurrentBar < 7 Then SmoothHP = Price - Price[1];
IF CurrentBar == 1 THEN SmoothHP = 0;
}
delta = -.015*CurrentBar + .5;
If delta < .1 then delta = .1;
If CurrentBar > 12 Then Begin
For N = 12 to 60 Begin
beta = Cosine(720 / N);
gamma = 1 / Cosine(1440*delta / N);
alpha = gamma - SquareRoot(gamma*gamma - 1);
Q[N] = (.5*N / 6.28318)*(SmoothHP - SmoothHP[1]);
II[N] = SmoothHP;
Real[N] = .5*(1 - alpha)*(II[N] - OlderI[N]) + beta*(1 + alpha)*OldReal[N] - alpha*OlderReal[N];
Imag[N] = .5*(1 - alpha)*(Q[N] - OlderQ[N]) + beta*(1 + alpha)*OldImag[N] - alpha*OlderImag[N];
Ampl[N] = (Real[N]*Real[N] + Imag[N]*Imag[N]);
End;
End;
For N = 12 to 60 Begin
OlderI[N] = OldI[N];
OldI[N] = II[N];
OlderQ[N] = OldQ[N];
OldQ[N] = Q[N];
OlderReal[N] = OldReal[N];
OldReal[N] = Real[N];
OlderImag[N] = OldImag[N];
OldImag[N] = Imag[N];
OldAmpl[N] = Ampl[N];
OldDB[N] = DB[N];
End;
For N = 1 to 50 Begin
OldRaster[N] = Raster[N];
End;
MaxAmpl = Ampl[12];
For N = 12 to 60 Begin
If Ampl[N] > MaxAmpl then MaxAmpl = Ampl[N];
End;
For N = 12 to 60 Begin
If MaxAmpl <> 0 AND (Ampl[N] / MaxAmpl) > 0 Then DB[N] = -10*Log(.01 / (1 - .99*Ampl[N] / MaxAmpl)) / Log(10);
DB[N] = .33*DB[N] + .67*OldDB[N];
If DB[N] > 20 then DB[N] = 20;
End;
Num = 0;
Denom = 0;
For N = 12 to 60 Begin
If DB[N] <= 6 Then Begin
Num = Num + N*(20 - DB[N]);
Denom = Denom + (20 - DB[N]);
End;
If Denom <> 0 Then DC = .5*Num / Denom;
End;
DomCyc = Median(DC, 5);
If DomCyc < 6 Then DomCyc = 6;
if Currentbar > 1 then {
//Filter Bandpass component
beta1 = Cosine(360 / DomCyc);
gamma1 = 1 / Cosine(720*delta1 / DomCyc);
alpha2 = gamma1 - SquareRoot(gamma1*gamma1 - 1);
IP = .5*(1 - alpha2)*(Price - Price[2]) + beta1*(1 + alpha2)*IP[1] - alpha2*IP[2];
//Quadrature component is derivative of InPhase component divided by omega
Q1 = (Domcyc / 6.28318)*(IP - IP[1]);
//Pythagorean theorem to establish cycle amplitude
Ampl2 = SquareRoot(IP*IP + Q1*Q1);
//Trend amplitude taken over the cycle period
Trend = Price - Price[DomCyc - 1];
If Trend <> 0 and Ampl2 <> 0 Then Ratio = .33*Trend / Ampl2 + .67*Ratio[1];
If Ratio > 10 then Ratio = 10;
If Ratio < -10 then Ratio = -10;
TV = .05*(Ratio + 10);
}
If TV < .3 or TV > .7 Then Width = .01;
If TV >= .3 and TV < .5 Then Width = TV - .3;
If TV > .5 and TV <= .7 Then Width = -TV + .7;
For N = 1 to 50 Begin
Raster[N] = 20;
If N < Round(50*TV,0) Then Raster[N] = .8*(Power((20*TV - .4*N)/ Width, .85) + .2*OldRaster[N]);
If N > Round(50*TV,0) Then Raster[N] = .8*(Power((-20*TV + .4*N)/ Width, .85) + .2*OldRaster[N]) ;
If N == Round(50*TV,0) Then Raster[N] = 0 + .5*OldRaster[N];
If Raster[N] < 0 Then Raster[N] = 0;
If Raster[N] > 20 Or TV < .3 Or TV > .7 Then Raster[N] = 20;
End;
tv20=20*TV-10;
Plot51(TV20, "vigor");
PlotBaseLine1(10,"10");
PlotBaseLine2(-10,"-10");
2015-09-23
489
글번호 90623
답변완료
지표부탁드립니다.
당일 시가선을 기준으로 시가위는 붉은색, 시가아래는 푸른계열로 차트에 자동으로 표시하고 싶습니다.
우리선물때부터 사용중인데 기존지표는 유용하게 사용하고 있습니다.
하지만 제가 직접 만들어 사용하기는 역부족입니다.
바쁘시겠지만 부탁드립니다.
감사합니다.
저는 해외선물을 합니다.
2015-09-23
169
글번호 90622
답변완료
지표식 부탁드립니다.
안녕하세요
분봉에서 주종목 1개 추가종목 5개를 열어 놓고
시가 기준으로 추가종목중 주종목과 가장 가까운
데이타를 찾아서 주종목과 추가종목을 합한 가격을
지표로 그리고 싶습니다.
시가 기준으로 매일 변하게 만들어 주세요
감사합니다. 수고하세요
2015-09-23
143
글번호 90621
답변완료
고저라인 가로추세선
안녕하세요?
아래의 함수를 요청드립니다.
1. 당봉 제외 이전 10개봉의 고점과 저점을 자동으로 가로 추세선으로 그리고 싶습니다.
2. 당봉 포함 이전 10개봉의 고점과 저점을 자동으로 가로 추세선으로 그리고 싶습니다.
2015-09-23
255
글번호 90620
통큰베팅 님에 의해서 삭제되었습니다.
2015-09-23
0
글번호 90619
답변완료
수식요청드립니다.
수식요청드립니다.
오버형 시스템 수식에서 전신호 전일종가 기준 갭이 발생하는 경우
전 신호가 매수이고 +1.0PT 이상 갭 상승 발생시 기존 시스템 매수신호 유지
전 신호가 매수이고 -1.2PT 이상 갭 하락 발생시 시초가 매도전환 -> 매도전환 후 당일 손절청산 0.5PT(당일 1회만 손절청산 적용,외부변수)
전 신호가 매도이고 -1.0PT 이상 갭 하락 발생시 기존 시스템 매도신호 유지
전 신호가 매도이고 +1.2PT 이상 갭 상승 발생시 시초가 매수전환 -> 매수전환 후 당일 손절청산 0.5PT(당일 1회만 손절청산 적용,외부변수)
감사합니다.
2015-09-23
146
글번호 90618
답변완료
수식 부탁드립니다.
시스템 시그널 발생후 10틱 아래에 매수하는 수식 좀 부탁드립니다.
가령 거래량이 전 봉 대비 3배 터졌을때 그 종가에서 매수하는 수식은 다음과 같은데
if v> v[1]*3 then buy();
거래량이 전 봉 대비 3배 터졌을때 그 종가에서 10틱 눌렸을때 매수 수식은 어떻게 되는
지요?
답변 주시면 감사하겠습니다.
2015-09-22
150
글번호 90617
멋진승부 님에 의해서 삭제되었습니다.
2015-09-22
0
글번호 90616
답변완료
도움필요합니다
해외선물 3분봉차트에서 전캔들종가가 현재캔들시가가 1틱이상~갬상승하거나 갬하락했을때 점으로 표시할수있는 지표 아님 수식 부탁합니다
2015-09-22
152
글번호 90612