커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
4812
글번호 230811
답변완료
수식 수정 부탁드립니다.
수고 많으십니다.
첨부 수식은 파동선과 추세선 수식입니다.
이 수식에 추가하여 새로운 파동선이 그려지면 전저점에 파란색 굵기3의 수평선을, 전고점에는 붉은색굵기3의 수평선을 그어 주시기 부탁드립니다.
감사합니다.
====================================================================
#==========================================#
# 지 표 명 : 파동선 및 추세선
# 작 성 자 : 수식지왕
# 블 로 그 : http://yahoosir.blog.me
#==========================================#
Input:atrLength(14),multi(1);
Var:j(0),dayATR(0),sum(0),upTr(100),dnTr(-100),trnd(0),
date11(0),date12(0),time11(0),time12(0),TL1(0),
date21(0),date22(0),time21(0),time22(0),TL2(0),
date31(0),date32(0),time31(0),time32(0),TL3(0);
Array:hiVal[10](0),loVal[10](0),hiBar[10](0),loBar[10](0);
//hiVal[1]은 전고점, hiVal[2]는 전전고점, hiVal[3]은 전전전고점
//hiVal[0]은 변곡점 이후 현재봉까지의 고점. 현재 고점은 진행중이므로 계속 바뀐다.
//loVal[0]은 반대 개념
sum = 0;
for j = 1 to atrLength {
sum = sum + Max(C[j+1],H[j]) - Min(C[j+1],L[j]);
}
dayATR = sum/atrLength; //일봉기준으로 ATR 산출
for j = 1 to 9 { //전고,전저점을 9개까지 보관
loBar[j] = loBar[j] + 1; //전저점의 위치. 현재 봉으로부터 떨어져 있는 거리
hiBar[j] = hiBar[j] + 1; //전고점의 위치
}
if hiVal[0] <= H or hiVal[0] == 0 then { //전고,전저점 이후 현재까지의 고점
hiVal[0] = H; //0을 체크한 이유는 초기에 값이 없는 구간이 생기기 때문
hiBar[0] = 0; //현재 고점의 위치가 0이란 것은 현재봉의 고가가 구간 고점이라는 의미
}
else {
hiBar[0] = hiBar[0] + 1; //현재 고점의 위치
}
if loVal[0] >= L or loVal[0] == 0 then { //전고,전저점 이후 현재까지 저점
loVal[0] = L;
loBar[0] = 0;
}
else {
loBar[0] = loBar[0] + 1; //현재 구간 저점의 위치
}
if trnd != dnTr && hiVal[0] > H && hiVal[0] - (dayATR * multi) > L then trnd = dnTr;
//저가가 고가 대비 변동률보다 밑으로 떨어지면 하락추세로 설정
//단, 현재봉의 고가가 변곡점 이후 최고가이면 상승 추세가 진행중이라고 본다.
//그래서 현재봉의 고가가 hiVal[0]보다 작다는 조건이 추가되었다.
else if trnd != upTr && loVal[0] < L && loVal[0] + (dayATR * multi) < H then trnd = upTr;
//고가가 저가 대비 변동률보다 높으면 상승추세로 설정
if trnd[1] == upTr and trnd == dnTr then { //상승추세였다가 하락추세로 바뀌었다면
for j = 8 downto 1 { //새로운 전고점이 생기는 것이므로
hiVal[j+1] = hiVal[j]; //전고점을 하나씩 뒤로 보낸다.
hiBar[j+1] = hiBar[j]; //전고점은 전전고점이 되고, 전전고점은 전전전고점이 된다.
}
hiVal[1] = hiVal[0]; //새로운 전고점에 현재 고점을 대입
hiBar[1] = hiBar[0];
hiVal[0] = H; //전고점이 확정되었으므로 전고점 이후 최고가는 현재봉의 고가
hiBar[0] = 0;
loVal[0] = L;
loBar[0] = 0;
//전고점이 새로 생긴 것이니까 전저점에서 전고점까지 추세선을 긋는다.
date11 = date[loBar[1]]; //추세선 시작일. 전저점의 날짜
time11 = stime[loBar[1]]; //추세선 시작시간
Value11 = loVal[1]; //추세선 시작가격
date12 = date[hiBar[1]]; //추세선 종료일. 전고점의 날짜
time12 = stime[hiBar[1]]; //추세선 종료시간
Value12 = hiVal[1]; //추세선 종료가격
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
//TL_New는 신규 추세선을 그려주는 함수
}
if trnd[1] == dnTr and trnd == dnTr and //추세는 하락 상태에서 바뀌지 않았는데
hiVal[1] < hiVal[0] then { //전고점보다 더 높은 고점이 출현했다면
if loVal[1] <= loVal[0] then { //전저점은 갱신되지 않았다면
hiVal[1] = hiVal[0]; //전고점을 현재의 고점으로 바꿔준다.
hiBar[1] = hiBar[0];
hiVal[0] = H;
hiBar[0] = 0;
loVal[0] = L;
loBar[0] = 0;
//전고점이 추가된 게 아니고 바뀐 것이므로 종료일,종료시간,종료가격만 바꿔준다.
date12 = date[hiBar[1]]; //추세선 종료일
time12 = stime[hiBar[1]];
Value12 = hiVal[1];
TL_SetEnd(TL1, date12,time12,Value12);
//TL_SetEnd는 기존추세선의 종료지점을 변경해주는 추세선 함수이다.
//TL_Delete 함수를 써서 직전의 추세선을 지우고 다시 TL_New로 추세선을 추가해도 된다.
}
else { //전저점도 갱신되었다면
for j = 8 downto 1 { //전고점, 전저점을 새로이 추기
hiVal[j+1] = hiVal[j]; //전고점을 하나씩 뒤로 보낸다.
hiBar[j+1] = hiBar[j]; //전고점은 전전고점이 되고, 전전고점은 전전전고점이 된다.
loVal[j+1] = loVal[j]; //전저점을 하나씩 뒤로 보낸다.
loBar[j+1] = loBar[j]; //전저점은 전전저점이 되고, 전전저점은 전전전저점이 된다.
}
hiVal[1] = hiVal[0]; //새로운 전고점에 현재 고점을 대입
hiBar[1] = hiBar[0];
loVal[1] = loVal[0]; //새로운 전저점에 현재 저점을 대입
loBar[1] = loBar[0];
hiVal[0] = H; //전고점 이후 최고가는 현재봉의 고가
hiBar[0] = 0;
loVal[0] = L;
loBar[0] = 0;
//전저,전고점이 새로 생긴 것이니까 전전고점에서 전저점까지
//그리고 전저점에서 전고점까지 추세선 2개를 생성한다.
date11 = date[hiBar[2]]; //추세선 시작일. 전전고점의 날짜
time11 = stime[hiBar[2]]; //추세선 시작시간
Value11 = hiVal[2]; //추세선 시작가격
date12 = date[loBar[1]]; //추세선 종료일. 전저점의 날짜
time12 = stime[loBar[1]]; //추세선 종료시간
Value12 = loVal[1]; //추세선 종료가격
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
TL_SetSize(TL1,2);
date11 = date[loBar[1]]; //추세선 시작일. 전저점의 날짜
time11 = stime[loBar[1]]; //추세선 시작시간
Value11 = loVal[1]; //추세선 시작가격
date12 = date[hiBar[1]]; //추세선 종료일. 전고점의 날짜
time12 = stime[hiBar[1]]; //추세선 종료시간
Value12 = hiVal[1]; //추세선 종료가격
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
}
}
if trnd[1] == dnTr and trnd == upTr then { //추세가 하락에서 상승으로 바뀌었을 경우
for j = 8 downto 1 {
//이전저점은 전전저점으로, 전전저점은 전전전저점으로 번호를 부여
loVal[j+1] = loVal[j];
loBar[j+1] = loBar[j];
}
loVal[1] = loVal[0];
loBar[1] = loBar[0];
loVal[0] = L;
loBar[0] = 0;
hiVal[0] = H;
hiBar[0] = 0;
date11 = date[hiBar[1]]; //전저점이 새로이 생긴 것이므로 시작점은 전고점이 된다.
time11 = stime[hiBar[1]];
Value11 = hiVal[1];
date12 = date[loBar[1]];
time12 = stime[loBar[1]];
Value12 = loVal[1];
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
}
if trnd[1] == upTr and trnd == upTr and //추세는 상승을 유지하고 있는데
loVal[1] > loVal[0] then { //전저점보다 낮은 저가가 출현했다면
if hiVal[1] >= hiVal[0] then { //고점 갱신이 되지 않았다면
loVal[1] = loVal[0]; //직전의 전저점만 바꿔준다.
loBar[1] = loBar[0];
loVal[0] = L;
loBar[0] = 0;
hiVal[0] = H;
hiBar[0] = 0;
date12 = date[loBar[1]];
time12 = stime[loBar[1]];
Value12 = loVal[1];
TL_SetEnd(TL1, date12,time12,Value12);
}
else { //고점도 이전고점보다 높다면
for j = 8 downto 1 { //전고점,전저점을 새로이 생성
hiVal[j+1] = hiVal[j];
hiBar[j+1] = hiBar[j];
loVal[j+1] = loVal[j];
loBar[j+1] = loBar[j];
}
hiVal[1] = hiVal[0];
hiBar[1] = hiBar[0];
loVal[1] = loVal[0];
loBar[1] = loBar[0];
loVal[0] = L;
loBar[0] = 0;
hiVal[0] = H;
hiBar[0] = 0;
date11 = date[loBar[2]]; //시작점이 전전저점
time11 = stime[loBar[2]];
Value11 = loVal[2];
date12 = date[hiBar[1]]; //종료는 전고점
time12 = stime[hiBar[1]];
Value12 = hiVal[1];
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
TL_SetSize(TL1,2);
date11 = date[hiBar[1]]; //2번째 시작은 전고점이 된다.
time11 = stime[hiBar[1]];
Value11 = hiVal[1];
date12 = date[loBar[1]]; //2번째 종료는 전저점
time12 = stime[loBar[1]];
Value12 = loVal[1];
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
}
}
if loVal[2] < loVal[1] then {
if loBar[2][1] + 1 != loBar[2][0] then {
date21 = date[loBar[2]];
time21 = stime[loBar[2]];
Value21 = loVal[2];
date22 = date[0]; //추세선이므로 현재 봉까지 그려준다.
time22 = stime[0];
Value22 = (loVal[1]-loVal[2])/(loBar[2]-loBar[1])*loBar[2]+LoVal[2];
//종료시점의 가격은 직선의 기울기와 절편을 계산해서 구한다.
TL2 = TL_New(date21,time21,Value21,date22,time22,Value22);
}
else {
//전전저점이 바뀌지 않았다면 종료시점만 변경하면 된다.
date22 = date[0];
time22 = stime[0];
Value22 = (loVal[1]-loVal[2])/(loBar[2]-loBar[1])*loBar[2]+LoVal[2];
TL_SetEnd(TL2, date22,time22,Value22);
//TL_SetExtRight 함수는 추세선을 오른쪽으로 연장하는 함수인데
//이 함수를 사용하면 모든 추세선이 현재봉까지 연장되어 알아볼 수가 없다.
}
}
if hiVal[2] > hiVal[1] then {
if hiBar[2][1] + 1 != hiBar[2][0] then {
date31 = date[hiBar[2]];
time31 = stime[hiBar[2]];
Value31 = hiVal[2];
date32 = date[0];
time32 = stime[0];
Value32 = (hiVal[1]-hiVal[2])/(hiBar[2]-hiBar[1])*hiBar[2]+hiVal[2];
TL3 = TL_New(date31,time31,Value31,date32,time32,Value32);
}
else {
date32 = date[0];
time32 = stime[0];
Value32 = (hiVal[1]-hiVal[2])/(hiBar[2]-hiBar[1])*hiBar[2]+hiVal[2];
TL_SetEnd(TL3, date32,time32,Value32);
}
}
if trnd == upTr and loVal[2] > loVal[1] then
TL_SetColor(TL1,BLUE);
else if trnd == dnTr and hiVal[2] < hiVal[1] then
TL_SetColor(TL1,RED);
else
TL_SetColor(TL1,BLACK);
TL_SetSize(TL1,2);
TL_SetColor(TL2,RED);
TL_SetColor(TL3,BLUE);
if c >= hiVal[1] then
PlotBaseLine1(0, "전고저기준선",red);
if c <= loVal[1] then
PlotBaseLine1(0, "전고저기준선",blue);
if c < hiVal[1] and c > loVal[1] then
PlotBaseLine1(0, "전고저기준선",rgb(161,161,161));
2015-06-29
177
글번호 87789
답변완료
함수관련 ,진입필터관련,
안녕하세요 ..
당일첫진입이 손실로 끝나면 두버째 진입이 가동하고
당일첫진입이 수익으로끝나면 하루 1회만 진입하는
두번째진입 에대한 제어식 부탁합니다
HighB,LowS,RangeD(1), 세개함수에대한설명과계산식부탁합니다
변수선언하고 할당해서 사용할려면어떻게해야하나요
예스랭귀지 에서 찾아밧는데 없네요
condition1 = EntryDate(1) <> Date and marketposition()==0 ;
Condition2 = EntryDate(2) <> Date and EntryDate(1) == Date and marketposition()==0
주석부탁하고 복합장 0900-0230 에 적용할려면 어떻게 변경해야하나요 ?
감사합니다
2015-06-29
123
글번호 87788
답변완료
시스템식
안녕하세요
선물 5% 급락시 당일진입금지 급락 날3시에 모든포지션청산 부탁드립니다.
2015-06-29
123
글번호 87787
답변완료
부탁드립니다.
아래 수식에서 매매시간을 오후 7 ~ 새벽2시 까지만 매매하고 종료하되 진입된 계약이 있으면 신호가 끝날때 매매종료가 되도록 부탁드립니다.
input : ,익절틱수(10);
Input : af(0.02), maxAF(0.2);
Input : SonarP(9), SonarS(9);
input : g(13),r(25),s(2);
Input : TrixP(12),TrixS(9);
var : SonarV(0),SonarSig(0);
var : SMIv(0),T(0);
var : TRIXv(0),TRIXsig(0),entry(0);
var1 = SAR(af,maxAF);
SonarV = SONAR(SonarP);
SonarSig = ema(SonarV,SonarS);
SMIv = ema(ema(c-(highest(H,g) + lowest(L,g))*0.5, r),s) * 100 /
(0.5 * ema(ema(highest(H,g)-lowest(L,g),r),s)) ;
TRIXv = TRIX(TrixP);
TRIXsig = ema(TRIXv,TrixS);
if SMIv > SMIv[1] Then
T = 1;
if SMIv < SMIv[1] Then
T = -1;
if bdate != bdate[1] Then
entry = 0;
if MarketPosition != 0 and MarketPosition != MarketPosition[1] Then
entry = entry+1;
Condition1 = MarketPosition(1) == 1 and IsExitName("StopProfittarget",1) == true;
Condition2 = MarketPosition(1) == -1 and IsExitName("StopProfittarget",1) == true;
If C > var1 and SonarSig > SonarSig[1] and TRIXsig > TRIXsig[1] and T == 1 Then
{
if entry == 0 or
(entry >= 1 and MarketPosition == -1) or
(entry >= 1 and MarketPosition == 0 and Condition1 == false) or
(entry >= 1 and MarketPosition == 0 and Condition1 == true and
countif(C < var1 or SonarSig < SonarSig[1] or TRIXsig < TRIXsig[1] or T == -1,BarsSinceExit(1)) >= 1) Then
Buy();
}
# 매도/매수청산
If C < var1 and SonarSig < SonarSig[1] and TRIXsig < TRIXsig[1] and T == -1 Then
{
MessageLog("%s %s %.f",Condition1,Condition2,entry);
if entry == 0 or
(entry >= 1 and MarketPosition == 1) or
(entry >= 1 and MarketPosition == 0 and Condition2 == false) or
(entry >= 1 and MarketPosition == 0 and Condition2 == true and
countif(C > var1 or SonarSig > SonarSig[1] or TRIXsig > TRIXsig[1] or T == 1,BarsSinceExit(1)) >= 1) Then {
Sell();
}
}
if MarketPosition == 1 and C < var1 and TRIXsig < TRIXsig[1] and T == -1 Then{
ExitLong();
}
if MarketPosition == -1 and C > var1 and TRIXsig > TRIXsig[1] and T == 1 Then{
ExitShort();
}
SetStopProfittarget(PriceScale*익절틱수, PointStop);
2015-06-29
129
글번호 87783
답변완료
부탁드립니다.
아래 수식에서 색상이 변하고 3개봉은 건너뛰고 다음 진입구간에 신호나오면 진입하도록 부탁드립니다.
var1 = ma(c,9);
var2 = ma(C,18);
if MarketPosition == 0 and
var2[1]>var2[0] and
OPEN[0]>var1 and
OPEN[0]>CLOSE[0] Then
SELL();
if MarketPosition == 0 and
var2[1]<var2[0] and
OPEN[0]<var1 and
OPEN[0]<CLOSE[0] Then
BUY();
SetStopProfittarget(PriceScale*30,PointStop);
SetStopLoss(PriceScale*15,PointStop);
2015-06-29
114
글번호 87780
답변완료
부탁드립니다.
시간을 잘못 말씀드렸네요 다시한번 부탁드립니다.
아래 수식에서 매매시간을 오후 7 ~ 새벽2시 까지만 매매하고 종료하되 진입된 계약이 있으면 신호가 끝날때 매매종료가 되도록 부탁드립니다.
input : Length1(26),Length2(50),Length3(2),P(5);
var : SMIv(0),mav(0),T(0);
mav = ma(c,P);
SMIv = SMI(Length1,Length2,Length3);
if SMIv > SMIv[1] Then
T = 1;
if SMIv < SMIv[1] Then
T = -1;
if T == 1 and mav > mav[1] and countif(SMIv > SMIv[1],3) >=1 Then
buy();
if T == -1 and mav < mav[1] and countif(SMIv < SMIv[1],3) >=1 Then
sell();
2015-06-29
111
글번호 87779
답변완료
문의드립니다
안녕하세요
42709 지표식관련하여 문의드립니다.
파라볼릭지표의 매수신호일때 사서 매도신호일때 청산,매도신호일때 사서 매수신호에
청산 여기서 누적값이 좀 이상합니다.
매수손익 plot와 매도손익 plot 를 지표화 하고자 합니다
감사합니다
2015-06-29
128
글번호 87778
turn 님에 의해서 삭제되었습니다.
2015-06-29
2
글번호 87777
답변완료
부탁드립니다
수고하십니다
1.이평선파랑색10일선과빨강색40일선 데드크로스일때,첨부파일에타원형안에있는것처럼교차 점에서수평선
2.빨강색40일선과군청색60일선이그림처럼데드크로스일때,교차점에서의 수평선
3.1번과2번 반대되는 골든크로스일대도 필요합니다
2015-06-29
189
글번호 87772