커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
4325
글번호 230811
답변완료
수식 부탁드립니다
1.
시간대별(60분 단위) 고가(A)를 그린다
시간대별(60분 단위) 저가(B)를 그린다
A와 B 진폭(A~B)의 상방 대칭(=A*2-B)을 그린다
A와 B 진폭(A~B)의 하방 대칭(=B*2-A)을 그린다
A의 당일 최고가(C)를 그린다
B의 당일 최저가(D)를 그린다
C와 D 진폭(C~D)의 상방 대칭(=C*2-D)을 그린다
C와 D 진폭(C~D)의 하방 대칭(=D*2-C)을 그린다
2.
A를 돌파하는 양 캔들 매수
B를 붕괴하는 음 캔들 매도
3.
A를 돌파하는 양 캔들 매수...1포 익절,1포 손절
B를 붕괴하는 음 캔들 매도...1포 익절,1포 손절
감사합니다
2017-12-01
178
글번호 114617
답변완료
문의 드립니다.
안녕하세요.
키움에서 사용한 수식을 예스로 옮기고 싶은데요.
제가 초보이라 ㅠㅠ 해보지만 너무 어려워서 도움 부탁드립니다.
상승V 와 하락V 두가지인데요 이 두개를 차트에 각각 직선으로 표시 되는 겁니다.
이해 되십니까? 예스로 옮기기 가능하세요?
======================================
상승 V
A5=MA(가격,P5,이평종류);
A20=MA(가격,P20,이평종류);
A60=MA(가격,P60,이평종류);
A120=MA(가격,P120,이평종류);
B1=CROSSUP(A20,A120);
B2=CROSSDOWN(A5,A20);
B3=CROSSDOWN(A20,A60);
AL=LOWESTSINCE(1, B3, L);
BH=HIGHESTSINCE(1, B1, H);
BL=LOWESTSINCE(1, B2, L);
VN=IF(B2 AND L==BL,1,0);
V=2*BH-BL;
N=BH-AL+BL;
VALUEWHEN(1,VN,V)
하락 V
A5=MA(가격,P5,이평종류);
A20=MA(가격,P20,이평종류);
A60=MA(가격,P60,이평종류);
A120=MA(가격,P120,이평종류);
B1=CROSSUP(A20,A120);
B2=CROSSDOWN(A5,A20);
B3=CROSSDOWN(A20,A60);
AH=HIGHESTSINCE(1, B1, H);
AL=LOWESTSINCE(1, B3, L);
BH=HIGHESTSINCE(1, B2, H);
LVN=IF(B2 AND H==BH,1,0);
VL=2*AL-BH;
NL=AL+BH-AH;
VALUEWHEN(1,LVN,VL)
======================================
2017-12-01
186
글번호 114616
답변완료
문의드립니다
Input:length(12);
Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),TL2(0),TL3(0),
Text1(0),처리구분(""),T(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
{
T = 1;
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);
TL_Delete(TL2);
Text_Delete(Text1);
}
TL1 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],
sDate[eBar],sTime[eBar],고점[1,1]);
TL2 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],
sDate[eBar],sTime[eBar],저점[1,1]);
Text1 = Text_New(sDate[eBar],sTime[eBar],고점[1,1],
NumToStr(고점[1,1],2));
Text_SetStyle(Text1, 2, 1);
TL_SetColor(TL2,BLUE);
}
}
If 처리구분 == "저점처리" Then
{
T = -1;
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);
TL_Delete(TL2);
Text_Delete(Text1);
}
TL1 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],
sDate[eBar],sTime[eBar],저점[1,1]);
TL2 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],
sDate[eBar],sTime[eBar],고점[1,1]);
Text1 = Text_New(sDate[eBar],sTime[eBar],저점[1,1],
NumToStr(저점[1,1],1));
Text_SetStyle(Text1, 2, 10);
TL_SetColor(TL2,MAGENTA);
}
}
TL_SetSize(TL1,3);
TL_SetColor(TL1,CYAN);
TL_Delete(TL3);
if T == 1 then{
TL3 = TL_New(sDate[index-고점[1,2]],sTime[index-고점[1,2]],고점[1,1],sDate,sTime,고점[1,1]);
TL_SetColor(TL3,MAGENTA);
TL_SetSize(TL3,3);
TL_SetExtRight(TL3,true);
}
if T == -1 then{
TL3 = TL_New(sDate[index-저점[1,2]],sTime[index-저점[1,2]],저점[1,1],sDate,sTime,저점[1,1]);
TL_SetColor(TL3,BLUE);
TL_SetSize(TL3,3);
TL_SetExtRight(TL3,true);
}
다시한번더문의드립니다 현재그림과같이 핑크색은 트리(true)가안된상태에서고점에서 저점을찍으면핑크색이 나오는데 나올때만 트리(true)로 나오게할수있는지요?(나오기전에는트리가안된상태에서고점저점이바낄때만트리로)블루색도마찬가지로...가능하다면 부탁드립니다~~미리감사드립니다
2017-12-01
219
글번호 114615
답변완료
55709글 관련 재질문
질문을 통해 받은 기준자산 3분할 매매식을 아래와 같은 기준수량 3분할 매매식으로 고쳐보았습니다.
input : 기준수량(100);
var : ET1(0),ET2(0),ET3(0);
if Bdate != Bdate[1] Then{
if stime < 100000 Then
{
ET1 = 90000;
ET2 = 90300;
ET3 = 90600;
}
else
{
ET1 = 100000;
ET2 = 100300;
ET3 = 100600;
}
}
if stime == 142700 or (stime > 142700 and stime[1] < 142700) Then{
var1 = 기준수량*(1/3);
buy("b1",OnClose,def,Floor(var1));
}
if stime == 143000 or (stime > 143000 and stime[1] < 143000) Then{
var1 = 기준수량*(1/3);
buy("b2",OnClose,def,Floor(var1));
}
if stime == 143300 or (stime > 143300 and stime[1] < 143300) Then{
var1 = 기준수량*(1/3);
buy("b3",OnClose,def,Floor(var1));
}
if MarketPosition == 1 and sdate > EntryDate then{
if stime == ET1 or (stime > ET1 and stime[1] < ET1) Then
ExitLong("bx1",OnClose,def,"",floor(MaxContracts*(1/3)),1);
if stime == ET2 or (stime > ET2 and stime[1] < ET2) Then
ExitLong("bx2",OnClose,def,"",floor(MaxContracts*(1/3)),1);
if stime == ET3 or (stime > ET3 and stime[1] < ET3) Then
ExitLong("bx3");
}
기준수량을 100(3의 배수가 아님)으로 설정하니 33개씩 매매가 되고 1개가 남습니다.
3번째 매매(b3, bx3) 때 잔량 전부(34개)를 매매하게 하려면 식을 어떻게 수정해야 할까요?
감사합니다.
2017-11-30
146
글번호 114614
답변완료
수식부탁드립니다.
항상노고가 많으십니다.
참조식이 vr 매도신호일때
본주 매수식 부탁드립니다.
감사합니다.
2017-11-30
151
글번호 114613
답변완료
수식문의
안녕하세요
하기 수식 문의 드립니다.
저는 10분봉과 30분 봉을 보고 있습니다.
10분봉을 data1 , 30분 봉을 data2로 잡았을 때,
1.
볼린져 밴드의 폭이 같거나 작아질때, 가격이 볼린져 밴드 상단에 닿으면,
해당봉의 볼린져 밴드 상단 가격으로 매도 진입.
볼린져 밴드의 폭이 같거나 작아질때, 가격이 볼린져 밴드 하단에 닿으면,
해당봉의 볼린져 밴드 하단 가격으로 매수 진입.
10분봉 30분봉 두가지 모두 신호가 발생하도록 부탁드립니다.
부탁드립니다.
crossover가 아닌 닿는 즉시 부탁드립니다.
2.
저는 10분봉과 30분 봉을 보고 있습니다.
10분봉을 data1 , 30분 봉을 data2로 잡았을 때,
10분봉의 가격이 볼린져 밴드 하단에 닿았고, 30분 봉의 볼린져밴드 중앙 이평에 닿으면
매수 진입하는 수식 부탁드립니다.
이때 30분봉 볼린져 밴드의 중앙이평의 가격은 전봉대비 상승하고 있어야 합니다.
반대로, 10분봉의 가격이 볼린져 밴드 상단에 닿았고, 30분 봉의 볼린져밴드 중앙이평에
닿으면 매도 진입하는 수식 부탁드립니다.
이때도 30분봉 볼린져 밴드의 중앙이평의 가격은 전봉대비 하락하고 있어야 합니다.
crossover가 아니라 닿는 즉시 실행되게 부탁드립니다.
감사합니다.
2017-11-30
154
글번호 114612
답변완료
문의 드립니다
빠른 답변 감사합니다. ^.^
일봉에서 macd(12,29) 선이 시그널선 보다 위에 있고. 20일선 위에 종가가위치할때
일분봉 에서 시초가 매수진입
일봉에서 Macd 선이 시그널 선 보다 같거나 아래 있고, 20일선 아래 종가가 위치할때
일분봉에서 시초가 매도 진입
게시판 55708번 재질문 드렸는데 부탁드립니다.
감사합니다. .^^;;
2017-11-30
163
글번호 114609
답변완료
지표인지 강조인지 잘 모르겠습니다.
수고가 많으십니다.
강조가 정확하게 무엇인지 모르지만 강조로 분류했습니다만,
파라볼릭에 따라서 배경색을 darkgray와 lightgray로 구분해서 넣고 싶습니다.
강조를 넣으면 봉의 색이 바뀌는데 그것보다 파라볼릭에 따라서 배경색을 바꾸는 수식을 부탁합니다.
그리고 한 가지 더 있습니다.
오늘의 시가와 어제의 고가 및 저가에 수평선 3개를 긋고 싶습니다. 그리고 이것들의 수치를 각
수평선 위에 나타나게 하는데, 그 위치는 차트의 왼쪽끝이든 오른쪽끝이든 선택할 수 있게 하고 싶습니다.
감사합니다.
2017-11-30
190
글번호 114601
답변완료
문의드립니다
Input:length(5);
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);
Var:TL11(0),TL12(0),TL13(0),TL14(0),TL15(0),TL16(0),TL17(0),TL18(0),TL19(0),TL20(0),tx(0);
Var:TL21(0),TL22(0),TL23(0),TL24(0),TL25(0),TL26(0),TL27(0),TL28(0),TL29(0),TL30(0),mav(0),T(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);
TL_Delete(TL11);
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);
}
TL1 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],sDate[eBar],sTime[eBar],고점[1,1]);
//TL11 = TL_New(sDate[index-고점[2,2]],sTime[index-고점[2,2]],고점[2,1],sDate[1],sTime[1],고점[2,1]);
//Text1 = Text_New(sDate[eBar],sTime[eBar],고점[1,1],NumToStr(고점[1,1],2));
PlaySound("C:₩예스트레이더₩data₩Sound₩alert.wav");
TL_SetColor(TL1,BLACK);
//TL_SetColor(TL11,BLACK);
TL_SetSize(TL1,2);
//TL_SetSize(TL11,2);
If 고점[3,1] < 고점[2,1] and 고점[2,1] > 고점[1,1] and 저점[2,1] < 저점[1,1] Then
{
sBar = Index - 저점[2,2];
eBar = Index - 저점[1,2];
}
}
}
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);
TL_Delete(TL11);
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);
}
TL1 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],sDate[eBar],sTime[eBar],저점[1,1]);
//TL11 = TL_New(sDate[index-저점[2,2]],sTime[index-저점[2,2]],저점[2,1],sDate[1],sTime[1],저점[2,1]);
//Text1 = Text_New(sDate[eBar],sTime[eBar],저점[1,1],NumToStr(저점[1,1],2));
PlaySound("C:₩예스트레이더₩data₩Sound₩alert.wav");
TL_SetColor(TL1,BLACK);
//TL_SetColor(TL11,BLACK);
TL_SetSize(TL1,2);
//TL_SetSize(TL11,2);
If 저점[2,1] < 저점[1,1] and 저점[2,1] < 저점[3,1] and 고점[2,1] > 고점[1,1] Then
{
sBar = Index - 고점[2,2];
eBar = Index - 고점[1,2];
}
}
}
mav = ma(C,20);
TL_Delete(TL13);
TL_Delete(TL14);
if 고점[1,2] > 저점[1,2] then{
TL13 = TL_New(sDate[index-고점[1,2]],sTime[index-고점[1,2]],고점[1,1],sDate,sTime,고점[1,1]);
TL_SetColor(TL13,BLUE);
TL_SetSize(TL13,3);
}
if 고점[1,2] < 저점[1,2] then{
TL14 = TL_New(sDate[index-저점[1,2]],sTime[index-저점[1,2]],저점[1,1],sDate,sTime,저점[1,1]);
TL_SetColor(TL14,MAGENTA);
TL_SetSize(TL14,3);
}
plot1(index-고점 [1,2]);
plot2(index-저점 [1,2]);
아래지표추세방향전환지점꼭지점에 있는캔들에가격(고가,저가,종가)을 해당캔들로부터
수평으로 나오게,다음추세전환전까지 표시하는라인을 추가로부탁드립니다~`감사드립니다
2017-11-30
168
글번호 114600