커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
8106
글번호 230811
답변완료
지표수정 부탁드립니다
#,아래수식의경우 (TL3,TL4,TL5,TL6)의 추세라인을 현재가(Y축) 까지 오른쪽 그리기로 연장
하는 수식을 추가하려면 어찌 구성해야 하는지 주석을 달아주시면 고맙겠습니다.
input : af(0.02), maxAF(0.2);
var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0),TL1(0),TL2(0),cnt(0),count(0);
var : TL3(0),TL4(0),TL5(0),TL6(0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
HH = H;
HD = sdate;
HT = stime;
if LL > 0 Then
{
TL1 = TL_new(LD[1],LT[1],LL[1],HD,HT,HH);
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL_Delete(TL6);
TL3 = TL_new(HD[1],HT[1],HH[1],sdate,stime,HH[1]);
TL4 = TL_new(HD[1],HT[1],(HH[1]+LL)/2,sdate,stime,(HH[1]+LL)/2);
TL5 = TL_new(HD[1],HT[1],LL,sdate,stime,LL);
TL6 = TL_new(HD[1],HT[1],HH[1]+(HH[1]-LL[1])/2,sdate,stime,HH[1]+(HH[1]-LL)/2);
}
}
if CrossDown(c,var1) Then
{
T = -1;
LL = L;
LD = sdate;
LT = stime;
if HH > 0 Then
{
TL2 = TL_new(HD[1],HT[1],HH[1],LD,LT,LL);
TL_Delete(TL3);
TL_Delete(TL4);
TL_Delete(TL5);
TL_Delete(TL6);
TL3 = TL_new(LD[1],LT[1],HH,sdate,stime,HH);
TL4 = TL_new(LD[1],LT[1],(HH+LL[1])/2,sdate,stime,(HH+LL[1])/2);
TL5 = TL_new(LD[1],LT[1],LL[1],sdate,stime,LL[1]);
TL6 = TL_new(LD[1],LT[1],LL[1]-(HH-LL[1])/2,sdate,stime,LL[1]-(HH-LL[1])/2);
}
}
if T == 1 then
{
if H > HH Then
{
HH = H;
HD = sdate;
HT = stime;
TL_SetEnd(TL1,HD,HT,HH);
}
}
if T == -1 then
{
if L < LL Then
{
LL = L;
LD = sdate;
LT = stime;
TL_SetEnd(TL2,LD,LT,LL);
}
}
###,매번 고맙습니다.
2018-05-10
303
글번호 118790
답변완료
문의드립니다.
도움주시는 덕분에 도전하고 있습니다. 매번 감사합니다.
1. 기타. 추세각 관련 건
여러 답변들 검색을 통해 각도를 작도할 수 없다는 내용은 여럿 확인했습니다. 그런데 아래 포스팅을 보니 높이/밑변을 구해서 자동추세선을 만드는 내용이 있더라구요.
http://yahoosir.blog.me/221174404310
차트가 움직일 때마다 축이 계속 바뀌어서 각도를 구할 수 없는 걸로 아는데요. 매번 동일한 추세선이 그려진다는 것(각도가 같은 추세선이 그려진다는 것)이 잘 이해가 가지 않습니다. 이게 앤드류 피치포크 선처럼 몇개의 점을 구하면 추세선이 어느 라인으로 지나갈 것인가(쉽게 말해 어떤 각도인가)를 구할 수 있다는 말인가요?
2.
그럼 특정 가격을 저점이라고 확정해놓으면 정확한 기울기는 아니더라도 어느 가격라인을 지나가는 추세선을 그릴 수 있는 건가요? 청산전략에 추세선을 사용할 수 있나 싶어서 질문드립니다.
2018-05-09
387
글번호 118789
답변완료
문의
AA = highest(C,60);
일봉에서 60봉중 최고종가를 AA로 했을 때
질문1) 분봉에서 AA의 값에 1% 이내로 근접한 종목을 검색하는 방법 좀 부탁드립니다.
질문2) 혹시 키움증권의 실시간 검색처럼 실시간검색도 가능합니까? 가능하다면 방법을 좀 부탁드립니다.
2018-05-09
289
글번호 118788
답변완료
함수요청
안녕하세요?
함수요청드립니다.
- 매수: 5일이평선>20일이평선
- 매도: 5일이평선<20일이평선
- 손절 : 50틱
- 익절 : 100틱
- 청산(손절, 익절)된 후 새로운 진입 신호가 발생시 N봉째 이후에도 신후가 유지된다면 N+1봉째에 주문을 생성
- 진입은 조건만족시 즉시
- 청산은 봉완성시
2018-05-09
264
글번호 118787
답변완료
시스템 성과가 이상합니다.
안녕하세요, 얼마전에 전에 래리 윌리엄스 돌파전략 시스템식 작성 의뢰하였는데,(57728번 글)
운영자님께서 작성해주신 수식은 아래와 같습니다.
----------------------------------------------------------------------------
if MarketPosition <= 0 and dayhigh < dayopen+(dayhigh(1)-daylow(1))*0.5 Then
buy("b",AtStop,dayopen+(dayhigh(1)-daylow(1))*0.5);
if MarketPosition == 1 Then{
ExitLong("bx",AtStop,dayopen);
if NextBarSdate > sdate Then
exitlong("bx2",AtMarket);
}
----------------------------------------------------------------------------
위 수식에서 첫째줄 dayhigh < dayopen+(dayhigh(1)-daylow(1))*0.5 가 아니라,
dayhigh > dayopen+(dayhigh(1)-daylow(1))*0.5 로 등호가 수정되어야 할 것 같아 수정했고,
시가 손절인 ExitLong("bx",AtStop,dayopen); 은 삭제하고 코스피200 지수 종합에다가
시스템을 돌려서 성과를 봤습니다.
그랬더니 위 첨부파일 1번과 같이 우하향 그래프가 나오네요?
근데 제가 엑셀 일봉으로 시뮬레이션 했을때는 우상향 그래프가 나옵니다.
어째서 이렇게 다른건지....확인 좀 부탁드려도 될까요?
2018-05-09
393
글번호 118785
답변완료
안녕하세요
옵션매수로 50틱 수익나면 50%청산을 하고 싶은데 식을 어떻게 만드나요??
그리고 만약 50틱이상 수익이나서 50% 빠지고 나머지는 그대로 남은 수량 청산되게 하고 싶습니다.
50틱이상 수익안나면 그냥 원래대로 청산식에 맞춰서 빠지구요
감사합니다^^
2018-05-09
259
글번호 118780
답변완료
손절과 익절
수고하십니다.
1. 최초 매매 신호에 의해 buy나 sell로 진입한 후
그 손절을 진입한 가격에서 선물지수로 1.5 point 손절이나 익절을 하는
매매식을 알고 싶습니다.
그렇지 않을 경우는 매수 신호인 경우 매도로 전환되고
매도인 경우 매수로 전환되게 해주시고요.
단.SetStopLoss 나
SetStopProfittarget 명령어가 아니고
exitlong 과 exitshort 를 사용해서
만들어 주세요.
2. 포지션이 있고 없고를 확인해서 있으면 반대 매매가
리버스가 되고
없으면 신규진입만 되게 식을 만들어 주십시오.
2018-05-09
296
글번호 118772
답변완료
부탁드립니다
아래 수식을 data2에 적용될수있도록 변경 부탁드립니다
_아래-
Input:length(20),X(1),Q(1),파동선두께(3),추세선두께1(1),추세선두께2(1),소수점아래자리수(2),z1(2),z2(1),p1(2),p2(0),숫자색(black),파동선색1(cyan),파동선색2(magenta),추세선색1(blue),추세선색2(red);
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);
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);
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);
}
if X == 1 Then
TL1 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],sDate[eBar],sTime[eBar],고점[1,1]);
if H < 고점[2,1] Then
TL_SetColor(TL1,파동선색1);
Else
TL_SetColor(TL1,파동선색2);
Text1 = Text_New(sDate[eBar],sTime[eBar],고점[1,1],NumToStr(abs(고점[1,1]-저점[1,1])/PriceScale,0)+NewLine+NumToStr(고점[1,1],소수점아래자리수));
Text_SetStyle(Text1, z1, z2);
If 고점[3,1] < 고점[2,1] and 고점[2,1] > 고점[1,1] and 저점[2,1] < 저점[1,1] Then
{
sBar = Index - 저점[2,2];
eBar = Index - 저점[1,2];
TL_SetExtLeft(TL2,false);
TL_SetExtRight(TL2,false);
if Q == 1 Then
TL2 = TL_New(sDate[sBar],sTime[sBar],저점[2,1],sDate[eBar],sTime[eBar],저점[1,1]);
TL_SetColor(TL2,추세선색1);
TL_SetExtLeft(TL2,true);
TL_SetExtRight(TL2,true);
}
}
}
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);
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);
}
if X == 1 Then
TL1 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],sDate[eBar],sTime[eBar],저점[1,1]);
TL_SetColor(TL1,추세선색2);
if L > 저점[2,1] Then
TL_SetColor(TL1,파동선색2);
Else
TL_SetColor(TL1,파동선색1);
Text1 = Text_New(sDate[eBar],sTime[eBar],저점[1,1],NumToStr(abs(고점[1,1]-저점[1,1])/PriceScale,0)+NewLine+NumToStr(저점[1,1],소수점아래자리수));
Text_SetStyle(Text1, p1, p2);
If 저점[2,1] < 저점[1,1] and 저점[2,1] < 저점[3,1] and 고점[2,1] > 고점[1,1] Then
{
sBar = Index - 고점[2,2];
eBar = Index - 고점[1,2];
TL_SetExtLeft(TL3,false);
TL_SetExtRight(TL3,false);
if Q == 1 Then
TL3 = TL_New(sDate[sBar],sTime[sBar],고점[2,1],sDate[eBar],sTime[eBar],고점[1,1]);
TL_SetColor(TL3,blue);
TL_SetExtLeft(TL3,true);
TL_SetExtRight(TL3,true);
}
}
}
TL_SetSize(TL1,파동선두께);
TL_SetSize(TL2,추세선두께1);
TL_SetSize(TL3,추세선두께2);
#텍스트색상
Text_SetColor(text1,숫자색);#숫자 text색
2018-05-09
317
글번호 118770
amxy 님에 의해서 삭제되었습니다.
2018-05-09
0
글번호 118769