커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
4404
글번호 230811
답변완료
문의드립니다
1
소수점이하를 모두 제외하신 다면 아래와 같이 작성하시면 됩니다.
floor(c)가 소수제외한 값입니다.
var1 = Floor(c);
if MarketPosition <= 0 and H < var1 Then
buy("b",AtStop,var1);
if MarketPosition >= 0 and L > var1 Then
sell("s",AtStop,var1);
이렇게 답변주셨는데 제가 질문한거는 예를들어 s&p라하면 2750이나 2650, 2550 즉 앞에 두자리와 상관없이 50에 오면 되면 무조건 매수진입하고 싶다는 말이었습니다 답변부탁드려요
2018-06-29
173
글번호 120173
답변완료
수식수정 부탁드립니다.
1)
분할매도가 마무리되어 물량이 0 이 되는날에
그당일은 다시 1차든 2차든 재매수가 안일어났으면 합니다.
2)
지금식은 1차분할매수하고 2차매수가
1차매수후 시간의 흐름에 따라 매도가 한번도 안일어났을때만되는거 같은데요
2차매수는
1차매수후 매도가 몇번이든 발생한 것과 상관없이
예를들어 1차매수후 "매도 1-2" 일어난후에
매수2차가격까지 오면 매수2차매수가 일어났으면 좋겠구요
1차매수부터의 시간의 흐름으로 진행한걸로 매도가 일어났으면 좋겠습니다.
예를들어 1차매수가 발생하고 "매도1-1" "매도1-2"가 진행되다가 주가가 떨어져서
매수2차가에 와서 매수2차가 발생되면 그후에는
매수1차와 2차가 합쳐져서 "매도 1-3"에서 매도가 일어나는 식으루요.
결국 매도는 "매도1-8" 전량 매도가 되어 물량이 0이 되게 하고 싶습니다.
3)
이게 불가능한거면
2차매수가 된시점부터 8분할 매도가 진행되어도 상관없습니다.
감사합니다.
input : 투자금액(1000000),투자비율1(50),투자비율2(50);
var : m1(0),m2(0),dd(0);
m1 = 투자금액*(투자비율1/100);
m2 = 투자금액*(투자비율2/100);
if bdate != bdate[1] Then
{
dd = dd+1;
Condition1 = false;
}
if MarketPosition == 0 and Condition1 == false and DayHigh < DayClose(1)*1.08 Then
{
buy("매수1",atlimit,DayClose(1)*0.985,Floor(m1/(c*0.985)));
}
if MarketPosition == 1 Then
{
if CurrentContracts < CurrentContracts[1] Then
Condition1 = true;
if CurrentContracts > CurrentContracts[1] and MaxEntries == 1 Then
var1 = dd;
if MaxEntries == 1 and Condition1 == false Then
buy("매수2",atlimit,DayClose(1)*0.955,Floor(m2/(c*0.955)));
if EntryTime < 92000 Then
{
if dd == var1 and stime >= 93500 and stime[1] < 93500 Then
ExitLong("매도 1-1",OnClose,def,"",Floor(CurrentContracts*0.12),1);
if dd == var1 and stime >= 103000 and stime[1] < 103000 Then
ExitLong("매도 1-2",OnClose,def,"",Floor(CurrentContracts*0.14),1);
if dd == var1 and stime >= 110000 and stime[1] < 110000 Then
ExitLong("매도 1-3",OnClose,def,"",Floor(CurrentContracts*0.16),1);
if dd == var1 and stime >= 134000 and stime[1] < 134000 Then
ExitLong("매도 1-4",OnClose,def,"",Floor(CurrentContracts*0.20),1);
if dd == var1 and stime >= 143000 and stime[1] < 143000 Then
ExitLong("매도 1-5",OnClose,def,"",Floor(CurrentContracts*0.25),1);
if dd == var1+1 and stime >= 93000 and stime[1] < 93000 Then
ExitLong("매도 1-6",OnClose,def,"",Floor(CurrentContracts*0.33),1);
if dd == var1+1 and stime >= 94300 and stime[1] < 94300 Then
ExitLong("매도 1-7",OnClose,def,"",Floor(CurrentContracts*0.50),1);
if dd == var1+1 and stime >= 105000 and stime[1] < 105000 Then
ExitLong("매도 1-8");
}
if EntryTime >= 92000 and EntryTime < 110000 Then
{
if dd == var1 and stime >= 110000 and stime[1] < 110000 Then
ExitLong("매도2-1",OnClose,def,"",Floor(CurrentContracts*0.12),1);
if dd == var1 and stime >= 134000 and stime[1] < 134000 Then
ExitLong("매도2-2",OnClose,def,"",Floor(CurrentContracts*0.14),1);
if dd == var1 and stime >= 143000 and stime[1] < 143000 Then
ExitLong("매도2-3",OnClose,def,"",Floor(CurrentContracts*0.16),1);
if dd == var1+1 and stime >= 93500 and stime[1] < 93500 Then
ExitLong("매도2-4",OnClose,def,"",Floor(CurrentContracts*0.20),1);
if dd == var1+1 and stime >= 103000 and stime[1] < 103000 Then
ExitLong("매도2-5",OnClose,def,"",Floor(CurrentContracts*0.25),1);
if dd == var1+1 and stime >= 110000 and stime[1] < 110000 Then
ExitLong("매도2-6",OnClose,def,"",Floor(CurrentContracts*0.33),1);
if dd == var1+1 and stime >= 134000 and stime[1] < 134000 Then
ExitLong("매도2-7",OnClose,def,"",Floor(CurrentContracts*0.50),1);
if dd == var1+1 and stime >= 143000 and stime[1] < 143000 Then
ExitLong("매도2-8");
}
if EntryTime >= 110000 and EntryTime < 143000 Then
{
if dd == var1 and stime >= 143000 and stime[1] < 143000 Then
ExitLong("매도3-1",OnClose,def,"",Floor(CurrentContracts*0.14),1);
if dd == var1+1 and stime >= 93500 and stime[1] < 93500 Then
ExitLong("매도3-2",OnClose,def,"",Floor(CurrentContracts*0.16),1);
if dd == var1+1 and stime >= 103000 and stime[1] < 103000 Then
ExitLong("매도3-3",OnClose,def,"",Floor(CurrentContracts*0.20),1);
if dd == var1+1 and stime >= 110000 and stime[1] < 110000 Then
ExitLong("매도3-4",OnClose,def,"",Floor(CurrentContracts*0.25),1);
if dd == var1+1 and stime >= 134000 and stime[1] < 134000 Then
ExitLong("매도3-5",OnClose,def,"",Floor(CurrentContracts*0.33),1);
if dd == var1+1 and stime >= 143000 and stime[1] < 143000 Then
ExitLong("매도3-6",OnClose,def,"",Floor(CurrentContracts*0.50),1);
if dd == var1+2 and stime >= 93500 and stime[1] < 93500 Then
ExitLong("매도3-7");
}
if EntryTime >= 143000 Then
{
if dd == var1+1 and stime >= 93500 and stime[1] < 93500 Then
ExitLong("매도 4-1",OnClose,def,"",Floor(CurrentContracts*0.12),1);
if dd == var1+1 and stime >= 103000 and stime[1] < 103000 Then
ExitLong("매도 4-2",OnClose,def,"",Floor(CurrentContracts*0.14),1);
if dd == var1+1 and stime >= 110000 and stime[1] < 110000 Then
ExitLong("매도 4-3",OnClose,def,"",Floor(CurrentContracts*0.16),1);
if dd == var1+1 and stime >= 134000 and stime[1] < 134000 Then
ExitLong("매도 4-4",OnClose,def,"",Floor(CurrentContracts*0.20),1);
if dd == var1+1 and stime >= 143000 and stime[1] < 143000 Then
ExitLong("매도 4-5",OnClose,def,"",Floor(CurrentContracts*0.25),1);
if dd == var1+2 and stime >= 93500 and stime[1] < 93500 Then
ExitLong("매도 4-6",OnClose,def,"",Floor(CurrentContracts*0.33),1);
if dd == var1+2 and stime >= 94300 and stime[1] < 94300 Then
ExitLong("매도 4-7",OnClose,def,"",Floor(CurrentContracts*0.50),1);
if dd == var1+2 and stime >= 105000 and stime[1] < 105000 Then
ExitLong("매도 4-8");
}
}
2018-06-29
182
글번호 120162
답변완료
수식수정문의
아래 수식을 쓰다보니 제대로된 진입이 안됩니다. 수정및 조건추가만 부탁드리겠습니다.
조건추가 : 터틀에서쓰는 2ATR 손절
1. 매수진입 청산만
input : p1(55),P2(20);
var : cnt(0),h1(0),l1(0),h2(0),l2(0);
H1 = DayHigh(1);
L1 = daylow(1);
H2 = DayHigh(1);
L2 = daylow(1);
for cnt = 1 to max(P1,P2)
{
if cnt <= P1 Then
{
if DayHigh(cnt) > H1 Then
H1 = DayHigh(cnt);
if DayLow(cnt) < L1 Then
L1 = DayLow(cnt);
}
if cnt <= P2 Then
{
if DayHigh(cnt) > H2 Then
H2 = DayHigh(cnt);
if DayLow(cnt) < L2 Then
L2 = DayLow(cnt);
}
}
if crossup(h,h1) Then
buy("매수");
if CrossDown(l,l2) Then
sell("청산");
2. 매도진입 청산만
input : p1(55),P2(20);
var : cnt(0),h1(0),l1(0),h2(0),l2(0);
H1 = DayHigh(1);
L1 = daylow(1);
H2 = DayHigh(1);
L2 = daylow(1);
for cnt = 1 to max(P1,P2)
{
if cnt <= P1 Then
{
if DayHigh(cnt) > H1 Then
H1 = DayHigh(cnt);
if DayLow(cnt) < L1 Then
L1 = DayLow(cnt);
}
if cnt <= P2 Then
{
if DayHigh(cnt) > H2 Then
H2 = DayHigh(cnt);
if DayLow(cnt) < L2 Then
L2 = DayLow(cnt);
}
}
if CrossDown(l,l1) Then
sell("매도");
if crossup(h,h2) Then
buy("청산");
2018-06-29
168
글번호 120161
sungdong 님에 의해서 삭제되었습니다.
2018-06-29
5
글번호 120160
답변완료
시스템작성 부탁드립니다.
안녕하세요? 간단한 수식작성 부탁드립니다.
더운데 건강챙기시고, 감사합니다.^^
# 손절,익절 : 외부변수
# 진입후 청산이후 재진입 반복 ( 익절이든 손절이든 하기전에 신규진입 금지)
# 진입조건 (중간에 도지 1개는 허용)
1. 몸통길이 (외부변수)틱 양봉 다음 몸통길이 (외부변수)틱 음봉 나오면 매도
2. 몸통길이 (외부변수)틱 음봉 다음 몸통길이 (외부변수)틱 양봉 나오면 매수
2018-06-29
180
글번호 120159
답변완료
함수질문드립니다.
1. 함수이름 pivotlowvsbar
INPUTS: PRICE(NUMERICSERIES), LSTREN(NUMERICSIMPLE), RSTREN(NUMERICSIMPLE), LENGTH(NUMERIC);
VARS: SHBAR(0), MAINLOOP(0), PREPVT(0), PVTBAR(0);
PREPVT = 0;
FOR MAINLOOP = LENGTH-1 DOWNTO RSTREN begin
CONDITION1 = TRUE;
CONDITION2 = TRUE;
SHBAR = PRICE[MAINLOOP];
FOR VALUE1 = MAINLOOP - RSTREN TO MAINLOOP -1 BEGIN
IF SHBAR >= PRICE[VALUE1] THEN
CONDITION1 = FALSE;
END;
IF CONDITION1 THEN BEGIN
FOR VALUE1 = MAINLOOP + 1 TO MAINLOOP + LSTREN BEGIN
IF SHBAR > PRICE[VALUE1] THEN
CONDITION2 = FALSE;
END;
END;
IF CONDITION1 AND CONDITION2 THEN BEGIN
PREPVT = MAINLOOP;
PVTBAR = CURRENTBAR - MAINLOOP;
END;
END;
IF PREPVT <> 0 THEN
PIVOTLOWVSBAR = CURRENTBAR - PVTBAR
ELSE
PIVOTLOWVSBAR = -1;
////////
2. pivothighvsbar
INPUTS: PRICE(NUMERICSERIES), LSTREN(NUMERICSIMPLE), RSTREN(NUMERICSIMPLE), LENGTH(NUMERIC);
VARS: SHBAR(0), MAINLOOP(0), PREPVT(0), PVTBAR(0);
PREPVT = 0;
FOR MAINLOOP = LENGTH-1 DOWNTO RSTREN BEGIN
CONDITION1 = TRUE;
CONDITION2 = TRUE;
SHBAR = PRICE[MAINLOOP];
FOR VALUE1 = MAINLOOP - RSTREN TO MAINLOOP -1 BEGIN
IF SHBAR <= PRICE[VALUE1] THEN
CONDITION1 = FALSE;
END;
IF CONDITION1 THEN BEGIN
FOR VALUE1 = MAINLOOP + 1 TO MAINLOOP + LSTREN BEGIN
IF SHBAR < PRICE[VALUE1] THEN
CONDITION2 = FALSE;
END;
END;
IF CONDITION1 AND CONDITION2 THEN BEGIN
PREPVT = MAINLOOP;
PVTBAR = CURRENTBAR - MAINLOOP;
END;
END;
IF PREPVT <> 0 THEN
PIVOTHIGHVSBAR = CURRENTBAR - PVTBAR
ELSE
PIVOTHIGHVSBAR = -1;
3. volatility
Inputs: Length(NumericSimple);
If CurrentBar >= 1 AND Length <> 0 Then {
If CurrentBar == 1 Then <----- currentbar = 1 이다를 표현하고 싶은데 안되네요...
Volatility = TrueRange;
Else
Volatility = ((Length - 1) * Volatility[1] + TrueRange) / Length;
}
1 2 3의 경우 수식을 모두 숫자형으로 해야하는지요? 감사합니다.
2018-06-29
247
글번호 120158
답변완료
수식부탁합니다
안녕하세요>
항상 도움에 감사를 드립니다.
아래의 일봉지표를 5분봉 주기로 변환수식 부탁드립니다.
Input : RSIPeriod(14),sto1(14);
var : Sma1(0),Sma2(0),Sma3(0),StochRSI(0);
Variables: RSIcount(0), DownAmt(0), UpAmt(0), UpSum(0), DownSum(0), UpAvg(0), DownAvg(0),RSIv(0);
var : sumGap(0), gap(0), GO(0), GH(0), GL(0), GC(0);
if date!=date[1] then {
gap = Open-Close[1];
sumGap = sumGap+gap;
}
GO = O - sumGap;
GH = H - sumGap;
GL = L - sumGap;
GC = C - sumGap;
If CurrentBar == 1 AND RSIPeriod > 0 Then Begin
UpSum = 0;
DownSum = 0;
For RSIcount = 0 To RSIPeriod - 1 Begin
UpAmt = GC[RSIcount] - GC[RSIcount+1];
If UpAmt >= 0 Then
DownAmt = 0;
Else Begin
DownAmt = -UpAmt;
UpAmt = 0;
End;
UpSum = UpSum + UpAmt;
DownSum = DownSum + DownAmt;
End;
UpAvg = UpSum / RSIPeriod;
DownAvg = DownSum / RSIPeriod;
End
Else
If CurrentBar > 1 AND RSIPeriod > 0 Then Begin
UpAmt = GC[0] - GC[1];
If UpAmt >= 0 Then
DownAmt = 0;
Else Begin
DownAmt = -UpAmt;
UpAmt = 0;
End;
UpAvg = (UpAvg[1] * (RSIPeriod - 1) + UpAmt) / RSIPeriod;
DownAvg = (DownAvg[1] * (RSIPeriod - 1) + DownAmt) / RSIPeriod;
End;
If UpAvg + DownAvg <> 0 Then
RSIv = 100 * UpAvg / (UpAvg + DownAvg);
Else
RSIv = 0;
Sma1 = RSIV;
Sma2 = lowest(Sma1,sto1);
Sma3 = Highest(Sma1,sto1);
StochRSI = ((Sma1-Sma2)/(Sma3-Sma2))*100;
Plot1(StochRSI, "StochRSI");
PlotBaseLine1(20, "기준선20");
PlotBaseLine2(80, "기준선80");
PlotBaseLine3(50, "기준선50");
2018-06-28
224
글번호 120157
답변완료
수식문의드립니다
저번에 소수점이하 지정가 매매수식으로 문의 드렸었는데
var1 = Floor(c);
if MarketPosition <= 0 and H < var1+0.75 Then
buy("b",AtStop,var1+0.75);
if MarketPosition >= 0 and L > var1+0.25 Then
sell("s",AtStop,var1+0.25);
이렇게 답주셨는데 이번엔 정수지정가 매매를 작성하려고 하는데 어떻게 작성해야하나요?
예를들어 XX70.00 매수진입매도청산, XX20.00 매도진입매수청산
시간지정매매도 답변주셨는데 되지를 않네요 한번 확인해주세요~
if (bdate != bdate[1] and stime >= 80000) or
(bdate == bdate[1] and stime >= 80000 and stime[1] < 80000) Then
Tcond = true;
if (bdate != bdate[1] and stime >= 150000) or
(bdate == bdate[1] and stime >= 150000 and stime[1] < 150000) Then
Tcond = false;
if (bdate != bdate[1] and stime >= 200000) or
(bdate == bdate[1] and stime >= 200000 and stime[1] < 200000) Then
Tcond = true;
if (bdate != bdate[1] and stime >= 010000) or
(bdate == bdate[1] and stime >= 010000 and stime[1] < 010000) Then
Tcond = false;
2018-06-28
187
글번호 120156
답변완료
dayindex 함수값 수정 보안 요청합니다...!!!
해외시장의 경우 시작종료시간이 사장또는 종목마다 일정치 않는데..
챠트수식을 구사할때..
dayopen, dayhigh, daylow, dayclose 등은
해당일 시작-종료시각에 맞추어 시가,고가,저가 종가로 제대로 나옵니다.
그런데..
dayindex는 그냥 24시간 단위로 끊어서 나옵니다..
이 때문에 좀 난감한 부분이 있습니다..
dayindex도
해당종목의 시작시간 종료시간을 기준으로 고쳐야 할것 같습니다.
검토 후 수정-보완 조치 좀 해주었으면 합니다.
dayopen, dayhigh, daylow, dayclose 등은 제대로인데..
왜... dayindex 값은 24시간단위로 끊어버렸는지..!!!
저의 경우에는 이때문에 해당일(시작,종료시각)의 dayindex를
시각으로 산출하여 따로 만들어 쓰고 있는데..좀 답답합니다..
2018-06-28
221
글번호 120155