커뮤니티

예스랭귀지 Q&A

글쓰기
답변완료

문의드립니다!

안녕하세요! 아래지표에서 선의 두께와 색상의 조정이 가능하도록 수식변경 부탁드립니다 매번 감사합니다!!! ------------------------------------------------------------------------------------- input : 분(30),값(0); var : S1(0),D1(0),TM(0),TF(0),dd(0),tt(0),idx(0); var : hh(0),ll(0),TL1(0),TL2(0),TL3(0),TL31(0),TL32(0); var : tx1(0),tx2(0),tx3(0),tx31(0),Tx32(0),DD1(0),TT1(0),vv1(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,BLACK); TL_SetExtRight(TL3,true); Text_SetLocation(Tx1,sDate[Ceiling(idx/2)],sTime[Ceiling(idx/2)],hh[1]); Text_SetLocation(Tx2,sDate[Ceiling(idx/2)],sTime[Ceiling(idx/2)],ll[1]); Text_SetLocation(Tx3,sDate[Ceiling(idx/2)],sTime[Ceiling(idx/2)],(hh[1]+ll[1])/2); Text_SetStyle(tx1,2,1); Text_SetStyle(tx2,2,0); Text_SetStyle(tx3,2,0); Text_SetSize(Tx2, 11); Tx31 = Tx3[1]; Tx1 = Text_New(dd,tt,hh,"H"+NewLine+NumToStr(hh,값)); Tx2 = Text_New(dd,tt,ll,NumToStr(ll,값)+NewLine+"L"); Tx3 = Text_New(dd,tt,(hh+ll)/2,"M"+NumToStr((hh+ll)/2*4,값)+NewLine+NumToStr(hh-ll,값)); Text_SetColor(Tx1,RED); Text_SetColor(Tx2,BLUE); Text_SetColor(Tx3,BLACK); Text_SetStyle(tx1,0,2); Text_SetStyle(tx2,0,0); Text_SetStyle(tx3,0,0); idx = 0; } Else { idx = idx+1; 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); Text_SetString(Tx1,NumToStr((hh-ll)*4,0)+NewLine+"H"+NumToStr(hh,값)); Text_SetStyle(Tx1, 0, 0); Text_SetSize(Tx1, 11); Text_SetString(Tx2,NumToStr(ll,값)+NewLine+"L"); Text_SetStyle(Tx2, 0, 0); Text_SetSize(Tx2, 11); Text_SetString(Tx3,"M"+NumToStr((hh+ll)/2,값)+NewLine+NumToStr((hh-ll)/2*4,0)); Text_SetStyle(Tx3, 0, 0); Text_SetSize(Tx3, 11); Text_SetLocation(Tx1,sDate,sTime,hh); Text_SetLocation(Tx2,sDate,sTime,ll); Text_SetLocation(Tx3,sDate,sTime,(hh+ll)/2); } }
프로필 이미지
유로파54
2020-09-08
716
글번호 142168
지표
답변완료

주문 횟수조정

안녕하세요 우선 답변 감사 드립니다. 조건이 충족될시 여러번 Buy나 Sell이 표시 되는데 이것을 매번 조건 충족시 3번까지만 거래되게 하는 시스템을 어떻게 만들어야 되는지 문의 드립니다. 예를 들어 조건이 크로스 업 Buy 3번, 크로스 다운 되면 sell 3번, 크로스 업 Buy 3번 즉, 조건이 변할때 마다 진입은 초반 3번만 되게끔 하고 싶습니다. 미리 감사 드립니다. ## 기준선+전환선 ## Input:기준선기간1(20),기준선기간2(60); var:기준선1(0),기준선2(0); 기준선1 = (Highest(High, 기준선기간1) + Lowest(Low, 기준선기간1)) / 2 ; 기준선2 = (Highest(High, 기준선기간2) + Lowest(Low, 기준선기간2)) / 2 ; ## 지수 이평 ## Input : 지수이평기간(5); var : 지수이평(0); 지수이평 = ema(C,지수이평기간); If (기준선1[0] >= 기준선2[0]) and (Crossup(지수이평[0],기준선2[0]) or Crossup(지수이평[0],기준선1[0])) Then Buy (); If (기준선1[0] < 기준선2[0]) and (CrossDown(지수이평[0],기준선2[0]) or CrossDown(지수이평[0],기준선1[0]))Then Sell ();
프로필 이미지
blueo
2020-09-08
796
글번호 142167
시스템
답변완료

계약수 지정

안녕하세요? 계약수 지정이 가능할까요? 즉 시스템 로직1에의해 2계약 매도로 진입했는데, Rsi가 상향 돌파나와서 1계약은 청산 해놨다가 종가에 다시 매도 해서 2계약을 맞춰놓는 방식입니다. 그럼 이때 또 궁금한점이 시스템 옵션에서 계약수 설정하는 부분이 있는데 여기에 설정값과 어떰 영향을 미치는지요? 그리고 또.. 2계약 매도 했다가 1계약은 rsi로직으로 매수를 했어서 총 1계약 숏인데, 시스템 1의 청산로직이 발동되어서 exit short 로직을 타면 몇계약 청산이 되는건가요? 감사합니다!!
프로필 이미지
롬롬7
2020-09-08
866
글번호 142161
시스템
답변완료

수식 부탁드립니다.

안녕하세요? 간단한 수식한가지 부탁드립니다. 진입 : 도지 + 캔들 + 양봉 매수진입 / 도지 + 캔들 + 음봉 매도진입 (도지와 진입봉 사이에있는 캔들은, 양봉이든 음봉이든 상관 無) 청산 : 손절(외부변수)/익절(외부변수) **포지션 보유시, 다음신호 발생전까지 재진입금지 (청산후 재진입) 감사합니다.
프로필 이미지
대구어린울프
2020-09-08
914
글번호 142160
시스템
답변완료

수정 의뢰 드립니다!

안녕하세요! 아래 수식에서 가격만 표시하고 고저점 라인과 추세선은 표시되지 않도록 수정을 부탁드립니다! 그리고 가격의 폰트 크기도 제가 조정할 수 있도록 부탁드립니다! 항상 노고에 감사드립니다! input:length(4),종가사용여부(0),파동선두께(1),수치표시(1); Var:j(0),jj(0),HH(0),LL(0),최종고가(0),최종저가(0),최종꼭지점(""),처리구분(""), TL1(0),Text1(0),tl2(0),tl3(0),tl4(0),tl5(0),T(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 { T = 1; 최종고가 = 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]); If 수치표시 == 1 Then { Text1 = Text_New(고[1,3],고[1,4],고[1,1],NumToStr(고[1,1],2)); Text_SetStyle(Text1, 2, 0); Text_SetColor(Text1,BLACK); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,yellow); } 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]); // 시작점은 변동없고 끝점의 위치가 현재 봉으로 연장된 것임 If 수치표시 == 1 Then { Text_SetLocation(Text1,고[1,3],고[1,4],고[1,1]); Text_SetString(Text1,NumToStr(고[1,1],2)); } } 최종꼭지점 = "고점"; } #==========================================# If 처리구분 == "저점처리" Then { T = -1; 최종저가 = 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]); If 수치표시 == 1 Then { Text1 = Text_New(저[1,3],저[1,4],저[1,1],NumToStr(저[1,1],2)); Text_SetStyle(Text1, 2, 1); Text_SetColor(Text1,BLACK); } TL_SetSize(TL1,파동선두께); TL_SetColor(TL1,blue); } 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]); If 수치표시 == 1 Then { Text_SetLocation(Text1,저[1,3],저[1,4],저[1,1]); Text_SetString(Text1,NumToStr(저[1,1],2)); } } 최종꼭지점 = "저점"; } if T == -1 and T[1] != -1 Then{ TL2 = TL_New(고[2,3],고[2,4],고[2,1],sdate,stime,고[2,1]); TL_Delete(TL3); TL3 = TL_New(고[1,3],고[1,4],고[1,1],sdate,stime,고[1,1]); TL_SetExtRight(TL3,true); TL_SetSize(TL2,파동선두께); TL_SetColor(TL2,rgb(126,126,126)); TL_SetSize(TL3,파동선두께); TL_SetColor(TL3,rgb(126,126,126)); } if T == 1 and T[1] != 1 Then{ TL4= TL_New(저[2,3],저[2,4],저[2,1],sdate,stime,저[2,1]); TL_Delete(TL5); TL5= TL_New(저[1,3],저[1,4],저[1,1],sdate,stime,저[1,1]); TL_SetExtRight(TL5,true); TL_SetSize(TL4,파동선두께); TL_SetColor(TL4,rgb(128,128,128)); TL_SetSize(TL5,파동선두께); TL_SetColor(TL5,rgb(128,128,128)); }
프로필 이미지
qha71
2020-09-08
1104
글번호 142154
지표
답변완료

adx와 di 관련 수정부탁드립니다.

안녕하세요. 아래와 같이 작성하면 전일 di선을 연속적으로 인식하여 당일 신호가 안나오거나 9시에 바로 신호가 나옵니다. 전일과 전혀 상관없이 당일 dl선 나오는 것 부터 인식하여 당일 adx선이 당일 di선 돌파시 신호가 나오도록 부탁드립니다. 감사합니다. Input : dix(10),Period(24); value1 = DIPlus(Period); value2 = DIMinus(Period); value3 = ADX(Period); var : T1(0),entry(0); if Bdate != bdate[1] Then T1 = TotalTrades[1]; if MarketPosition == 0 Then entry = TotalTrades-T1; Else entry = TotalTrades-T1+1; if dayindex <= dix then{ If CrossUp(value3, value1) or CrossDown(value3, value1) Then if entry < 5 Then Buy(); If CrossUp(value3, value2) or CrossDown(value3, value2) Then if entry < 5 Then Sell(); } SetStopEndofday(150000); SetStopProfittarget(100,PointStop); SetStopLoss(10.0,PointStop);
프로필 이미지
바둑이
2020-09-07
1026
글번호 142153
시스템
답변완료

부탁 드립니다.

도움에 깊이 감사 드립니다. 1)예를 들어 10분 차트에서 60분 지표 수식 2)60분 차트에서 일봉 지표 수식 부탁 드립니다. 미리 경배로 감사 인사 올립니다. input :p(10),sig(5); var1=cmo(p);//기본제공지표 var2=ma(var1,sig); 참고수식) Input : Length(Numeric); CMO = 100 * (C-C[Length]) / (AccumN(Abs(C-C[1]), Length)); input : Atime1(60),Length(10),sig(5); var : TL(0),TH(0),cnt(0),Dcnt(0),preTRange(0),prePlusDM14(0),MinusDM14(0),TRange1(0),preMinusDM14(0); Var : TRange(0), MyRange(Length), PlusDM14(0), PlusDM(0), MinusDM(0),preADX(0); Var : CummDMI(0), Cummi(0); var : S1(0),D1(0),TM(0),TF1(0),CB(0); Array : HH[61](0),LL[61](0),CC[61](0),TR[61](0),DMIv[61](0),ADXv[61](0); Array : DPlus[61](0),DMinus[61](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; TF1 = TM%Atime1; if Bdate != Bdate[1] or (Bdate == Bdate[1] and Atime1 > 1 and TF1 < TF1[1]) or (Bdate == Bdate[1] and Atime1 > 1 and TM >= TM[1]+Atime1) or (Bdate == Bdate[1] and Atime1 == 1 and TM > TM[1]) Then {
프로필 이미지
뮬리
2020-09-08
1199
글번호 142152
지표
답변완료

문의 드립니다

안녕하세요 키움전환 입니다 A; 수식1 a=RSI(14); b=a>=70; valuewhen(1,b,h) 수식2 a=RSI(14); b=a<=30; valuewhen(1,b,L) B; 수식1 valuewhen(1,crossup(avg(c,5),avg(c,20)),avg(c,prd)); prd:20 2가지 수식 부탁드립니다 감사합니다
프로필 이미지
만강
2020-09-07
873
글번호 142151
지표
답변완료

이평선 색상변화와 틱차트에 분봉이평 표시

틱차트에 5분봉의 10선과 20선 60선을 표시하고 10선, 20선, 60선의 기울기가 양과 음에 따라 색상을 달리 주고 싶습니다. 추가로 일봉의 5일선도 표시하고 싶습니다. 항상 도움에 감사드립니다
프로필 이미지
중추신경
2020-09-07
1086
글번호 142149
지표
답변완료

이격도의 선을 차트에 구현(재질문)

안녕하세요 관리자님!! 재질문드립니다 아래 수식(이격도)에서 plot2,plot3가 일정수치(0.5/1.0/2.0/-0.5/-1.0/-2.0)에 도달하게 되는지점을 차트에서 선으로 구현하고 싶습니다 도와주세요!! var : wo(0),wh(0),wl(0); var : wo1(0),wh1(0),wl1(0); if DayOfWeek(bdate) < DayOfWeek(bdate[1]) Then { WO = O; WH = H; WL = L; WO1 = WO[1]; WH1 = WH[1]; WL1 = WL[1]; } if h > wh Then wh = h; if l < wl Then wl = l; if WO1 > 0 then { var1 = C/WO1*100-100; plot1(var1,"시가"); } if WH1 > 0 then { var2 = (C/WH1*100-100); plot2(var2,"고가"); } if WL1 > 0 then { var3 = C/WL1*100-100; plot3(var3,"저가"); #plot4(WO[1],"주시가"); plot5(0.5,"0.5선"); plot6(-0.5,"-0.5선"); plot7(1.0,"1.0선"); plot8(-1.0,"-1.0선"); plot9(2,"2선"); plot10(-2,"-2선"); plot11(0,"중심선"); }
프로필 이미지
카카
2020-09-07
1084
글번호 142145
지표