커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
6325
글번호 230811
답변완료
기준선 매매
수고 하십니다..기준선 매매 입니다..올린 수식은 스톡으로 만든 것 입니다..
이걸 스톡이 아닌 RSI로 진입 청산을 했으면 합니다..제가 수식을 몰라서요~~ 감사 합니다..
Inputs: Length1(0),Length2(0),Length3(0),과매도(0),과매수(0),기준선길이(0); ;
Variables: 스토K(0), 스토D(0),기준선(0);;
스토K= StochasticsK(Length1,Length2);
스토D = StochasticsD(Length1,Length2,Length3);
기준선 = (Highest(High, 기준선길이) + Lowest(Low, 기준선길이)) / 2;
if C>기준선 Then
{
If Crossup(스토K, 과매도) Then
Buy ("매수");
If CrossDown(스토K, 과매수) Then
ExitLong ("매수청산");
}
if C<기준선 Then
{
If CrossDown(스토K, 과매수) Then
Sell ("매도");
If Crossup(스토K, 과매도) Then
ExitShort ("매도청산");
}
if MarketPosition == 1 and CrossDown(c,기준선) Then
ExitLong ("매수손절매");
if MarketPosition == -1 and CrossUp(c,기준선) Then
ExitShort ("매도손절매");
2017-04-11
154
글번호 108652
답변완료
부탁드립니다
아래수식은 마지막 지그재그선의 중가에 선을 긋고 오늘쪽으로 연장하여
그값을 표시하는 수식인데요
1. 마지막선뿐만아니라 그전의 모든 지그재그선의 중가에 선을 긋고 오른쪽으로 연장하여
가격을 표시 하고싶습니다
2.그리고 마지막 3지그재선에 중가에 선을 긋고 오른쪽으로 연장하여 가격을 표시 하고싶습니다
부탁드립니다
그리고 전 수식과 구분할수 있도록 수정된 부분은 빨간색으로 부탁드립니다
아래
Input:length(12),X(1);
Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),TL2(0),TL3(0),Text1(0),처리구분(""),
TL_Val1(0),TL_Val2(0),TL11(0),tx11(0);
Array:고점[10,2](0),저점[10,2](0);
처리구분 = "";
If Highest(H,length) == H and lastHiVal <> H and Lowest(L,length) == L and lastLoVal <> L Then
{
If 저점[1,1] > L Then 처리구분 = "저점처리";
If 고점[1,1] < H Then 처리구분 = "고점처리";
}
Else If Highest(H,length) == H and lastHiVal <> H Then 처리구분 = "고점처리";
Else If Lowest(L,length) == L and lastLoVal <> L Then 처리구분 = "저점처리";
If 처리구분 == "고점처리" Then
{
lastHiVal = H;
If 고점[1,2] < 저점[1,2] Then
{
For j = 10 DownTo 2
{
고점[j,1] = 고점[j-1,1];
고점[j,2] = 고점[j-1,2];
}
}
If 고점[1,2] < 저점[1,2] or 고점[1,1] < H Then
{
고점[1,1] = H;
고점[1,2] = Index;
sBar = Index - 저점[1,2];
eBar = 0;
If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then
{
TL_Delete(TL1);
Text_Delete(Text1);
If 고점[3,1][1] < 고점[2,1][1] and 고점[2,1][1] > 고점[1,1][1] and 저점[2,1][1] < 저점[1,1][1] Then
TL_Delete(TL2);
}
if X == 1 Then{
TL1 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],sDate[eBar],sTime[eBar],고점[1,1]);
}
TL_Delete(TL11);
TL11 = TL_New(sDate[sBar],sTime[sBar],(저점[1,1]+고점[1,1])/2,sDate[eBar],sTime[eBar],(저점[1,1]+고점[1,1])/2);
TL_SetExtRight(TL11,true);
Text_Delete(tx11);
tx11 = Text_New(sdate,stime,(저점[1,1]+고점[1,1])/2,NumToStr((저점[1,1]+고점[1,1])/2,2));
if H < 고점[2,1] Then
TL_SetColor(TL1,red);
Else
TL_SetColor(TL1,MAGENTA);
Text1 = Text_New(sDate[eBar],sTime[eBar],고점[1,1],NumToStr(abs(고점[1,1]-저점[1,1])/PriceScale,0)+NewLine+NumToStr(고점[1,1],2));
Text_SetStyle(Text1, 2, 1);
If 고점[3,1] < 고점[2,1] and 고점[2,1] > 고점[1,1] and 저점[2,1] < 저점[1,1] Then
{
sBar = Index - 저점[2,2];
eBar = Index - 저점[1,2];
TL_SetExtLeft(TL2,false);
TL_SetExtRight(TL2,false);
if X == 1 Then
TL2 = TL_New(sDate[sBar],sTime[sBar],저점[2,1],sDate[eBar],sTime[eBar],저점[1,1]);
TL_SetColor(TL2,BLUE);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
}
}
}
If 처리구분 == "저점처리" Then
{
lastLoVal = L;
If 저점[1,2] < 고점[1,2] Then
{
For j = 10 DownTo 2
{
저점[j,1] = 저점[j-1,1];
저점[j,2] = 저점[j-1,2];
}
}
If 저점[1,2] < 고점[1,2] or 저점[1,1] > L Then
{
저점[1,1] = L;
저점[1,2] = Index;
sBar = Index - 고점[1,2];
eBar = 0;
If TL_GetBeginDate(TL1) == sDate[sBar] and TL_GetBeginTime(TL1) == sTime[sBar] Then
{
TL_Delete(TL1);
Text_Delete(Text1);
If 저점[2,1][1] < 저점[1,1][1] and 저점[2,1][1] < 저점[3,1][1] and 고점[2,1][1] > 고점[1,1][1] Then
TL_Delete(TL3);
}
if X == 1 Then{
TL1 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],sDate[eBar],sTime[eBar],저점[1,1]);
}
TL_SetColor(TL1,blue);
TL_Delete(TL11);
TL11 = TL_New(sDate[sBar],sTime[sBar],(저점[1,1]+고점[1,1])/2,sDate[eBar],sTime[eBar],(저점[1,1]+고점[1,1])/2);
TL_SetExtRight(TL11,true);
Text_Delete(tx11);
tx11 = Text_New(sdate,stime,(저점[1,1]+고점[1,1])/2,NumToStr((저점[1,1]+고점[1,1])/2,2));
if L > 저점[2,1] Then
TL_SetColor(TL1,blue);
Else
TL_SetColor(TL1,cyan);
Text1 = Text_New(sDate[eBar],sTime[eBar],저점[1,1],NumToStr(abs(고점[1,1]-저점[1,1])/PriceScale,0)+NewLine+NumToStr(저점[1,1],2));
Text_SetStyle(Text1, 2, 0);
If 저점[2,1] < 저점[1,1] and 저점[2,1] < 저점[3,1] and 고점[2,1] > 고점[1,1] Then
{
sBar = Index - 고점[2,2];
eBar = Index - 고점[1,2];
TL_SetExtLeft(TL3,false);
TL_SetExtRight(TL3,false);
if X == 1 Then
TL3 = TL_New(sDate[sBar],sTime[sBar],고점[2,1],sDate[eBar],sTime[eBar],고점[1,1]);
TL_SetColor(TL3,RED);
TL_SetExtLeft(TL3,true);
TL_SetExtRight(TL3,true);
}
}
}
TL_SetSize(TL1,3);
TL_SetSize(TL2,2);
TL_SetSize(TL3,2);
2017-04-11
139
글번호 108651
임가에미소 님에 의해서 삭제되었습니다.
2017-04-10
7
글번호 108633
답변완료
이동평균선을 추가하고 싶습니다.~~
고생이 많으십니다.시스템 문의 드립니다.^^
저는 스톡캐스틱슬로우의 변수를 틀리게 하여 겹쳐서 매매를 합니다.(이평선도겹쳐서매매)
var : Period11(1),Period12(2),Period13(2);
var : Period21(3),Period22(4),Period23(2);
var : Period31(5),Period32(6),Period33(2);
var : Period41(7),Period42(8),Period43(2);
var : Period51(9),Period52(10),Period53(2);
var : SMI1(0),SMI2(0),SMI3(0),SMI4(0),SMI5(0),Bcond(false),Scond(false);
SMI1 = SMI(Period11,Period12,Period13);
SMI2 = SMI(Period21,Period22,Period23);
SMI3 = SMI(Period31,Period32,Period33);
SMI4 = SMI(Period41,Period42,Period43);
SMI5 = SMI(Period51,Period52,Period53);
bcond = SMI1 > smi2 and SMI2 > smi3 and SMI3 >smi4 and SMI4 > smi5;
scond = SMI1 < smi2 and SMI2 < smi3 and SMI3 <smi4 and SMI4 < smi5;
if Bcond == true and Bcond[1] == false Then
buy();
if Scond == true and Scond[1] == false Then
sell();
위와 같은 시그널로 매매를 합니다. 이 식에 이동평균선(20일)추가를 하고 싶습니다.
예를 들어
*매수조건
SMI1 > smi2 and SMI2 > smi3 and SMI3 >smi4 and SMI4 > smi5>이평선(20일)
*매수청산조건
smi5가 +80선에 닿을때
*매도조건
SMI1 < smi2 and SMI2 < smi3 and SMI3 <smi4 and SMI4 < smi5<이평선(20일)
*매도청산조건
smi5가 -80선에 닿을때
입니다. 부탁드립니다.`~~~~~~
2017-04-10
143
글번호 108630
답변완료
보조차트 이용 ETF 거래
또 부탁드리네요
아래 수식을 보조차트로 이용하여
1.KODEX200 ETF 거래할 수 있는 수식(선물 BUY)을 부탁드립니다.
2.KODEX인버스 ETF 거래할 수 있는 수식(선물 SELL)도 부탁드립니다.
둘 다 data2 참조차트 이용한 수식입니다
항상 고맙습니다.
-아래-
if bdate != bdate[1] Then{
Condition1 = false;
var1 = H;
var2 = L;
}
if stime >= 130000 and Condition1 == false and C > O Then{
Condition1 = true;
if H < var2 Then
buy();
}
if stime >= 130000 and Condition2 == false and C < O Then{
Condition2 = true;
if L > var1 Then
sell();
}
2017-04-10
132
글번호 108629
답변완료
전봉의 고점,저점,중심선 표시
아래의 수식은 직전 60분봉의 고점,저점,중간선에 선을 긋고 값을 표시하는
수식을 부탁 드렸었는데 잘 안되는군요
다시 부탁드릴께요
좀 수정해서 input에서 60분을 변경 가능하도록 (120분,30분,20분....)
그리고 input에서 전봉,전전봉을 선택할수 있도록 전봉(1),전전봉(2),전전전봉(3)...
부탁드립니다
아래
var : TF(0),DD(0),TT(0),HH(0),LL(0);
var : TL1(0),TL2(0),TL3(0),Tx1(0),tx2(0),tx3(0);
TF = TimeToMinutes(stime)%60;
if sdate != date[1] or (sdate == sdate[1] and TF < TF[1]) Then{
HH = H;
LL = L;
DD = sdate[1];
TT = stime[1];
}
if H > HH Then
HH = H;
if L < LL Then
LL = L;
TL_Delete(TL1);
TL_Delete(TL2);
TL_Delete(TL3);
TL1 = TL_New(dd,tt,HH,sdate,stime,HH);
TL2 = TL_New(dd,tt,LL,sdate,stime,LL);
TL3 = TL_New(dd,tt,(HH+LL)/2,sdate,stime,(HH+LL)/2);
TL_SetExtRight(TL1,true);
TL_SetExtRight(TL2,true);
TL_SetExtRight(TL3,true);
Text_Delete(tx1);
Text_Delete(tx2);
Text_Delete(tx3);
tx1 = Text_New(sdate,stime,HH,NumToStr(HH,2));
tx2 = Text_New(sdate,stime,LL,NumToStr(LL,2));
tx3 = Text_New(sdate,stime,(HH+LL)/2,NumToStr((HH+LL)/2,2));
2017-04-10
179
글번호 108626
답변완료
선물보조차트 이용 ETF 거래 수식
아래 kospi200선물 사용 수식을 보조차트로 이용하여
1.KODEX200 ETF 거래할 수 있는 수식(선물 BUY)을 부탁드립니다.
2.KODEX인버스 ETF 거래할 수 있는 수식(선물 SELL)도 부탁드립니다.
둘 다 data2 참조차트 이용한 수식입니다
항상 고맙습니다.
******
var1 = BollBandUp(20,2);
var2 = BollBandDown(20,2);
if C < var1 and C[1] > var1[1] Then
sell("s",AtMarket);
if C > var2 and C[1] < var2[1] Then
buy("b",AtMarket);
2017-04-10
140
글번호 108621
답변완료
안녕하세요. 볼린져밴드 문의드립니다.
var : V1(0,data2),V2(0,data2);
V1 = data2(BollBandup(Length, StdDev));
V2 = data2(BollBanddown(Length, StdDev));
If data2(CountIF(Close < V2, Bars)) == Bars Then
Buy("BBtop", Atmarket);
If data2(CountIF(Close > V1, Bars)) == Bars Then
ExitLong("BBbot", AtMarket);
이런 수식인데, 제가 이해하기로는 분봉이 2개 이상 볼린져밴드 위에 있거나, 밑에 있으면 각각 매도 매수가 들어간다고 이해했습니다. 그런데 시스템을 돌려봤더니 이렇게 포지션 진입 해야 하는 상황에서도 진입하지 않고 있습니다.
지표는
Inputs: Length(9), StdDev(2), Bars(2);
var : V1(0,data2),V2(0,data2);
V1 = data2(BollBandup(Length, StdDev));
V2 = data2(BollBanddown(Length, StdDev));
plot1(v1,"data2상단");
plot2(v2,"data2하단");
이러합니다.
2017-04-10
209
글번호 108619
답변완료
문의
항생 9시15분에서 23시45분을 당일기준으로 하여 당일저가 고가 시가가 나타나도록하고 당일 9시15분전에는 전일로 기준이 되어 전일저가 고가 종가가 직선으로 나타나도록 부탁드릴게요
2017-04-10
137
글번호 108617