커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
6158
글번호 230811
답변완료
수식 추가
늘 감사합니다.
아래수식을
1. data2에 사용할 수 있도록 변환해 주세요'
2. 고저 진폭은 틱수로 변경해 주세요
3. 최종꼭지점=고점(빨강색), 최종꼭지점=저점(파란색)에서 각각의 수평선을
추가해 주시고, 두깨조절가능 하게 추가해 주세요.
너무 감사히 잘 쓰고 있습니다.
Input:length(10),종가사용여부(0),파동선두께(2),수치표시(1);
Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""),
TL1(0),Text1(0),text2(0),TL2(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,1] = LL;
}
Condition1 = Highest(HH,length) == HH and 최종고가 <> HH;
Condition2 = Lowest (LL,length) == LL and 최종저가 <> LL;
처리구분 = "";
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
{
최종고가 = HH; // 신규고점을 체크하기 위해 저장
If 최종꼭지점 == "저점" Then
{
For j = 10 DownTo 2
{
For jj = 1 To 4
{
고[j,jj] = 고[j-1,jj];
}
}
고[1,1] = HH;
고[1,2] = Index;
고[1,3] = sDate;
고[1,4] = sTime;
TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
var1 = 고[2,1]-저[1,1];
TL2 = TL_New(저[1,3],저[1,4],저[1,1]-var1,sDate,sTime,저[1,1]-var1);
If 수치표시 == 1 Then
{
Text1 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1],2));
Text_SetStyle(Text1, 2, 1);
Text2 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1]-저[1,1],2)+NewLine);
Text_SetStyle(Text2, 2, 1);
Text_SetColor(text2,RED);
}
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,GREEN);
TL_SetSize(TL2,파동선두께);
TL_SetColor(TL2,BLUE);
}
Else If 고[1,1] < HH Then // 1번 고점보다 높은 고가 출현
{
고[1,1] = HH;
고[1,2] = Index;
고[1,3] = sDate;
고[1,4] = sTime;
TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]);
TL_SetEnd(TL2,고[1,3],고[1,4],저[1,1]-var1);
// 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임
If 수치표시 == 1 Then
{
Text_SetLocation(Text1,고[1,3],고[1,4],고[1,1]);
Text_SetString(Text1,NumToStr(고[1,1],2));
Text_SetLocation(Text2,고[1,3],고[1,4],고[1,1]);
Text_SetString(Text2,NumToStr(고[1,1]-저[1,1],2)+NewLine);
}
}
최종꼭지점 = "고점";
}
#==========================================#
If 처리구분 == "저점처리" Then
{
최종저가 = LL;
If 최종꼭지점 == "고점" then
{
For j = 10 DownTo 2
{
For jj = 1 To 4
{
저[j,jj] = 저[j-1,jj];
}
}
저[1,1] = LL;
저[1,2] = Index;
저[1,3] = sDate;
저[1,4] = sTime;
TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
var1 = 고[1,1]-저[2,1];
TL2 = TL_New(고[1,3],고[1,4],고[1,1]+var1,sDate,sTime,고[1,1]+var1);
If 수치표시 == 1 Then
{
Text1 = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(저[1,1],2));
Text_SetStyle(Text1, 2, 0);
Text2 = Text_New(저[1,3],저[1,4],저[1,1],NewLine+NumToStr(저[1,1]-고[1,1],2));
Text_SetStyle(Text2, 2, 0);
Text_SetColor(text2,RED);
}
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,GREEN);
TL_SetSize(TL2,파동선두께);
TL_SetColor(TL2,RED);
}
Else If 저[1,1] > LL then
{
저[1,1] = LL;
저[1,2] = Index;
저[1,3] = sDate;
저[1,4] = sTime;
TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]);
TL_SetEnd(TL2,저[1,3],저[1,4],고[1,1]+var1);
If 수치표시 == 1 Then
{
Text_SetLocation(Text1,저[1,3],저[1,4],저[1,1]);
Text_SetString(Text1,NumToStr(저[1,1],2));
Text_SetLocation(Text2,저[1,3],저[1,4],저[1,1]);
Text_SetString(Text2,NewLine+NumToStr(저[1,1]-고[1,1],2));
}
}
최종꼭지점 = "저점";
}
감사합니다.
2022-01-08
1304
글번호 155259
답변완료
수식 도움을 부탁드립니다ㅠ
15분봉을 기준으로
전봉의 종가가 20봉 혹은 60봉 이동평균선 위에 있을 때
전봉 종가의 -2% 가격으로 매수 주문을 넣습니다.
매수가 대비 5% 수익시 매도하며 매도되지 못하면 종가에 시장가 청산합니다.
위 조건을 15분마다 반복하고 싶습니다.
바쁘실텐데 죄송합니다 ㅠ
공부를 이제 시작했는데 많이 부족해서 도움을 요청드립니다!
감사합니다.
2022-01-08
1508
글번호 155258
답변완료
문의드립니다.
항상 귀한 답변에 다시한번 감사드립니다.
아래와 같이 요청드려 value1로 좋은 답변을 받았습니다.
1차와 2차 시기에는 1개만, 3차와 4차 시기에는 2개씩, 5차와 6차 시기에는 3개씩
이렇게 2단계 혹은 3단계,4,5단계 마다 진입량을 1개씩 늘려가며 진입할 수 있도록 변경 원합니다.
만약 1차,2차,3차/ 4차,5차,6차/7차,8차,9차/...3단계씩 마다 1개 추가하거나
1-4차/2-8차/9-12차/...4단계씩 마다 1개 추가
1-5차/6-10차/11-15차/...5단계씩 마다 1개 추가
위와같이 단계를 유연하게 하여 1개를 추가하는 식으로 변경 부탁드립니다.
감사합니다^^.수고하세요.
안녕하세요
예스스탁입니다.
수식에 value1로 회차별 수량을 계산하는 로직만 계산식만 추가하고 신호함수에 적어드리지 못했습니다.
아래 수정한 식입니다.
#상승구간의 마지막저점 저장
if Color == RED Then
{
var1 = 저점[2,1];
}
#하락구간의 마지막 고점 저장
if Color == BLUE Then
{
var2 = 고점[2,1];
}
if MarketPosition <= 0 Then
{
if color == BLUE and var1 > 0 and L > var1-PriceScale*50 Then
Buy("b",AtLimit,var1-PriceScale*50,1);
}
if MarketPosition == 1 Then
{
value1 = Floor(MaxEntries/2)+1;
Buy("bb",AtLimit,(var1[BarsSinceEntry]-PriceScale*50)-(PriceScale*50)*MaxEntries,value1);
if T == -1 and 고점[1,1] > 0 Then
ExitLong("bx1",AtLimit,고점[1,1]+PriceScale*1);
if T == 1 and 고점[2,1] > 0 Then
ExitLong("bx2",AtLimit,고점[2,1]+PriceScale*1);
}
if MarketPosition >= 0 Then
{
if Color == RED and Var2 > 0 and H < var2+PriceScale*50 Then
Sell("s",AtLimit,Var2+PriceScale*50,1);
}
if MarketPosition == -1 Then1
{
value1 = Floor(MaxEntries/2)+1;
Sell("ss",AtLimit,(var2[BarsSinceEntry]+PriceScale*50)+(PriceScale*50)*MaxEntries,value1);
if T == 1 and 저점[1,1] > 0 Then
ExitShort("sx1",AtLimit,저점[1,1]-PriceScale*1);
if T == -1 and 저점[2,1] > 0 Then
ExitShort("sx2",AtLimit,저점[2,1]-PriceScale*1);
}
즐거운 하루되세요
> 번성 님이 쓴 글입니다.
> 제목 : 문의드립니다.
> 먼저 좋은 답변 감사드립니다.
아래 답변처럼 해주셔서 기대한 대로 잘 되고 있습니다.
하나 더 부탁드리고 싶은 것은
2022-01-07
1196
글번호 155257
답변완료
문의
조언을 참고하여 값을 키우니 시뮬레이션이 됩니다.
그런데 진입시간이 의도와 달리 일찍 나옵니다.
수식대로라면 09시20분 이후에 진입해야하는데
대부분 09시12분에 진입하는 결과가 나옵니다.
부탁드립니다.
***********************************************************************************
input : 추세(1.2);
input : StartTime1(090000),EndTime1(091000);
input : StartTime2(091000),EndTime2(092000);
var : Tcond1(false),tcond2(False);
var : h1(0),l1(0),s1(0),v1(0),h2(0),l2(0),s2(0),v2(0),k(0);
if (sdate != sdate[1] and stime >= EndTime1) or
(sdate == sdate[1] and stime >= EndTime1 and stime[1] < EndTime1) Then
Tcond1 = False;
if (sdate != sdate[1] and stime >= StartTime1) or
(sdate == sdate[1] and stime >= StartTime1 and stime[1] < StartTime1) Then
{
Tcond1 = true;
h1 = h;
l1 = l;
s1 = 0;
}
if (sdate != sdate[1] and stime >= EndTime2) or
(sdate == sdate[1] and stime >= EndTime2 and stime[1] < EndTime2) Then
Tcond2 = False;
if (sdate != sdate[1] and stime >= StartTime2) or
(sdate == sdate[1] and stime >= StartTime2 and stime[1] < StartTime2) Then
{
Tcond2 = true;
h2 = h;
l2 = l;
s2 = 0;
}
if Tcond1 == true Then
{
if h > h1 Then
h1 = h;
if l < l1 Then
l1 = l;
s1 = s1+Oi;
v1 = (h1-l1)*1000000/s1;
}
if Tcond2 == true Then
{
if h > h2 Then
h2 = h;
if l < l2 Then
l2 = l;
s2 = s2+Oi;
v2 = (h2-l2)*1000000/s2;
k = v2-v1;
if k >= 추세 Then
Buy();
}
2022-01-07
1450
글번호 155256
답변완료
수식 문의
다음 수식과 그림은, data2 의
'당일 기준' / '전봉 대비 증감'을 막대그래프로 그려본 것입니다.
그런데 이 수식의 문제가, 그림에서 처럼
시초가 첫봉을 시작으로 전봉의 차이를 비교하는 조건 때문에,
시초가 봉은 data2에 '그 값이 있음에도', 비교대상이 주어지지 않아
값이 안 나오게 됩니다. 그래서,
수식 문의 1 ::
시초가 첫봉만 그 비교값을 0으로 잡아서
첫봉에도 막대그래프가 표현되도록 수정하고 싶습니다.
수식 문의 2 ::
위 수정된 수식에 다음의 조건값을 추가하고 싶습니다.
plot1. 상승평균값 :: '당일기준' '상승막대만'의 '평균값'을 선으로 긋고
plot2. 그 마지막 값은 다음날까지 선으로 그어줍니다.
plot3. 하락평균값 :: '당일기준' '하락막대만'의 '평균값'을 선으로 긋고
plot4. 그 마지막 값을 다음날까지 선으로 그어줍니다.
5. 막대표시 1 :: '상승평균값' 보다 높은 상승막대는 rgb#.#.# 색을 칠합니다.
6. 막대표시 2 :: '하락평균값' 보다 높은 하락막대는 rgb#.#.# 색을 칠합니다.
수식 문의 2 ::
위의 5,6 조건을 강조식으로 구현하고 싶습니다.
== 다음 수식 ==
input : starttime(090000),endtime(154500);
var : Tcond(false,data2),idx(0,data2),VV(0,data2);
if data2((sdate != sdate[1] and stime >= starttime) or
(sdate == sdate[1] and stime >= starttime and stime[1] < starttime)) then
{
Tcond = true;
idx = 0;
}
if data2((sdate != sdate[1] and stime >= endtime) or
(sdate == sdate[1] and stime >= endtime and stime[1] < endtime)) then
{
Tcond = false;
VV = 0;
}
if Tcond == true then
{
idx = idx+1;
if idx == 1 Then
vv = 0;
Else
vv = data2(C-C[1]);
}
if VV > 0 Then
plot1(VV,"양수");
if VV < 0 Then
plot2(VV,"음수");
2022-01-10
1560
글번호 155255
답변완료
수식 문의드립니다.
안녕하세요 키움증권이랑 nh를 같이쓰고있는데
키움증권에서 제공되는 체결강도를 그래프화 시키고 싶습니다
일봉상에서 볼수 있는 그래프와
분봉상에서 볼수 있는 그래프 식 부탁드립니다.
또한 일봉상의 체결강도그래프를 분봉상에서도 그려주는 식 부탁드립니다.
ex)일봉상 5이평을 분봉상으로 가져오는 개념
2022-01-07
1482
글번호 155249
100수 님에 의해서 삭제되었습니다.
2022-01-07
0
글번호 155248
답변완료
문의 드립니다
안녕하세요
1. 전환선이 기준선 위에 있고, 동시에 우상향하는 조건과
2. 전환선과 기준선이 겹치면서 우상향 조건을 부탁드립니다.
수고하세요
2022-01-07
1221
글번호 155247
답변완료
안녕하세요 도움 부탁드립니다.
안녕하세요 도움 부탁드립니다.
아무리 제가 해보려 해봐도 마음대로 원하는게 나오지 않습니다 ㅠㅠ
아래의 수식은 수식지왕님의 range bar 차트입니다.
제가 구현하고 싶어하는 것은 아래와 같습니다.
1. Range bar 한개당 매매 한번만 실행
2. A라는 조건이 만족되면 매수 진입
3. 변수로 Range bar 한개당 매매 횟수를 설정
if OO != OO[1] Then
Entry = 0 ;
If entry == 0 and A then Buy();
라고 하거나
if bars == bars[BarsSinceEntry]+1 and A then Buy();
이렇게 하면 진입은 제대로 되는데, A라는 조건을 만족할때마다 자꾸 매수 시그널이 나갑니다.
range bar 하나당 한번만 진입하게는 어떻게 하나요?
참고로 If A then entry = 1;
이렇게 해서 진입을 막으려해도 되지가 않습니다 ㅠㅠ
=================
Input:tick(300);
Var:j(0),k(0),n(0),trend(0),tickVal(0),oneTick(0),count(0),remain(0);
Array:OO[1000](0),HH[1000](0),LL[1000](0),CC[1000](0),val[4](0);
#==============================================================================#
# Range Bar Chart 계산
#==============================================================================#
If Index == 0 Then
{
tickVal = tick * PriceScale;
oneTick = PriceScale;
OO[0] = O;
HH[0] = O;
LL[0] = O;
CC[0] = O;
}
count = 0;
val[0] = O;
val[3] = C;
If O > C Then
{
val[1] = H;
val[2] = L;
If L < C Then trend = 1;
Else trend = -1;
}
Else If O < C Then
{
val[1] = L;
val[2] = H;
If H > C Then trend = -1;
Else trend = 1;
}
Else If C[1] > O Then
{
val[1] = L;
val[2] = H;
If H > C Then trend = -1;
Else trend = 1;
}
Else If C[1] < O Then
{
val[1] = H;
val[2] = L;
If L < C Then trend = 1;
Else trend = -1;
}
Else If trend == 1 Then
{
val[1] = H;
val[2] = L;
If L < C Then trend = 1;
Else trend = -1;
}
Else If trend == -1 Then
{
val[1] = L;
val[2] = H;
If H > C Then trend = -1;
Else trend = 1;
}
For k = 0 To 3
{
If HH[0] > 0 && HH[0] < val[k] Then
{
While val[k] - LL[0] > tickVal
{
HH[0] = LL[0] + tickVal;
CC[0] = HH[0];
For j = 998 DownTo 0
{
OO[j+1] = OO[j];
HH[j+1] = HH[j];
LL[j+1] = LL[j];
CC[j+1] = CC[j];
}
count = count + 1;
OO[0] = HH[1] + oneTick;
LL[0] = OO[0];
}
If val[k] - LL[0] <= tickVal Then
{
HH[0] = val[k];
CC[0] = val[k];
}
}
Else If LL[0] > val[k] Then
{
While HH[0] - val[k] > tickVal
{
LL[0] = HH[0] - tickVal;
CC[0] = LL[0];
For j = 998 DownTo 0
{
OO[j+1] = OO[j];
HH[j+1] = HH[j];
LL[j+1] = LL[j];
CC[j+1] = CC[j];
}
count = count + 1;
OO[0] = LL[1] - oneTick;
HH[0] = OO[0];
}
If HH[0] - val[k] <= tickVal Then
{
LL[0] = val[k];
CC[0] = val[k];
}
}
Else
{
CC[0] = val[k];
}
}
2022-01-07
1210
글번호 155235