커뮤니티

예스랭귀지 Q&A

글쓰기
답변완료

부탁 드립니다.

도움에 감사 드립니다. 1) 해선에서 수식을 실행결과 그림과 같이 일부 문제가 있어 정상실행 될수 있도록 부탁 드립니다. if DayOfWeek(Bdate) < dayofweek(Bdate[1]) Then //if bdate != bdate[1] then { var1 = 0; var2 = 0; } var1 = var1 + (V*C); var2 = var2 + 1; plot1(var1/var2); 2) 다음수식이 양봉일때만 var1값이 계산되고 양봉의 갯수만 더하여 var2값이 계산되도록 부탁 드립니다. if bdate != bdate[1] then { var1 = 0; var2 = 0; } var1 = var1 + (V*C); var2 = var2 + 1; plot1(var1/var2);
프로필 이미지
뮬리
2020-07-15
1989
글번호 140673
지표
답변완료

질문드립니다

항상 고생많으십니다! 혹시 15분봉상 3일동안 최고거래량 나온 봉의 고가 저가 중심가의 가격을 혹시 선표시로 3분봉에 나타나게 할 수 있을까요? 그리고 반대로 3분봉의 3일동안 최고거래량 나온 봉의 고가 저가 중심가의 가격을 혹시 선표시로 15분봉에 나타나게 할 수 있을까요? 가능하다면 3일을 기간 조절 가능하게 부탁드립니다!
프로필 이미지
조하트
2020-07-15
2023
글번호 140672
지표
답변완료

질문 부탁드립니다

수식도움 감사드립니다~~ 아래수식에서~~ 매수청산 300봉후부터(300봉내에서는 매수중지) 매수신호! 정상 작동되도록 가능할까요~?? 매도청산 1100봉후부터(1100봉까지는 매도중지) 매도신호! 정상자동 부탁드립니다~~ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~ input : 단(50),중(150),장(1200),천(2000); var : 단기(0),중기(0),이천(0),장기(0); 단기 = ma(c,단); 중기 = ma(c,중); 장기 = ma(c,장); 이천 = ma(c,천); if 중기 /장기 * 100 > 100.10 and 단기 > 중기[1300] and 이천 > 이천[200] Then buy("매수진"); if 중기 /장기 * 100 < 99.90 and 단기 < 중기[1300] and 이천 < 이천[200] Then Sell("매도진"); if MarketPosition == 1 Then { if ( 단기 < 중기[1300] and 이천 < 이천[200]) or (barssinceentry >= 1400 and 중기 /장기 * 100 > 99.80) Then exitlong("매수청"); } if MarketPosition == -1 Then { if (단기 > 중기[1300] and 이천 > 이천[200]) or (barssinceentry >= 1400 and 중기 /장기 * 100 < 100.20) Then exitshort("매도청"); }
프로필 이미지
째일
2020-07-15
1878
글번호 140671
시스템
답변완료

진입 이후로

안녕하세요? 진입한 이후로 현재봉 기준으로 가장 최고가,최저가, 종가, 수익률 등을 메시지로그로 찍어볼 수 있을까요?
프로필 이미지
롬롬7
2020-07-14
1727
글번호 140670
시스템
답변완료

문의드립니다

문의드립니다 아래는 만들어주신수식입니다 추가부탁드립니다 아래식에 당일 최고가 돌파 와 당일 최고 거래대금 갱신도 추가하고십습니다 거래대금은 아침9시부터9시3분까지의거래대금은 빼고 부탁드립니다 H[1] >= L[2]*1.02 이부분을 2프로 3프로 이런식으로 조절하고십습니다 선언해서부탁드립니다 미리 감사합니다 지표 if H[1] >= L[2]*1.02 and M[1] >= 3000000000 and Upvol[1] > DownVol[1]*(3/2) and H > highest(H,5)[1] Then plot1(H,"검색",MAGENTA); 2 종목검색 input : P(5),N(5); if H[1] >= L[2]*1.02 and M[1] >= 3000000000 and Upvol[1] > DownVol[1]*(3/2) and countif(c > H[1],5) >= 1 Then find(1);
프로필 이미지
파파리리
2020-07-15
1781
글번호 140669
지표
답변완료

수식 문의드립니다

안녕하세요... 시스템 수식 문의좀 드립니다.. 아래는 만들어주신 수식입니다. input : P(5); var : mav(0),T(0); mav = ma(C,P); if mav > mav[1] Then T = 1; if mav < mav[1] Then T = -1; plot1(mav,"이평",iff(T==1,RED,BLUE)); 이렇게 만들어주신 수식을 이용해서요... 5일 이평선이 색이 변할때 신호 수식을 나타내고 싶습니다. 근데 다른 조건이 하나 있는데.. 색이 변할때 60일선 위에서 5일선이 빨간색으로 변하는곳과 60일선 아래에서 5일선이 파란색으로 변하는곳에 신호가 나오게 하고 싶습니다. 도움좀 부탁드립니다. 감사합니다.
프로필 이미지
로꼬로꼬
2020-07-14
1801
글번호 140668
시스템
답변완료

안녕하세요?

지표식을 시스템 부탁 드립니다. input: period(20),봉수(2); Var:선두께(0),상승색(BLUE), 하락색(RED),예비선색상(white),상승세로선색상(red),하락세로선색상(blue),세로선두께(0); Var:j(0),T(0); Var: date11(0),date12(0),time11(0),time12(0),TL1(0),TL(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0),tx(0),tx1(0),tl4(0),idx(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0)/*,ZZ[20](0)*/; Array:r[7](0),fr[7](0),TL2[7](0),TL3[7](0),TX2[7](0),TX3[7](0); r[0] = 0; r[1] = 2; r[2] = 3.; r[3] = -1; r[4] = -2.; r[5] = 1; r[6] = 0.5; For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(c,highest(h,Period)[1]) Then T = 1; if CrossDown(c,Lowest(l,Period)[1]) Then T = -1; If T == -1 Then { If T[1] != -1 Then { For j = 18 DownTo 0 { LoVal[j+1] = LoVal[j]; LoBar[j+1] = LoBar[j]; //ZZ[j+1] = ZZ[j]; } LoVal[0] = l; LoBar[0] = 0; //ZZ[0] = l; date11 = date[HiBar[0]]; time11 = stime[HiBar[0]]; Value11 = HiVal[0]; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,상승색); Tx = Text_New(date11,time11,Value11,"▼"); #동그라미 색상, 빨강 Text_SetColor(Tx,blue); Text_SetStyle(Tx,2,1); Text_SetSize(tx,12); tx = Text_New(date11,time11,Value11,NumToStr(value11,2)+NewLine); Text_SetStyle(tx,2,1); date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; for j = 0 to 6 { fr[j] = LoVal[1] + ((HiVal[0] - LoVal[1]) * r[j]); } TL2[0] = TL_New(date21,time21,fr[0],date22,time22,fr[0]); TL_SetColor(TL2[0],white); #TL2[1] = TL_New(date21,time21,fr[1],date22,time22,fr[1]); #TL_SetColor(TL2[1],RED); #TL_SetStyle(TL2[1], 3); #TL2[2] = TL_New(date21,time21,fr[2],date22,time22,fr[2]); #TL_SetColor(TL2[2],red); #TL_SetSize(TL2[2],1); #TX2[2] = Text_New(date22,time22,fr[2],NumToStr(fr[2],2)); #Text_SetColor(Tx2[2],BWHITE); #Text_SetStyle(TX2[2],1,1); #TL2[3] = TL_New(date21,time21,fr[3],date22,time22,fr[3]); #TL_SetColor(TL2[3],RED); #TL_SetStyle(TL2[3], 3); #TL2[4] = TL_New(date21,time21,fr[4],date22,time22,fr[4]); #TL_SetColor(TL2[4],red); #TL_SetSize(TL2[4],1); #TX2[4] = Text_New(date22,time22,fr[4],NumToStr(fr[4],2)); #Text_SetColor(Tx2[4],BWHITE); #Text_SetStyle(TX2[4],1,0); TL2[5] = TL_New(date21,time21,fr[5],date22,time22,fr[5]); TL_SetColor(TL2[5],white); TL2[6] = TL_New(date21,time21,fr[6],date22,time22,fr[6]); TL_SetColor(TL2[6],MAGENTA); idx = 0; } If LoVal[0] > l Then { LoVal[0] = l; LoBar[0] = 0; //ZZ[0] = l; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; //Tx = Text_New_Self(date12,time12,Value12,NumToStr(abs(value11-value12)/PriceScale,0)+" "); #동그라미 색상, 빨강 //Text_SetColor(Tx,BLUE); //Text_SetStyle(Tx,1,0); TL_SetEnd(TL2[0],date22,time22,fr[0]); TL_SetEnd(TL2[1],date22,time22,fr[1]); TL_SetEnd(TL2[2],date22,time22,fr[2]); Text_SetLocation(TX2[2],date22,time22,fr[2]); TL_SetEnd(TL2[3],date22,time22,fr[3]); TL_SetEnd(TL2[4],date22,time22,fr[4]); Text_SetLocation(TX2[4],date22,time22,fr[4]); TL_SetEnd(TL2[5],date22,time22,fr[5]); TL_SetEnd(TL2[6],date22,time22,fr[6]); TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); idx = 0; } } If T == 1 Then { If T[1] != 1 Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; //ZZ[j+1] = ZZ[j]; } HiVal[0] = h; HiBar[0] = 0; //ZZ[0] = h; date11 = date[LoBar[0]]; time11 = stime[LoBar[0]]; Value11 = LoVal[0]; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); TL1 = TL_New(date11,time11,Value11,date12,time12,Value12); TL_SetColor(TL1,하락색); Tx1 = Text_New(date11,time11,Value11,"▲"); #동그라미 색상, 파랑 Text_SetColor(Tx1,red); Text_SetStyle(Tx1,2,5); Text_SetSize(tx1,12); tx = Text_New(date11,time11,Value11,NewLine+NumToStr(value11,2)); Text_SetStyle(tx,2,0); date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; for j = 0 to 5 { fr[j] = LoVal[0] + ((HiVal[1] - LoVal[0]) * r[j]); } TL3[0] = TL_New(date31,time31,fr[0],date32,time32,fr[0]); TL_SetColor(TL3[0],white); #TL3[1] = TL_New(date31,time31,fr[1],date32,time32,fr[1]); #TL_SetColor(TL3[1],BLUE); #TL_SetStyle(TL3[1], 3); #TL3[2] = TL_New(date31,time31,fr[2],date32,time32,fr[2]); #TL_SetColor(TL3[2],BLUE); #TL_SetSize(TL3[2],1); #TX3[2] = Text_New(date32,time32,fr[2],NumToStr(fr[2],2)); #Text_SetColor(Tx3[2],BWHITE); #Text_SetStyle(TX3[2],1,1); #TL3[3] = TL_New(date31,time31,fr[3],date32,time32,fr[3]); #TL_SetColor(TL3[3],BLUE); #TL_SetStyle(TL3[3], 3); #TL3[4] = TL_New(date31,time31,fr[4],date32,time32,fr[4]); #TL_SetColor(TL3[4],BLUE); #TL_SetSize(TL3[4],1); #TX3[4] = Text_New(date32,time32,fr[4],NumToStr(fr[4],2)); #Text_SetColor(Tx3[4],BWHITE); #Text_SetStyle(TX3[4],1,0); TL3[5] = TL_New(date31,time31,fr[5],date32,time32,fr[5]); TL_SetColor(TL3[5],white); TL3[6] = TL_New(date31,time31,fr[6],date32,time32,fr[6]); TL_SetColor(TL3[6],cyan); idx = 0; } If HiVal[0] < h Then { HiVal[0] = h; HiBar[0] = 0; //ZZ[0] = h; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; //Tx = Text_New_Self(date12,time12,Value12,NumToStr(abs(value11-value12)/PriceScale,0)+" "); #동그라미 색상, 빨강 //Text_SetColor(Tx,RED); //Text_SetStyle(Tx,1,1); TL_SetEnd(TL3[0],date32,time32,fr[0]); TL_SetEnd(TL3[1],date32,time32,fr[1]); TL_SetEnd(TL3[2],date32,time32,fr[2]); Text_SetLocation(TX3[2],date32,time32,fr[2]); TL_SetEnd(TL3[3],date32,time32,fr[3]); TL_SetEnd(TL3[4],date32,time32,fr[4]); Text_SetLocation(TX3[4],date32,time32,fr[4]); TL_SetEnd(TL3[5],date32,time32,fr[5]); TL_SetEnd(TL3[6],date32,time32,fr[6]); TL_Delete(tl); TL = TL_New(sdate,stime,Value12,NextBarSdate,NextBarStime,NextBarOpen); idx = 0; } } idx = idx+1; TL_SetSize(tL,선두께); TL_SetSize(tL1,선두께); TL_SetColor(tL,예비선색상); var : VTL(0); if idx == 봉수 Then { TL_Delete(VTL);//최근것만 표시하고자 할경우 이 내용을 삭제하시면 됩니다. VTL = TL_New(sdate,stime,999999999,sDate,stime,0); TL_SetColor(VTL,iff(T == -1,상승세로선색상,하락세로선색상)); TL_SetSize(VTL,세로선두께); }
프로필 이미지
시그너스
2020-07-14
1593
글번호 140667
시스템
답변완료

부탁좀드립니다~~

너무궁금해서요 그간의 질문과 해주셨던 답변들로 검색식을 만들어가고있습니다 근데 하면할수록 식이 많아져서요 질문은! 바로 "검색의 소요시간"입니다 제가 쓰는 검색식은 대충 이러합니다 3봉전 3봉간 거래량 얼마이상 And 3봉전 3봉간 틱수 얼마이상 And 3봉전 3봉간 거래대금 얼마이상 And . . . . 버슷한것들 대강 50개정도의 식을만듭니다 그리고 분을바꾸어서 6봉전 6봉간...이렇게 50개정도 조건에 맞으면 검색되고 또는 9봉전 9봉간 (50개의식) 또는 12봉전 12봉간 (50개의식) 또는 15봉전 15봉간 (50개의식) . . . 또는 150봉전 150봉간 (50개의식) 쭉해서 150봉전 150봉간 조건에 맞으면 검색. 이렇게 50개정도의 식을 3분간 간격을주어 150봉까지 적용했더니 대충해도 50개식×50개식이되어버려 2000개의 식이 넘어갑니다 단순한거같지만 식이 너무 많아 검색하는데 시간이 오래걸릴것같은 생각이 들어서요... 1분이 넘어갈까요? 10초 20초 정도걸리는건 괜찮은데 1분이 넘어가면 안되서요... 제발 답변부탁드립니다ㅜㅜ 참고로 식은 많지만 조건들은 거래량 틱수 거래대금 가격 이렇게 4개가 거의여서 복잡한식은 없습니다
프로필 이미지
말라
2020-07-14
1699
글번호 140666
검색
답변완료

누적 거래량 수식

var1 = Accum(V); If bDate!=bDate[1] Then var2 = var1[1]; var3 = var1-var2; 이게 분봉에다가 당일 누적 거래량을 표시하는 수식인데요 여기다가 전날의 완성된 누적거래량까지 합해서 분봉에 표시하는 방법은 없나요? 예를 들어 전날을 1일로 치고 1일 마지막 봉까지 누적된 거래량이 100만이라면 당일(2일) 첫봉 거래량이 10만일 경우 누적 110만, 2봉 거래량이 20만이라면 누적 130만... 이런식으로 표시되게 할 수 있을까요? 여기다가 그 다음날(3일)이 되면 그 앞(1일)의 누적거래량은 제외하고 완성된 2일 누적거래량에 3일 거래량이 누적... 반복되는 방법을 알고 싶습니다 DayVolume 사용하는 거 말고 위에 있는 수식을 기반으로 해주시면 감사드리겠습니다
프로필 이미지
아래위
2020-07-14
3054
글번호 140665
지표
답변완료

기본 시스템

예스프로그램 기본 시스템의 Var : value(0); value = 0; # 매수 / 매도청산 If CCI(9) > 0 Then value = 1; If MACD(12,26) > 0 Then value = value+1; If DIPlus(14) > DIMinus(14) Then value = value+1; If StochasticsK(12,5) > StochasticsD(12,5,5) Then value = value+1; # 매수/매도청산 If value >= 3 Then { Buy("매수"); } value = 0; # 매도/매수청산 If CCI(9) < 0 Then value = 1; If MACD(12,26) < 0 Then value = value+1; If DIPlus(14) < DIMinus(14) Then value = value+1; If StochasticsK(12,5) < StochasticsD(12,5,5) Then value = value+1; If value >= 3 Then { Sell("매도"); } 위조건에 기본 시스템 파라볼릭 Input : af(0.02), maxAF(0.2); Var : value(0); value = sar(af,maxAF); # 매수/매도청산 If C > value Then { Buy(); } # 매도/매수청산 If C < value Then { Sell(); } 을 합성 부탁 드립니다.
프로필 이미지
시그너스
2020-07-14
1529
글번호 140664
시스템