키움증권 수식인데요((npredayclose(2)+npredayclose(1))/2)*1.04((2일전 종가+1일전종가) / 2 ) 곱하기 1.04 입니다.

input : tenkan_len(9),tenkan_mult(2),kijun_len(26),kijun_mult(4),spanB_len(52),spanB_mult(6),offset(26); var : ATR1(0),up1(0),dn1(0),upper1(0),lower1(0),os1(0),spt1(0),max1(0),min1(0),tenkan(0); var : ATR2(0),up2(0),dn2(0),upper2(0),lower2(0),os2(0),spt2(0),max2(0),min2(0),kijun(0); var : senkouA(0); var : ATR3(0),up3(0),dn3(0),upper3(0),lower3(0),os3(0),spt3(0),max3(0),min3(0),senkouB(0); var : tenkan_css(0),kijun_css(0),cloud_a(0),cloud_b(0),chikou_css(0),tx(0); ATR1 = ATR(tenkan_len)*tenkan_mult; up1 = (h+L)/2 + ATR1; dn1 = (h+L)/2 - ATR1; upper1 = iff(C[1] < upper1[1],min(up1,upper1[1]),up1); lower1 = iff(C[1] > lower1[1],max(dn1,lower1[1]),dn1); os1 = iff(c > upper1 , 1 ,IFf(c < lower1, 0 , os1[1])); spt1 = iff(os1 == 1 , lower1 , upper1); max1 = iff(CrossUp(c,spt1) or CrossDown(c,spt1) , max(c,max1[1]) , IFf(os1 == 1 , max(c,max1[1]) , spt1)); min1 = iff(CrossUp(c,spt1) or CrossDown(c,spt1) , min(c,min1[1]) , iff(os1 == 0 , min(c,min1[1]) , spt1)); tenkan = avg(max1,min1); ATR2 = ATR(kijun_len)*kijun_mult; up2 = (h+L)/2 + ATR2; dn2 = (h+L)/2 - ATR2; upper2 = iff(C[1] < upper2[1],min(up2,upper2[1]),up2); lower2 = iff(C[1] > lower2[1],max(dn2,lower2[1]),dn2); os2 = iff(c > upper2 , 1 ,IFf(c < lower2, 0 , os2[1])); spt2 = iff(os2 == 1 , lower2 , upper2); max2 = iff(CrossUp(c,spt2) or CrossDown(c,spt2) , max(c,max2[1]) , IFf(os2 == 1 , max(c,max2[1]) , spt2)); min2 = iff(CrossUp(c,spt2) or CrossDown(c,spt2) , min(c,min2[1]) , iff(os2 == 0 , min(c,min2[1]) , spt2)); kijun = avg(max2,min2); senkouA = avg(kijun,tenkan); ATR3 = ATR(spanB_len)*spanB_mult; up3 = (h+L)/2 + ATR3; dn3 = (h+L)/2 - ATR3; upper3 = iff(C[1] < upper3[1],min(up3,upper3[1]),up3); lower3 = iff(C[1] > lower3[1],max(dn3,lower3[1]),dn3); os3 = iff(c > upper3 , 1 ,IFf(c < lower3, 0 , os3[1])); spt3 = iff(os3 == 1 , lower3 , upper3); max3 = iff(CrossUp(c,spt3) or CrossDown(c,spt3) , max(c,max3[1]) , IFf(os3 == 1 , max(c,max3[1]) , spt3)); min3 = iff(CrossUp(c,spt3) or CrossDown(c,spt3) , min(c,min3[1]) , iff(os3 == 0 , min(c,min3[1]) , spt3)); senkouB = avg(max3,min3); tenkan_css = Red; kijun_css = Blue; cloud_a = teal; cloud_b = red; chikou_css = Green; plot1(tenkan,"Tenkan-Sen",tenkan_css); plot2(kijun,"Kijun-Sen",kijun_css); if CrossUp(tenkan,kijun) Then { tx = Text_New(sDate,sTime,kijun,"b"); Text_SetStyle(tx,2,1); } if CrossDown(tenkan,kijun) Then { tx = Text_New(sDate,sTime,kijun,"s"); Text_SetStyle(tx,2,0); }수고 많으십니다 위 지표를 이용한 시스템식을 부탁드립니다 Kijun-Sen 선의 값이 Tenkan-Sen 선의 값 보다 위에 있고 캔들 가격이 Kijun-Sen 선과 Tenkan-Sen 선의 중심보다 아래이면 매도진입 매수청산Kijun-Sen 선의 값이 Tenkan-Sen 선의 값 보다 아래에 있고 캔들 가격이 Kijun-Sen 선과 Tenkan-Sen 선의 중심보다 위 면 매수진입 매도청산익절 100틱 손절 100틱익절이던 손절이던 청산 이후 같은 방향으로 연속 진입은 최대 3번까지 제한해 주십시요그리고 진입이던 청산이던 봉 완성이 아닌 조건 만족시 진입 청산으로 부탁드립니다 항상 감사드립니다

input : x(10);var : hh(0),dd(0);if h > h[1] and h > h[2] and h > h[3] and h > h[4] and h > h[5] and h > h[6] and h > h[7] and h > h[8] and h > h[9]then hh = h;위 hh 값이 갱신되는 날짜는 변수(dd)로 갱신일로 부터의 현재 날짜를 구하고(지표 표시로) 싶습니다. 그리고 갱신되면 갱신 시점으로 부터 리셋되어 다시 카운딩 하고 싶어요. 예스스탁 감사합니다.

// === 신호 표시 ===if buy_signal then{ buyText = Text_New(sDate, sTime, L - 2*PriceScale, "▲"); Text_SetColor(buyText, green); Text_SetStyle(buyText, 1, 0); // 중앙 정렬, 상단}if sell_signal then{ sellText = Text_New(sDate, sTime, H + 2*PriceScale, "▼"); Text_SetColor(sellText, red); Text_SetStyle(sellText, 1, 2); // 중앙 정렬, 하단}

//@version=5indicator('Linear Regression Channel', overlay = true, max_lines_count = 3)// ---------------------------------------------------------------------------------------------------------------------}// 𝙐𝙎𝙀𝙍 𝙄𝙉𝙋𝙐𝙏𝙎// ---------------------------------------------------------------------------------------------------------------------{bool bands = input.bool(true, "Plot Linear Regression Bands", group = "Settings Bands")int window = input.int(150, "Length", group = "Settings Bands")float devlen_b = input.float(3., "Deviation Linear Regression Bands",step=0.1, group = "Settings Bands")bool channel = input.bool(false, "Plot Linear Regression Channel", group = "Settings Channel")int window1 = input.int(150, "Channel Length", group = "Settings Channel")float devlen1 = input.float(1., "Deviation Linear Regression Channel",step=0.1, group = "Settings Channel")bool channel1 = input.bool(false, "Plot Future Projection of linear regression", group = "Future Projection Channel")bool arr_dirc = input.bool(false, "Plot Arrow Direction", group = "Future Projection Channel")int window2 = input.int(50, "Length", group = "Future Projection Channel")float devlen2 = input.float(1., "Deviation Future Projection Regression Channel",step=0.1, group = "Future Projection Channel")// Define colors for up, down, and mid linescolor col_dn = #f01313color col_up = color.aquacolor col_mid = color.yellowcolor gray = color.graycolor fg_col = chart.fg_color// Regression Channel Arrays Linevar reglines = array.new_line(3)var reglines_ = array.new_line(3)// ---------------------------------------------------------------------------------------------------------------------}// 𝙄𝙉𝘿𝙄𝘾𝘼𝙏𝙊𝙍 𝘾𝘼𝙇𝘾𝙐𝙇𝘼𝙏𝙄𝙊𝙉𝙎// ---------------------------------------------------------------------------------------------------------------------{//@function linear_regression//@description Calculates linear regression coefficients for a given source and window.//@param src (series float) The data series on which linear regression is calculated.//@param window (int) The number of bars to use in the calculation.//@returns the intercept slope, Deviation, end of the channel.linear_regression(src, window) => sum_x = 0.0 sum_y = 0.0 sum_xy = 0.0 sum_x_sq = 0.0 // Calculate sums for i = 0 to window - 1 by 1 sum_x += i + 1 sum_y += src[i] sum_xy += (i + 1) * src[i] sum_x_sq += math.pow(i + 1, 2) // Calculate linear regression coefficients slope = (window * sum_xy - sum_x * sum_y) / (window * sum_x_sq - math.pow(sum_x, 2)) intercept = (sum_y - slope * sum_x) / window y1 = intercept + slope * (window - 1) dev = 0.0 for i = 0 to window - 1 dev := dev + math.pow(src[i] - (slope * (window - i) + intercept), 2) dev := math.sqrt(dev/window) [intercept, y1, dev, slope][y2, y1, dev, slope] = linear_regression(close, window)[y2_, y1_, dev_, slope_] = linear_regression(close, window1)[y2__, y1__, dev__, slope__] = linear_regression(close, window2)// Linear Regression Channel Linesseries float mid = y2 + slopeseries float upper = mid + ta.rma(high - low, window) * devlen_bseries float lower = mid - ta.rma(high - low, window) * devlen_b// Returns True for window length periodisAllowed = (last_bar_index - bar_index < window1)// ---------------------------------------------------------------------------------------------------------------------}// 𝙑𝙄𝙎𝙐𝘼𝙇𝙄𝙕𝘼𝙏𝙄𝙊𝙉// ---------------------------------------------------------------------------------------------------------------------{// Plot upper, lower, and mid lines if channel is not enabledp_u = plot(upper, color = bands and channel ? na : bands ? gray : na, linewidth = 2)p_l = plot(lower, color = bands and channel ? na : bands ? gray : na, linewidth = 2)p_m = plot(mid, color = bands and channel ? na : bands ? gray : na)// Fill areas between upper/mid and lower/mid linesfill(p_u, p_m, mid, upper, na, bands and channel ? na : bands ? color.new(col_up, 80) : na)fill(p_m, p_l, lower, mid, bands and channel ? na : bands ? color.new(col_dn, 80) : na, na)if barstate.islast and channel for i = 0 to 2 array.set(reglines, i, line.new(x1 = bar_index - (window1 - 1), y1 = y1_ + dev_ * devlen1 * (i - 1), x2 = bar_index, y2 = y2_ + dev_ * devlen1 * (i - 1), color = color.gray, style = i % 2 == 1 ? line.style_dashed : line.style_solid, width = 2, extend = extend.none) ) linefill.new(array.get(reglines, 1), array.get(reglines, 2), color = color.new(col_up, 90)) linefill.new(array.get(reglines, 1), array.get(reglines, 0), color = color.new(col_dn, 90))if barstate.islast and channel1 for i = 0 to 2 array.set(reglines_, i, line.new(x1 = bar_index - (window2 - 1), y1 = y1__ + dev__ * devlen2 * (i - 1), x2 = bar_index, y2 = y2__ + dev__ * devlen2 * (i - 1), color = color.gray, style = i % 2 == 1 ? line.style_dotted : line.style_dashed, width = 1, extend = extend.right) ) linefill.new(array.get(reglines_, 1), array.get(reglines_, 2), color = color.new(col_up, 95)) linefill.new(array.get(reglines_, 1), array.get(reglines_, 0), color = color.new(col_dn, 95))if arr_dirc l1 = label.new(chart.point.from_index(bar_index, hl2 > y2__ ? high : low), text = hl2 > y2__ ? "⇗" : hl2 < y2__ ? "⇘" : "⇒", textcolor = hl2 > y2__ ? col_up : hl2 < y2__ ? col_dn : gray, color = color(na), size = size.huge, style = label.style_label_left ) label.delete(l1[1])// Bar Heat Mapb_c = (close - lower) / (upper - lower)b_c := b_c > 1 ? 1 : b_c < 0 ? 0 : b_cbar_color = channel ? (isAllowed ? (b_c <= 0.5 ? color.from_gradient(b_c, 0, 0.5, col_up, col_mid) : color.from_gradient(b_c, 0.5, 1, col_mid, col_dn)) : na) : (b_c >= 0.5 ? color.from_gradient(b_c, 0.5, 1, col_mid, col_up) : color.from_gradient(b_c, 0, 0.5, col_dn, col_mid))plotcandle(open, high, low, close, title = "Bar HeatMap", color = bar_color, wickcolor = bar_color, bordercolor = bar_color )barcolor(bar_color)// Conditions for crossoverscondition1 = bands and channel ? na : bands ? ta.pivotlow(3, 3) and close < lower : nacondition2 = bands and channel ? na : bands ? ta.pivothigh(3, 3) and close > upper: na// Plot markers for channel break outsplotchar(condition1, "", "◆", size=size.tiny, location=location.belowbar, color = col_up)plotchar(condition2, "", "◆", size=size.tiny, location=location.abovebar, color = col_dn)// ---------------------------------------------------------------------------------------------------------------------}

//@version=4study("B-Xtrender @Puppytherapy")short_l1 = input(5 , title="Short - L1")short_l2 = input(20, title="Short - L2")short_l3 = input(15, title="Short - L3")long_l1 = input(20, title="Long - L1")long_l2 = input(15, title="Long - L2")shortTermXtrender = rsi(ema(close, short_l1) - ema(close, short_l2), short_l3 ) - 50longTermXtrender = rsi( ema(close, long_l1), long_l2 ) - 50shortXtrenderCol = shortTermXtrender > 0 ? shortTermXtrender > shortTermXtrender[1] ? color.lime : #228B22 : shortTermXtrender > shortTermXtrender[1] ? color.red : #8B0000plot(shortTermXtrender, color=shortXtrenderCol, style=plot.style_columns, linewidth=1, title="B-Xtrender Osc. - Histogram", transp = 50)t3(src, len)=> xe1_1 = ema(src, len) xe2_1 = ema(xe1_1, len) xe3_1 = ema(xe2_1, len) xe4_1 = ema(xe3_1, len) xe5_1 = ema(xe4_1, len) xe6_1 = ema(xe5_1, len) b_1 = 0.7 c1_1 = -b_1*b_1*b_1 c2_1 = 3*b_1*b_1+3*b_1*b_1*b_1 c3_1 = -6*b_1*b_1-3*b_1-3*b_1*b_1*b_1 c4_1 = 1+3*b_1+b_1*b_1*b_1+3*b_1*b_1 nT3Average_1 = c1_1 * xe6_1 + c2_1 * xe5_1 + c3_1 * xe4_1 + c4_1 * xe3_1 maShortTermXtrender = t3( shortTermXtrender , 5 )colShortTermXtrender = maShortTermXtrender > maShortTermXtrender[1] ? color.lime : color.redplot(maShortTermXtrender, color=#000000 , style=plot.style_line, linewidth=5, title="B-Xtrender Shadow")plot(maShortTermXtrender, color=colShortTermXtrender, style=plot.style_line, linewidth=3, title="B-Xtrender Color ")plotshape(maShortTermXtrender > maShortTermXtrender[1] and maShortTermXtrender[1] < maShortTermXtrender[2] ? maShortTermXtrender : na, location=location.absolute, style=shape.circle, color=color.lime, size=size.tiny, transp=10)plotshape(maShortTermXtrender < maShortTermXtrender[1] and maShortTermXtrender[1] > maShortTermXtrender[2] ? maShortTermXtrender : na, location=location.absolute, style=shape.circle, color=color.red , size=size.tiny, transp=10)longXtrenderCol = longTermXtrender> 0 ? longTermXtrender > longTermXtrender[1] ? color.lime : #228B22 : longTermXtrender > longTermXtrender[1] ? color.red : #8B0000macollongXtrenderCol = longTermXtrender > longTermXtrender[1] ? color.lime : color.redplot(longTermXtrender , color=longXtrenderCol, style=plot.style_histogram, linewidth=2, title="B-Xtrender Trend - Histogram", transp = 80)plot(longTermXtrender , color=#000000 , style=plot.style_line, linewidth=5, title="B-Xtrender Trend - Line", transp = 80)plot(longTermXtrender , color=macollongXtrenderCol, style=plot.style_line, linewidth=3, title="B-Xtrender Trend - Line", transp = 80)

이 식을 해석좀 해주셔요 전체적으로 다 궁금한데 특히 저항선과 지지선이 언제쯤 차트안에 그려지는지 궁금합니다. 마지막으로 지지저항선을 두껍게 하고 싶고, 저항선과지지선 종목검색식 부탁합니다.var : Period(20),Period1(60),Per(25),소수점자리(1),DARTno(7); var : T(0),HTL(0),HTL1(0),LTL(0),LTL1(0),cnt(0); var : tx1(0),tx2(0),HHTL(0),LLTL(0),TL(0); Array : HD[20](0),HT[20](0),HH[20](0); Array : LD[20](0),LT[20](0),LL[20](0); var : txx(0),txx1(0),tx(""); var1 = ma(C,Period); var2 = ma(C,Period1); if T <= 0 and CrossUp(var1,var2) Then { T = 1; For cnt = 19 DownTo 1 { HD[cnt] = HD[cnt-1]; HT[cnt] = HT[cnt-1]; HH[cnt] = HH[cnt-1]; } HD[0] = sDate; HT[0] = stime; HH[0] = H; TL_SetExtRight(HTL,False); HTL = TL_New(HD[0],HT[0],HH[0],NextBarSdate,NextBarStime,HH[0]); TL_SetColor(HTL,Red); TL_SetSize(HTL, 0); TL_SetStyle(HTL, 1); TL_SetExtRight(HTL,true); TL_SetDrawMode(HTL,0); HTL1 = HTL[1]; TL_SetEnd(HTL1,sDate[1],sTime[1],HH[1]); if hh[0] <= hh[1] Then tx = "▽ "+NumToStr(hh[0],2); Else tx = NumToStr(hh[0],2); txx = Text_New(sDate,sTime,hh[0],tx); Text_SetStyle(txx,2,1); txx1 = txx[1]; Text_SetLocation(txx1,sDate[1],sTime[1],HH[1]); } if T >= 0 and CrossDown(var1,var2) Then { T = -1; For cnt = 19 DownTo 1 { LD[cnt] = LD[cnt-1]; LT[cnt] = LT[cnt-1]; LL[cnt] = LL[cnt-1]; } LD[0] = sDate; LT[0] = stime; LL[0] = L; TL_SetExtRight(LTL,False); LTL = TL_New(LD[0],LT[0],LL[0],NextBarSdate,NextBarStime,LL[0]); TL_SetColor(LTL,Blue); TL_SetSize(LTL, 0); TL_SetStyle(LTL, 1); TL_SetExtRight(LTL,true); TL_SetDrawMode(LTL,0); LTL1 = LTL[1]; TL_SetEnd(LTL1,sDate[1],sTime[1],LL[1]); } if T == 1 Then { if HH[0] > 0 and H > HH[0] Then { HD[0] = sdate; HT[0] = sTime; HH[0] = H; TL_SetBegin(HTL,HD[0],HT[0],HH[0]); TL_SetEnd(HTL1,sDate[1],sTime[1],HH[1]); Text_SetLocation(txx1,sDate[1],sTime[1],HH[1]); } if hh[0] <= hh[1] Then tx = "▽ "+NumToStr(hh[0],2); Else tx = NumToStr(hh[0],2); Text_SetString(txx,tx); Text_SetLocation(txx,sDate,sTime,hh[0]); } TL_SetEnd(HTL,NextBarSdate,NextBarStime,HH[0]); if T == -1 Then { if LL[0] > 0 and L < LL[0] Then { LD[0] = sdate; LT[0] = sTime; LL[0] = L; TL_SetBegin(LTL,LD[0],LT[0],LL[0]); TL_SetEnd(LTL1,sDate[1],sTime[1],LL[1]); } } TL_SetEnd(LTL,NextBarSdate,NextBarStime,LL[0]); Plot1(var1,"이동평균선1"); Plot2(var2,"이동평균선2");