커뮤니티
예스랭귀지 Q&A
답변완료
[공지] 예스랭귀지 AI 어시스턴트, '예스나 AI' 출시 및 무료 체험 안내
안녕하세요, 예스스탁 입니다.복잡한 수식 공부 없이 여러분의 아이디어를 말하면 시스템 트레이딩 언어 예스랭귀지로 작성해주는 서비스예스나 AI(YesNa AI)가 출시되었습니다.지금 예스나 AI를 직접 경험해 보실 수 있도록 20크레딧(질문권 20회)를 무료로 증정해 드리고 있습니다.바로 여러분의 아이디어를 코드로 변환해보세요.--------------------------------------------------🚀 YesNa AI 핵심 기능- 지표식/전략식/종목검색식 생성: 자연어로 요청하면 예스랭귀지 문법에 맞는 코드를 작성합니다.- 종목검색식 변환 지원: K증권의 종목 검색식을 예스랭귀지로 변환 지원합니다.- 컴파일 검증: 작성된 코드가 실행 가능한지 컴파일러를 통해 문법 검증을 거쳐 결과물을 제공합니다.상세한 서비스 개요 및 활용 방법은 [서비스 소개 페이지]에서 확인하실 수 있습니다.▶ 서비스 소개 페이지: 바로가기서비스 사용 유의사항 및 결제 환불정책은 [이용약관]을 참고 부탁드립니다.▶ 서비스 이용약관: 바로가기💬 이용 문의사용 중 문의사항은 [프로그램 사용법 Q&A] 게시판에서 [예스나 AI] 카테고리를 설정 후 문의해 주시면 상세히 안내해 드리겠습니다.--------------------------------------------------앞으로도 AI를 활용한 다양한 트레이딩 기능들을 지속적으로 선보일 예정입니다.많은 관심과 기대 부탁드립니다.
2026-02-27
4542
글번호 230811
답변완료
오류 확인 부탁드립니다
input :시간(000001),당일청산시간(240000);
var : idx(0);
if Condition1 == false and stime >= 시간 Then {
Condition1 = true;
idx = 0;
}
if Condition1 == true Then{
idx = idx+1;
if idx == 1 and ma(c,5)>ma(c,20) Then
buy();
if idx > 1 and crossup(ma(c,5),ma(c,20)) Then
buy();
if idx == 1 and ma(c,5) < ma(c,20) Then
Sell();
if idx == 1 and CrossDown(ma(c,5),ma(c,20)) Then
Sell();
}
SetStopEndofday(당일청산시간);
진입이 5이평 20 이평보다크면 매수 인데 반대로 나옵니다
이해가 안되네요 ㄳ 합니다
2016-09-08
115
글번호 101807
답변완료
지표식 문의 드립니다
지표에 관해 문의 드립니다
두개의 지표를 하나로 합치는 것 좀 문의 드릴께요
A지표와 B지표를 합해서 C 지표를 만들려고 하는데요,,
A지표는 양수와 음수값을 가지고 있고,
B지표도 양수와 음수값을 가지고 있습니다.
그런데 합치는 과정에서, 두 지표가 각각 , 양일때와 음일때의 비중이 다릅니다
즉 A지표가 양일때는 60의 비중을 갖고 음일때는 40의 비중을 갖고요
B 지표는 양일때 70의 비중이고 음일때는 50의 비중을 갖습니다
C 지표를 만들기 위해 A와 B를 합친후 둘로 나누게 되는데요,,,
A가 +7이고, B가 +2일 때 둘을 합치면, (+420) + (+140) = 560 / 2 = 280 이고,
A가 -7이고, B가 -2일 때 둘을 합치면, (-280) + (-100) = -380 / 2 = -190 이고,
A가 +7이고, B가 -2일 때 둘을 합치면, (420) +(-100) = 320 / 2 = 160 이고,
A가 -7이고, B가 +2일 때 둘을 합치면, (-280 )+ (140) = -140 / 2 = -70 이 됩니다,
그리고 둘중의 하나가 0의 값일 경우는, 나눌 것 없이 , 어느 한쪽의 값을
그대로 리턴해야 되겠지요,,,
막상 식으로 구현하려고 하니 잘 안되서 그런데요,,,
C 지표를 만들수 있도록 지표식좀 만들어 주시면 감사하겠습니다
수고하세요,,, ^^
클레멘타인 드림 ~ ~ ~
가
2016-09-08
131
글번호 101806
답변완료
변환 좀 부탁드려요
안녕하세요!
항상 빠른 답변에 감사드립니다
아래는 제가 선멸한 키움의 수식들인데 예스로 변환 좀 부탁드립니다
1. 하이켄>
수식1
avg(c,10)-레드
수식1
avg(o,10)-블루
수식1
min(avg(c,10),avg(o,10))-화이트
라인설정 막대로 막대 크기가 수식3다 동일 해야 합니다
돌파 지지 라인
수식1
valuewhen(1,avg(c,10)>avg(c,10,1),avg(c,10))
수식2
valuewhen(1,avg(c,10)<AVG>(C,10,1),AVG(C,10))< SPAN>
2. 고점 저점
a=avg(c,20);
valuewhen(1,a>=a(1),a)
a=avg(c,20);
valuewhen(1,a<a(1),a)
3. 지지와 저항
수식1
A=avg(c, MA1);
B=avg(c, MA2);
if(A >= B,ValueWhen(1, Crossup(A ,B), A),B)
수식2
if(A < B,ValueWhen(1, Crossdown(A ,B), A),B)
지표설정조건
MA1 5
MA2 20
4. 수식이름:삼각가중이동평균
수식1: %pr% 삼각가중 %p1%
wavg(wavg(pr,p1/2),p1/2)
수식2: %p2%
wavg(wavg(pr,p2/2),p2/2)
수식3: %p3%
wavg(wavg(pr,p3/2),p3/2)
수식4: %p4%
wavg(wavg(pr,p4/2),p4/2)
수식5: %p5%
wavg(wavg(pr,p5/2),p5/2)
지표조건설정:
p1=4
p2=9
p3=18
p4=36
p5=72
pr=종가
스케일 - 가격
◆ OBV지표 상승하락 ◆
수식1 수식이름: OBV
A=OBV();
B=MA(OBV(), Signal, 이평종류);
A
------------------------------
수식2 수식이름: Signal %Signal%
B
------------------------------
수식3 수식이름: OBV데드
if(A < B
, B-(aa=B-A)
, B)
------------------------------
수식4 수식이름: Signal %Signal%
if(A < B
, B-(aa=B-B)
, B)
==============================
지표조건 설정
Signal 36
이평종류 가중
스케일 - 화면
지표명 : 지름신
수식1
a=HighestSince(1, CrossUp(macd(2,5),0),wavg(wavg(종가,4/2),4/2));
b = wavg(wavg(종가,4/2),4/2);
if ( a > b, a, b)
수식2
a=lowestSince(1, Crossdown(macd(2,5),0), wavg(wavg(종가,4/2),4/2));
b = wavg(wavg(종가,4/2),4/2);
if ( a < b, a, b)
스케일 - 가격
부탁드립니다! 감사합니다!
2016-09-08
238
글번호 101800
곽민수 님에 의해서 삭제되었습니다.
2016-09-08
21
글번호 101796
답변완료
문의 드립니다
이평선 교차에 색깔을 넣어주십시오
예를 들면 5이평 20이평 골드에서 빨간색 데드에서 파랑색
매번 감사합니다
2016-09-08
178
글번호 101795
답변완료
지표 주기 변환 질문입니다.
input : Period1(10),Period2(4);
var :
스토(0),이평(0);
스토 = AccumN(C-lowest(L,Period1),Period2)/AccumN((highest(H,Period1)-lowest(L,Period1)),Period2)* 100;
이평 = ma(c,5);
위의 식을 쓰고 있는데요
참조데이타로 차트를 불러와서 하는 방법말고
본차트는 댜른 분봉인데 지표값은 다른 주기의 지표값을 가져오고 싶습니다.
예를 들어 본차트는 5분봉을 쓰는데
10분봉의 위의 식의 데이타 값을 다른 분봉에서 그대로 쓰고 싶습니다.
참조데이타 10분봉 차트를 띄워서 data2로 불러오는법말고 그냥 본차트 5분봉에서 10분봉을 썼을때의 지표값을 그대로 불러올려면 수식을 어떻게 수정해야 될까요?
그것을 변수로 적용해 1을 입력하면 1분봉 5를 입력하면 5분봉 이렇게 바꾸고 싶을때마다 바꾸
고 싶습니다. 도움 부탁드리겠습니다.
2016-09-08
117
글번호 101794
답변완료
지표문의
1.안녕하세요
아래는 수식지님이 작성 한 지표입니다.
여기서 "H'를H+H[1],'L"를L+L[1]로 수정해서 적용하니 지표가 표시가 되지 않아요.
맞게 수정 좀 해주세요.
2.수정해본지표 참고
#==========================================#
# 지 표 명 : 파동선 및 추세선
# 작 성 자 : 수식지왕
# 블 로 그 : http://yahoosir.blog.me
#==========================================#
Input:atrLength(14),multi(1);
Var:j(0),dayATR(0),sum(0),upTr(100),dnTr(-100),trnd(0),
date11(0),date12(0),time11(0),time12(0),TL1(0),
date21(0),date22(0),time21(0),time22(0),TL2(0),
date31(0),date32(0),time31(0),time32(0),TL3(0);
Array:hiVal[10](0),loVal[10](0),hiBar[10](0),loBar[10](0);
//hiVal[1]은 전고점, hiVal[2]는 전전고점, hiVal[3]은 전전전고점
//hiVal[0]은 변곡점 이후 현재봉까지의 고점. 현재 고점은 진행중이므로 계속 바뀐다.
//loVal[0]은 반대 개념
sum = 0;
for j = 1 to atrLength {
sum = sum + Max(DayClose(j+1),DayHigh(j)) - Min(DayClose(j+1),DayLow(j));
}
dayATR = sum/atrLength; //일봉기준으로 ATR 산출
for j = 1 to 9 { //전고,전저점을 9개까지 보관
loBar[j] = loBar[j] + 1; //전저점의 위치. 현재 봉으로부터 떨어져 있는 거리
hiBar[j] = hiBar[j] + 1; //전고점의 위치
}
if hiVal[0] <= H or hiVal[0] == 0 then { //전고,전저점 이후 현재까지의 고점
hiVal[0] = H; //0을 체크한 이유는 초기에 값이 없는 구간이 생기기 때문
hiBar[0] = 0; //현재 고점의 위치가 0이란 것은 현재봉의 고가가 구간 고점이라는 의미
}
else {
hiBar[0] = hiBar[0] + 1; //현재 고점의 위치
}
if loVal[0] >= L or loVal[0] == 0 then { //전고,전저점 이후 현재까지 저점
loVal[0] = L;
loBar[0] = 0;
}
else {
loBar[0] = loBar[0] + 1; //현재 구간 저점의 위치
}
if trnd != dnTr && hiVal[0] > H && hiVal[0] - (dayATR * multi) > L then trnd = dnTr;
//저가가 고가 대비 변동률보다 밑으로 떨어지면 하락추세로 설정
//단, 현재봉의 고가가 변곡점 이후 최고가이면 상승 추세가 진행중이라고 본다.
//그래서 현재봉의 고가가 hiVal[0]보다 작다는 조건이 추가되었다.
else if trnd != upTr && loVal[0] < L && loVal[0] + (dayATR * multi) < H then trnd = upTr;
//고가가 저가 대비 변동률보다 높으면 상승추세로 설정
if trnd[1] == upTr and trnd == dnTr then { //상승추세였다가 하락추세로 바뀌었다면
for j = 8 downto 1 { //새로운 전고점이 생기는 것이므로
hiVal[j+1] = hiVal[j]; //전고점을 하나씩 뒤로 보낸다.
hiBar[j+1] = hiBar[j]; //전고점은 전전고점이 되고, 전전고점은 전전전고점이 된다.
}
hiVal[1] = hiVal[0]; //새로운 전고점에 현재 고점을 대입
hiBar[1] = hiBar[0];
hiVal[0] = H; //전고점이 확정되었으므로 전고점 이후 최고가는 현재봉의 고가
hiBar[0] = 0;
loVal[0] = L;
loBar[0] = 0;
//전고점이 새로 생긴 것이니까 전저점에서 전고점까지 추세선을 긋는다.
date11 = date[loBar[1]]; //추세선 시작일. 전저점의 날짜
time11 = stime[loBar[1]]; //추세선 시작시간
Value11 = loVal[1]; //추세선 시작가격
date12 = date[hiBar[1]]; //추세선 종료일. 전고점의 날짜
time12 = stime[hiBar[1]]; //추세선 종료시간
Value12 = hiVal[1]; //추세선 종료가격
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
//TL_New는 신규 추세선을 그려주는 함수
}
if trnd[1] == dnTr and trnd == dnTr and //추세는 하락 상태에서 바뀌지 않았는데
hiVal[1] < hiVal[0] then { //전고점보다 더 높은 고점이 출현했다면
if loVal[1] <= loVal[0] then { //전저점은 갱신되지 않았다면
hiVal[1] = hiVal[0]; //전고점을 현재의 고점으로 바꿔준다.
hiBar[1] = hiBar[0];
hiVal[0] = H;
hiBar[0] = 0;
loVal[0] = L;
loBar[0] = 0;
//전고점이 추가된 게 아니고 바뀐 것이므로 종료일,종료시간,종료가격만 바꿔준다.
date12 = date[hiBar[1]]; //추세선 종료일
time12 = stime[hiBar[1]];
Value12 = hiVal[1];
TL_SetEnd(TL1, date12,time12,Value12);
//TL_SetEnd는 기존추세선의 종료지점을 변경해주는 추세선 함수이다.
//TL_Delete 함수를 써서 직전의 추세선을 지우고 다시 TL_New로 추세선을 추가해도 된다.
}
else { //전저점도 갱신되었다면
for j = 8 downto 1 { //전고점, 전저점을 새로이 추기
hiVal[j+1] = hiVal[j]; //전고점을 하나씩 뒤로 보낸다.
hiBar[j+1] = hiBar[j]; //전고점은 전전고점이 되고, 전전고점은 전전전고점이 된다.
loVal[j+1] = loVal[j]; //전저점을 하나씩 뒤로 보낸다.
loBar[j+1] = loBar[j]; //전저점은 전전저점이 되고, 전전저점은 전전전저점이 된다.
}
hiVal[1] = hiVal[0]; //새로운 전고점에 현재 고점을 대입
hiBar[1] = hiBar[0];
loVal[1] = loVal[0]; //새로운 전저점에 현재 저점을 대입
loBar[1] = loBar[0];
hiVal[0] = H; //전고점 이후 최고가는 현재봉의 고가
hiBar[0] = 0;
loVal[0] = L;
loBar[0] = 0;
//전저,전고점이 새로 생긴 것이니까 전전고점에서 전저점까지
//그리고 전저점에서 전고점까지 추세선 2개를 생성한다.
date11 = date[hiBar[2]]; //추세선 시작일. 전전고점의 날짜
time11 = stime[hiBar[2]]; //추세선 시작시간
Value11 = hiVal[2]; //추세선 시작가격
date12 = date[loBar[1]]; //추세선 종료일. 전저점의 날짜
time12 = stime[loBar[1]]; //추세선 종료시간
Value12 = loVal[1]; //추세선 종료가격
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
TL_SetSize(TL1,2);
date11 = date[loBar[1]]; //추세선 시작일. 전저점의 날짜
time11 = stime[loBar[1]]; //추세선 시작시간
Value11 = loVal[1]; //추세선 시작가격
date12 = date[hiBar[1]]; //추세선 종료일. 전고점의 날짜
time12 = stime[hiBar[1]]; //추세선 종료시간
Value12 = hiVal[1]; //추세선 종료가격
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
}
}
if trnd[1] == dnTr and trnd == upTr then { //추세가 하락에서 상승으로 바뀌었을 경우
for j = 8 downto 1 {
//이전저점은 전전저점으로, 전전저점은 전전전저점으로 번호를 부여
loVal[j+1] = loVal[j];
loBar[j+1] = loBar[j];
}
loVal[1] = loVal[0];
loBar[1] = loBar[0];
loVal[0] = L;
loBar[0] = 0;
hiVal[0] = H;
hiBar[0] = 0;
date11 = date[hiBar[1]]; //전저점이 새로이 생긴 것이므로 시작점은 전고점이 된다.
time11 = stime[hiBar[1]];
Value11 = hiVal[1];
date12 = date[loBar[1]];
time12 = stime[loBar[1]];
Value12 = loVal[1];
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
}
if trnd[1] == upTr and trnd == upTr and //추세는 상승을 유지하고 있는데
loVal[1] > loVal[0] then { //전저점보다 낮은 저가가 출현했다면
if hiVal[1] >= hiVal[0] then { //고점 갱신이 되지 않았다면
loVal[1] = loVal[0]; //직전의 전저점만 바꿔준다.
loBar[1] = loBar[0];
loVal[0] = L;
loBar[0] = 0;
hiVal[0] = H;
hiBar[0] = 0;
date12 = date[loBar[1]];
time12 = stime[loBar[1]];
Value12 = loVal[1];
TL_SetEnd(TL1, date12,time12,Value12);
}
else { //고점도 이전고점보다 높다면
for j = 8 downto 1 { //전고점,전저점을 새로이 생성
hiVal[j+1] = hiVal[j];
hiBar[j+1] = hiBar[j];
loVal[j+1] = loVal[j];
loBar[j+1] = loBar[j];
}
hiVal[1] = hiVal[0];
hiBar[1] = hiBar[0];
loVal[1] = loVal[0];
loBar[1] = loBar[0];
loVal[0] = L;
loBar[0] = 0;
hiVal[0] = H;
hiBar[0] = 0;
date11 = date[loBar[2]]; //시작점이 전전저점
time11 = stime[loBar[2]];
Value11 = loVal[2];
date12 = date[hiBar[1]]; //종료는 전고점
time12 = stime[hiBar[1]];
Value12 = hiVal[1];
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
TL_SetSize(TL1,2);
date11 = date[hiBar[1]]; //2번째 시작은 전고점이 된다.
time11 = stime[hiBar[1]];
Value11 = hiVal[1];
date12 = date[loBar[1]]; //2번째 종료는 전저점
time12 = stime[loBar[1]];
Value12 = loVal[1];
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
}
}
//여기까지가 파동선이고 아래는 추세선이다.
if loVal[2] < loVal[1] then {
//전전저점보다 전저점이 높을 경우
//전전저점으로부터 전저점까지 지지추세선을 긋는데
//시작점인 전전저점이 바뀌면 신규추세선을 긋고(TL_New)
//시작점이 바뀌지 않았다면 종료지점만 변경해준다(TL_SetEnd)
if loBar[2][1] + 1 != loBar[2][0] then {
//시작점이 바뀌었는지 여부는 가격은 동일할 수 있으므로 위치값으로 판별한다.
//위치값은 1씩 증가시켜왔으므로 이전 봉에서의 위치값이 1 차이나는지로 확인
//1 이상 차이가 나면 전전고점이 바뀐 것으로 보고 추세선을 추가로 그린다.
date21 = date[loBar[2]];
time21 = stime[loBar[2]];
Value21 = loVal[2];
date22 = date[0]; //추세선이므로 현재 봉까지 그려준다.
time22 = stime[0];
Value22 = (loVal[1]-loVal[2])/(loBar[2]-loBar[1])*loBar[2]+LoVal[2];
//종료시점의 가격은 직선의 기울기와 절편을 계산해서 구한다.
TL2 = TL_New(date21,time21,Value21,date22,time22,Value22);
}
else {
//전전저점이 바뀌지 않았다면 종료시점만 변경하면 된다.
date22 = date[0];
time22 = stime[0];
Value22 = (loVal[1]-loVal[2])/(loBar[2]-loBar[1])*loBar[2]+LoVal[2];
TL_SetEnd(TL2, date22,time22,Value22);
//TL_SetExtRight 함수는 추세선을 오른쪽으로 연장하는 함수인데
//이 함수를 사용하면 모든 추세선이 현재봉까지 연장되어 알아볼 수가 없다.
}
}
if hiVal[2] > hiVal[1] then {
if hiBar[2][1] + 1 != hiBar[2][0] then {
date31 = date[hiBar[2]];
time31 = stime[hiBar[2]];
Value31 = hiVal[2];
date32 = date[0];
time32 = stime[0];
Value32 = (hiVal[1]-hiVal[2])/(hiBar[2]-hiBar[1])*hiBar[2]+hiVal[2];
TL3 = TL_New(date31,time31,Value31,date32,time32,Value32);
}
else {
date32 = date[0];
time32 = stime[0];
Value32 = (hiVal[1]-hiVal[2])/(hiBar[2]-hiBar[1])*hiBar[2]+hiVal[2];
TL_SetEnd(TL3, date32,time32,Value32);
}
}
if trnd == upTr and loVal[2] > loVal[1] then
TL_SetColor(TL1,BLUE);
else if trnd == dnTr and hiVal[2] < hiVal[1] then
TL_SetColor(TL1,RED);
else
TL_SetColor(TL1,BLACK);
TL_SetSize(TL1,2);
TL_SetColor(TL2,RED);
TL_SetColor(TL3,BLUE);
2.수정해본 지표
Input:atrLength(14),multi(1);
Var:j(0),dayATR(0),sum(0),upTr(100),dnTr(-100),trnd(0),
date11(0),date12(0),time11(0),time12(0),TL1(0),
date21(0),date22(0),time21(0),time22(0),TL2(0),
date31(0),date32(0),time31(0),time32(0),TL3(0);
Var:HH(0),LL(0);
Array:hiVal[10](0),loVal[10](0),hiBar[10](0),loBar[10](0);
//hiVal[1]은 전고점, hiVal[2]는 전전고점, hiVal[3]은 전전전고점
//hiVal[0]은 변곡점 이후 현재봉까지의 고점. 현재 고점은 진행중이므로 계속 바뀐다.
//loVal[0]은 반대 개념
HH=H+H[1]/2;
LL=L+L[1]/2;
sum = 0;
for j = 1 to atrLength {
sum = sum + Max(DayClose(j+1),DayHigh(j)) - Min(DayClose(j+1),DayLow(j));
}
dayATR = sum/atrLength; //일봉기준으로 ATR 산출
for j = 1 to 9 { //전고,전저점을 9개까지 보관
loBar[j] = loBar[j] + 1; //전저점의 위치. 현재 봉으로부터 떨어져 있는 거리
hiBar[j] = hiBar[j] + 1; //전고점의 위치
}
if hiVal[0] <= HH or hiVal[0] == 0 then { //전고,전저점 이후 현재까지의 고점
hiVal[0] = HH; //0을 체크한 이유는 초기에 값이 없는 구간이 생기기 때문
hiBar[0] = 0; //현재 고점의 위치가 0이란 것은 현재봉의 고가가 구간 고점이라는 의미
}
else {
hiBar[0] = hiBar[0] + 1; //현재 고점의 위치
}
if loVal[0] >= LL or loVal[0] == 0 then { //전고,전저점 이후 현재까지 저점
loVal[0] = LL;
loBar[0] = 0;
}
else {
loBar[0] = loBar[0] + 1; //현재 구간 저점의 위치
}
if trnd != dnTr && hiVal[0] > HH && hiVal[0] - (dayATR * multi) > LL then trnd = dnTr;
//저가가 고가 대비 변동률보다 밑으로 떨어지면 하락추세로 설정
//단, 현재봉의 고가가 변곡점 이후 최고가이면 상승 추세가 진행중이라고 본다.
//그래서 현재봉의 고가가 hiVal[0]보다 작다는 조건이 추가되었다.
else if trnd != upTr && loVal[0] < LL && loVal[0] + (dayATR * multi) < HH then trnd = upTr;
//고가가 저가 대비 변동률보다 높으면 상승추세로 설정
if trnd[1] == upTr and trnd == dnTr then { //상승추세였다가 하락추세로 바뀌었다면
for j = 8 downto 1 { //새로운 전고점이 생기는 것이므로
hiVal[j+1] = hiVal[j]; //전고점을 하나씩 뒤로 보낸다.
hiBar[j+1] = hiBar[j]; //전고점은 전전고점이 되고, 전전고점은 전전전고점이 된다.
}
hiVal[1] = hiVal[0]; //새로운 전고점에 현재 고점을 대입
hiBar[1] = hiBar[0];
hiVal[0] = HH; //전고점이 확정되었으므로 전고점 이후 최고가는 현재봉의 고가
hiBar[0] = 0;
loVal[0] = LL;
loBar[0] = 0;
//전고점이 새로 생긴 것이니까 전저점에서 전고점까지 추세선을 긋는다.
date11 = date[loBar[1]]; //추세선 시작일. 전저점의 날짜
time11 = stime[loBar[1]]; //추세선 시작시간
Value11 = loVal[1]; //추세선 시작가격
date12 = date[hiBar[1]]; //추세선 종료일. 전고점의 날짜
time12 = stime[hiBar[1]]; //추세선 종료시간
Value12 = hiVal[1]; //추세선 종료가격
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
//TL_New는 신규 추세선을 그려주는 함수
}
if trnd[1] == dnTr and trnd == dnTr and //추세는 하락 상태에서 바뀌지 않았는데
hiVal[1] < hiVal[0] then { //전고점보다 더 높은 고점이 출현했다면
if loVal[1] <= loVal[0] then { //전저점은 갱신되지 않았다면
hiVal[1] = hiVal[0]; //전고점을 현재의 고점으로 바꿔준다.
hiBar[1] = hiBar[0];
hiVal[0] = HH;
hiBar[0] = 0;
loVal[0] = LL;
loBar[0] = 0;
//전고점이 추가된 게 아니고 바뀐 것이므로 종료일,종료시간,종료가격만 바꿔준다.
date12 = date[hiBar[1]]; //추세선 종료일
time12 = stime[hiBar[1]];
Value12 = hiVal[1];
TL_SetEnd(TL1, date12,time12,Value12);
//TL_SetEnd는 기존추세선의 종료지점을 변경해주는 추세선 함수이다.
//TL_Delete 함수를 써서 직전의 추세선을 지우고 다시 TL_New로 추세선을 추가해도 된다.
}
else { //전저점도 갱신되었다면
for j = 8 downto 1 { //전고점, 전저점을 새로이 추기
hiVal[j+1] = hiVal[j]; //전고점을 하나씩 뒤로 보낸다.
hiBar[j+1] = hiBar[j]; //전고점은 전전고점이 되고, 전전고점은 전전전고점이 된다.
loVal[j+1] = loVal[j]; //전저점을 하나씩 뒤로 보낸다.
loBar[j+1] = loBar[j]; //전저점은 전전저점이 되고, 전전저점은 전전전저점이 된다.
}
hiVal[1] = hiVal[0]; //새로운 전고점에 현재 고점을 대입
hiBar[1] = hiBar[0];
loVal[1] = loVal[0]; //새로운 전저점에 현재 저점을 대입
loBar[1] = loBar[0];
hiVal[0] = HH; //전고점 이후 최고가는 현재봉의 고가
hiBar[0] = 0;
loVal[0] = LL;
loBar[0] = 0;
//전저,전고점이 새로 생긴 것이니까 전전고점에서 전저점까지
//그리고 전저점에서 전고점까지 추세선 2개를 생성한다.
date11 = date[hiBar[2]]; //추세선 시작일. 전전고점의 날짜
time11 = stime[hiBar[2]]; //추세선 시작시간
Value11 = hiVal[2]; //추세선 시작가격
date12 = date[loBar[1]]; //추세선 종료일. 전저점의 날짜
time12 = stime[loBar[1]]; //추세선 종료시간
Value12 = loVal[1]; //추세선 종료가격
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
TL_SetSize(TL1,2);
date11 = date[loBar[1]]; //추세선 시작일. 전저점의 날짜
time11 = stime[loBar[1]]; //추세선 시작시간
Value11 = loVal[1]; //추세선 시작가격
date12 = date[hiBar[1]]; //추세선 종료일. 전고점의 날짜
time12 = stime[hiBar[1]]; //추세선 종료시간
Value12 = hiVal[1]; //추세선 종료가격
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
}
}
if trnd[1] == dnTr and trnd == upTr then { //추세가 하락에서 상승으로 바뀌었을 경우
for j = 8 downto 1 {
//이전저점은 전전저점으로, 전전저점은 전전전저점으로 번호를 부여
loVal[j+1] = loVal[j];
loBar[j+1] = loBar[j];
}
loVal[1] = loVal[0];
loBar[1] = loBar[0];
loVal[0] = LL;
loBar[0] = 0;
hiVal[0] = HH;
hiBar[0] = 0;
date11 = date[hiBar[1]]; //전저점이 새로이 생긴 것이므로 시작점은 전고점이 된다.
time11 = stime[hiBar[1]];
Value11 = hiVal[1];
date12 = date[loBar[1]];
time12 = stime[loBar[1]];
Value12 = loVal[1];
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
}
if trnd[1] == upTr and trnd == upTr and //추세는 상승을 유지하고 있는데
loVal[1] > loVal[0] then { //전저점보다 낮은 저가가 출현했다면
if hiVal[1] >= hiVal[0] then { //고점 갱신이 되지 않았다면
loVal[1] = loVal[0]; //직전의 전저점만 바꿔준다.
loBar[1] = loBar[0];
loVal[0] = LL;
loBar[0] = 0;
hiVal[0] = HH;
hiBar[0] = 0;
date12 = date[loBar[1]];
time12 = stime[loBar[1]];
Value12 = loVal[1];
TL_SetEnd(TL1, date12,time12,Value12);
}
else { //고점도 이전고점보다 높다면
for j = 8 downto 1 { //전고점,전저점을 새로이 생성
hiVal[j+1] = hiVal[j];
hiBar[j+1] = hiBar[j];
loVal[j+1] = loVal[j];
loBar[j+1] = loBar[j];
}
hiVal[1] = hiVal[0];
hiBar[1] = hiBar[0];
loVal[1] = loVal[0];
loBar[1] = loBar[0];
loVal[0] = LL;
loBar[0] = 0;
hiVal[0] = HH;
hiBar[0] = 0;
date11 = date[loBar[2]]; //시작점이 전전저점
time11 = stime[loBar[2]];
Value11 = loVal[2];
date12 = date[hiBar[1]]; //종료는 전고점
time12 = stime[hiBar[1]];
Value12 = hiVal[1];
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
TL_SetSize(TL1,2);
date11 = date[hiBar[1]]; //2번째 시작은 전고점이 된다.
time11 = stime[hiBar[1]];
Value11 = hiVal[1];
date12 = date[loBar[1]]; //2번째 종료는 전저점
time12 = stime[loBar[1]];
Value12 = loVal[1];
TL1 = TL_New(date11,time11,Value11,date12,time12,Value12);
}
}
//여기까지가 파동선이고 아래는 추세선이다.
if loVal[2] < loVal[1] then {
//전전저점보다 전저점이 높을 경우
//전전저점으로부터 전저점까지 지지추세선을 긋는데
//시작점인 전전저점이 바뀌면 신규추세선을 긋고(TL_New)
//시작점이 바뀌지 않았다면 종료지점만 변경해준다(TL_SetEnd)
if loBar[2][1] + 1 != loBar[2][0] then {
//시작점이 바뀌었는지 여부는 가격은 동일할 수 있으므로 위치값으로 판별한다.
//위치값은 1씩 증가시켜왔으므로 이전 봉에서의 위치값이 1 차이나는지로 확인
//1 이상 차이가 나면 전전고점이 바뀐 것으로 보고 추세선을 추가로 그린다.
date21 = date[loBar[2]];
time21 = stime[loBar[2]];
Value21 = loVal[2];
date22 = date[0]; //추세선이므로 현재 봉까지 그려준다.
time22 = stime[0];
Value22 = (loVal[1]-loVal[2])/(loBar[2]-loBar[1])*loBar[2]+LoVal[2];
//종료시점의 가격은 직선의 기울기와 절편을 계산해서 구한다.
TL2 = TL_New(date21,time21,Value21,date22,time22,Value22);
}
else {
//전전저점이 바뀌지 않았다면 종료시점만 변경하면 된다.
date22 = date[0];
time22 = stime[0];
Value22 = (loVal[1]-loVal[2])/(loBar[2]-loBar[1])*loBar[2]+LoVal[2];
TL_SetEnd(TL2, date22,time22,Value22);
//TL_SetExtRight 함수는 추세선을 오른쪽으로 연장하는 함수인데
//이 함수를 사용하면 모든 추세선이 현재봉까지 연장되어 알아볼 수가 없다.
}
}
if hiVal[2] > hiVal[1] then {
if hiBar[2][1] + 1 != hiBar[2][0] then {
date31 = date[hiBar[2]];
time31 = stime[hiBar[2]];
Value31 = hiVal[2];
date32 = date[0];
time32 = stime[0];
Value32 = (hiVal[1]-hiVal[2])/(hiBar[2]-hiBar[1])*hiBar[2]+hiVal[2];
TL3 = TL_New(date31,time31,Value31,date32,time32,Value32);
}
else {
date32 = date[0];
time32 = stime[0];
Value32 = (hiVal[1]-hiVal[2])/(hiBar[2]-hiBar[1])*hiBar[2]+hiVal[2];
TL_SetEnd(TL3, date32,time32,Value32);
}
}
if trnd == upTr and loVal[2] > loVal[1] then
TL_SetColor(TL1,BLUE);
else if trnd == dnTr and hiVal[2] < hiVal[1] then
TL_SetColor(TL1,RED);
else
TL_SetColor(TL1,BLACK);
TL_SetSize(TL1,2);
TL_SetColor(TL2,RED);
TL_SetColor(TL3,BLUE);
3.그럼 수고헤요
2016-09-08
203
글번호 101793
답변완료
사용자 함수 질문입니다
crossup( ma(c,5) , ma(c,20) );
위 함수리턴값과 동일한 결과를 내는 함수를 사용자가 직접 만들때 질문입니다.
괄호 안에 들어가는게 고정된 수치가 아니라 변동되는 수치일 경우 어떻게 하느냐는 질문입니다.
사용자 함수란에 아래와 같이 붙여넣으면 되나요? 감사합니다.
input : var1 ( ma(c,5) ), var2 ( ma(c,20) );
if var1[1]<=var2[1] and var1>var2 then 함수명 = True;
2016-09-08
114
글번호 101792
답변완료
수정부탁드립니다---------------
Input : Period1(5),Period5(1),급증(0),급감(0),매수도전봉차(0),급등락(0),소등락(0),돌파(0);
Var : va(0);
Var : va1(0);
Var : value(0);
Var : vp(0);
va = ma(bids,period5)-ma(asks,period5)+5000;
va1 = ma(bids,period1)-ma(asks,period1)+5000;
If va1 > va1[1] Then
{
Plot10(va1, "매수잔량 우위");
Plot11(0, "매도잔량 우위");
}
Else{
Plot10(0, "매수잔량 우위");
Plot11(va1, "매도잔량 우위");
}
//급등락축소시작----------------------------
if va1 >va1[1]+급등락 then va1 = va1 - 급등락;
if va1 >va1[1]+소등락 then va1 = va1 - 소등락;
if va1 <va1[1]-급등락 then va1 = va1 + 급등락;
if va1 <va1[1]-소등락 then va1 = va1 + 소등락;
//급등락축소시작----------------------------
If va > va[1] Then
{
Plot3(va, "5매수총잔량 우위");
Plot4(0, "5매도총잔량 우위");
}
Else{
Plot3(0, "5매수총잔량 우위");
Plot4(va, "5매도총잔량 우위");
}
//plot6(value,"선",iff(value>value[1],red,iff(value<value[1],BLUE,WHITE)));
//PlotBaseLine1(5000,"기준선");
PlotBaseLine5(va,"기준선5");
PlotBaseLine1(va1,"기준선1");
//--------------------------------------------
if va < va1 then
{vp=((va1-va)/2)+va;}
if va1 < va then
{vp=((va-va1)/2)+va1;}
Plot20(vp, "반");
//OSCP*******************************************
//PriceOsc = OSCP(va, vp);
//Plot5(PriceOsc, "선");
//점찍기
If va > va[1]+0 and va[1] < va[2]+0 and dayindex >= 3 Then
{
Plot6(va+500, "매수점");}
//소리
//If vp > vp[1] and vp[1] < vp[2] and dayindex >= 3 Then
// {
//
If va < va[1]-0 and va[1] > va[2]+0 and dayindex >= 3 Then
{
Plot7(va+500, "매도점");}
//소리
//If va < vp[1] and vp[1] > vp[2] and dayindex >= 3 Then
// {
// PlaySound("C:₩예스트레이더₩data₩Sound₩accept.wav" ); }
if CrossUp(va1,va+돌파) Then
{
plot21(va1+200,"수");}
if CrossUp(va1,va+돌파) Then
{
PlaySound("C:₩예스트레이더₩data₩Sound₩bubbles.wav"); }
if CrossDown(va1,va-돌파) Then
{
plot22(va1+500,"도");}
if CrossDown(va1,va-돌파) Then
{
PlaySound("C:₩예스트레이더₩data₩Sound₩accept.wav" ); }
if va1 == highest(va1,6 ) Then plot99(va1);
같은 plot가 계속표시 안되게 해주세요
즉
plot21 가표기된후 다시 plot21 조건이맞아도 plot21를 표시안하고 plot22조건이맞을때비로소 plot22를 표시하게해주세요
또
plot22 가표기된후 다시 plot22 조건이맞아도 plot22를 표시안하고 plot21조건이맞을때비로소 plot21를 표시하게해주세요
즉 같은것이 중복되지않게 부탁드립니다
항상 수고하세요
2016-09-08
120
글번호 101791