답변완료
수식검토문의
input : 기간(15); var : myema(0),correction(0),myZLMA(0),R(0); myEMA = Ema(C, 기간); correction = C + (C - myEMA); myZLMA = Ema(correction, 기간) ; var1 = Ema(C,200); R = RSI(20); Var: vol_avg(0); vol_avg = Ma(V, 70);CrossUp(myZLMA[1] ,myEMA[1]) and C[1]>C[2]*1.02 and V[1] > vol_avg[1] * 3 and V[1] < vol_avg[1] * 50 and countif(var1 > var1[1],2) == 2 and R[1] >= 60 and CountIf(R<59.9,5)[2] == 5 and C[1]>var1[1] Then Find(1);모든 것이 1봉전에 발생하는 조건으로 바꿔봤는데 맞는건지 검토해주세요. (특히 끝부분(CountIf(R<59.9,5)[2] == 5)은 2봉전부터 5봉간 R<59.9가 맞나요?)별도로 종가와 200EMA와의 이격도를 표현할때는 어떻게 해야하나요?
답변완료
색상좀 추가 요청 드림니다.
ㅇ 아래 수식에서 중간선이 생성 되는 데 앞의 중간선 보다 낮으면 블루 높으면 빨강 으로 색상 부여좀 부탁 드림니다.##input : n(20); var : idx(0),TF(0),box(0); var : HH(0),LL(0),TL1(0),TL2(0),TX1(0),str(""); var : DD(0),TT(0),half(0),mav(0),halfval(0); if Bdate != Bdate[1] Then idx = 0; Else idx = idx+1; TF = idx%n; if Bdate != Bdate[1] or (Bdate == Bdate[1] and TF < TF[1]) Then { HH = H; LL = L; DD = sDate; TT = sTime; Box = Box_New(DD,TT,HH,NextBarSdate,NextBarStime,LL); Box_SetColor(box,Rgb(140,140,140)); Box_SetFill(box,true); half = Ceiling(TF/2); halfval = (HH+LL)/2; // TL1 = TL_New(sDate[half],sTime[half],HH,sdate[half],Stime[half],LL); TL2 = TL_New(DD,TT,mav,NextBarSdate,NextBarStime,mav); TL_SetColor(TL1,Rgb(255,0,255)); TL_SetColor(TL2,Rgb(255,0,255)); TL_SetSize(TL1,1); TL_SetSize(TL2,2); } Else { if HH > 0 and H > HH Then { HH = H; } if LL > 0 and L < LL Then { LL = L; } half = Ceiling(TF/2); halfval = (HH+LL)/2; Box_SetBegin(box,dd,tt,HH); Box_SetEnd(box,sDate,sTime,LL); TL_SetBegin(TL1,sDate[half],sTime[half],HH); TL_SetEnd(TL1,sDate[half],sTime[half],LL); TL_SetBegin(TL2,DD,TT,halfval); TL_SetEnd(TL2,sDate,sTime,halfval); str = "최고가:"+NumToStr(HH,2)+"(+"+NumToStr((HH-C)/PriceScale,0)+"틱)"+ NewLine+"최저가:"+NumToStr(LL,2)+"(-"+NumToStr((C-LL)/PriceScale,0)+"틱)"+ NewLine+"현재가:"+NumToStr(C,2); Text_SetString(TX1,str); Text_SetLocation(TX1,sDate[half],sTime[half],halfval); }ㅇ 고맙습니다.
답변완료
문의드립니다
안녕하세요? 1.사진처럼 신호가발생전 예비신호가 뜰때 알림음 을 받고싶습니다 예스씨스템에서 가능한가요? 만일가능하다면 아래조건문에 추가부탁드립니다 if Condition1 == true Then { # 매수/매도청산 if t==-1 Then If C > value Then { Buy(); } # 매도/매수청산 if t==1 Then If C < value Then { Sell(); } }2.첨부수식이 에러가 있습니다 부탁드립니다#SYSTEMVar: swingHi(0), swingLo(0), prevHiBar(0), prevLoBar(0);swingHi = SwingHigh(1, H, 3, 1, 200);swingLo = SwingLow(1, L, 3, 1, 200);If swingHi > 0 Then Begin prevHiBar = CurrentBar;End;If swingLo > 0 Then Begin prevLoBar = CurrentBar;End;If (prevHiBar = CurrentBar[1]) and (Close < Close[1]) Then Begin Sell("TopOnce");End;If (prevLoBar = CurrentBar[1]) and (Close > Close[1]) Then Begin Buy("BottomOnce");End;
답변완료
조건검색문의드립니다
첨부메세지 에러가 뜨는데 보시구 수정 좀 부탁드리겠습니다. 항상 성의껏 답변 주셔서 감사합니다input: PULL_MIN(0.97), PULL_MAX(0.92), REB_RATE(1.02), VOLUP_RATE(1.2), BODY_RATIO(0.5);var: Pullback(0), Rebound(0), VolUp(0), vol_avg5(0), MA5(0), MA20(0), TrendUp(0), Body(0), Full(0), ValidBody(0), BuySignal_raw(0), BuySignal(0);vol_avg5 := MA(V, 5);Pullback := (L <= O * PULL_MIN) && (L >= O * PULL_MAX);Rebound := C >= L * REB_RATE;VolUp := (V > Ref(V, 1) * VOLUP_RATE) && (V > vol_avg5);MA5 := MA(C, 5);MA20 := MA(C, 20);TrendUp := MA5 > MA20;Body := Abs(C - O);Full := H - L;ValidBody := (C > O) && (Body / Full >= BODY_RATIO);BuySignal_raw := Pullback && Rebound && VolUp && TrendUp && ValidBody;if BuySignal_raw && !Ref(BuySignal_raw, 1) then BuySignal := 1else BuySignal := 0;if BuySignal = 1 then Find(1);