커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
8125
글번호 230811
답변완료
수식요청(호가창)
* 새로운 질문 입니다.
* 호가당 매수 할수는 없는지요?
// 동양철관
if dayindex() >= 1 and c < 1385 and c >= 1380 then buy("매수21",AtLimit, C-0.01);
if dayindex() >= 1 and c < 1375 and c >= 1370 then buy("매수22",AtLimit, C-0.01);
if dayindex() >= 1 and c < 1365 and c >= 1360 then buy("매수23",AtLimit, C-0.01);
if dayindex() >= 1 and c < 1355 and c >= 1350 then buy("매수24",AtLimit, C-0.01);
if dayindex() >= 1 and c < 1345 and c >= 1340 then buy("매수25",AtLimit, C-0.01);
이것을 호가창 기준 2호가 아래에서 계속 걸어놓을수는 없나요?
호가창이 1400
1395
1390
1385
1380
1375 이면
매수 주문을 1390원 1차 매수 주문
1380원 2차 매수 주문
1370원 3차 주문 까지 3단계 호가창 주문을 넣을수 있나요?
즉 현재가가 기준가(전일종가) 대비 2호가(혹은 3호가) 보다 작으면 계속 주문 낼수 있나요?
* 고맙습니디.
2017-05-21
204
글번호 109734
답변완료
수식 부탁 드립니다..
진입 신호는 위에 있는 신호에 진입 입니다..
그런데 DMI신호 조건을 추가 하고 싶습니다.. 최적화도 할수 있게요~
수고 하십시요~
input : P(0),간격(0),p1(0),p2(0),p3(0);
array : mav[3](0);
var3 = ma(c,p1);
var4 = ma(c,p2);
var5 = ma(C,p3);
mav[1] = ma(c,P+간격*1);
mav[2] = ma(c,P+간격*2);
mav[3] = ma(c,P+간격*3);
var1 = 0;
if mav[1] > mav[1][1] Then
var1 = var1+1;
if mav[2] > mav[2][1] Then
var1 = var1+1;
if mav[3] > mav[3][1] Then
var1 = var1+1;
var2 = 0;
if mav[1] <= mav[1][1] Then
var2 = var2+1;
if mav[2] <= mav[2][1] Then
var2 = var2+1;
if mav[3] <= mav[3][1] Then
var2 = var2+1;
if var1 == 3 and var3 > var4 and C > var5 and C > O Then
buy();
if var2 == 3 and var3 < var4 and C < var5 and C < O Then
sell();
Input : Period(14);
value1 = DIPlus(Period);
value2 = DIMinus(Period);
# 매수/매도청산
If CrossUP(value1, value2) Then
{
Buy();
}
# 매수청산
If CrossDown(value1, value2) Then
{
Sell();
}
2017-05-21
155
글번호 109733
답변완료
수식변경 요청드립니다.
안녕하세요.
다음 식의 변경을 요청드립니다.
추가해야 할 조건은 첫진입 계약은 1계약으로 시작하고 손절 시 그다음 진입시 계약수가 앞전 계약수의 2배가 되도록 하며 수익 시 다시 1계약으로 셋팅되도록 부탁드립니다.
input : 거래시간1(1), 시작시간1(160000), 끝시간1(045500),익절틱수 (30),손절틱수 (15);
input : P1(5),P2(20);
var : AA(0),BB(0),HH(0),LL(0);
if 거래시간1 == 1 then
condition3 = (stime>=시작시간1 or stime<=끝시간1);
Else if 거래시간1 == 2 then
condition3 = (stime>=시작시간1 and stime<=끝시간1);
Else
condition3 = true;
AA = ma(C,P1);
BB = ma(C,P2);
if MarketPosition == 0 and TotalTrades == TotalTrades[1] and
Condition3 == true and
((BB > BB[1] and C < AA and C < O) or (BB > BB[1] and C < AA and C < BB and C < O)) Then
Buy();
if MarketPosition == 1 Then{
HH = Floor((highest(H,BarsSinceEntry) - EntryPrice)/(PriceScale*손절틱수));
ExitLong("bx",AtStop,(EntryPrice-(PriceScale*손절틱수))+(PriceScale*손절틱수)*HH);
}
if MarketPosition == -1 Then{
LL = Floor((Lowest(L,BarsSinceEntry)-EntryPrice)/(PriceScale*손절틱수));
ExitShort("sx",AtStop,(EntryPrice+(PriceScale*손절틱수))-(PriceScale*손절틱수)*LL);
}
SetStopProfittarget(PriceScale*익절틱수,PointStop);
if stime == 끝시간1 or (stime > 끝시간1 and stime[1] < 끝시간1) Then{
if MarketPosition == 1 Then
ExitLong();
if MarketPosition == -1 Then
ExitShort();
}
2017-05-21
145
글번호 109732
답변완료
수식문의
그림 1의 차트는 아래수식을 적용 한 일봉차트 입니다.
차트에서 저점꼮지점의 종가와 고점꼮지점의 종가가 표시되고 있습니다.
이와같이
1. 저점꼮지점의 값 및
2. 고점꼮지점의 값을 구하는 수식을 부탁드립니다.
관련수식
Input:상승전환가격(5),하락전환가격(5),종가사용여부(1),파동선두께(1),수치표시(1);
Var:j(0),jj(0),HH(0),LL(0),hiBar(0),loBar(0),최종꼭지점(""),처리구분(""),
TL1(0),Text1(0);
Array:고[10,4](0),저[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime
#==========================================#
HH = IFF(종가사용여부 == 1,C,H);
LL = IFF(종가사용여부 == 1,C,L);
If Index == 0 Then
{
고[1,1] = HH;
고[1,2] = 0;
고[1,3] = sDate;
고[1,4] = sTime;
저[1,1] = LL;
저[1,2] = 0;
저[1,3] = sDate;
저[1,4] = sTime;
}
If Index > 0 Then // Index가 0일때는 이전 봉이 없으므로 Index가 1일때부터 1씩 증가
{
hiBar = hiBar + 1; // 최고점을 찍은 고[저]가의 위치를 저장 해놓기 위해 봉번호를 카운트한다.
loBar = loBar + 1;
}
If HH[hiBar] < HH Then hiBar = 0; // 현재 봉이 최고가이면 봉번호를 0으로 초기화
If LL[loBar] > LL Then loBar = 0;
Condition1 = 저[1,1] + 상승전환가격 < HH and hiBar == 0;
// 전저점에서 전환가격만큼 더한 값보다 고가가 크다면 추세가 변한 것으로 보고 신규 고점으로 인식
Condition2 = 고[1,1] - 하락전환가격 > LL and loBar == 0;
// 전고점에서 전환가격만큼 뺀 값보다 저가가 작다면 추세가 변한 것으로 보고 신규 저점으로 인식
처리구분 = "";
If Condition1 and Condition2 Then // 고점과 저점 조건 동시 만족
{
If 최종꼭지점 == "저점" Then
{
If 저[1,1] > LL Then 처리구분 = "저점처리";
Else 처리구분 = "고점처리";
}
Else If 최종꼭지점 == "고점" Then
{
If 고[1,1] < HH Then 처리구분 = "고점처리";
Else 처리구분 = "저점처리";
}
}
Else If Condition1 Then 처리구분 = "고점처리";
Else If Condition2 Then 처리구분 = "저점처리";
#==========================================#
If 처리구분 == "고점처리" Then
{
If 최종꼭지점 == "저점" Then
{
For j = 10 DownTo 2
{
For jj = 1 To 4
{
고[j,jj] = 고[j-1,jj];
}
}
고[1,1] = HH[hiBar];
고[1,2] = Index - hiBar;
고[1,3] = sDate[hiBar];
고[1,4] = sTime[hiBar];
hiBar = -1;
// 다음 봉의 고가가 기준 고가로 인식되려면 hiBar 값이 0이 되어야 한다.
// 봉이 바뀔 때마다 hiBar의 값을 1씩 증가시키므로 다음 봉의 hiBar 값은 0이 된다.
loBar = -1;
TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
If 수치표시 == 1 Then
{
Text1 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1],2));
Text_SetStyle(Text1, 2, 1);
}
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,Red);
}
Else If 고[1,1] < HH[hiBar] Then // 1번 고점보다 높은 고가 출현
{
고[1,1] = HH[hiBar];
고[1,2] = Index - hiBar;
고[1,3] = sDate[hiBar];
고[1,4] = sTime[hiBar];
hiBar = -1;
loBar = -1;
TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]);
// 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임
If 수치표시 == 1 Then
{
Text_SetLocation(Text1,고[1,3],고[1,4],고[1,1]);
Text_SetString(Text1,NumToStr(고[1,1],2));
}
}
최종꼭지점 = "고점";
}
#==========================================#
If 처리구분 == "저점처리" Then
{
If 최종꼭지점 == "고점" Then
{
For j = 10 DownTo 2
{
For jj = 1 To 4
{
저[j,jj] = 저[j-1,jj];
}
}
저[1,1] = LL[loBar];
저[1,2] = Index - loBar;
저[1,3] = sDate[loBar];
저[1,4] = sTime[loBar];
hiBar = -1;
loBar = -1;
TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
If 수치표시 == 1 Then
{
Text1 = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(저[1,1],2));
Text_SetStyle(Text1, 2, 0);
}
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,Blue);
}
Else If 저[1,1] > LL[loBar] Then
{
저[1,1] = LL[loBar];
저[1,2] = Index - loBar;
저[1,3] = sDate[loBar];
저[1,4] = sTime[loBar];
hiBar = -1;
loBar = -1;
TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]);
If 수치표시 == 1 Then
{
Text_SetLocation(Text1,저[1,3],저[1,4],저[1,1]);
Text_SetString(Text1,NumToStr(저[1,1],2));
}
}
최종꼭지점 = "저점";
}
#===========================================#
#===========================================#
If 최종꼭지점[1] < 최종꼭지점 Then
var1 = -1;
if 최종꼭지점[1] > 최종꼭지점 Then
var1 = 1;
if var1 == -1 Then
sell();
if var1 == 1 Then
buy();
2017-05-21
216
글번호 109731
답변완료
시간표현
국선 복합장에서 시가시간은 09시를 if stime == 090000로 표현하면되는데, 새벽5시를 종가로 본다면 어떻게 표현하면 되나요 if stime == 290000로 표현하면 안될거 같아서요
2017-05-21
196
글번호 109730
답변완료
수식 부탁 드립니다.
* 항상 많은 도움에 고맙습니다.
<인택스> if dayindex 관련 로직 부분 입니다.
* 질문1> 금일 가격이 전일 최고가 대비 돌파후 돌파봉 기준 -2% 하락후 매수
* 질문2> 금일 가격이 전일 최고가 대비 돌파 시그널 이후 전일 최저가 보다 작으면 매수
* 질문3> 금일 최저가 새로 발생시 계속 매수 로직
→ dayopen가격 1000원 이후 990원 발생시 매수
이후 970원 발생시 또매수
이후 960원 발생시 또매수.....
즉 당일 dayopen 가격 기준 새로운 저가가 발생 하면 발생 할때 마다 계속 매수
* 항상 고맙습니다. 수고하십시요.
2017-05-21
159
글번호 109729
답변완료
검색식 부탁해요
obv
obv 시그널
obv비교 말고 obv 시그널로 비교 하고 싶어요
120시그널<60시그널<20시그널
검색식좀 알려주세요
2017-05-21
182
글번호 109728
답변완료
수식 부탁 합니다
Input:length(15);
Var:j(0),lastHiVal(0),lastLoVal(0),turnPntBit(""),TL1(0);
Array:valArr[10](0),barArr[10](0),turnPntArr[10]("");
For j = 0 To 9
{
barArr[j] = barArr[j] + 1;
}
Condition1 = Highest(H,length) == H and lastHiVal <> H;
Condition2 = Lowest(L,length) == L and lastLoVal <> L;
If Condition1 Then lastHiVal = H;
If Condition2 Then lastLoVal = L;
turnPntBit = "";
If Condition1 and Condition2 Then
{
If Max(valArr[1],valArr[2]) < H and Min(valArr[1],valArr[2]) > L Then
turnPntBit = "HiLo";
Else If Max(valArr[1],valArr[2]) < H Then turnPntBit = "Hi";
Else If Min(valArr[1],valArr[2]) > L Then turnPntBit = "Lo";
}
Else If Condition1 Then turnPntBit = "Hi";
Else If Condition2 Then turnPntBit = "Lo";
If turnPntBit <> "" Then
{
If turnPntBit == "HiLo" Then
{
valArr[1] = IFF(turnPntArr[1] == "Hi",H,L);
barArr[1] = 0;
TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
If turnPntArr[1] == "Hi" Then
turnPntBit = "Lo";
Else
turnPntBit = "Hi";
}
If turnPntBit <> turnPntArr[1] Then
{
for j = 8 downto 1
{
valArr[j+1] = valArr[j];
barArr[j+1] = barArr[j];
turnPntArr[j+1] = turnPntArr[j];
}
}
If turnPntBit <> turnPntArr[1] or
(turnPntBit == turnPntArr[1] and
((turnPntBit == "Hi" and valArr[1] < H) or
(turnPntBit == "Lo" and valArr[1] > L))) Then
{
valArr[1] = IFF(turnPntBit == "Hi",H,L);
barArr[1] = 0;
turnPntArr[1] = turnPntBit;
If turnPntArr[1][1] <> turnPntArr[1][0] Then{
TL1 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2],
sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
if turnPntArr[1][0] == "Hi" Then
buy();
Else
sell();
}
Else
TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
}
}
TL_SetSize(TL1,1);
위시스템에 추가해서 MACDS선이 0선위에 있을때는 매수신호만 발생
MACDS선이 0선 아래에 있을때는 매도 신호만 발생 하는 시스템식을 만들고 싶습니다.
제가 나름 만들어 보았는데 MACDS선이 0선위에 있는데도 매수 매도 신호 둘다 나옵니다.
MACDS선은 아래 수식에서 가져온것입니다.
Input : shortPeriod(12), longPeriod(26), Period(9);
Var : MACDV(0) , MACDs(0) ;
MACDV = MACD(shortPeriod, longPeriod);
MACDS = ema(MACDV,Period);
2017-05-21
158
글번호 109727
답변완료
이격도를 차트에 표현하고 싶습니다
아래식은 예전에 관리자님이 작성해주신 식입니다.
var : ii(0),v1(0),v2(0),v3(0);
var : mav1(0),mav2(0),mav3(0);
var : mav11(0),mav22(0),mav33(0);
if Bdate != Bdate[1] Then{
ii = 0;
v1 = 0;
v2 = 0;
v3 = 0;
mav11 = mav1[1];
mav22 = mav2[1];
mav33 = mav3[1];
}
v1 = v1 + (H-dayopen);
v2 = v2 + (L-dayopen);
v3 = v3 + (C-dayopen);
ii = ii+1;
mav1 = dayopen+(v1/ii);
mav2 = dayopen+(v2/ii);
mav3 = dayopen+(v3/ii);
plot1(C/mav11*100-100,"고가");
plot2(C/mav22*100-100,"저가");
plot3(C/mav33*100-100,"종가");
plot4(0,"기준선");
2가지 요청합니다. 부탁드립니다.
1.아래식의 수치값을 변형하여 이격도를 차트에 표현하고 싶습니다.
도와주시면 감사하겠습니다.
2.상기 이격도가 당일 아침 장시작시 기준값인 0선에서 항상 시작할수 있도록 수정부탁드립니다.(갭의 여부와 상관없이 시작은 항상 기준선에서 부터....)
2017-05-22
212
글번호 109726