커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
7244
글번호 230811
답변완료
문의드립니다.
아래식에서 *** 부분을 추가하고 싶습니다. 부탁드립니다.
일부 작성을 해 보았습니다. ***에 맞게 수식 수정하시어 아래식에 추가 부탁 드립니다.
감사합니다.
*** 수식추가 요청사항
crossup(mav2,mav3) 매수되면 crossdown(mav2,mav3) 전에 아래 1,2번을 한번만 실행하고 싶습니다.
1번) 기준(10틱) 이상 이익이면, 하락(50틱)만큼 하락하면 매수 포지션 청산
2번) 청산 후 다시 mav2(10일선)이 상승하면 매수 재 진입
만약, 1번)에 의한 청산후 crossdown(mav2,mav3) 되면 2번) 실행 없이 매도 진입 하여
1번),2번)을 한번만 실행
매도, 반대
***작성해본 수식
# 1. 기준(10틱) 이상 수익이면 하락(50틱)하면 매수 청산 (10틱수익/-40틱청산, 70틱수익/20틱청산)
if MarketPosition == 1 Then{
BH = highest(H,BarsSinceEntry);
if BH >= EntryPrice+PriceScale*기준 Then{
ExitLong("B익절1",AtStop,BH-PriceScale*하락);
}
# 2. 다시 10일선이 상승하면 재 진입
if mav2 > mav2[1] Then buy("Buy2");
# 1. 기준(10틱) 이상 수익이면 하락(50틱)하면 매수 청산 (10틱수익/-40틱청산, 70틱수익/20틱청산)
if MarketPosition == -1 Then{
SL = Lowest(L,BarsSinceEntry);
if SL <= EntryPrice-PriceScale*기준 Then{
ExitShort("S익절1",AtStop,SL+PriceScale*하락);
}
# 2. 다시 10일선이 하락하면 재 진입
if mav2 < mav2[1] Then sell("Sell2");
아래식
--------------------------------------------------------------
input : P1(3),P2(10),P3(280),기준(10), 하락(50), 손절(150);
var : mav2(0),mav3(0);
var : BH(0),SL(0);
mav2 = ma(c,P2);
mav3 = ma(c,P3);
#ATR
Input : ATR추적(20), ATR손절(20); #ATR 청산
Var : PosHigh(0), PosLow(0); #ATR 청산
//진입
if crossup(mav2,mav3) Then buy("Buy");
if CrossDown(mav2,mav3) Then sell("Sell");
# ATR 추적 청산
PosHigh = Highest(H, BarsSinceEntry+1);
PosLow = Lowest(L,BarsSinceEntry+1);
If MarketPosition <> 0 Then {
ExitLong("EL_추적ATR", AtStop,PosHigh-ATR(20)*ATR추적);
Exitshort("ES_추적ATR", AtStop,PosLow+ATR(20)*ATR추적);
}
# ATR 손절 청산
If MarketPosition <> 0 Then {
ExitLong("EL_손절ATR", AtStop,EntryPrice-ATR(20)*ATR손절);
Exitshort("ES_손절ATR", AtStop,EntryPrice+ATR(20)*ATR손절);
}
# 최대손절 청산
if MarketPosition == 1 Then{
BH = highest(H,BarsSinceEntry);
ExitLong("B손절",AtStop,EntryPrice-PriceScale*손절);
}
if MarketPosition == -1 Then{
SL = Lowest(L,BarsSinceEntry);
ExitShort("S손절",AtStop,EntryPrice+PriceScale*손절);
}
2018-05-17
174
글번호 118968
답변완료
시스템 수식 문의드립니다....
수고가 많으시죠
시스템식 문의 드립니다...
bollinger bands (40 , 2) 이평선 5일 20일
문의 내용은 다음과 같읍니다...
1 볼린저밴드 상단보다 고가가 큰 봉이 20봉 이내에 있고
5일 20일 데드크로스에 매도
2 볼린저밴드 하단보다 저가가 적은 봉이 20봉 이내에 있고
5일 20일 골든크로스에 매수
이상입니다...수고하세요
2018-05-16
167
글번호 118967
답변완료
수식 작성 부탁드립니다.
예스트레이더에 월, 일, 분, 틱 단위는 있는데,
연 단위는 없더라구요. 그래서 지표로 만들고 싶은데,
연 시가, 고가, 저가 라인 작성 부탁 좀 드리겠습니다.
2018-05-16
179
글번호 118966
요타 님에 의해서 삭제되었습니다.
2018-05-16
0
글번호 118965
답변완료
부탁드립니다
월봉시가 돌파종목을 검색하고 싶습니다
감사합니다
2018-05-16
171
글번호 118964
답변완료
수식첨가부탁드립니다
#,아래수식에서 파동의 1/2일선을 우측 그리기수식을 추가 삽입하려고, var;TL2 추가하고
TL2 = TL_new(HD[1],HT[1],(HH[1]+LL)/2,sdate,stime,(HH[1]+LL)/2); 수식을 추가하니까
배열요소값이 와야한다는 오류가 뜨내요.. 도움부탁드립니다.
#,제가 원하는식은 현재 수식 조건에다가 파동의 중심값을 추가로 오른쪽 그리기로 하는
식입니다.
Input : af(0.02), maxAF(0.2),n(5);
var : T(0),TL1(0),cnt(0);
Array : HH[10](0),HD[10](0),HT[10](0);
Array : LL[10](0),LD[10](0),LT[10](0);
Array : upv[10](0),dnv[10](0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
HD[0] = sdate;
HT[0] = stime;
HH[0] = H;
for cnt = 1 to 9
{
HD[cnt] = HD[cnt-1][1];
HT[cnt] = HT[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
TL_Delete(upv[cnt]);
if HH[cnt] > 0 and cnt < N Then
{
upv[cnt] = TL_New(HD[cnt],HT[cnt],HH[cnt],sdate,stime,HH[cnt]);
TL_SetExtRight(upv[cnt],true);
TL_SetColor(tl1,GRAY);
TL_SetColor(upv[cnt],RED);
TL_SetStyle(upv[cnt],3);
}
}
if LL[0] > 0 Then
{
TL1 = TL_new(LD[0],LT[0],LL[0],HD[0],HT[0],HH[0]);
}
TL_Delete(upv[0]);
upv[0] = TL_New(sdate[1],stime[1],HH[0],HD[0],HT[0],HH[0]);
TL_SetExtRight(upv[0],true);
}
if CrossDown(c,var1) Then
{
T = -1;
LD[0] = sdate;
LT[0] = stime;
LL[0] = L;
for cnt = 1 to 9
{
LD[cnt] = LD[cnt-1][1];
LT[cnt] = LT[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
TL_Delete(dnv[cnt]);
if LL[cnt] > 0 and cnt < N Then
{
dnv[cnt] = TL_New(LD[cnt],LT[cnt],LL[cnt],sdate,stime,LL[cnt]);
TL_SetExtRight(dnv[cnt],true);
TL_SetColor(tl1,GRAY);
TL_SetColor(dnv[cnt],BLACK);
TL_SetStyle(dnv[cnt],3);
}
}
if HH[0] > 0 Then
{
TL1 = TL_new(HD[0],HT[0],HH[0],LD[0],LT[0],LL[0]);
}
TL_Delete(dnv[0]);
dnv[0] = TL_New(sdate[1],stime[1],LL[0],LD[0],LT[0],LL[0]);
TL_SetExtRight(dnv[0],true);
}
if T == 1 then
{
if H > HH[0] Then
{
HH[0] = H;
HD[0] = sdate;
HT[0] = stime;
TL_SetEnd(TL1,HD[0],HT[0],HH[0]);
}
TL_Delete(upv[0]);
upv[0] = TL_New(HD[0],HT[0],HH[0],sdate,stime,HH[0]);
TL_SetExtRight(upv[0],true);
TL_SetColor(tl1,YELLOW);
TL_SetColor(upv[0],MAGENTA);
}
if T == -1 then
{
if L < LL[0] Then
{
LL[0] = L;
LD[0] = sdate;
LT[0] = stime;
TL_SetEnd(TL1,LD[0],LT[0],LL[0]);
}
TL_Delete(dnv[0]);
dnv[0] = TL_New(LD[0],LT[0],LL[0],sdate,stime,LL[0]);
TL_SetExtRight(dnv[0],true);
TL_SetColor(tl1,CYAN);
TL_SetColor(dnv[0],BLUE);
}
$$$,언제나 늘 고맙습니다.
2018-05-16
184
글번호 118963
답변완료
수정식 의뢰드려요!
안녕하세요!
아래 시스템식을 수정을 부탁드려요!
수식에서 추세선과 신호를 각각 따로 분리해 주시길 부탁드립니다!
그리고 첨부파일은 시스템식 의뢰 입니다!
최대한 이해가 가시게끔 정리해 보았습니다! 부탁드려요!
감사합니다!
-------------------------------------------------------------------------------------
Input:length(10),추세선연장(5),추세판단범위(10),진입횟수제한(1),
#ssssssssssssssssssssssssssssssssss
파동선두께(1),추세선두께(0),파동선색(YELLOW),수치표시(0);
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
Var:j(0),jj(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""),진입횟수(0),
TL1(0),TL2(0),TL3(0),Text1(0),
고추세최종(0),저추세최종(0),고ID(0),저ID(0);
Array:고[100,4](0),저[100,4](0); // 1:가격,2:Index,3:sDate,4:sTime
#==========================================#
#ssssssssssssssssssssssssssssssssss
If Index == 0 Then
{
고[1,1] = C;
저[1,1] = C;
}
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
Condition1 = Highest(C,length) == C and 최종고가 <> C;
Condition2 = Lowest (C,length) == C and 최종저가 <> C;
처리구분 = "";
If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생
{
If 최종꼭지점 == "저점" Then 처리구분 = "고점처리"; // 저 - 고 순으로 처리
Else 처리구분 = "저점처리"; // 고 - 저 순으로 처리
}
Else If Condition1 Then 처리구분 = "고점처리";
Else If Condition2 Then 처리구분 = "저점처리";
#==========================================#
If 처리구분 == "고점처리" Then
{
최종고가 = C; // 신규고점을 체크하기 위해 저장
If 최종꼭지점 == "저점" Then
{
진입횟수 = 0;
For j = 100 DownTo 2
{
For jj = 1 To 4
{
고[j,jj] = 고[j-1,jj];
}
}
고[1,1] = C;
고[1,2] = Index;
고[1,3] = sDate;
고[1,4] = sTime;
TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
#ssssssssssssssssssssssssssssssssss
If 수치표시 == 1 Then
{
Text1 = Text_New(sDate,sTime,고[1,1],NumToStr(고[1,1],2));
Text_SetStyle(Text1, 2, 1);
}
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,파동선색);
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
}
Else If 고[1,1] < C Then // 1번 고점보다 높은 고가 출현
{
고[1,1] = C;
고[1,2] = Index;
고[1,3] = sDate;
고[1,4] = sTime;
TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]);
// 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임
#ssssssssssssssssssssssssssssssssss
If 수치표시 == 1 Then
{
Text_SetLocation(Text1,sDate,sTime,고[1,1]);
Text_SetString(Text1,NumToStr(고[1,1],2));
}
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
}
/* 고점추세선 */
If 고[2,2][1] <> 고[2,2] Then // 고2의 Index값이 변동 없음 즉, 새로운 고점이 생기지 않았음
{
고추세최종 = 0;
For j = 3 To 추세판단범위
{
If 고[2,1] < 고[j,1] Then
{
고추세최종 = (고[2,1] - 고[j,1])/(고[2,2] - 고[j,2]) * (Index - 고[j,2]) + 고[j,1];
TL2 = TL_New(고[j,3],고[j,4],고[j,1],sDate,sTime,고추세최종);
고ID = j;
#ssssssssssssssssssssssssssssssssss
TL_SetSize(TL2,추세선두께);
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
TL_SetColor(TL2,RED);
j = 100;
}
}
}
Else If 고추세최종[1] > 0 Then
{
고추세최종 = (고[2,1] - 고[고ID,1])/(고[2,2] - 고[고ID,2]) * (Index - 고[고ID,2]) + 고[고ID,1];
TL_SetEnd(TL2,sDate,sTime,고추세최종);
}
If 저추세최종[1] > 0 Then
{
저추세최종 = (저[2,1] - 저[저ID,1])/(저[2,2] - 저[저ID,2]) * (Index - 저[저ID,2]) + 저[저ID,1];
TL_SetEnd(TL3,sDate,sTime,저추세최종);
}
최종꼭지점 = "고점";
If 진입횟수 < 진입횟수제한 and
고추세최종 > 0 and 고추세최종 < C Then
{
Buy();
}
}
#==========================================#
If 처리구분 == "저점처리" Then
{
최종저가 = C;
If 최종꼭지점 == "고점" then
{
진입횟수 = 0;
For j = 100 DownTo 2
{
For jj = 1 To 4
{
저[j,jj] = 저[j-1,jj];
}
}
저[1,1] = C;
저[1,2] = Index;
저[1,3] = sDate;
저[1,4] = sTime;
TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
#ssssssssssssssssssssssssssssssssss
If 수치표시 == 1 Then
{
Text1 = Text_New(sDate,sTime,저[1,1],NumToStr(저[1,1],2));
Text_SetStyle(Text1, 2, 0);
}
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,파동선색);
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
}
Else If 저[1,1] > C then
{
저[1,1] = C;
저[1,3] = sDate;
저[1,4] = sTime;
저[1,2] = Index;
TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]);
#ssssssssssssssssssssssssssssssssss
If 수치표시 == 1 Then
{
Text_SetLocation(Text1,sDate,sTime,저[1,1]);
Text_SetString(Text1,NumToStr(저[1,1],2));
}
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
}
/* 저점추세선 */
If 저[2,2][1] <> 저[2,2] Then
{
저추세최종 = 0;
For j = 3 To 추세판단범위
{
If 저[2,1] > 저[j,1] and 저[j,1] > 0 Then
{
저추세최종 = (저[2,1] - 저[j,1])/(저[2,2] - 저[j,2]) * (Index - 저[j,2]) + 저[j,1];
TL3 = TL_New(저[j,3],저[j,4],저[j,1],sDate,sTime,저추세최종);
저ID = j;
#ssssssssssssssssssssssssssssssssss
TL_SetSize(TL3,추세선두께);
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
TL_SetColor(TL3,Blue);
j = 100;
}
}
}
Else If 저추세최종[1] > 0 Then
{
저추세최종 = (저[2,1] - 저[저ID,1])/(저[2,2] - 저[저ID,2]) * (Index - 저[저ID,2]) + 저[저ID,1];
TL_SetEnd(TL3,sDate,sTime,저추세최종);
}
If 고추세최종[1] > 0 Then
{
고추세최종 = (고[2,1] - 고[고ID,1])/(고[2,2] - 고[고ID,2]) * (Index - 고[고ID,2]) + 고[고ID,1];
TL_SetEnd(TL2,sDate,sTime,고추세최종);
}
최종꼭지점 = "저점";
If 진입횟수 < 진입횟수제한 and
저추세최종 > 0 and 저추세최종 > C Then
{
Sell();
}
}
#==========================================#
If 처리구분 == "" Then
{
If Index - 고[1,2] <= 추세선연장 Then
{
If 고추세최종[1] > 0 Then
{
고추세최종 = (고[2,1] - 고[고ID,1])/(고[2,2] - 고[고ID,2]) * (Index - 고[고ID,2]) + 고[고ID,1];
TL_SetEnd(TL2,sDate,sTime,고추세최종);
}
}
Else
{
고추세최종 = 0;
}
If Index - 저[1,2] <= 추세선연장 Then
{
If 저추세최종[1] > 0 Then
{
저추세최종 = (저[2,1] - 저[저ID,1])/(저[2,2] - 저[저ID,2]) * (Index - 저[저ID,2]) + 저[저ID,1];
TL_SetEnd(TL3,sDate,sTime,저추세최종);
}
}
Else
{
저추세최종 = 0;
}
If MarketPosition > 0 and TL2[1] == TL2 and
고추세최종 > 0 and 고추세최종[1] <= C[1] and 고추세최종 > C Then
ExitLong();
If MarketPosition < 0 and TL3[1] == TL3 and
저추세최종 > 0 and 저추세최종[1] >= C[1] and 저추세최종 < C Then
ExitShort();
}
If ((최종꼭지점 == "고점" and MarketPosition == 1) or
(최종꼭지점 == "저점" and MarketPosition == -1)) and
MarketPosition[1] != MarketPosition Then
{
진입횟수 = 진입횟수 + 1;
}
2018-05-17
199
글번호 118962
답변완료
함수요청
안녕하세요?
함수문의 드립니다.
특정시간에 랜덤으로 진입하여
틎겅시간에 청산하고자 하는게 가능할련지요?
가령 크루드오일을 매일 오전 9시에 매수든 매도든 진입하여 당영업일 오전 5시에 청산하고자 합니다.
2018-05-16
161
글번호 118961
답변완료
감사드립니다
Input : shortPeriod(12), longPeriod(26), Period(9);
Var : MACDv(0), MACDs(0),macdosc(0) ;
MACDv = MACD(shortPeriod, longPeriod);
MACDs = ema(MACDv,Period);
var1 = ema(C,20);
if C > var1 and C < O and MACDv > MACDs Then
buy();
if C < var1 and C > O and MACDv < MACDs Then
sell();
1,,위 수식에서 macd 골드가 기준선 0선 이상일때 매수신호
macd 가 기준선 0 선 이하에서 데드나면 매도발생
저녁 16시부터 24시까지만 신호나오게 설정해주세요
2,, trix 기준선이 매수나오면 음봉종가에 매수신호
반대면 양봉종가에 매도신호
시간설정도 1번식과 동일하게 부탁드립니다
감사드리며 좋은하루 돼세요~~
2018-05-17
175
글번호 118960