커뮤니티

예스랭귀지 Q&A

글쓰기
답변완료

부탁 드립니다.

도움에 진심으로 감사 드립니다. 질문1) 수식1,2를 해선용으로 사용 하던 지표를 국내 주식용으로 사용 하고자 하오니 수정 부탁 드립니다. 질문2) 수식2를 타주기 틱용으로 부탁 드립니다. 미리 감사 드립니다. 수식1) input : Period(20),dv(2); var : cnt(0),TM(0); var : mav1(0),BBup1(0),BBdn1(0); var : TF2(0),sum2(0),mav2(0),SumSqrt2(0),Stdv2(0),BBup2(0),BBdn2(0); var : TF3(0),sum3(0),mav3(0),SumSqrt3(0),Stdv3(0),BBup3(0),BBdn3(0); var : TF4(0),sum4(0),mav4(0),SumSqrt4(0),Stdv4(0),BBup4(0),BBdn4(0); var : sum5(0),mav5(0); Array : C2[130](0),C3[130](0),C4[130](0); if bdate != Bdate[1] Then var1 = stime; if date != date[1] Then var2 = TM[1]; if stime >= var1 Then TM = TimeToMinutes(stime)-TimeToMinutes(var1); Else TM = TimeToMinutes(stime)+var2; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF2 < TF2[1]) Then{ for cnt = 1 to 129{ C2[cnt] = C2[cnt-1][1]; } } C2[0] = C; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF3 < TF3[1]) Then{ for cnt = 1 to 129{ C3[cnt] = C3[cnt-1][1]; } } C3[0] = C; if DayClose(Period-1) > 0 then{ sum4 = 0; for cnt = 0 to Period-1{ sum4 = sum4+DayClose(cnt); } mav4 = sum4/Period; SumSqrt4 = 0; For cnt = 0 To Period - 1 { SumSqrt4 = SumSqrt4 + (DayClose(cnt) - mav4) * (DayClose(cnt) - mav4); } Stdv4 = SquareRoot(SumSqrt4/ Period); } 수식2) input : Atime1(30),Period(20),dv(2); var : cnt(0),TM(0); var : mav1(0),BBup1(0),BBdn1(0); var : TF2(0),sum2(0),mav2(0),SumSqrt2(0),Stdv2(0),BBup2(0),BBdn2(0); var : TF3(0),sum3(0),mav3(0),SumSqrt3(0),Stdv3(0),BBup3(0),BBdn3(0); var : TF4(0),sum4(0),mav4(0),SumSqrt4(0),Stdv4(0),BBup4(0),BBdn4(0); var : sum5(0),mav5(0); Array : C2[60](0),C3[60](0),C4[60](0); if bdate != Bdate[1] Then var1 = stime; if date != date[1] Then var2 = TM[1]; if stime >= var1 Then TM = TimeToMinutes(stime)-TimeToMinutes(var1); Else TM = TimeToMinutes(stime)+var2; TF2 = TM%Atime1; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF2 < TF2[1]) Then{ for cnt = 1 to 59{ C2[cnt] = C2[cnt-1][1]; } } C2[0] = C; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF3 < TF3[1]) Then{ for cnt = 1 to 59{ C3[cnt] = C3[cnt-1][1]; } } C3[0] = C; if C2[Period-1] > 0 then{ sum2 = 0; for cnt = 0 to Period-1{ sum2 = sum2+C2[cnt]; } mav2 = sum2/Period; SumSqrt2 = 0; For cnt = 0 To Period - 1 { SumSqrt2 = SumSqrt2 + (C2[cnt] - mav2) * (C2[cnt] - mav2); } Stdv2 = SquareRoot(SumSqrt2/ Period); }
프로필 이미지
yes
2020-04-08
934
글번호 137678
지표
답변완료

질문 있습니다

질문이 있습니다. 1.시스템 보고서에 있는 최소필요금액은 어떻게 산출되는 건지 알 수 있을까요? 2. 이평선을 적용한 Crossup함수를 사용할때 일봉에서 분봉으로 변경하면, ()안에 들어가는 값들이 일봉 이평선에서 분봉 이평선으로 변경되나요?
프로필 이미지
파랭
2020-04-08
850
글번호 137677
시스템
답변완료

수식부탁드립니다.

차트 2개 연동 1번차트 5분봉 2번차트 30분봉 매매시간은 10시부터 12시까지 하루진입1번만 수익30틱 손절 15틱 수익이나 손절시 매매종료 30분봉 차트에서 macd데드크로스일때(3개봉이내발생 기준선50위일때) 5분봉에서도 macd 데드크로스 되면 매도 진입 30분봉 차트에서 macd골든크로스일때(3개봉이내발생 기준선50아래일때) 5분봉에서도 macd 골든코르소 되면 매수 진입 진입후 15틱이상 갔다가 30틱 못가고 0틱되면 본절 청산 부탁드립니다.
프로필 이미지
디얼디어
2020-04-07
864
글번호 137676
시스템
답변완료

당일에만 적용되는 지수이평

첨부한 파일의 당일이평을 당일 지수이평으로 적용할수있는 수식이 궁금합니다. 적용된 수식 input : P(10); var : mav(0); if date != date[1] Then{ var1 = 0; var2 = 0; } var1 = var1+(h+l)/2; var2 = var2+1; if dayindex < P Then mav = var1/var2; Else mav = accumn((h+l)/2,P)/P; if currentdate == sdate then plot1(mav,"당일이평");
프로필 이미지
새가날아오를때
2020-04-07
928
글번호 137675
지표
답변완료

문의드립니다.

강조에 표기를 원합니다. 일목균형표에서 후행스팬이 일목균형표의 기준선을 상향 돌파시 "IL=BUY" 일목균형표에서 후행스팬이 일목균형표의 기준선을 하향 돌파시 "IL=SELL" 그리고, 5일선이 일목의 기준선 상향 돌파시 "5=BUY" 5일선이 일목의 기준선 하양 돌파시 " 5=SELL" 그리고 5일선이 볼린져밴드의 하행선을 하향으로 돌파시 "5=BSELL" 그리고 5일선이 볼린져밴드의 상행선을 하향으로 돌파시 "5=BUSELL" 그리고 5일선이 볼린져밴드의 하행선 터치하고 상향으로 돌파시 "5=BBUY" 이렇게 표기하는 수식 부탁 드립니다. 수고하세요.
프로필 이미지
백두에서한라
2020-04-08
895
글번호 137674
강조
답변완료

dayindex=0,1,2,..일때 주문진입신호명을 b0, b1,b2... 으로 표시방법?

항상 도움주셔서 감사드립니다. dayindex=0 일때 buy 함수에서 주문진입신호명을 "b0" dayindex=1 일때 buy 함수에서 "b1" dayindex=2 일때 buy 함수에서 "b2" dayindex=3 일때 buy 함수에서 "b3" : : 으로 표시하고 싶습니다. dayindex값을 간단한 text함수로 바꿔주는 방법이 있을까요?
프로필 이미지
퀀텀프로
2020-04-07
837
글번호 137673
시스템
답변완료

수식 수정 부탁드립니다.

var : Condition1(false),Condition2(false),Condition3(false); if MarketPosition == 0 then { if NextBarSdate != sdate Then { buy("시가매수",AtMarket,dayopen,1); } } Else If MarketPosition == 1 Then { #시가 대비 -1% 하락시 -3% 까지 1주씩 매수 if dayopen *0.99 >= c and Condition1 == False then { Condition1 = True; buy("1% 하락 매수",atlimit,dayopen *0.99,1); } else if dayopen *0.98 >= c and Condition1 == false then { Condition2 = True; buy("2% 하락 매수",atlimit,dayopen *0.98,1); } else if dayopen *0.97 >= c and Condition3 == false then { Condition3 = True; buy("3% 하락 매수",atlimit,dayopen *0.97,1); } } 시가 매수후 시가에서 -3%까지 -1%하락할때마다 1주씩 매수를 해야되는데 시가 매수는 되는데 시가에서 하락할때마다 매수는 안되네요; (Condition 들은 같은 가격에서 재매수 금지를 위해 넣었습니다 이걸 뺀다고 해도 가격 하락시에 매수는 되지 않네요;) 문법상 오류는 없는거 같은데 어떤 문제때문인가요?
프로필 이미지
오라클
2020-04-07
774
글번호 137672
시스템
답변완료

지표식 문의드립니다

안녕하세요 관리자님!! 보내주신 아래서식은 잘쓰고 있습니다.. 아래의 식은 장중발생하는 (고가+저가)/2의 값을 표현하는건데 이를 응용하여 ntime 중 발생하는 (고가+신고가)/2, (저가+신저가)/2 의 값을 구현하고 싶습니다. 도와주세요!!! - 아래 - input : P(20),Dv(6),ntime(60); var : cnt(0),S1(0),D1(0),TM(0),TF(0),hh(0),ll(0),mm(0); var1 = BollBandUp(P,dv); var2 = BollBandDown(P,dv); 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 = TimeToMinutes(stime)%ntime; if Bdate != Bdate[1] or (Bdate == Bdate[1] and ntime > 1 and TF < TF[1]) or (Bdate == Bdate[1] and ntime > 1 and TM >= TM[1]+ntime) or (Bdate == Bdate[1] and ntime == 1 and TM > TM[1]) Then { hh = h; ll = l; } if h > hh Then hh = h; if l < ll Then ll = l; mm = (hh+ll)/2; if mm != mm[1] Then { value1 = var1; value2 = var2; } plot1(value1,"상한"); plot2(value2,"하한"); }
프로필 이미지
카카
2020-04-07
771
글번호 137671
지표

수색대대 님에 의해서 삭제되었습니다.

프로필 이미지
수색대대
2020-04-07
1
글번호 137669
지표
답변완료

지표문의

1.안녕하세요 아래는 CSar지표인데요. 수평연장선이 고가지점, 저가지점 대비 2등분으로 표시 되는데 3등분으로 보구 싶어요. 지표 수정 좀해 주세요. 아울러 등분 나누는 방법두 좀 알려주세요. input : af(0.02), maxAF(0.2),추세선두께(5),추세선색1(RED),추세선색2(BLUE),연장선두께(2),연장선색(blue); input : 텍스트출력(1); var : T(0),HH(0),LL(0),HD(0),HT(0),LD(0),LT(0); var : HH1(0),LL1(0),HD1(0),HT1(0),LD1(0),LT1(0); var : TL1(0),TL2(0),cnt(0),count(0); var : TL3(0),TL4(0),TL5(0),TL6(0),tx1(0),tx2(0),tx11(0),tx22(0); Var : TL11(0),TL22(0); var1 = CSar(af,maxAF); if crossup(c,var1) Then { T = 1; HH = H; HD = sdate; HT = stime; HH1 = HH[1]; HD1 = HD[1]; HT1 = HT[1]; if LL > 0 Then { TL1 = TL_new(LD[1],LT[1],LL[1],HD,HT,HH); TL_Delete(TL3); TL_Delete(TL4); TL_Delete(TL5); TL_Delete(TL6); TL3 = TL_new(HD[1],HT[1],HH[1],sdate,stime,HH[1]); TL4 = TL_new(HD[1],HT[1],(HH[1]+LL)/2,sdate,stime,(HH[1]+LL)/2); TL5 = TL_new(HD[1],HT[1],LL,sdate,stime,LL); TL6 = TL_new(HD[1],HT[1],HH[1]+(HH[1]-LL[1])/2,sdate,stime,HH[1]+(HH[1]-LL)/2); //추세선 오른쪽 연장설정 TL_SetExtRight(TL3,true); TL_SetExtRight(TL4,true); TL_SetExtRight(TL5,true); TL_SetExtRight(TL6,true); if 텍스트출력 == 1 then { Tx11 = Text_New(HD1,HT1,HH1,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(HH1,2)); Text_SetStyle(tx11,2,1); Text_Delete(tx1); Tx1 = Text_New(HD,HT,HH,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2)); Text_SetStyle(tx1,2,1); } } TL11 = TL_New(HD1,HT1,HH1,HD,HT,HH); } if CrossDown(c,var1) Then { T = -1; LL = L; LD = sdate; LT = stime; LL1 = LL[1]; LD1 = LD[1]; LT1 = LT[1]; if HH > 0 Then { TL2 = TL_new(HD[1],HT[1],HH[1],LD,LT,LL); TL_Delete(TL3); TL_Delete(TL4); TL_Delete(TL5); TL_Delete(TL6); TL3 = TL_new(LD[1],LT[1],HH,sdate,stime,HH); TL4 = TL_new(LD[1],LT[1],(HH+LL[1])/2,sdate,stime,(HH+LL[1])/2); TL5 = TL_new(LD[1],LT[1],LL[1],sdate,stime,LL[1]); TL6 = TL_new(LD[1],LT[1],LL[1]-(HH-LL[1])/2,sdate,stime,LL[1]-(HH-LL[1])/2); //추세선 오른쪽 연장설정 TL_SetExtRight(TL3,true); TL_SetExtRight(TL4,true); TL_SetExtRight(TL5,true); TL_SetExtRight(TL6,true); if 텍스트출력 == 1 then { Tx22 = Text_New(LD1,LT1,LL1,NumToStr((HH1-LL1)/PriceScale,0)+NewLine+NumToStr(LL1,2)); Text_SetStyle(tx22,2,0); Text_Delete(tx2); Tx2 = Text_New(LD,LT,LL,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2)); Text_SetStyle(tx2,2,0); } } TL22 = TL_New(LD1,LT1,LL1,LD,LT,LL); } if T == 1 then { if H > HH Then { HH = H; HD = sdate; HT = stime; TL_SetEnd(TL1,HD,HT,HH); TL_SetEnd(TL11,HD,HT,HH); if 텍스트출력 == 1 then { Text_Delete(tx1); Tx1 = Text_New(HD,HT,HH,NumToStr((HH-LL[1])/PriceScale,0)+NewLine+NumToStr(HH,2)); Text_SetStyle(tx1,2,1); } } } if T == -1 then { if L < LL Then { LL = L; LD = sdate; LT = stime; TL_SetEnd(TL2,LD,LT,LL); TL_SetEnd(TL22,LD,LT,LL); if 텍스트출력 == 1 then { Text_Delete(tx2); Tx2 = Text_New(LD,LT,LL,NumToStr((HH[1]-LL)/PriceScale,0)+NewLine+NumToStr(LL,2)); Text_SetStyle(tx2,2,0); } } } #추세선 두께, 색상 TL_SetSize(TL1,추세선두께); TL_SetSize(TL11,추세선두께); TL_SetSize(TL2,추세선두께); TL_SetSize(TL22,추세선두께); TL_SetColor(TL1,추세선색1); TL_SetColor(TL11,추세선색1); TL_SetColor(TL2,추세선색2); TL_SetColor(TL22,추세선색2); #연장선 두께, 색상 TL_SetSize(TL3,연장선두께); TL_SetSize(TL4,연장선두께); TL_SetSize(TL5,연장선두께); TL_SetSize(TL6,연장선두께); TL_SetColor(TL3,연장선색); TL_SetColor(TL4,연장선색); TL_SetColor(TL5,연장선색); TL_SetColor(TL6,연장선색); 3.그럼 수고하셍세요
프로필 이미지
성공예견
2020-04-07
771
글번호 137668
지표