커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
6596
글번호 230811
답변완료
지표문의
1.아래는 수식지님이 작성한 지표입니다
알구 싶은것은 마지막 파동선끝이 선물지수(data1) 값 얼마다를 알구 싶습니다
그래서 파동선 마지막에 선물지수가 269.00 이다 표시되게 끔 좀 작성 해주세요.
#==========================================#
# 지표명 : RSI다이버전스 주가파동선
# 작성자 : 수식지왕
# 블로그 : http://yahoosir.blog.me
#==========================================#
Input:Period(14),Rsi변동폭(5);
Var:j(0),상승(100),하락(-100),양방향(2),추세(0),
파동선(0),Rsi파동선(0),방향(0),RsiV(0),추세선(0);
Array:고[20](0),저[20](0),고Bar[20](0),저Bar[20](0),
Rsi고[20](0),Rsi저[20](0),Rsi고Bar[20](0),Rsi저Bar[20](0);
RsiV = RSI(Period);
#==========================================#
# 전고점,전저점 index 증가
#==========================================#
For j = 1 To 19
{
Rsi고Bar[j] = Rsi고Bar[j] + 1;
Rsi저Bar[j] = Rsi저Bar[j] + 1;
저Bar[j] = 저Bar[j] + 1;
고Bar[j] = 고Bar[j] + 1;
}
#==========================================#
# 최근 고,저 갱신
#==========================================#
If Rsi고[0] <= RsiV || Rsi고[0] == 0 || IsNaN(Rsi고[0]) == True Then
{
Rsi고[0] = RsiV;
Rsi고Bar[0] = 0;
}
Else
Rsi고Bar[0] = Rsi고Bar[0] + 1;
If Rsi저[0] >= RsiV || Rsi저[0] == 0 || IsNaN(Rsi저[0]) == True Then
{
Rsi저[0] = RsiV;
Rsi저Bar[0] = 0;
}
Else
Rsi저Bar[0] = Rsi저Bar[0] + 1;
If 고[0] <= H || 고[0] == 0 || IsNaN(고[0]) == True Then
{
고[0] = H;
고Bar[0] = 0;
}
Else
고Bar[0] = 고Bar[0] + 1;
If 저[0] >= L || 저[0] == 0 || IsNaN(저[0]) == True Then
{
저[0] = L;
저Bar[0] = 0;
}
Else
저Bar[0] = 저Bar[0] + 1;
#==========================================#
# 추세방향 결정
#==========================================#
If Rsi저[0][1] + Rsi변동폭 > RsiV[1] &&
Rsi저[0][1] + Rsi변동폭 <= RsiV Then 방향 = 상승;
If Rsi고[0][1] - Rsi변동폭 < RsiV[1] &&
Rsi고[0][1] - Rsi변동폭 >= RsiV Then 방향 = 하락;
#==========================================#
# 추세변화에 따른 변곡점 처리
#==========================================#
If 방향[1] == 하락 && 방향 == 상승 Then
{
For j = 18 DownTo 1
{
Rsi저[j+1] = Rsi저[j];
Rsi저Bar[j+1] = Rsi저Bar[j];
저[j+1] = 저[j];
저Bar[j+1] = 저Bar[j];
}
Rsi저[1] = Rsi저[0];
Rsi저Bar[1] = Rsi저Bar[0];
Rsi파동선 = Rsi저[0];
Rsi저[0] = RsiV;
Rsi저Bar[0] = 0;
Rsi고[0] = RsiV;
Rsi고Bar[0] = 0;
저[1] = 저[0];
저Bar[1] = 저Bar[0];
파동선 = 저[0];
저[0] = L;
저Bar[0] = 0;
고[0] = H;
고Bar[0] = 0;
}
Else If 방향[1] == 상승 && 방향 == 하락 Then
{
For j = 18 DownTo 1
{
Rsi고[j+1] = Rsi고[j];
Rsi고Bar[j+1] = Rsi고Bar[j];
고[j+1] = 고[j];
고Bar[j+1] = 고Bar[j];
}
Rsi고[1] = Rsi고[0];
Rsi고Bar[1] = Rsi고Bar[0];
Rsi파동선 = Rsi고[0];
Rsi고[0] = RsiV;
Rsi고Bar[0] = 0;
Rsi저[0] = RsiV;
Rsi저Bar[0] = 0;
고[1] = 고[0];
고Bar[1] = 고Bar[0];
파동선 = 고[0];
고[0] = H;
고Bar[0] = 0;
저[0] = L;
저Bar[0] = 0;
}
Else If 방향[1] == 하락 && 방향 == 하락 Then
{
If Rsi고[1] < Rsi고[0] &&
Rsi고[0][1] - Rsi변동폭 <= RsiV[1] &&
Rsi고[0][1] - Rsi변동폭 > RsiV Then
{
Rsi고[1] = Rsi고[0];
Rsi고Bar[1] = Rsi고Bar[0];
Rsi파동선 = Rsi고[0];
Rsi고[0] = RsiV;
Rsi고Bar[0] = 0;
}
If 고[1] < 고[0] &&
고[0] > H Then
{
고[1] = 고[0];
고Bar[1] = 고Bar[0];
파동선 = 고[0];
고[0] = H;
고Bar[0] = 0;
}
}
Else If 방향[1] == 상승 && 방향 == 상승 Then
{
If Rsi저[1] > Rsi저[0] &&
Rsi저[0][1] + Rsi변동폭 >= RsiV[1] &&
Rsi저[0][1] + Rsi변동폭 < RsiV Then
{
Rsi저[1] = Rsi저[0];
Rsi저Bar[1] = Rsi저Bar[0];
Rsi파동선 = Rsi저[0];
Rsi저[0] = RsiV;
Rsi저Bar[0] = 0;
}
If 저[1] > 저[0] &&
저[0] < L Then
{
저[1] = 저[0];
저Bar[1] = 저Bar[0];
파동선 = 저[0];
저[0] = L;
저Bar[0] = 0;
}
}
#==========================================#
# 지표식 출력
#==========================================#
If Rsi파동선[1] != Rsi파동선 Then Plot1(파동선); //적당껏 수평이동
Else If LastBarOnChart == 1 Then plot1(Iff(방향 == 상승,고[0],저[0]));
#상승 다이버전스 : 주가의 저점 하락 + 지표의 저점 상승
If 저[2] > 저[1] &&
Rsi저[2] < Rsi저[1] Then
{
추세선 = (저[1]-저[2])/(저Bar[2]-저Bar[1])*저Bar[2] + 저[2];
Plot2(추세선);
}
#하락 다이버전스 : 주가의 고점 상승 + 지표의 고점 하락
if 고[2] < 고[1] &&
Rsi고[2] > Rsi고[1] Then
{
추세선 = (고[1]-고[2])/(고Bar[2]-고Bar[1])*고Bar[2] + 고[2];
Plot3(추세선);
}
2. 그럼 즐거운 주말 되세요.
2015-04-17
223
글번호 85125
답변완료
켄들의 값
수고하십니다
켄들의 포지션이 오른쪽에 나와 있는것과 마우스로 켄들 값과의
차이가 있읍니다
해결 방법을 알고 싶씁니다
2015-04-16
176
글번호 85122
답변완료
30분봉차트
안녕하세요
해외선물 3분차트에서 직전30분봉의 고가 저가 종가의 가격을
현재진행중인 30분동안 3분차트에 선으로 표시되게 부탁합니다.
현재시간이 23시6분이라면 직전30분봉의(22시30분부터 23시까지)
고저종가를 현채 3분차트에(30분간) 표시하게 바랍니다.
이런식으로 해외선물에서 장시작후 매30분간격으로 장마감까지
수식부탁합니다.
한가지 질문이 있는데요 한국투자증권의 이프랜드 글로벌 쓰고있는데
이건 봉의 시간을 찍어보면 완성시간이던데 예스트레이더는 봉시간이
시작시간입니다.이프랜드 봉의 시간을 예트처럼 시작시간으로
바꿀순 없나요?
수고하세요
2015-04-16
212
글번호 85121
답변완료
수식 검토 바랍니다.
저번 질문 과 답변에서 부족한점이 있어 다시 질문 드립니다.
아래 두 가지 수식모두 청산 방법이 다섯 가지 입니다.
저번 질문에서 답해주신 "진입봉 종가 청산"함수도 다른 네가지 청산과 마찬가지로 "또는"으로 작성 되어있는지요?
그러니까 다섯가지 청산함수 중에 아무거나 한가지 함수만 만족해도 청산 되도록 짜여져있는지 궁금합니다.
만약 그렇지 않다면 "또는"으로 해서 두 수식을 작성해 주신면 감사 하겠습니다.
부탁 드립니다.
안녕하세요
예스스탁입니다.
진입 봉 종가 청산이 어떤 의미이신지 모르겠습니다.
진입후 해당봉의 종가에 무조건 청산하시는 내용이면 아래와 같습니다.
1.
input : 시가대비틱수(5),손절틱수(10),익절틱수(20),최고수익대비하락틱수(10);
input : X(5),Y(10),A(5),B(5);
if MarketPosition <= 0 Then
buy("b",AtStop,NextBarOpen+PriceScale*시가대비틱수);
if MarketPosition >= 0 then
sell("s",AtStop,NextBarOpen-PriceScale*시가대비틱수);
if MarketPosition == 1 Then{
exitlong("btr1",AtStop,Highest(H,BarsSinceEntry)-PriceScale*최고수익대비하락틱수);
if highest(h,BarsSinceEntry) >= EntryPrice+PriceScale*x and highest(H,BarsSinceEntry) < EntryPrice+PriceScale*y Then
exitlong("btr2",AtStop,highest(H,BarsSinceEntry)-PriceScale*a);
if highest(h,BarsSinceEntry) >= EntryPrice+PriceScale*y Then
exitlong("btr3",AtStop,highest(H,BarsSinceEntry)-PriceScale*b);
}
if MarketPosition == -1 Then{
ExitShort("sx",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*최고수익대비하락틱수);
if lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*x and Lowest(L,BarsSinceEntry) > EntryPrice-PriceScale*y Then
ExitShort("str2",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*a);
if Lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*y Then
ExitShort("str3",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*b);
}
ExitLong("매수진입봉종가청산");
ExitShort("매도진입봉종가청산");
SetStopProfittarget(PriceScale*손절틱수,PointStop);
SetStopLoss(PriceScale*익절틱수,PointStop);
2.
input : 시가대비틱수(5),손절틱수(10),익절틱수(20),최고수익대비하락틱수(10);
input : X(5),Y(10),A(5),B(5);
if MarketPosition <= 0 and NextBarOpen >= C Then
buy("b",AtStop,NextBarOpen+PriceScale*시가대비틱수);
if MarketPosition >= 0 and NextBarOpen < C then
sell("s",AtStop,NextBarOpen-PriceScale*시가대비틱수);
if MarketPosition == 1 Then{
exitlong("btr1",AtStop,Highest(H,BarsSinceEntry)-PriceScale*최고수익대비하락틱수);
if highest(h,BarsSinceEntry) >= EntryPrice+PriceScale*x and highest(H,BarsSinceEntry) < EntryPrice+PriceScale*y Then
exitlong("btr2",AtStop,highest(H,BarsSinceEntry)-PriceScale*a);
if highest(h,BarsSinceEntry) >= EntryPrice+PriceScale*y Then
exitlong("btr3",AtStop,highest(H,BarsSinceEntry)-PriceScale*b);
}
if MarketPosition == -1 Then{
ExitShort("sx",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*최고수익대비하락틱수);
if lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*x and Lowest(L,BarsSinceEntry) > EntryPrice-PriceScale*y Then
ExitShort("str2",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*a);
if Lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*y Then
ExitShort("str3",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*b);
}
ExitLong("매수진입봉종가청산");
ExitShort("매도진입봉종가청산");
SetStopProfittarget(PriceScale*손절틱수,PointStop);
SetStopLoss(PriceScale*익절틱수,PointStop);
즐거운 하루되세요
> 재정적자유 님이 쓴 글입니다.
> 제목 : 진입 봉 종가 청산 부탁합니다.
> 1.
input : 시가대비틱수(5),손절틱수(10),익절틱수(20),최고수익대비하락틱수(10);
input : X(5),Y(10),A(5),B(5);
if MarketPosition <= 0 Then
buy("b",AtStop,NextBarOpen+PriceScale*시가대비틱수);
if MarketPosition >= 0 then
sell("s",AtStop,NextBarOpen-PriceScale*시가대비틱수);
if MarketPosition == 1 Then{
exitlong("btr1",AtStop,Highest(H,BarsSinceEntry)-PriceScale*최고수익대비하락틱수);
if highest(h,BarsSinceEntry) >= EntryPrice+PriceScale*x and highest(H,BarsSinceEntry) < EntryPrice+PriceScale*y Then
exitlong("btr2",AtStop,highest(H,BarsSinceEntry)-PriceScale*a);
if highest(h,BarsSinceEntry) >= EntryPrice+PriceScale*y Then
exitlong("btr3",AtStop,highest(H,BarsSinceEntry)-PriceScale*b);
}
if MarketPosition == -1 Then{
ExitShort("sx",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*최고수익대비하락틱수);
if lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*x and Lowest(L,BarsSinceEntry) > EntryPrice-PriceScale*y Then
ExitShort("str2",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*a);
if Lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*y Then
ExitShort("str3",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*b);
}
SetStopProfittarget(PriceScale*손절틱수,PointStop);
SetStopLoss(PriceScale*익절틱수,PointStop);
2번
input : 시가대비틱수(5),손절틱수(10),익절틱수(20),최고수익대비하락틱수(10);
input : X(5),Y(10),A(5),B(5);
if MarketPosition <= 0 and NextBarOpen >= C Then
buy("b",AtStop,NextBarOpen+PriceScale*시가대비틱수);
if MarketPosition >= 0 and NextBarOpen < C then
sell("s",AtStop,NextBarOpen-PriceScale*시가대비틱수);
if MarketPosition == 1 Then{
exitlong("btr1",AtStop,Highest(H,BarsSinceEntry)-PriceScale*최고수익대비하락틱수);
if highest(h,BarsSinceEntry) >= EntryPrice+PriceScale*x and highest(H,BarsSinceEntry) < EntryPrice+PriceScale*y Then
exitlong("btr2",AtStop,highest(H,BarsSinceEntry)-PriceScale*a);
if highest(h,BarsSinceEntry) >= EntryPrice+PriceScale*y Then
exitlong("btr3",AtStop,highest(H,BarsSinceEntry)-PriceScale*b);
}
if MarketPosition == -1 Then{
ExitShort("sx",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*최고수익대비하락틱수);
if lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*x and Lowest(L,BarsSinceEntry) > EntryPrice-PriceScale*y Then
ExitShort("str2",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*a);
if Lowest(L,BarsSinceEntry) <= EntryPrice-PriceScale*y Then
ExitShort("str3",AtStop,Lowest(L,BarsSinceEntry)+PriceScale*b);
}
SetStopProfittarget(PriceScale*손절틱수,PointStop);
SetStopLoss(PriceScale*익절틱수,PointStop);
위 두 로직에 진입 봉 종가 청산 함수가 없는것 같습니다.
" 진입 봉 종가 청산 " 함수를 두 로직에 넣어 주십시요.
감사 합니다.
2015-04-16
169
글번호 85120
재정적자유 님에 의해서 삭제되었습니다.
2015-04-16
0
글번호 85119
답변완료
질문드립니다
1. 분봉차트에서 일봉이평(5,20,60) 구현
2. 분봉차트에서 타주기 분봉 이평(5,20,60) 구현
1, 2번 둘다 갭보정한 코팅 부탁드립니다
2015-04-16
162
글번호 85118
답변완료
부탁드립니다
미안합니다 *41364 문의번호
1. var1이 다음낮은봉 고가를따라가는선과,var2가 고가를따라가는선(첨부파일참조1)
(수식에서 변경요망)
2.대칭된 고점라인선에서+0.2피.+0.2피선
대칭된 저점라인선에서-0.2피,-0.2피선(첨부파일참조2)
2015-04-16
213
글번호 85117
답변완료
수식 부탁드립니다
1
macd 에서 골든 크로스나오면 매수신호
데드 나오면 매도신호
매수매도 진입후에 반대신호 나오면 자동스윗칭
청산목표는 50틱 자동
2
만약에 첫진입후 반대신호나와서 -청산됄때는 자동으로 처음 진입한 수량의 2배로 진입해서 목표수익은 역시 50틱자동청산
신호는 13시부터 나오게 해주시고 첫번째 진입익절시 매매종료,,만약손절돼서 두번째 반대로 2배수량진입시 50틱 익절이든 반대신호 나와서 손절이든 그날 매매종료 신호 안나오게 해주세요
너무복잡한가요,감사합니다........수식받아서 시스템식 한곳에 넣으면 돼나요
2015-04-16
188
글번호 85116
답변완료
검토 좀 해주세요!!!
아래의 수식에서 첨부 된 차트와 같이 부분적으로 진입과 청산이 다중으로 발생되는 부분이 있습니다. 검토 후 수정해 주시면 감사 하겠습니다.
아마도
# 주 시스템부분의
# Exits
IF LReaction == 0 Then
ExitLong("lx",atstop,LExit);
IF SReaction == 0 Then
ExitShort("sx",atstop,SExit); 부분과
# 보조 시스템 부분의
If MarketPosition == 0 Then {
If LRLs > upv Then Buy("b2");
If LRLs < dnv Then Sell("s2");
}
이 부분이 상호 충돌로 일어나는 현상인 듯 합니다.
# 1) 주 시스템부분
Inputs: ChanLen(14), Reaction(4), TCount(1), Setup(6);
Vars: HiChan(0), LoChan(0), LReaction(0), LReacHigh(0), LReacLow(0), SReaction(0),
SReacHigh(0), SReacLow(0), LThrust(0), SThrust(0), LEntry(0), LExit(0), SEntry(0), SExit(0),
NewLThrust(False), NewSThrust(False), LTR(False), STR(False);
# Assignment of values for the High/Low Channel
HiChan = Highest(High, ChanLen)[1];
LoChan = Lowest(Low, ChanLen)[1];
# Reversal Breakout - Initial Setup
IF MarketPosition <> 1 Then {
IF High > HiChan Then {
LReaction = 1;
LReacHigh = High;
LReacLow = Low;
LExit = LReacLow;
LThrust = 0;
SReaction = 0;
}
}
Else {
LReaction = 0;
LThrust = 0;
}
# Reversal Breakout - Initial Setup
IF MarketPosition <> -1 Then {
IF Low < LoChan Then {
SReaction = 1;
SReacHigh = High;
SReacLow = Low;
SExit = SReacLow;
SThrust = 0;
LReaction = 0;
}
}
Else {
SReaction = 0;
LThrust = 0;
}
# Upward Trend Resumption
IF LReaction >= 1 Then {
IF Low < LExit Then {
LExit = Low;
LThrust = 0;
}
IF High < LReacHigh AND Low < LReacLow Then {
LReaction = LReaction + 1;
LReacHigh = High;
LReacLow = Low;
NewLThrust = True;
}
}
# Downward Trend Resumption
IF SReaction >= 1 Then {
IF High > SExit Then {
SExit = High;
SThrust = 0;
}
IF Low > SReacLow AND High > SReacHigh Then {
SReaction = SReaction + 1;
SReacLow = Low;
SReacHigh = High;
NewSThrust = True;
}
}
# Bullish Thrust Day accumulation
IF LReaction >= Reaction AND Close > High[1] Then
LThrust = LThrust + 1;
# Bearish Thrust Day accumulation
IF SReaction >= Reaction AND Close < Low[1] Then
SThrust = SThrust + 1;
# Thrust Count Completion
LTR = LThrust == TCount AND NewLThrust;
STR = SThrust == TCount AND NewSThrust;
# Entry Price Setup
IF LTR Then {
LEntry = High + 0.1 ;
NewLThrust = False;
}
IF STR Then {
SEntry = Low - 0.1 ;
NewSThrust = False;
}
# Entries
IF MRO(LTR, Setup, 1) <> -1 Then
Buy("b1",atstop,LEntry);
IF MRO(STR, Setup, 1) <> -1 /*AND SReaction >= Reaction */Then
Sell("s1",atstop,SEntry);
# Exits
IF LReaction == 0 Then
ExitLong("lx",atstop,LExit);
IF SReaction == 0 Then
ExitShort("sx",atstop,SExit);
# 2) 보조 시스템 부분
Input : LRLP(9),sig(5);
input : A(3),MU(2);
var : LRLv(0),LRLs(0),UPv(0),dnv(0),Ov(0);
LRLv = LRL(C,LRLP);
LRLs = ema(LRLv,sig);
Ov = (DayOpen(2)+DayOpen(1)+ DayOpen(0))/3; #3일간시가평균
if dayindex == 0 Then{
upv = Ov+atr(A)*MU;
dnv = Ov-atr(A)*MU;
}
if dayindex > 0 Then
{
if CrossUp(LRLs,upv) Then
{
upv = upv[1]+atr(A)*MU;
dnv = upv[1];
}
if CrossDown(LRLs,dnv) Then
{
upv = dnv[1];
dnv = dnv[1]-atr(A)*MU;
}
}
If MarketPosition == 0 Then {
If LRLs > upv Then Buy("b2");
If LRLs < dnv Then Sell("s2");
}
# 선물 만기청산
var: month(0),nday(0),week(0);
month = int(date/100)-int(date/10000)*100;
nday = date - int(date/100)*100;
week = DayOfWeek(date);
if month%3 == 0 and nday >= 8 and nday <= 14 and week == 4 then
SetStopEndofday(144000);
Else
SetStopEndofday(0);
2015-04-16
242
글번호 85114