커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
4382
글번호 230811
답변완료
수식 작성 부탁드립니다.
예스트레이더에 월, 일, 분, 틱 단위는 있는데,
연 단위는 없더라구요. 그래서 지표로 만들고 싶은데,
연 시가, 고가, 저가 라인 작성 부탁 좀 드리겠습니다.
2018-05-16
150
글번호 118966
요타 님에 의해서 삭제되었습니다.
2018-05-16
0
글번호 118965
답변완료
부탁드립니다
월봉시가 돌파종목을 검색하고 싶습니다
감사합니다
2018-05-16
145
글번호 118964
답변완료
수식첨가부탁드립니다
#,아래수식에서 파동의 1/2일선을 우측 그리기수식을 추가 삽입하려고, var;TL2 추가하고
TL2 = TL_new(HD[1],HT[1],(HH[1]+LL)/2,sdate,stime,(HH[1]+LL)/2); 수식을 추가하니까
배열요소값이 와야한다는 오류가 뜨내요.. 도움부탁드립니다.
#,제가 원하는식은 현재 수식 조건에다가 파동의 중심값을 추가로 오른쪽 그리기로 하는
식입니다.
Input : af(0.02), maxAF(0.2),n(5);
var : T(0),TL1(0),cnt(0);
Array : HH[10](0),HD[10](0),HT[10](0);
Array : LL[10](0),LD[10](0),LT[10](0);
Array : upv[10](0),dnv[10](0);
var1 = CSar(af,maxAF);
if crossup(c,var1) Then
{
T = 1;
HD[0] = sdate;
HT[0] = stime;
HH[0] = H;
for cnt = 1 to 9
{
HD[cnt] = HD[cnt-1][1];
HT[cnt] = HT[cnt-1][1];
HH[cnt] = HH[cnt-1][1];
TL_Delete(upv[cnt]);
if HH[cnt] > 0 and cnt < N Then
{
upv[cnt] = TL_New(HD[cnt],HT[cnt],HH[cnt],sdate,stime,HH[cnt]);
TL_SetExtRight(upv[cnt],true);
TL_SetColor(tl1,GRAY);
TL_SetColor(upv[cnt],RED);
TL_SetStyle(upv[cnt],3);
}
}
if LL[0] > 0 Then
{
TL1 = TL_new(LD[0],LT[0],LL[0],HD[0],HT[0],HH[0]);
}
TL_Delete(upv[0]);
upv[0] = TL_New(sdate[1],stime[1],HH[0],HD[0],HT[0],HH[0]);
TL_SetExtRight(upv[0],true);
}
if CrossDown(c,var1) Then
{
T = -1;
LD[0] = sdate;
LT[0] = stime;
LL[0] = L;
for cnt = 1 to 9
{
LD[cnt] = LD[cnt-1][1];
LT[cnt] = LT[cnt-1][1];
LL[cnt] = LL[cnt-1][1];
TL_Delete(dnv[cnt]);
if LL[cnt] > 0 and cnt < N Then
{
dnv[cnt] = TL_New(LD[cnt],LT[cnt],LL[cnt],sdate,stime,LL[cnt]);
TL_SetExtRight(dnv[cnt],true);
TL_SetColor(tl1,GRAY);
TL_SetColor(dnv[cnt],BLACK);
TL_SetStyle(dnv[cnt],3);
}
}
if HH[0] > 0 Then
{
TL1 = TL_new(HD[0],HT[0],HH[0],LD[0],LT[0],LL[0]);
}
TL_Delete(dnv[0]);
dnv[0] = TL_New(sdate[1],stime[1],LL[0],LD[0],LT[0],LL[0]);
TL_SetExtRight(dnv[0],true);
}
if T == 1 then
{
if H > HH[0] Then
{
HH[0] = H;
HD[0] = sdate;
HT[0] = stime;
TL_SetEnd(TL1,HD[0],HT[0],HH[0]);
}
TL_Delete(upv[0]);
upv[0] = TL_New(HD[0],HT[0],HH[0],sdate,stime,HH[0]);
TL_SetExtRight(upv[0],true);
TL_SetColor(tl1,YELLOW);
TL_SetColor(upv[0],MAGENTA);
}
if T == -1 then
{
if L < LL[0] Then
{
LL[0] = L;
LD[0] = sdate;
LT[0] = stime;
TL_SetEnd(TL1,LD[0],LT[0],LL[0]);
}
TL_Delete(dnv[0]);
dnv[0] = TL_New(LD[0],LT[0],LL[0],sdate,stime,LL[0]);
TL_SetExtRight(dnv[0],true);
TL_SetColor(tl1,CYAN);
TL_SetColor(dnv[0],BLUE);
}
$$$,언제나 늘 고맙습니다.
2018-05-16
152
글번호 118963
답변완료
수정식 의뢰드려요!
안녕하세요!
아래 시스템식을 수정을 부탁드려요!
수식에서 추세선과 신호를 각각 따로 분리해 주시길 부탁드립니다!
그리고 첨부파일은 시스템식 의뢰 입니다!
최대한 이해가 가시게끔 정리해 보았습니다! 부탁드려요!
감사합니다!
-------------------------------------------------------------------------------------
Input:length(10),추세선연장(5),추세판단범위(10),진입횟수제한(1),
#ssssssssssssssssssssssssssssssssss
파동선두께(1),추세선두께(0),파동선색(YELLOW),수치표시(0);
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
Var:j(0),jj(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""),진입횟수(0),
TL1(0),TL2(0),TL3(0),Text1(0),
고추세최종(0),저추세최종(0),고ID(0),저ID(0);
Array:고[100,4](0),저[100,4](0); // 1:가격,2:Index,3:sDate,4:sTime
#==========================================#
#ssssssssssssssssssssssssssssssssss
If Index == 0 Then
{
고[1,1] = C;
저[1,1] = C;
}
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
Condition1 = Highest(C,length) == C and 최종고가 <> C;
Condition2 = Lowest (C,length) == C and 최종저가 <> C;
처리구분 = "";
If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생
{
If 최종꼭지점 == "저점" Then 처리구분 = "고점처리"; // 저 - 고 순으로 처리
Else 처리구분 = "저점처리"; // 고 - 저 순으로 처리
}
Else If Condition1 Then 처리구분 = "고점처리";
Else If Condition2 Then 처리구분 = "저점처리";
#==========================================#
If 처리구분 == "고점처리" Then
{
최종고가 = C; // 신규고점을 체크하기 위해 저장
If 최종꼭지점 == "저점" Then
{
진입횟수 = 0;
For j = 100 DownTo 2
{
For jj = 1 To 4
{
고[j,jj] = 고[j-1,jj];
}
}
고[1,1] = C;
고[1,2] = Index;
고[1,3] = sDate;
고[1,4] = sTime;
TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]);
#ssssssssssssssssssssssssssssssssss
If 수치표시 == 1 Then
{
Text1 = Text_New(sDate,sTime,고[1,1],NumToStr(고[1,1],2));
Text_SetStyle(Text1, 2, 1);
}
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,파동선색);
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
}
Else If 고[1,1] < C Then // 1번 고점보다 높은 고가 출현
{
고[1,1] = C;
고[1,2] = Index;
고[1,3] = sDate;
고[1,4] = sTime;
TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]);
// 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임
#ssssssssssssssssssssssssssssssssss
If 수치표시 == 1 Then
{
Text_SetLocation(Text1,sDate,sTime,고[1,1]);
Text_SetString(Text1,NumToStr(고[1,1],2));
}
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
}
/* 고점추세선 */
If 고[2,2][1] <> 고[2,2] Then // 고2의 Index값이 변동 없음 즉, 새로운 고점이 생기지 않았음
{
고추세최종 = 0;
For j = 3 To 추세판단범위
{
If 고[2,1] < 고[j,1] Then
{
고추세최종 = (고[2,1] - 고[j,1])/(고[2,2] - 고[j,2]) * (Index - 고[j,2]) + 고[j,1];
TL2 = TL_New(고[j,3],고[j,4],고[j,1],sDate,sTime,고추세최종);
고ID = j;
#ssssssssssssssssssssssssssssssssss
TL_SetSize(TL2,추세선두께);
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
TL_SetColor(TL2,RED);
j = 100;
}
}
}
Else If 고추세최종[1] > 0 Then
{
고추세최종 = (고[2,1] - 고[고ID,1])/(고[2,2] - 고[고ID,2]) * (Index - 고[고ID,2]) + 고[고ID,1];
TL_SetEnd(TL2,sDate,sTime,고추세최종);
}
If 저추세최종[1] > 0 Then
{
저추세최종 = (저[2,1] - 저[저ID,1])/(저[2,2] - 저[저ID,2]) * (Index - 저[저ID,2]) + 저[저ID,1];
TL_SetEnd(TL3,sDate,sTime,저추세최종);
}
최종꼭지점 = "고점";
If 진입횟수 < 진입횟수제한 and
고추세최종 > 0 and 고추세최종 < C Then
{
Buy();
}
}
#==========================================#
If 처리구분 == "저점처리" Then
{
최종저가 = C;
If 최종꼭지점 == "고점" then
{
진입횟수 = 0;
For j = 100 DownTo 2
{
For jj = 1 To 4
{
저[j,jj] = 저[j-1,jj];
}
}
저[1,1] = C;
저[1,2] = Index;
저[1,3] = sDate;
저[1,4] = sTime;
TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]);
#ssssssssssssssssssssssssssssssssss
If 수치표시 == 1 Then
{
Text1 = Text_New(sDate,sTime,저[1,1],NumToStr(저[1,1],2));
Text_SetStyle(Text1, 2, 0);
}
TL_SetSize(TL1,파동선두께);
TL_SetColor(TL1,파동선색);
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
}
Else If 저[1,1] > C then
{
저[1,1] = C;
저[1,3] = sDate;
저[1,4] = sTime;
저[1,2] = Index;
TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]);
#ssssssssssssssssssssssssssssssssss
If 수치표시 == 1 Then
{
Text_SetLocation(Text1,sDate,sTime,저[1,1]);
Text_SetString(Text1,NumToStr(저[1,1],2));
}
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
}
/* 저점추세선 */
If 저[2,2][1] <> 저[2,2] Then
{
저추세최종 = 0;
For j = 3 To 추세판단범위
{
If 저[2,1] > 저[j,1] and 저[j,1] > 0 Then
{
저추세최종 = (저[2,1] - 저[j,1])/(저[2,2] - 저[j,2]) * (Index - 저[j,2]) + 저[j,1];
TL3 = TL_New(저[j,3],저[j,4],저[j,1],sDate,sTime,저추세최종);
저ID = j;
#ssssssssssssssssssssssssssssssssss
TL_SetSize(TL3,추세선두께);
#eeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeeee
TL_SetColor(TL3,Blue);
j = 100;
}
}
}
Else If 저추세최종[1] > 0 Then
{
저추세최종 = (저[2,1] - 저[저ID,1])/(저[2,2] - 저[저ID,2]) * (Index - 저[저ID,2]) + 저[저ID,1];
TL_SetEnd(TL3,sDate,sTime,저추세최종);
}
If 고추세최종[1] > 0 Then
{
고추세최종 = (고[2,1] - 고[고ID,1])/(고[2,2] - 고[고ID,2]) * (Index - 고[고ID,2]) + 고[고ID,1];
TL_SetEnd(TL2,sDate,sTime,고추세최종);
}
최종꼭지점 = "저점";
If 진입횟수 < 진입횟수제한 and
저추세최종 > 0 and 저추세최종 > C Then
{
Sell();
}
}
#==========================================#
If 처리구분 == "" Then
{
If Index - 고[1,2] <= 추세선연장 Then
{
If 고추세최종[1] > 0 Then
{
고추세최종 = (고[2,1] - 고[고ID,1])/(고[2,2] - 고[고ID,2]) * (Index - 고[고ID,2]) + 고[고ID,1];
TL_SetEnd(TL2,sDate,sTime,고추세최종);
}
}
Else
{
고추세최종 = 0;
}
If Index - 저[1,2] <= 추세선연장 Then
{
If 저추세최종[1] > 0 Then
{
저추세최종 = (저[2,1] - 저[저ID,1])/(저[2,2] - 저[저ID,2]) * (Index - 저[저ID,2]) + 저[저ID,1];
TL_SetEnd(TL3,sDate,sTime,저추세최종);
}
}
Else
{
저추세최종 = 0;
}
If MarketPosition > 0 and TL2[1] == TL2 and
고추세최종 > 0 and 고추세최종[1] <= C[1] and 고추세최종 > C Then
ExitLong();
If MarketPosition < 0 and TL3[1] == TL3 and
저추세최종 > 0 and 저추세최종[1] >= C[1] and 저추세최종 < C Then
ExitShort();
}
If ((최종꼭지점 == "고점" and MarketPosition == 1) or
(최종꼭지점 == "저점" and MarketPosition == -1)) and
MarketPosition[1] != MarketPosition Then
{
진입횟수 = 진입횟수 + 1;
}
2018-05-17
162
글번호 118962
답변완료
함수요청
안녕하세요?
함수문의 드립니다.
특정시간에 랜덤으로 진입하여
틎겅시간에 청산하고자 하는게 가능할련지요?
가령 크루드오일을 매일 오전 9시에 매수든 매도든 진입하여 당영업일 오전 5시에 청산하고자 합니다.
2018-05-16
132
글번호 118961
답변완료
감사드립니다
Input : shortPeriod(12), longPeriod(26), Period(9);
Var : MACDv(0), MACDs(0),macdosc(0) ;
MACDv = MACD(shortPeriod, longPeriod);
MACDs = ema(MACDv,Period);
var1 = ema(C,20);
if C > var1 and C < O and MACDv > MACDs Then
buy();
if C < var1 and C > O and MACDv < MACDs Then
sell();
1,,위 수식에서 macd 골드가 기준선 0선 이상일때 매수신호
macd 가 기준선 0 선 이하에서 데드나면 매도발생
저녁 16시부터 24시까지만 신호나오게 설정해주세요
2,, trix 기준선이 매수나오면 음봉종가에 매수신호
반대면 양봉종가에 매도신호
시간설정도 1번식과 동일하게 부탁드립니다
감사드리며 좋은하루 돼세요~~
2018-05-17
146
글번호 118960
답변완료
수식 요청 드립이다.
안녕하세요.
연결선물 당일청산 시스템에서
1. 전일포함 일봉이 양봉인 일봉몸통 연속 3일분의 합을 6으로 나눈 PT 만큼, 당일 당일시가위 매도
2. 전일포함 일봉이 음봉인 일봉몸통 연속 3일분의 합을 6으로 나눈 PT 만큼, 당일 당일시가아래 매수
수식 요청 드립이다.
감사합니다.
2018-05-16
142
글번호 118956
답변완료
검토 부탁드립니다
당일 익절후 아래 시스템식으로 금일한 재진입금지를 하려고 하는데 잘 안되네요.
검토 부탁드립니다.
의도한 식의 개념
1) 분봉(현물_매도식은 없음)에서 일봉 이평선 20-60골든크로스 조건을 전제함.
(알려주신 식을 도입)
2) 당일 09:30까지는 진입금지,
단 전일에서 over된 물량은 청산 조건 만족시 09:00에서부터 적용.
3) 검토요청부분:
(1) 전일over분이나 금일 진입후 익절 된 이후는 금일限은 재진입금지식 요망.
- 익절 method를 %,point로 설정한다면 setstopTarget을 이용하겠지만,
현재 사용식은 단순 청산식인 밴드상단 하향시 손절이나 익절인 경우 2개가 있겠으니,
그 중에서 익절인 경우에 금일 진입금지하는 식으로 만들고 싶습니다.
(그 중에서 손절인 경우는 청산된 이후 당일 조건 만족시 진입함을 의도함)
* IsExitName("EX",1)와 같이 이름을 단순히 적거나, Buy밑의 괄호를 제일 하단으로
옮겼더니 원하는 식이 되질 않네요.
(2) 분봉에 일봉 이평선을 그리는 지표가 일봉차트에서 본 이평선과 다르게 나오네요.
(일봉에선 20선이 60선 dead 상태인데, 분봉에선 골드로 나옴.)
* 초보라서 하나를 알려줘도 하나를 응용하기가 쉽지 않네요.ㅠㅠ
항상 노고에 감사드립니다.
< 아 래 >
input: period(20),nsd(2.0),StopPer(3.0);
input : P1(20),P2(60);
vars: maV(0), bandup(0), banddn(0);
var : count(0),sumV1(0),sumV2(0),dmav1(0),dmav2(0);
sumV1 = 0;
sumV2 = 0;
for count = 0 to P2 {
if count < P1 then
sumV1 = sumV1+DayClose(count);
if count < P2 then
sumV2 = sumV2+DayClose(count);
}
dmaV1 = sumV1/P1;
dmaV2 = sumV1/P2;
maV = ma(close,period);
bandup = BollBandUp(period,nsd);
banddn = BollBandDown(period,nsd);
Condition1 = ExitDate(1) == sdate and MarketPosition(1) == 1 and IsExitName("EX",1) == true;
if Condition1 == false and Stime > 093000 and CrossUp(close , bandup) then {
if dmaV1 > dmaV2 then
Buy();
}
if marketposition > 0 then
exitlong("EX",AtStop,bandup);
SetStopLoss(StopPer,PercentStop);
2018-05-16
140
글번호 118955