커뮤니티

예스랭귀지 Q&A

글쓰기
답변완료

수정 좀 부탁드립니다!

안녕하세요! 항상 빠른 답변에 감사드립니다! 아래 수식은 일정에 만들어 주신 수식인데 사용하다가 조금 수정을 해야 할 부분이 있어서 수정을 부탁드립니다! 기존 수식은 파랑색 가격선이 나타나는데 이걸 빨강, 파랑, 초록 3선으로 추가 표시되도록 수정 부탁드립니다! 그리고 녹색파동선과 상관 없이 빨강,파랑, 녹색선의 굵기를 제가 조정 할 수 있도록 해주시실 부탁드립니다. 수고하세요! --------------------------------------------------------------------- Input:length(10),종가사용여부(0),파동선두께(2),수치표시(1); Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""), TL1(0),Text1(0),text2(0),TL2(0); Array:고[10,4](0),저[10,4](0); // 1:가격,2:Index,3:sDate,4:sTime #==========================================# HH = IFF(종가사용여부==1,C,H); LL = IFF(종가사용여부==1,C,L); If Index == 0 Then { 고[1,1] = HH; 저[1,1] = LL; } Condition1 = Highest(HH,length) == HH and 최종고가 <> HH; Condition2 = Lowest (LL,length) == LL and 최종저가 <> LL; 처리구분 = ""; If Condition1 and Condition2 Then // 기간고점과 기간저점 동시 발생 { If 최종꼭지점 == "저점" Then { If 저[1,1] > LL Then 처리구분 = "저점처리"; Else 처리구분 = "고점처리"; } Else If 최종꼭지점 == "고점" Then { If 고[1,1] < HH Then 처리구분 = "고점처리"; Else 처리구분 = "저점처리"; } } Else If Condition1 Then 처리구분 = "고점처리"; Else If Condition2 Then 처리구분 = "저점처리"; #==========================================# If 처리구분 == "고점처리" Then { 최종고가 = HH; // 신규고점을 체크하기 위해 저장 If 최종꼭지점 == "저점" Then { For j = 10 DownTo 2 { For jj = 1 To 4 { 고[j,jj] = 고[j-1,jj]; } } 고[1,1] = HH; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL1 = TL_New(저[1,3],저[1,4],저[1,1],고[1,3],고[1,4],고[1,1]); var1 = 고[2,1]-저[1,1]; TL2 = TL_New(저[1,3],저[1,4],저[1,1]-var1,sDate,sTime,저[1,1]-var1); If 수치표시 == 1 Then { Text1 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1],2)); Text_SetStyle(Text1, 2, 1); Text2 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1]-저[1,1],2)+NewLine); Text_SetStyle(Text2, 2, 1); Text_SetColor(text2,RED); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,GREEN); TL_SetSize(TL2,파동선두께); TL_SetColor(TL2,BLUE); } Else If 고[1,1] < HH Then // 1번 고점보다 높은 고가 출현 { 고[1,1] = HH; 고[1,2] = Index; 고[1,3] = sDate; 고[1,4] = sTime; TL_SetEnd(TL1,고[1,3],고[1,4],고[1,1]); TL_SetEnd(TL2,고[1,3],고[1,4],저[1,1]-var1); // 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임 If 수치표시 == 1 Then { Text_SetLocation(Text1,고[1,3],고[1,4],고[1,1]); Text_SetString(Text1,NumToStr(고[1,1],2)); Text_SetLocation(Text2,고[1,3],고[1,4],고[1,1]); Text_SetString(Text2,NumToStr(고[1,1]-저[1,1],2)+NewLine); } } 최종꼭지점 = "고점"; } #==========================================# If 처리구분 == "저점처리" Then { 최종저가 = LL; If 최종꼭지점 == "고점" then { For j = 10 DownTo 2 { For jj = 1 To 4 { 저[j,jj] = 저[j-1,jj]; } } 저[1,1] = LL; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL1 = TL_New(고[1,3],고[1,4],고[1,1],저[1,3],저[1,4],저[1,1]); var1 = 고[1,1]-저[2,1]; TL2 = TL_New(고[1,3],고[1,4],고[1,1]+var1,sDate,sTime,고[1,1]+var1); If 수치표시 == 1 Then { Text1 = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(저[1,1],2)); Text_SetStyle(Text1, 2, 0); Text2 = Text_New(저[1,3],저[1,4],저[1,1],NewLine+NumToStr(저[1,1]-고[1,1],2)); Text_SetStyle(Text2, 2, 0); Text_SetColor(text2,RED); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,GREEN); TL_SetSize(TL2,파동선두께); TL_SetColor(TL2,RED); } Else If 저[1,1] > LL then { 저[1,1] = LL; 저[1,2] = Index; 저[1,3] = sDate; 저[1,4] = sTime; TL_SetEnd(TL1,저[1,3],저[1,4],저[1,1]); TL_SetEnd(TL2,저[1,3],저[1,4],고[1,1]+var1); If 수치표시 == 1 Then { Text_SetLocation(Text1,저[1,3],저[1,4],저[1,1]); Text_SetString(Text1,NumToStr(저[1,1],2)); Text_SetLocation(Text2,저[1,3],저[1,4],저[1,1]); Text_SetString(Text2,NewLine+NumToStr(저[1,1]-고[1,1],2)); } } 최종꼭지점 = "저점"; } ----------------------------------------------------------------------------- 전에 만들어 주신 피보나치 가격선들이 가격봉과 이동평균선들과 겹치니 매매하는데 많이 불편하네요! 혹시 피보나치선을 좀더 바깥쪽으로 이동시켜서 겹치지 않게 하는 방법이 있을까요? input : 고점(350),저점(340); Array : Tx[30](0); var1 = 고점-저점; plot1(저점+var1*0.000); plot2(저점+var1*0.236); plot3(저점+var1*0.382); plot4(저점+var1*0.500); plot5(저점+var1*0.618); plot6(저점+var1*0.764); plot7(저점+var1*1.000); plot8(저점+var1*1.236); plot9(저점+var1*1.382); plot10(저점+var1*1.500); plot11(저점+var1*1.618); plot12(저점+var1*1.764); plot13(저점+var1*2.000); plot14(저점+var1*2.618); plot15(저점-var1*0.236); plot16(저점-var1*0.382); plot17(저점-var1*0.500); plot18(저점-var1*0.618); plot19(저점-var1*0.764); plot20(저점-var1*1.000); plot21(저점-var1*1.236); plot22(저점-var1*1.382); plot23(저점-var1*1.500); plot24(저점-var1*1.618); plot25(저점-var1*1.764); plot26(저점-var1*2.000); plot27(저점-var1*2.618); text_Delete(Tx[1]); tx[1] = Text_New(sdate,stime,저점+var1*0.000,"00.0% : "+NumToStr(저점+var1*0.000,2)); text_Delete(Tx[2]); tx[2] = Text_New(sdate,stime,저점+var1*0.236,"23.6% : "+NumToStr(저점+var1*0.236,2)); text_Delete(Tx[3]); tx[3] = Text_New(sdate,stime,저점+var1*0.382,"38.2% : "+NumToStr(저점+var1*0.382,2)); text_Delete(Tx[4]); tx[4] = Text_New(sdate,stime,저점+var1*0.500,"50.0% : "+NumToStr(저점+var1*0.500,2)); text_Delete(Tx[5]); tx[5] = Text_New(sdate,stime,저점+var1*0.618,"61.8% : "+NumToStr(저점+var1*0.618,2)); text_Delete(Tx[6]); tx[6] = Text_New(sdate,stime,저점+var1*0.764,"76.4% : "+NumToStr(저점+var1*0.764,2)); text_Delete(Tx[7]); tx[7] = Text_New(sdate,stime,저점+var1*1.000,"100.0% : "+NumToStr(저점+var1*1.000,2)); text_Delete(Tx[8]); tx[8] = Text_New(sdate,stime,저점+var1*1.236,"123.6% : "+NumToStr(저점+var1*1.236,2)); text_Delete(Tx[9]); tx[9] = Text_New(sdate,stime,저점+var1*1.382,"138.2% : "+NumToStr(저점+var1*1.382,2)); text_Delete(Tx[10]); tx[10] = Text_New(sdate,stime,저점+var1*1.500,"150.0% : "+NumToStr(저점+var1*1.500,2)); text_Delete(Tx[11]); tx[11] = Text_New(sdate,stime,저점+var1*1.618,"161.8% : "+NumToStr(저점+var1*1.618,2)); text_Delete(Tx[12]); tx[12] = Text_New(sdate,stime,저점+var1*1.764,"176.4% : "+NumToStr(저점+var1*1.764,2)); text_Delete(Tx[13]); tx[13] = Text_New(sdate,stime,저점+var1*2.000,"200.0% : "+NumToStr(저점+var1*2.000,2)); text_Delete(Tx[14]); tx[14] = Text_New(sdate,stime,저점+var1*2.618,"261.8% : "+NumToStr(저점+var1*2.618,2)); text_Delete(Tx[15]); tx[15] = Text_New(sdate,stime,저점-var1*0.236,"-23.6% : "+NumToStr(저점-var1*0.236,2)); text_Delete(Tx[16]); tx[16] = Text_New(sdate,stime,저점-var1*0.382,"-38.2% : "+NumToStr(저점-var1*0.382,2)); text_Delete(Tx[17]); tx[17] = Text_New(sdate,stime,저점-var1*0.500,"-50.0% : "+NumToStr(저점-var1*0.500,2)); text_Delete(Tx[18]); tx[18] = Text_New(sdate,stime,저점-var1*0.618,"-61.8% : "+NumToStr(저점-var1*0.618,2)); text_Delete(Tx[19]); tx[19] = Text_New(sdate,stime,저점-var1*0.764,"-76.4% : "+NumToStr(저점-var1*0.764,2)); text_Delete(Tx[20]); tx[20] = Text_New(sdate,stime,저점-var1*1.000,"-100.0% : "+NumToStr(저점-var1*1.000,2)); text_Delete(Tx[21]); tx[21] = Text_New(sdate,stime,저점-var1*1.236,"-123.6% : "+NumToStr(저점-var1*1.236,2)); text_Delete(Tx[22]); tx[22] = Text_New(sdate,stime,저점-var1*1.382,"-138.2% : "+NumToStr(저점-var1*1.382,2)); text_Delete(Tx[23]); tx[23] = Text_New(sdate,stime,저점-var1*1.500,"-150.0% : "+NumToStr(저점-var1*1.500,2)); text_Delete(Tx[24]); tx[24] = Text_New(sdate,stime,저점-var1*1.618,"-161.8% : "+NumToStr(저점-var1*1.618,2)); text_Delete(Tx[25]); tx[25] = Text_New(sdate,stime,저점-var1*1.764,"-176.4% : "+NumToStr(저점-var1*1.764,2)); text_Delete(Tx[26]); tx[26] = Text_New(sdate,stime,저점-var1*2.000,"-200.0% : "+NumToStr(저점-var1*2.000,2)); text_Delete(Tx[27]); tx[27] = Text_New(sdate,stime,저점-var1*2.618,"-261.8% : "+NumToStr(저점-var1*2.618,2));
프로필 이미지
qha71
2020-08-28
661
글번호 141870
지표
답변완료

부탁좀 드리겠습니다.

수고하십니다. 그림파일처럼 이평선 끝선을 y축으로 연장하고자 합니다. 변환부탁드립니다 1) a=(sum(if(C-C(1)>0,C-C(1),0),Period)/sum(if(C-C(1)>0,C-C(1),C(1)-C),Period)*50); b=a>= 60; valuewhen(1,b,h) a=(sum(if(C-C(1)>0,C-C(1),0),Period)/sum(if(C-C(1)>0,C-C(1),C(1)-C),Period)*50); b=a<= 40; valuewhen(1,b,o) 2) HighestSince(1,CrossUp(Trix(5),0),avg(C,20)) LowestSince(1,CrossDown(Trix(5),0), avg(C,20))
프로필 이미지
harrywin
2020-08-28
889
글번호 141869
지표
답변완료

N일전 값과 오늘 값 기준으로 특정숫자 할당 및 전체기간 누적

안녕하세요. 아래 조건에 맞는 식을 도출하고 싶습니다. 요청드립니다. 감사합니다. 1) 오늘종가-어제종가 = A 라고함. 2) N일전의 A값이 0보다 크고,오늘 A값이 0보다 크면 B=1 3) 그렇지 않으면 B=0 4) 시뮬레이션 시작 기간부터 오늘까지 B값을 누적 ※ 도출실패 이유 : 제가 해봤을때는 B가 모두 0으로만 나왔습니다. 아무래도 시뮬레이션 시작일로부터 N일이 지나기 전까지는 N일전의 A값이 존재하지 않아 무언가 오류가 발생하는것 같습니다.
프로필 이미지
터틀3세
2020-08-28
718
글번호 141868
시스템

빠른예스 님에 의해서 삭제되었습니다.

프로필 이미지
빠른예스
2020-08-28
79
글번호 141867
지표
답변완료

누적 매수된 물량 특정 조건 발생시 1회 전량 매도 를 20회 분할 매도

국내 주식 data1 : 30분봉 data2 : 일봉 변경 요청건 아래 수식은 누적 매수된 물량 특정 조건 발생시 1회 전량 매도임니다. 그러다보면 과다 매수된 수량이 한번에 너무 많이 청산 입력됨에 따른 가격 왜곡이 우려됨 변경 사항 특정 매도 조건 발생시 (data1 차트에서 심리도 >80 or RSI > 80 ) data1(30분봉)에서 총 20회에 걸쳐 (약 이틀정도) 정량 분할 매도하는 수식 요망합니다. * 주의사항: 특정조건(RSI>80 or 심리도>80)에 부합할때마다의 20회 분할 청산이 아니라 특정조건으로 최초 1회 매도 발생하면 무조건 연속으로 다음봉 19봉까지 분할 청산 (1회매도(전체물량의 5%) 발생하면 data1(30분봉)의 다음봉이 청산조건이 되든 안되든 무조건 연속 20회 분할 매도 ) ==> 이게 요청하는 수식입니다. 사용 수식 =============================================================== input : 기준평균봉값(150); input : 하락률1(0.975); input : 제1진입금액(5); input : 제2진입금액(5); input : 제3진입금액(5); input : 제4진입금액(5); input : 제5진입금액(5); input : 제6진입금액(5); input : 심리도기간(15),심리도값(80); input : RSI기간(15),RSI값(88); var : mav(0,data2); mav = data2(ma(c,기준평균봉값)); if data2(c<mav) then { if DayLow < DayOpen*하락률1 and NextBarSdate == sDate Then Buy("b1",AtStop,DayOpen*하락률1,Floor(제1진입금액*10000/C)); if DayLow < DayOpen*(하락률1-0.01) and NextBarSdate == sDate Then Buy("b2",AtStop,DayOpen*(하락률1-0.01),Floor(제2진입금액*10000/C)); if DayLow < DayOpen*(하락률1-0.015) and NextBarSdate == sDate Then Buy("b3",AtStop,DayOpen*(하락률1-0.015),Floor(제3진입금액*10000/C)); if DayLow < DayOpen*(하락률1-0.02) and NextBarSdate == sDate Then Buy("b4",AtStop,DayOpen*(하락률1-0.02),Floor(제4진입금액*10000/C)); if DayLow < DayOpen*(하락률1-0.025) and NextBarSdate == sDate Then Buy("b5",AtStop,DayOpen*(하락률1-0.025),Floor(제5진입금액*10000/C)); if DayLow < DayOpen*(하락률1-0.03) and NextBarSdate == sDate Then Buy("b6",AtStop,DayOpen*(하락률1-0.03),Floor(제6진입금액*10000/C)); } if MarketPosition == 1 Then { if Data2(Simrido(심리도기간) > 심리도값 or rsi(RSI기간) > RSI값) Then ExitLong(); }
프로필 이미지
이형지
2020-08-28
609
글번호 141866
시스템
답변완료

지표 중심값 지표좀 요청 드립니다.

* 항상 많은 도움에 감사 합니다 * 아래 수식에서 var3 적용좀 부탁 드립니다. <기준> : 10개봉 중심값을 수평선 한선긋기 * 주석 좀 요청 드립니다. 선긋기 참어렵내요... var : TL1(0); var1 = highest(h,10) var2 = Lowest(L,10) ; var3 = (var1+var2) / 2 ; TL_Delete(TL1); TL1 = TL_New(sDate,sTime,c,sDate,sTime,c); TL_SetColor(TL1,LCYAN); TL_SetSize(TL1,5); * 고맙 습니다.
프로필 이미지
요타
2020-08-27
652
글번호 141865
지표
답변완료

문의드립니다

20이평선과 123이평선이 정배열이고, 123이평선이 상승추세이고, 후행스팬이 볼린저밴드 상단을 돌파하는 종목 검색하는 수식 부탁드립니다. 지표는 아래와 같습니다. ///일목(11,34,68) 볼밴(20,2)///
프로필 이미지
퍽탄
2020-08-27
829
글번호 141854
종목검색
답변완료

부탁드립니다. , 감사합니다.

아래식에서 1. 추가적으로 2일전,3일전,4일전 거래량도 나오게 부탁드립니다. 2. 당일부터 4일전까지의의 분차트상 평균거래량을 나오게 부탁드립니다. var : predate(0),idx(0),idx1(0),vv(0),cnt(0); if date != date[1] Then{ idx = 0; idx1 = idx[1]; predate = sdate[1]; } idx = idx+1; vv = 0; for cnt = idx to idx+idx1{ if predate == sdate[cnt] and stime[cnt] <= stime then{ vv = Volume[cnt]; cnt = 10000; } } var1 = vv; Plot1(Volume,"당일거래량흐름"); plot2(var1,"1일전거래량흐름"); plot3(0,"기준선");
프로필 이미지
e편한신호
2020-08-27
739
글번호 141849
지표
답변완료

68886문의지표분단위 중심선표시

input : 분(30); var : S1(0),D1(0),TM(0),TF(0),dd(0),tt(0); var : hh(0),ll(0),TL1(0),TL2(0),TL3(0),TL31(0),TL32(0); if Bdate != Bdate[1] Then { S1 = TimeToMinutes(stime); D1 = sdate; } if D1 > 0 then { if sdate == D1 Then TM = TimeToMinutes(stime)-S1; Else TM = TimeToMinutes(stime)+1440-S1; TF = TM%분; if Bdate != Bdate[1] or (Bdate == Bdate[1] and 분 > 1 and TF < TF[1]) or (Bdate == Bdate[1] and 분 > 1 and TM >= TM[1]+분) or (Bdate == Bdate[1] and 분 == 1 and TM > TM[1]) Then { hh = h; ll = l; dd = sDate; tt = sTime; TL31 = TL3[1]; TL32 = TL31[1]; TL_SetExtRight(TL32,False); TL1 = TL_New(dd,tt,hh,NextBarSdate,NextBarStime,hh); TL2 = TL_New(dd,tt,ll,NextBarSdate,NextBarStime,ll); TL3 = TL_New(dd,tt,(hh+ll)/2,NextBarSdate,NextBarStime,(hh+ll)/2); TL_SetColor(TL1,RED); TL_SetColor(TL2,BLUE); TL_SetColor(TL3,GREEN); TL_SetExtRight(TL3,true); } Else { if h > hh Then { hh = h; TL_SetBegin(tl1,dd,tt,hh); TL_SetBegin(tl3,dd,tt,(hh+ll)/2); } if l < ll Then { ll = l; TL_SetBegin(tl2,dd,tt,ll); TL_SetBegin(tl3,dd,tt,(hh+ll)/2); } TL_SetEnd(TL1,sDate,sTime,hh); TL_SetEnd(TL2,sDate,sTime,ll); TL_SetEnd(TL3,sDate,sTime,(hh+ll)/2); } } 안녕하세요 수식에 문제가 있는지 차트에 적용하면 지표가 보이지않읍니다 첨부파일를 참조해주세요 다시한번검토부탁합니다 해외나스닥선물에 적용 할려고합니다 장시작기준 1분봉기준 변수를30개봉15봉수로 장마감까지 수식이 적용되어야 합니다
프로필 이미지
이카도로
2020-08-27
913
글번호 141846
지표
답변완료

수식 의뢰 부탁드립니다.

안녕하세요 개발자님의 노고에 감사드립니다 매수조건 : 40봉 이평선 위에 있고 현재가격이 20봉 최고가이면 매수 매도조건 : 40봉 이평선 아래 있고 현재가격이 20봉 최저가이면 매도 40봉 이평선 아래 있는데 현재가가 20봉 최고가라고해서 매수되면 안됩니다 현재가가 20봉 최고가 조건을 충족시키고 있으면서 현재가가 40봉 이평선 위에 있는 순간 체결되어야 합니다 꼭 현재가격이 40봉 이평선 위에 있고 20봉 최고가일 때만 매수되어야 합니다 부탁드립니다
프로필 이미지
산이보리
2020-08-27
827
글번호 141843
시스템