커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
7218
글번호 230811
답변완료
당일 9시30분 지표 시작
* 항상 많은 도움에 고맙 습니다.
* 요청 사항: 아래수식 지그 재그선을 시작을 09시30분부터 시작 하게 요청드립니다.
즉 그 이전 데이타는 무시하고 09시 30분봉 을 시작으로 지그재그선을 그리고 싶습니다.
하루하루만 지그 재그선을 그리고 싶습니다.
15봉 이후에 첫 선이 그어지는것 입니다. 당일추세만 보게요...
### 지그지그선
Input:length(15);
Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),T(0),Text1(0),처리구분("");
Var:tl2(0),TL3(0),TL4(0),TL5(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
{ T = 1; 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); }
TL1 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],sDate[eBar],sTime[eBar],고점[1,1]);
}
}
If 처리구분 == "저점처리" Then
{ T = -1; 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);}
TL1 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],sDate[eBar],sTime[eBar],저점[1,1]);
}
}
TL_SetSize(TL1,1);
* 고맙 습니다. 수고하십시요.
2018-12-18
168
글번호 124538
답변완료
수정 의뢰드립니다!
안녕하세요!
다음은 제가 사용하는 고점과 고점, 저점과 저점을 연결하는 자동추세선 수식입니다!
고점과 저점을 연결하는 검정색선을 삭제하고 고점과 고점 , 저점 과 저점을 연결하는 파란선과 빨강선만 표시되게끔 수정 부탁 드립니다!
감사합니다!
Input:length(10);
Var:j(0),k(0),q(0),TL1(0),TL2(0),TL3(0),
TL_NewBit(0); // 1:NewLine 2:SetEndLine
Array:고[10,4](0),저[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime
#==========================================#
Value1 = HiLoLineZigZag(length,0,고,저,TL_NewBit);
If Value1 == 1 Then { // 고점
If TL_NewBit == 1 Then { // 신규 고점
TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
TL_SetSize(TL1,1);
k = 0;
For j = 2 To 10 {
If 저[1,1] > 저[j,1] and 저[j,1] > 0 Then { // 전저점보다 낮은 이전 전저점 찾는다
k = j;
j = 10; // exit loop
}
}
If k > 1 Then { // 낮은 전저점이 찾아졌다면
TL2 = TL_New(저[k,3],저[k,4],저[k,1],sDate,sTime,(저[1,1]-저[k,1])/(저[1,2]-저[k,2])*(Index-저[k,2])+저[k,1]);
TL_SetColor(TL2,BLUE);
}
q = q + 1; // 고점이 새로 추가되었으므로 1 증가
If q > 2 and q <= 10 Then { // 1 증가했으니 2보다 커야 하고 배열 크기가 10이므로 10 이내
TL_SetEnd(TL3,sDate,sTime,(고[2,1]-고[q,1])/(고[2,2]-고[q,2])*(Index-고[q,2])+고[q,1]);
}
} Else { // 신규 고점이 아니면 기존 추세선만 연장
If k > 1 Then {
TL_SetEnd(TL2,sDate,sTime,(저[1,1]-저[k,1])/(저[1,2]-저[k,2])*(Index-저[k,2])+저[k,1]);
}
If q > 2 and q <= 10 Then {
TL_SetEnd(TL3,sDate,sTime,(고[2,1]-고[q,1])/(고[2,2]-고[q,2])*(Index-고[q,2])+고[q,1]);
}
}
If TL_NewBit == 2 Then {
TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]);
}
} Else If Value1 == -1 Then { // 저점
If TL_NewBit == 1 Then { // 신규 저점
TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
TL_SetSize(TL1,1);
k = k + 1; // 저점이 새로 추가되었으므로 1 증가
If k > 2 and k <= 10 Then { // 1 증가했으니 2보다 커야 하고 배열의 크기가 10이므로 10 이내
TL_SetEnd(TL2,sDate,sTime,(저[2,1]-저[k,1])/(저[2,2]-저[k,2])*(Index-저[k,2])+저[k,1]);
}
q = 0;
For j = 2 To 10 {
If 고[1,1] < 고[j,1] Then { // 전고점보다 높은 이전 전고점을 찾는다
q = j;
j = 10; // exit loop
}
}
If q > 1 Then { // 높은 전고점이 찾아졌다면
TL3 = TL_New(고[q,3],고[q,4],고[q,1],sDate,sTime,(고[1,1]-고[q,1])/(고[1,2]-고[q,2])*(Index-고[q,2])+고[q,1]);
TL_SetColor(TL3,RED);
}
} Else { // 신규 저점이 아니면 기존 추세선만 연장
If k > 2 and k <= 10 Then {
TL_SetEnd(TL2,sDate,sTime,(저[2,1]-저[k,1])/(저[2,2]-저[k,2])*(Index-저[k,2])+저[k,1]);
}
If q > 1 Then {
TL_SetEnd(TL3,sDate,sTime,(고[1,1]-고[q,1])/(고[1,2]-고[q,2])*(Index-고[q,2])+고[q,1]);
}
}
If TL_NewBit == 2 Then {
TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]);
}
}
2018-12-17
191
글번호 124530
양정희 님에 의해서 삭제되었습니다.
2018-12-17
29
글번호 124528
양정희 님에 의해서 삭제되었습니다.
2018-12-17
20
글번호 124527
마지너 님에 의해서 삭제되었습니다.
2018-12-17
16
글번호 124525
답변완료
수정
60493수정부탁드립니다
홍콩항셍지수 장시작시간은 오전09시15분 입니다 수정요청합니다
2018-12-17
145
글번호 124523
답변완료
부탁드립니다
항상 수고가 많습니다
분봉에서 최근 10개봉중 몸통이 가장큰 캔들의 중심가와 두번째 큰캔들의 중심가에 각각 수평선이 그려지도록 해주시고 봉개수는 임의로 조정가능하게 해주시면 감사하겠습니다.
2018-12-17
156
글번호 124522
답변완료
문의드립니다.
도움주시는 덕분에 도전하고 있습니다. 매번 감사합니다.
1.기타
수학기호로 올려도 에스랭귀지로 변환가능한가요?
2018-12-17
161
글번호 124521
답변완료
문의합니다.
안녕하세요.
매수 진입:
20 이평을 양봉 돌파후에 나타나는 최초의 음봉의 고가를 저장하고
이 음봉 고가를 종가가 상방 돌파할때 매수진입합니다.
매수손절:
매수진입봉의 저가를 저장하고 이 저가를 종가가 하방돌파할 떼 매수손절합니다.
매도 진입:
20 이평을 음봉 돌파후에 나타나는 최초의 양봉의 저가를 저장하고
이 양봉 저가를 종가가 하방 돌파할때 매도진입
매도손절:
매도진입봉의 고가를 저장하고 이 고가를 종가가 상방돌파할 떼 매도손절합니다
추적청산
매수나 매도 진입후에 이익이 50틱이상 났을 때 최고수익에서 50%이하로 수익이
감소할 때 추적청산합니다.
이익청산 :
이익이 200틱이되면 이익청산합니다.
2018-12-17
153
글번호 124520