커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
7235
글번호 230811
오늘도수익 님에 의해서 삭제되었습니다.
2018-07-13
13
글번호 120557
답변완료
문의드립니다
항셍
당일 10시 15분 기준으로 중심선 수식 부탁드립니다
2018-07-13
151
글번호 120556
답변완료
문의 드립니다
아래 시스템에서 진입시점 이후 지정한 시간(5분)내에 지정한 수익률(3%)이 나오지 않으면 청산하는 수식 추가부탁드립니다. 두 변수는 input값으로 부탁드립니다. 아울러 검증도 한번 부탁드립니다. 아래 외부변수 중 per값이 지정수익률(3%)보다 작을때 수식에 오류가 생길까요?
input : 매수금액(1000000);
input : Per(5);
var : Evol(0),Xcnt(0),OpenCond(false),Xcond1(false),Xcond2(false),Xcond3(false);
if stime == 153000 and NextBarOpen <= C*1.08 and NextBarOpen > C*1.00 Then
{
buy("b",AtMarket,def,Floor(매수금액/C));
}
//SetStopTrailing(2,10,PercentStop,1); //최소 10% 수익 이후에 최고 가격대비 2% 하락하면 청산
if MarketPosition == 1 Then
{
SetStopLoss(4);
#봉완성시 다음봉 시가가 진입가 대비 5% 이상 상승하면 true
if NextBarOpen >= EntryPrice*(1+Per/100) Then
OpenCond = true;
#BP1 청산이 발생하면 Xcond1은 true
if LatestExitName(0) == "BP1" Then
Xcond1 = true;
#BP2 청산이 발생하면 Xcond2은 true
if LatestExitName(0) == "BP2" Then
Xcond2 = true;
#BP3 청산이 발생하면 Xcond3은 true
if LatestExitName(0) == "BP3" Then
Xcond3 = True;
#OpenCond가 false일때
if OpenCond == false Then{
if Xcond1 == false then
ExitLong("BP1",atlimit,EntryPrice(0)*1.03,"",Floor(MaxContracts*0.3),1);
if Xcond2 == false then
ExitLong("BP2",atlimit,EntryPrice(0)*1.04,"",Floor(MaxContracts*0.4),1);
if Xcond3 == false then
ExitLong("BP3",atlimit,EntryPrice(0)*1.05);
}
#OpenCond가 true일떄
if OpenCond == true Then
{
#BP1로 청산이 안된 경우만 발생
if Xcond1 == false Then
ExitLong("BP6",atlimit,EntryPrice*(1+(Per+3)/100),"",Floor(MaxContracts*0.3),1);
#BP2로 청산이 안된 경우만 발생
if Xcond2 == false Then
ExitLong("BP7",atlimit,EntryPrice*(1+(Per+4)/100),"",Floor(MaxContracts*0.4),1);
#BP3로 청산이 안된 경우만 발생
if Xcond3 == false Then
ExitLong("BP8",atlimit,EntryPrice*(1+(Per+5)/100));
#5%이하로 가격하락하면 전량처산
exitlong("BP5",AtStop,EntryPrice*(1+Per/100));
}
SetStopEndofday(151000);
}
#매수포지션이 아니면 모두 false로 초기화
if MarketPosition != 1 Then{
OpenCond = false;
Xcond1 = false;
Xcond2 = false;
Xcond3 = false;
SetStopLoss(0);//해제
SetStopEndofday(0);//해제
}
2018-07-13
178
글번호 120555
답변완료
안녕하세요? 수식 부탁드립니다.
안녕하세요?
Input : shortPeriod(20), longPeriod(120);
위의 변수가
Golden Cross 발생후
아래의 수식이 (수식의 조건이 부합할때)
계속하여 매수신호가 발생하는 (피라미딩; 모든 진입신호 허용)
수식을 부탁드립니다
Input : shortPeriod(5), longPeriod(20);
value1 = ma(C, shortPeriod);
value2 = ma(C, longPeriod);
# 매수/매도청산
If CrossUP(value1, value2) Then
{
Buy();
}
감사합니다.
2018-07-13
173
글번호 120551
답변완료
문의드립니다.
안녕하세요.
분봉 거래 시에
당일 시작부터 10시까지의 고점을
10시 이후에 돌파(또는 고점에 1프로 접근)
단, 쌍봉 형태인 경우(10시 이전에 고점을 찍고 2~3프로라도 하락한 후에 재차 상승)
이런 검색식 문의 드립니다.
감사합니다.
2018-07-13
180
글번호 120546
답변완료
수식 요청드립니다.
수식 요청드립니다.
아래 식의
매수 조건 만족 후 var1 > var11 and crossup(value1,80)
스토케스틱 80이상이고 봉 종가 선차트가 하강후 다시 상승하기 시작하면 매수
매도 조건 만족 후 var2 < var22 and CrossDown(value1,20)
스토케스틱 20이하이고 봉 종가 선차트가 상승후 다시 하강하기 시작하면 매수
Marketposition 1일때 50틱 익절, 50틱 손절
Marketposition -1일때 50틱 익절, 50틱 손절
Input : Period(12), Period1(5), Period2(5);
var : H1(0),L1(0),H2(0),L2(0);
Value1 = StochasticsD(Period,Period1,PEriod2);
Condition1 = value1 > 80;
Condition2 = value1 < 20;
if Condition1 == true and Condition1[1] == false Then{
H1 = H;
L1 = L;
}
if Condition1 == true then
{
if h > H1 Then
H1 = h;
if l < L1 Then
L1 = l;
}
if Condition1 == false and Condition1[1] == true Then
{
var1 = (H1+L1)/2;
var11 = var1[1];
}
if Condition2 == true and Condition2[1] == false Then{
H2 = H;
L2 = L;
}
if Condition2 == true then
{
if h > H2 Then
H2 = h;
if l < L2 Then
L2 = l;
}
if Condition2 == false and Condition2[1] == true Then
{
var2 = (H2+L2)/2;
var22 = var2[1];
}
#### 매수,매도 조건#####
if var1 > var11 and crossup(value1,80) Then
buy();
if var2 < var22 and CrossDown(value1,20) Then
sell();
2018-07-13
171
글번호 120545
답변완료
부탁 드립니다.
도움주심에 깊이 감사 드립니다.
그림과 같이 부탁 드립니다.
Input:length(10);
Var:TL1(0),TL2(0),TL2_exist(0),color(0),
종가사용여부(0), // 종가로 계산하려면 1로 설정한다.
TL_NewBit(0), // 1:NewLine 2:SetEndLine
slope(0),mid_idx(0),mid_val(0);
Array:고[10,4](0),저[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime
#==========================================#
Value1 = HiLoLineZigZag(length,종가사용여부,고,저,TL_NewBit);
// HiLoLineZigZag는 사용자함수입니다. 링크에서 내려받으세요..
If Value1 == 1 Then { // 고점
If TL_NewBit == 1 Then { // 신규
If 고[2,1] < 고[1,1] Then { // 신규 고점이 이전 고점을 상향 돌파
// y = 기울기 * x + 절편
// x = (y - 절편) / 기울기
// y = 고[2,1]
// 절편 = 저[1,1]
slope = (고[1,1] - 저[1,1]) / (고[1,2] - 저[1,2]); // 추세선의 기울기
mid_idx = Floor((고[2,1] - 저[1,1]) / slope); // 고[2,1]과 만나는 지점
mid_val = slope * mid_idx + 저[1,1];
Var1 = Index - (저[1,2] + mid_idx); // 추세선의 중간지점 x좌표
TL1 = TL_New(저[1,3],저[1,4],저[1,1],sDate[Var1],sTime[Var1],mid_val);
TL2 = TL_New(sDate[Var1],sTime[Var1],mid_val,고[1,3],고[1,4],고[1,1]);
Var2 = Index - 저[1,2]; // 이전 색깔을 따라감
TL_SetColor(TL1,color[Var2]);
color = RED; // 상향 돌파했으므로 빨간색으로 전환
TL_SetColor(TL2,color);
TL2_exist = 1; // 추세선 2개를 연결해서 그린 것이므로 추세선이 2개임을 저장
} Else {
TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
TL_SetColor(TL1,color);
TL2_exist = 0;
}
}
If TL_NewBit == 2 Then { // 연장
TL_Delete(TL1);
If TL2_exist == 1 Then TL_Delete(TL2); // 추세선이 2개면 두번째 추세선도 삭제
If 고[2,1] < 고[1,1] Then {
slope = (고[1,1] - 저[1,1]) / (고[1,2] - 저[1,2]);
mid_idx = Floor((고[2,1] - 저[1,1]) / slope);
mid_val = slope * mid_idx + 저[1,1];
Var1 = Index - (저[1,2] + mid_idx);
TL1 = TL_New(저[1,3],저[1,4],저[1,1],sDate[Var1],sTime[Var1],mid_val);
TL2 = TL_New(sDate[Var1],sTime[Var1],mid_val,고[1,3],고[1,4],고[1,1]);
Var2 = Index - 저[1,2];
TL_SetColor(TL1,color[Var2]);
color = RED;
TL_SetColor(TL2,color);
TL2_exist = 1;
} Else {
TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
TL_SetColor(TL1,color);
TL2_exist = 0;
}
}
} Else If Value1 == -1 Then { // 저점
If TL_NewBit == 1 Then { // 신규
If 저[2,1] > 저[1,1] Then {
slope = (저[1,1] - 고[1,1]) / (저[1,2] - 고[1,2]);
mid_idx = Floor((저[2,1] - 고[1,1]) / slope);
mid_val = slope * mid_idx + 고[1,1];
Var1 = Index - (고[1,2] + mid_idx);
TL1 = TL_New(고[1,3],고[1,4],고[1,1],sDate[Var1],sTime[Var1],mid_val);
TL2 = TL_New(sDate[Var1],sTime[Var1],mid_val,저[1,3],저[1,4],저[1,1]);
Var2 = Index - 고[1,2];
TL_SetColor(TL1,color[Var2]);
color = BLUE;
TL_SetColor(TL2,color);
TL2_exist = 1;
} Else {
TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
TL_SetColor(TL1,color);
TL2_exist = 0;
}
}
If TL_NewBit == 2 Then { // 연장
TL_Delete(TL1);
If TL2_exist == 1 Then TL_Delete(TL2);
If 저[2,1] > 저[1,1] Then {
slope = (저[1,1] - 고[1,1]) / (저[1,2] - 고[1,2]);
mid_idx = Floor((저[2,1] - 고[1,1]) / slope);
mid_val = slope * mid_idx + 고[1,1];
Var1 = Index - (고[1,2] + mid_idx);
TL1 = TL_New(고[1,3],고[1,4],고[1,1],sDate[Var1],sTime[Var1],mid_val);
TL2 = TL_New(sDate[Var1],sTime[Var1],mid_val,저[1,3],저[1,4],저[1,1]);
Var2 = Index - 고[1,2];
TL_SetColor(TL1,color[Var2]);
color = BLUE;
TL_SetColor(TL2,color);
TL2_exist = 1;
} Else {
TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
TL_SetColor(TL1,color);
TL2_exist = 0;
}
}
}
TL_SetSize(TL1,2);
TL_SetSize(TL2,2);
함수식)
#==========================================#
# 사용자함수 : 고저라인 지그재그 파동
# 버 전 : 1.2
# 작 성 자 : 수식지왕
# 블 로 그 : http://yahoosir.blog.me
#==========================================#
Input:Length(NumericSimple),useCLprice(NumericSimple),
oHiZZ[MaxSize1,MaxSize2](NumericArrayRef), // 열번호 1:가격,2:Index,3:sDate,4:sTime
oLoZZ[MaxSize3,MaxSize4](NumericArrayRef),
oTL_NewBit(NumericRef); // 1:NewLine 2:SetEndLine
Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분("");
#==========================================#
HH = IFF(useCLprice==1,C,H);
LL = IFF(useCLprice==1,C,L);
If Index == 0 Then {
oHiZZ[1,1] = HH;
oLoZZ[1,1] = LL;
}
Condition1 = Highest(HH,length) == HH and 최종고가 <> HH;
Condition2 = Lowest (LL,length) == LL and 최종저가 <> LL;
처리구분 = "";
If Condition1 and Condition2 Then { // 기간고점과 기간저점 동시 발생
If oHiZZ[1,1] < HH and oLoZZ[1,1] > LL Then { // 기존의 파동을 벗어난 경우
If HH - oHiZZ[1,1] > oLoZZ[1,1] - LL Then // 많이 벗어난 쪽으로 처리
처리구분 = "고점처리";
Else If HH - oHiZZ[1,1] < oLoZZ[1,1] - LL Then
처리구분 = "저점처리";
Else If 최종꼭지점 == "저점" Then // 벗어난 정도가 동일하면 지그재그 순서대로
처리구분 = "고점처리";
Else
처리구분 = "저점처리";
} Else If oLoZZ[1,1] > LL Then 처리구분 = "저점처리";
Else If oHiZZ[1,1] < HH Then 처리구분 = "고점처리";
Else If 최종꼭지점 == "저점" Then 처리구분 = "고점처리";
Else 처리구분 = "저점처리";
} Else If Condition1 Then 처리구분 = "고점처리";
Else If Condition2 Then 처리구분 = "저점처리";
oTL_NewBit = 0;
#==========================================#
If 처리구분 == "고점처리" Then {
최종고가 = HH; // 신규고점을 체크하기 위해 저장
If 최종꼭지점 == "저점" Then {
For j = 10 DownTo 2 {
For jj = 1 To 4 {
oHiZZ[j,jj] = oHiZZ[j-1,jj];
}
}
oHiZZ[1,1] = HH;
oHiZZ[1,2] = Index;
oHiZZ[1,3] = sDate;
oHiZZ[1,4] = sTime;
oTL_NewBit = 1;
} Else If oHiZZ[1,1] < HH Then { // 1번 고점보다 높은 고가 출현
oHiZZ[1,1] = HH;
oHiZZ[1,2] = Index;
oHiZZ[1,3] = sDate;
oHiZZ[1,4] = sTime;
oTL_NewBit = 2;
}
최종꼭지점 = "고점";
}
#==========================================#
If 처리구분 == "저점처리" Then {
최종저가 = LL;
If 최종꼭지점 == "고점" then {
For j = 10 DownTo 2 {
For jj = 1 To 4 {
oLoZZ[j,jj] = oLoZZ[j-1,jj];
}
}
oLoZZ[1,1] = LL;
oLoZZ[1,2] = Index;
oLoZZ[1,3] = sDate;
oLoZZ[1,4] = sTime;
oTL_NewBit = 1;
} Else If oLoZZ[1,1] > LL then {
oLoZZ[1,1] = LL;
oLoZZ[1,2] = Index;
oLoZZ[1,3] = sDate;
oLoZZ[1,4] = sTime;
oTL_NewBit = 2;
}
최종꼭지점 = "저점";
}
If 최종꼭지점 == "고점" Then HiLoLineZigZag = 1;
Else If 최종꼭지점 == "저점" Then HiLoLineZigZag = -1;
Else HiLoLineZigZag = 0;
2018-07-16
349
글번호 120544
답변완료
문의드립니다.~
input : 분주기(30),P(5),분주기1(15),분주기2(5);
var : S1(0),D1(0),TM(0),TF(0);
var : cnt(0),sum(0),mav(0),tf1(0),TFF(0),entry(false),tf2(0);
Array : CC[100](0),OO[100](0),HH[100](0),LL[100](0),TT[100](0),ii[100](0),O2[100](0);
Array : C1[100](0),T1[100](0);
if (sdate != sdate[1] and stime >= 100000) or
(sdate == sdate[1] and (Stime == 100000 or (stime > 100000 and stime[1] < 100000))) Then{
S1 = TimeToMinutes(100000);
D1 = sdate;
}
if D1 > 0 then{
if sdate == D1 Then
TM = TimeToMinutes(stime)-S1;
Else
TM = TimeToMinutes(stime)+1440-S1;
TFF = TM%60;
TF = TM%분주기;
if (sdate != sdate[1] and stime >= 100000) or
(sdate == sdate[1] and (Stime == 100000 or (stime > 100000 and stime[1] < 100000))) or
(TF < TF[1]) Then{
OO[0] = o;
HH[0] = H;
LL[0] = L;
TT[0] = stime;
ii[0] = 0;
for cnt = 1 to 99{
OO[cnt] = OO[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
CC[cnt] = CC[cnt-1][1];
TT[cnt] = TT[cnt-1][1];
ii[cnt] = ii[cnt-1][1];
}
}
if H > HH[0] Then
HH[0] = H;
if L < LL[0] Then
LL[0] = L;
CC[0] = C;
ii[0] = ii[0]+1;
TF1 = TM%분주기1;
if (sdate != sdate[1] and stime >= 100000) or
(sdate == sdate[1] and (Stime == 100000 or (stime > 100000 and stime[1] < 100000))) or
(TF1 < TF1[1]) Then{
T1[0] = stime;
for cnt = 1 to 99{
C1[cnt] = C1[cnt-1][1];
T1[cnt] = T1[cnt-1][1];
}
}
C1[0] = C;
TF2 = TM%분주기2;
if (sdate != sdate[1] and stime >= 100000) or
(sdate == sdate[1] and (Stime == 100000 or (stime > 100000 and stime[1] < 100000))) or
(TF2 < TF2[1]) Then{
O2[0] = o;
for cnt = 1 to 99{
O2[cnt] = O2[cnt-1][1];
}
}
}
질문사항:
항생에서 30분봉의 5일이평선을 구할려고 합니다.~
위 식을 가지고 var72 = (c+oo[0]+oo[1]+oo[2]+oo[3])/5 ;
이렇게 해서 30분봉의 5일이평선을 구하게 되면은
나스닥은 괜찮은데 항생에서 문제가 있거든요..
영웅문w 그림에서 보면은 전날 새벽1시30분부터 시작된 30분봉이 새벽1시30분~새벽2시 사이에 완성이 되고 그리고나서 새로운30분봉은 다음날 항생시가~10시30분까지완성된 봉으로 나타납니다.
따라서 만약10시50분에 30분봉의5일이평선을 구할려면
10시50분의종가+10시30분종가+전일새벽2시경종가+전일새벽1시30분종가+전일새벽1시종가/5
이렇게 구해야 되는데 즉 영웅문w그림에서 30분봉의5개의 평균으로 구해야 되는데
문제점이 그림에서 보면은 항생시가가격으로 분주기표현식에 표현이 되어서 10시15분의 종가 가격이 포함이 되면 안되는데 포함되어버리는 부분이랑
전일의1시30분~2시까지의 30분봉의 종가가격도 분주기표현식에 포함이 안되는걸로 계산이 되더라구요.
계산해 보면은 전일1시30분종가가격 다음에 바로 당일10시15분종가가격으로 계산이 되는 문제점이 있습니다.
이부분 해결할 방법이 있을까요?
즉 분주기표현식으로 10시50분에 30분봉의 5일이평선가격을 구할때에
위에 표현해 놓은대로
10시50분종가+10시30분종가+전일새벽2시경종가+전일새벽1시30분종가+전일1시종가/5
이렇게 적용할 수 있는 방법이 있을까요?
10시30분부터 30분봉의5개봉이 지나는 시점부터는 문제가 없습니다.
그리고 이전문의 식 구해주셔서 너무너무 감사합니다ㅜ
매번 도움주셔서 너무 감사한 마음이에요~
////////////////////
이전질문과 동일한 내용이구요.
수정해 주신식으로 적용해 보니 원하는대로 나옵니다.
그런데 문제가 전일1시30~2시까지 봉이 틱봉으로 계산되는거라
어떤날은 2시경에 틱봉이 완성봉이 나오면 다음날 시초가가 반영이 안되고 바로 10시30분으로 넘어오는데 어떤날은 2시경에 틱봉이 완성이 안되면 다음날시초가로 전일의 1시30분봉의 완성봉이 넘어와 버려서요`
얘기해 주신대로 당일시작가격을10시30분으로 하고
전일끝나는 시간을1시50분으로 매일 고정해서 사용할 수 는 없을까요?
즉 1시30분에 시작되어서 2시에 완성되는 봉은 1시50분에 끝나고
이후로 다시 오전10시30분부터 시작되는걸로요~
상관은 없지만 이전식에서 전일12시봉이 생성되지 않아서 위 식으로 다시 문의드립니다
분주기식은 여러번 봤는데 이해하기가 어려워서요
손을 못대겠습니다.
위 식에서 30분 분주기만 사용할려면
TF = TM%분주기; ->이거밑으로는 그냥 삭제하고 사용하면 되는거죠?
30분 분주기만 해서 적용부탁드립니다. 감사합니다.~
2018-07-12
202
글번호 120542
답변완료
문의 드립니다
늘 소중하고 신속한 답변 감사드립니다
1.
어제 질문드린 것을 다시 설명하여 문의드립니다
위의 그림에서
IF BW_SEVEN>=BW_SEVEN[1] and BW_SEVEN[1]>=BW_SEVEN[2] and BW_SEVEN[2]>=BW_SEVEN[3]
Then buy
라는 식은
바이너리 7이 지속적으로 3회 같거나 상승할때 매수하라라는 식입니다
그런데 동그라미 부분
즉 바이너리 7이 -5~-7 구간은 몇번을 반복하더라도 1회로 표시가 되고 -5를 빠져나왔을때 부터 2회 3회가 같거나 상승할때 매수하라라고 만들고 싶습니다
-5~-7 또는 5~7 구간을 제외한 구간에서는 위의 식을 만족하고고요
제가 설명이 많이 부족하죠
번거롭게 해드려 죄송합니다
감사합니다
2018-07-12
177
글번호 120541