커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
8133
글번호 230811
답변완료
문의 드립니다.
안녕하세요.
60틱 차트에서 60 가중이평이 후하향중일때
10 가중이평이 우상향하다 우하향할때 매도신호발생
동 차트에서 60가중이평이 우상향중일때
10가중이평이 우하향하다 우상향으로 턴할때 메수신호발생하는
수식을 만들려면 어떻게 해야하는지요?
제가 초보라서 상세히 작성해 주시면 감사하겠습니다.
늘 좋은 일만 가득하세요~~~^^
2016-05-26
157
글번호 98535
답변완료
문의드립니다
Input:barCnt(5);
Var:j(0),turnPntBit(""),TL1(0);
Array:valArr[10](0),barArr[10](0),turnPntArr[10]("");
// 봉이 새로 생겼으므로 봉개수 관리하는 변수들의 봉개수 값 1씩 증가
For j = 0 To 9 {
barArr[j] = barArr[j] + 1;
}
// 고점조건 = 5-1-5에서 가운데 고가가 좌측 5봉과 우측 5봉 고가보다 높다
// 저점조건 = 5-1-5에서 가운데 저가가 좌측 5봉과 우측 5봉 저가보다 낮다
Condition1 = Highest(H,barCnt)[barCnt+1] <= H[barCnt] and H[barCnt] > Highest(H,barCnt);
Condition2 = Lowest(L,barCnt)[barCnt+1] >= L[barCnt] and L[barCnt] < Lowest(L,barCnt);
// 전환점구분 null값으로 초기화;
// if 고점조건, 저점조건 동시 만족시 then
// if 이전 고점,저점 범위를 모두 벗어났을 때
// 전환점구분 = 고저점;
// else if 이전 고점을 갱신했다면 전환점구분 = 고점;
// else if 이전 저점을 갱신했다면 전환점구분 = 저점;
// else if 전환점배열의 현재(배열상 1번째)값이 고점이면 전환점구분 = 저점;
// else if 전환점배열의 현재 값이 저점이면 전환점구분 = 고점;
// else if 고점조건 만족하면 전환점구분 = 고점;
// else if 저점조건 만족하면 전환전구분 = 저점;
turnPntBit = "";
If Condition1 and Condition2 Then {
If Max(valArr[1],valArr[2]) < H[barCnt] and Min(valArr[1],valArr[2]) > L[barCnt] Then
turnPntBit = "HiLo";
Else If Max(valArr[1],valArr[2]) < H[barCnt] Then turnPntBit = "Hi";
Else If Min(valArr[1],valArr[2]) > L[barCnt] Then turnPntBit = "Lo";
Else If turnPntArr[1] == "Hi" Then turnPntBit = "Lo";
Else If turnPntArr[1] == "Lo" Then turnPntBit = "Hi";
}
Else If Condition1 Then turnPntBit = "Hi";
Else If Condition2 Then turnPntBit = "Lo";
// if 전환점구분에 값이 있을 때만 아래 실행, 없으면 통과
If turnPntBit <> "" Then
{
// if 전환점구분이 고저점이면 then
// 이전 파동은 연장시키고 아래에서 새로이 파동선을 추가토록 한다.
If turnPntBit == "HiLo" Then
{
valArr[1] = IFF(turnPntArr[1] == "Hi",H[barCnt],L[barCnt]);
barArr[1] = barCnt;
TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
If turnPntArr[1] == "Hi" Then
turnPntBit = "Lo";
Else
turnPntBit = "Hi";
}
// if 신규 전환점구분이 현재(전환점배열 1번째)와 다르면 then
// 배열값들을 이전값으로 Move;
If turnPntBit <> turnPntArr[1] Then
{
for j = 8 downto 1
{
valArr[j+1] = valArr[j];
barArr[j+1] = barArr[j];
turnPntArr[j+1] = turnPntArr[j];
}
}
// if 전환점구분이 바뀌었거나 또는
// (전환점구분은 안바뀌었는데
// (이전 고점보다 높은 고점이 발생했거나 또는
// 이전 저점보다 낮은 저점이 발생했으면)) then
If turnPntBit <> turnPntArr[1] or
(turnPntBit == turnPntArr[1] and
((turnPntBit == "Hi" and valArr[1] < H[barCnt]) or
(turnPntBit == "Lo" and valArr[1] > L[barCnt]))) Then {
// 값 배열에는 고점 또는 저점을 대입;
// 봉개수 배열에는 입력변수의 봉개수 대입;
// 전환점 배열에 전환점구분값을 대입;
valArr[1] = IFF(turnPntBit == "Hi",H[barCnt],L[barCnt]);
barArr[1] = barCnt;
turnPntArr[1] = turnPntBit;
// if 이전봉대비 전환점구분이 바뀌었다면 추세선 새로 그리고;
// else 전환점구분이 안바뀌었으면 값만 바뀐거므로 추세선 연장;
If turnPntArr[1][1] <> turnPntArr[1][0] Then
TL1 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2],
sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
Else
TL_SetEnd(TL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
}
}
TL_SetSize(TL1,4);
TL_SetColor(TL1,GREEN);
var : TL11(0),TL12(0);
if turnPntArr[1][0] == "Hi" Then{
TL_Delete(TL11);
TL11 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[1],sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
TL_SetExtRight(TL11,true);
TL_SetColor(TL11,MAGENTA);
TL_SetSize(TL11,3);
}
if turnPntArr[1][0] == "Lo" Then{
TL_Delete(TL12);
TL12 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[1],sDate[barArr[1]],sTime[barArr[1]],valArr[1]);
TL_SetExtRight(TL12,true);
TL_SetColor(TL12,CYAN);
TL_SetSize(TL12,3);
}
-----------------------------------------------------------------------------
Input:length(12);
Var:j(0),lastHiVal(0),lastLoVal(0),sBar(0),eBar(0),TL1(0),TL2(0),
Text1(0),처리구분(""),T(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);
TL_Delete(TL2);
Text_Delete(Text1);
}
TL1 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],
sDate[eBar],sTime[eBar],고점[1,1]);
TL2 = TL_New(sDate[sBar],sTime[sBar],저점[1,1],
sDate[eBar],sTime[eBar],저점[1,1]);
Text1 = Text_New(sDate[eBar],sTime[eBar],고점[1,1],
NumToStr(고점[1,1],2));
Text_SetStyle(Text1, 2, 1);
TL_SetColor(TL2,blue);
}
}
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);
TL_Delete(TL2);
Text_Delete(Text1);
}
TL1 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],
sDate[eBar],sTime[eBar],저점[1,1]);
TL2 = TL_New(sDate[sBar],sTime[sBar],고점[1,1],
sDate[eBar],sTime[eBar],고점[1,1]);
Text1 = Text_New(sDate[eBar],sTime[eBar],저점[1,1],
NumToStr(저점[1,1],2));
Text_SetStyle(Text1, 2, 0);
TL_SetColor(TL2,RED);
}
}
TL_SetSize(TL1,3);
TL_SetColor(TL1,CYAN);
이2가지의 수식을 정확한 뜻을 알고싶습니다
2016-05-26
227
글번호 98534
답변완료
부탁드립니다.
md=macd(short,long)-eavg(macd(short,long),signal);
x=barssince(md<0)<10 and (diplus(14)>diminus(14) and ) diminus(14) <20 and adx(14) > adx(14,1));
2016-05-26
183
글번호 98533
답변완료
수식재문드립니다
이평선의상승과
수식1
A=tema(c,15);
if(a>a(
운영자님이주신수식은
var : aa(0);
aa= ema(ema(ema(c,15),15),15);
if aa > aa[1] Then
var1 = aa;
if aa < aa[1] Then
var2 = aa;
plot1(var1);
plot2(
2016-05-26
162
글번호 98531
회원 님에 의해서 삭제되었습니다.
2016-05-26
7
글번호 98520
답변완료
문의드립니다
옵션 전종목의 매도매수 총잔량은 어떻게 표현하나요?
1. 콜매수(도)호가 총량
2. 콜 각행사가 별 매수(도)호가 수량
3. 풋매수(도)호가 총량
2. 풋 각행사가 별 매수(도)호가 수량
참조데이터에는 없는것 같아서...
2016-05-26
170
글번호 98519
답변완료
수식 확인 요청드립니다.
안녕하십니까?ㅎㅎ
확인 요청사항이 있습니다.
대상: KODEX200 종목, 1분봉
- 상한선 돌파시 매수, 하한선 돌파시 매도 이렇게 했는데,
상한선, 하한선 지표식 그래프와 매수,매도 진입 시점이 달라서 왜 그런지 확인
좀 부탁드립니다.
상한선 돌파 시에 매수를 해야 하는데, 그 전에 매수가 나가고 있습니다
매도도 마찬가지구요...
감사합니다.
-----------------------------------------------------------------------------------
input : n(20),승수(0.5),P(5),X(0.5);
var : sum(0),avgv(0),cnt(0),atrv(0);
var : TH(0),TL(0),Sum1(0),TR(0),DayATR(0);
sum = 0;
for cnt = 1 to n{
sum = sum + (dayhigh(cnt)-daylow(cnt));
}
avgv = sum/n;
sum1 = 0;
for cnt = 0 to P-1{
If DayClose(cnt+1) > dayhigh(cnt) then
TH = DayClose(cnt+1);
else
TH = dayhigh(cnt);
If DayClose(cnt+1) < DayLow(cnt) then
TL = DayClose(cnt+1);
else
TL = daylow(cnt);
TR = TH-TL;
Sum1 = Sum1+TR;
}
DayATR = Sum1/P;
if crossup(c,dayopen+avgv*승수) and MarketPosition==0 Then
buy("Buy");
if CrossDown(c,dayopen-avgv*승수) and MarketPosition==0 Then
sell("Sell");
/*if MarketPosition == 1 Then
ExitLong("bx",AtStop,highest(H,BarsSinceEntry)-DayATR*x);
if MarketPosition == -1 Then
ExitShort("sx",AtStop,Lowest(L,BarsSinceEntry)+DayATR*x);*/
SetStopEndofday(144900);
//SetStopLoss(1,PercentStop);
=---------------------------------------------------------------------
input : n(20),승수(0.5),P(10);
var : sum(0),avgv(0),cnt(0), Sum1(0),TH(0),TL(0), TR(0), DayATR(0);
sum = 0;
for cnt = 1 to n{
sum = sum + (dayhigh(cnt)-daylow(cnt));
}
avgv = sum/n;
plot1(dayopen+avgv*승수);
plot2(dayopen-avgv*승수);
plot3(dayopen);
//plot4(highest(H,BarsSinceEntry)-DayATR*x);
2016-05-26
208
글번호 98518
답변완료
검색식부탁드립니다
안녕하세요
아래식은 단기이평선 지표식입니다
input : P(5),dv(2);
var : Price(0),BBmd(0),BBup(0),BBdn(0);;
Price = (C+H+L)/3;
BBmd = ma(Price,P);
BBup = BBmd + std(Price,5)*dv;
BBdn = BBmd - std(Price,5)*dv;
plot1(BBmd,"중앙");
plot2(BBup,"상단");
plot3(BBdn,"하단");
1. 단기볼린져 중앙선상승, 상하단 벌어짐+adx상승 - 상승 검색점 과 신호음발생
2. 잔기볼린져 중앙선하락, 상하단 벌어짐+adx상승 - 하락 검색점 과 신호음발생
검색식부탁드립니다
2016-05-26
164
글번호 98517
답변완료
시스템 문의
종가가 P개봉 중간값보다 높으면 빨간색
빨간색 상태에서 종가가 P개봉 최저가를 하향이탈하면 빨간색 중지
종가가 P개봉 중간값보다 낮으면 파락색
파란색 상태에서 종가가 P개봉 최고가를 상향돌파하면 파람색 중지
input : P(10);
var : MM(0),T(0);
MM = (highest(H,P)+lowest(L,P))/2;
if T == 0 and C > MM Then
T = 1;
if T == 0 and C < MM Then
T = -1;
if T == 1 and CrossDown(C,lowest(L,P)[1]) Then
T = 0;
if T == -1 and CrossUp(C,highest(H,P)[1]) Then
T = 0;
if dayindex == 0 and T == 1 then
buy();
if dayindex == 0 and T == -1 then
sell();
if dayindex > 0 then{
if T == 1 and T[1] != 1 Then
buy();
if T == 0 and T[1] == 1 Then
sell();
}
if T == -1 and T[1] != -1 Then
sell();
if T == 0 and T[1] == -1 Then
buy();
SetStopEndofday(150000)
밑에 글에서 이부분을 좀 수정해서 시스템을 구축할수있는지 해서 여쭈어봅니다
발간색 매수 파랑색 매도 인데
1.종가가 P개봉 중간값보다 높으면 매수
매수 상태에서 종가가 P개봉 최고가를 상향돌파하면 청산 표시
종가가 P개봉 중간값보다 낮으면 매도
매도 상테에서 종가가 P개봉 최저가를 하향이탈하면 청산 표시
2. 지표 중에 만들어보고 싶은게 있습니다
쌍봉.쌍바닥을 표시 해주는 지표를 하나 만들어보고싶습니다
기본적으로 쓸수있는 지표중에 겐찮은 지표가 있는지 좀 알고싶습니다
쌍봉,쌍바닥 지표로 변형하기 힘들시 시스템을 좀 해주시면감사하겠습니다
3. 위 강조식 을 이용하여 쌍봉 ,쌍바닥 을 한번 만들어보고싶은데
가능한지좀 알고싶습니다
예시: 쌍봉이 되었을경우 강조식에서 매도 표시가 나는부분에서 매도진입
청산은 강조식이 끝나는 그순간
쌍바닥이 되었을경우 강조식에서 매수 표시가 나는부분에서 매수진입
청산은 강조식이 끝나는 그순간
항상감사합니다 문의가 많아서..^^..
2016-05-26
188
글번호 98513