안녕하세요 다음 트레이딩 코딩을 시스템 신호로 전환 부탁드립니다 // Inputs a = input(1, title = "Key Vaule. 'This changes the sensitivity'") c = input(10, title = "ATR Period") h = input(false, title = "Signals from Heikin Ashi Candles") xATR = atr(c) nLoss = a * xATR src = h ? security(heikinashi(syminfo.tickerid), timeframe.period, close, lookahead = false) : close xATRTrailingStop = 0.0 xATRTrailingStop := iff(src > nz(xATRTrailingStop[1], 0) and src[1] > nz(xATRTrailingStop[1], 0), max(nz(xATRTrailingStop[1]), src - nLoss), iff(src < nz(xATRTrailingStop[1], 0) and src[1] < nz(xATRTrailingStop[1], 0), min(nz(xATRTrailingStop[1]), src + nLoss), iff(src > nz(xATRTrailingStop[1], 0), src - nLoss, src + nLoss))) pos = 0 pos := iff(src[1] < nz(xATRTrailingStop[1], 0) and src > nz(xATRTrailingStop[1], 0), 1, iff(src[1] > nz(xATRTrailingStop[1], 0) and src < nz(xATRTrailingStop[1], 0), -1, nz(pos[1], 0))) xcolor = pos == -1 ? color.red: pos == 1 ? color.green : color.blue ema = ema(src,1) above = crossover(ema, xATRTrailingStop) below = crossover(xATRTrailingStop, ema) buy = src > xATRTrailingStop and above sell = src < xATRTrailingStop and below barbuy = src > xATRTrailingStop barsell = src < xATRTrailingStop plotshape(buy, title = "Buy", text = 'Buy', style = shape.labelup, location = location.belowbar, color= color.green, textcolor = color.white, transp = 0, size = size.tiny) plotshape(sell, title = "Sell", text = 'Sell', style = shape.labeldown, location = location.abovebar, color= color.red, textcolor = color.white, transp = 0, size = size.tiny) barcolor(barbuy ? color.green : na) barcolor(barsell ? color.red : na) alertcondition(buy, "UT Long", "UT Long") alertcondition(sell, "UT Short", "UT Short") 감사합니다

매수 진입 B = if(C>O, Sum(V,기간1), 0); S = if(C A = eavg(eavg(B,기간1),기간2) > eavg(eavg(S,기간1),기간2) and eavg(eavg(B,기간1),기간2) > eavg(eavg(B(1),기간1),기간2); D = eavg(eavg(B,기간1),기간2) < eavg(eavg(S,기간1),기간2) and eavg(eavg(S,기간1),기간2) > eavg(eavg(S(1),기간1),기간2); ((sum(A,1,1) > sum(D,1,1) or eavg(eavg(B,기간1),기간2) > eavg(eavg(S,기간1),기간2) or (eavg(eavg(B,기간1),기간2) > eavg(eavg(S,기간1),기간2) and eavg(eavg(B,기간1),기간2) > eavg(eavg(B(1),기간1),기간2))) and (StochasticsSlow(period1,period2) > eavg(StochasticsSlow(period1,period2),period2) or StochasticsSlow(period2,period3) > eavg(StochasticsSlow(period2,period3),period3)) and Trix(100)-Trix(100,1) > 0) or (MACD(shortPeriod,longPeriod) >= baseLine and(MACD(shortPeriod,longPeriod) >= eavg(MACD(shortPeriod,longPeriod),sigPeriod) and avg(c,100) < avg(c,50) and (C > EnvelopeUp(Period1,0.1) or C > MA(종가, 20, 단순)) and ADX(14) > 25 and (EnvelopeUp(Period1,0.1) > MA(종가, 100, 단순) or MA(종가, 20, 단순) > MA(종가, 100, 단순))) 매도 진입 B = if(C>O, Sum(V,기간1), 0); S = if(C A = eavg(eavg(B,기간1),기간2) > eavg(eavg(S,기간1),기간2) and eavg(eavg(B,기간1),기간2) > eavg(eavg(B(1),기간1),기간2); D = eavg(eavg(B,기간1),기간2) < eavg(eavg(S,기간1),기간2) and eavg(eavg(S,기간1),기간2) > eavg(eavg(S(1),기간1),기간2); ((sum(A,1,1) < sum(D,1,1) or eavg(eavg(B,기간1),기간2) < eavg(eavg(S,기간1),기간2) or (eavg(eavg(B,기간1),기간2) < eavg(eavg(S,기간1),기간2) and eavg(eavg(B,기간1),기간2) < eavg(eavg(B(1),기간1),기간2))) and (StochasticsSlow(period1,period2) < eavg(StochasticsSlow(period1,period2),period2) or StochasticsSlow(period2,period3) < eavg(StochasticsSlow(period2,period3),period3)) and Trix(100)-Trix(100,1) < 0) or (MACD(shortPeriod,longPeriod) < baseLine and MACD(shortPeriod,longPeriod) < eavg(MACD(shortPeriod,longPeriod),sigPeriod) and avg(c,100) > avg(c,50) and (C < Envelopedown(Period1,0.1) or C < MA(종가, 20, 단순)) and ADX(14) > 25 and (Envelopedown(Period1,0.1) < MA(종가, 100, 단순) or MA(종가, 20, 단순) < MA(종가, 100, 단순))) 수식이 좀 복잡해서 혼자 만들기 힘드네요. 도움 주시면 감사하겠습니다. 수고하세요.

input : Period(150); Var:j(0),T(0),tx1(0),box(0),TL1(0),TL(0),TL2(0); Var: date11(0),date12(0),time11(0),time12(0), date21(0),date22(0),time21(0),time22(0), date31(0),date32(0),time31(0),time32(0); Array:HiVal[20](0),LoVal[20](0),HiBar[20](0),LoBar[20](0); For j = 0 To 19 { HiBar[j] = HiBar[j] + 1; LoBar[j] = LoBar[j] + 1; } if crossup(H,highest(H,Period)[1]) and (T == 0 or (T==-1 and H >= Loval[0]+0.8)) Then T = 1; if CrossDown(L,Lowest(L,Period)[1]) and (T == 0 or (T==1 and L <= Hival[0]-0.8)) 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]; } LoVal[0] = L; LoBar[0] = 0; 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,Blue); TL_SetSize(TL1,1); date21 = date[HiBar[0]]; time21 = stime[HiBar[0]]; date22 = date[0]; time22 = stime[0]; Condition3 = False; if Condition3 == False and Value12 <= value11-0.8 Then { Condition3 = true; } } If LoVal[0] > L Then { LoVal[0] = L; LoBar[0] = 0; date12 = date[LoBar[0]]; time12 = stime[LoBar[0]]; Value12 = LoVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date22 = date[0]; time22 = stime[0]; } if Condition3 == False and Value12 <= value11-0.8 Then { Condition3 = true; TL2= TL_New(sDate,sTime,0,sDate,sTime,999); TL_SetColor(TL2,Lime); TL_SetSize(TL2,2); } } If T == 1 Then { If T[1] != 1 Then { For j = 18 DownTo 0 { HiVal[j+1] = HiVal[j]; HiBar[j+1] = HiBar[j]; } HiVal[0] = H; HiBar[0] = 0; 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,Red); TL_SetSize(TL1,1); date31 = date[LoBar[0]]; time31 = stime[LoBar[0]]; date32 = date[0]; time32 = stime[0]; Condition7 = False; if Condition7 == False and Value12 >= value11+0.85 Then { Condition7 = true; } } If HiVal[0] < H Then { HiVal[0] = H; HiBar[0] = 0; date12 = date[HiBar[0]]; time12 = stime[HiBar[0]]; Value12 = HiVal[0]; TL_SetEnd(TL1, date12,time12,Value12); date32 = date[0]; time32 = stime[0]; } if Condition7 == False and Value12 >= value11+0.85 Then { Condition7 = true; TL2= TL_New(sDate,sTime,0,sDate,sTime,999); TL_SetColor(TL2,Gold); TL_SetSize(TL2,2); } } 0.8 이상이면 전환되는 조건이라서, 크기가 0.8에 세로선 표시되는 수식은 표시가 안됩니다. 전환 조건과 같은 크기의(0.8) 세로선도 표시되게 부탁드립니다.

안녕하세요~ 매번 감사합니다. period 10 d1 4 af 1 maxaf 3 period1 55 multiple 3 ma1 3 ma2 55 percent 55 이평방법 지수 CrossUp(h,BBandsUp((c+l+h)/3,Period,D1,이평방법)) and c >= SAR(af,maxAF) and V > avg(V, Period) * Multiple && V > V(1) * Multiple and eavg(c,MA1) >= eavg(c,MA2) and Disparity(c,Period1,이평방법) <= Percent and Disparity(c,448,이평방법) <= percent 종목 검색으로 변환 부탁드립니다. 즐거운 하루 되십시오

변곡점마다 사각박스 색상 과 테두리 선표시 부탁드립니다. 감사합니다. Input:Cnt(60),선TL선(4); Var:nj(0),turnPntBit(""),TdL1(0),color(0),vtx(0); Array:valArr[10](0),barArr[10](0),turnPntArr[10](""); // 봉이 새로 생겼으므로 봉개수 관리하는 변수들의 봉개수 값 1씩 증가 For nj = 0 To 9 { barArr[nj] = barArr[nj] + 1; } // 고점조건 = 5-1-5에서 가운데 고가가 좌측 5봉과 우측 5봉 고가보다 높다 // 저점조건 = 5-1-5에서 가운데 저가가 좌측 5봉과 우측 5봉 저가보다 낮다 Condition1 = Highest(H,Cnt)[Cnt+1] <= H[Cnt] and H[Cnt] > Highest(H,Cnt); Condition2 = Lowest(L,Cnt)[Cnt+1] >= L[Cnt] and L[Cnt] < Lowest(L,Cnt); // 전환점구분 null값으로 초기화; // if 고점조건, 저점조건 동시 만족시 then // if 이전 고점,저점 범위를 모두 벗어났을 때 // 전환점구분 = 고저점; // else if 이전 고점을 갱신했다면 전환점구분 = 고점; // else if 이전 저점을 갱신했다면 전환점구분 = 저점; // else if 전환점배열의 현재(배열상 1번째)값이 고점이면 전환점구분 = 저점; // else if 전환점배열의 현재 값이 저점이면 전환점구분 = 고점; // else if 고점조건 만족하면 전환점구분 = 고점; // else if 저점조건 만족하면 전환전구분 = 저점; turnPntBit = ""; If Condition1 and Condition2 Then { If Max(valArr[1],valArr[2]) < H[Cnt] and Min(valArr[1],valArr[2]) > L[Cnt] Then turnPntBit = "HiLo"; Else If Max(valArr[1],valArr[2]) < H[Cnt] Then turnPntBit = "Hi"; Else If Min(valArr[1],valArr[2]) > L[Cnt] Then turnPntBit = "Lo"; Else If turnPntArr[1] == "Hi" Then turnPntBit = "Lo"; Else If turnPntArr[1] == "Lo" Then turnPntBit = "Hi"; } Else If Condition1 Then turnPntBit = "Hi"; Else If Condition2 Then turnPntBit = "Lo"; // if 전환점구분에 값이 있을 때만 아래 실행, 없으면 통과 If turnPntBit <> "" Then { // if 전환점구분이 고저점이면 then // 이전 파동은 연장시키고 아래에서 새로이 파동선을 추가토록 한다. If turnPntBit == "HiLo" Then { valArr[1] = IFF(turnPntArr[1] == "Hi",H[Cnt],L[Cnt]); barArr[1] = Cnt; TL_SetEnd(TdL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]); If turnPntArr[1] == "Hi" Then turnPntBit = "Lo"; Else turnPntBit = "Hi"; } // if 신규 전환점구분이 현재(전환점배열 1번째)와 다르면 then // 배열값들을 이전값으로 Move; If turnPntBit <> turnPntArr[1] Then { for nj = 8 downto 1 { valArr[nj+1] = valArr[nj]; barArr[nj+1] = barArr[nj]; turnPntArr[nj+1] = turnPntArr[nj]; } } // if 전환점구분이 바뀌었거나 또는 // (전환점구분은 안바뀌었는데 // (이전 고점보다 높은 고점이 발생했거나 또는 // 이전 저점보다 낮은 저점이 발생했으면)) then If turnPntBit <> turnPntArr[1] or (turnPntBit == turnPntArr[1] and ((turnPntBit == "Hi" and valArr[1] < H[Cnt]) or (turnPntBit == "Lo" and valArr[1] > L[Cnt]))) Then { // 값 배열에는 고점 또는 저점을 대입; // 봉개수 배열에는 입력변수의 봉개수 대입; // 전환점 배열에 전환점구분값을 대입; valArr[1] = IFF(turnPntBit == "Hi",H[Cnt],L[Cnt]); barArr[1] = Cnt; turnPntArr[1] = turnPntBit; // if 이전봉대비 전환점구분이 바뀌었다면 추세선 새로 그리고; // else 전환점구분이 안바뀌었으면 값만 바뀐거므로 추세선 연장; If turnPntArr[1][1] <> turnPntArr[1][0] Then { TdL1 = TL_New(sDate[barArr[2]],sTime[barArr[2]],valArr[2],sDate[barArr[1]],sTime[barArr[1]],valArr[1]); // vtx = text_new(sDate[barArr[1]],sTime[barArr[1]],valArr[1],NumToStr(valArr[1],2)); if turnPntArr[1][1] > turnPntArr[1][0] then { color = red; Text_SetStyle(vtx,2,1); } Else { color = blue; Text_SetStyle(vtx,2,0); } } Else TL_SetEnd(TdL1,sDate[barArr[1]],sTime[barArr[1]],valArr[1]); } } TL_SetSize(TdL1,선TL선); TL_Setcolor(TdL1,color);

안녕하세요 항상 고맙고 감사합니다 다름이 아니라 옵션매수을 선물시가 기준 진입이고 수급을 참조로 하여 옵션의 가격이 0.29에 아래에서 가장높은가격에진입을 하려고 합니다 수급을 참조로 하여 매수 들어가려고 합니다. 수급참조를 어떻게 하면 되는지 알려주십시요 가능하면 코드도 부탁드립니다 또한가지는 내가 짠 코드를 백테스팅 해보고 싶은데 어떻게 하면 되는지 즉 코드를 시뮬레이션하여 어느정도의 수익이 되는지 알고싶습니다 오늘도 감사합니다

종목검색식으로 변환을 부탁드려요 A1=macd(12,26); A2=eavg(A1,9); A3=valuewhen(1,crossup(A1,0),C); A4=valuewhen(1,crossup(A1,A2),C); crossup(c,A3) && crossup(c,A4)