답변완료
수식 부탁드립니다
지표식 부탁드립니다.
//@version=5
indicator("SR MA", overlay = true, timeframe = "", timeframe_gaps = false)
// Simple filter function
simple_filter(float source, int length, bool duel_filter) =>
switch duel_filter
false => ta.wma(source, length)
true => ta.wma(ta.sma(source, length), length)
// Main SR MA function
sr_ma(float source = close, int output_smoothing = 3, int trigger_smoothing = 1, int atr_length = 50, float multiplier = 1, string range_switch = "Body", bool duel_filter = false) =>
candle_top = range_switch != "Body" ? high : math.max(open, close)
candle_bottom = range_switch != "Body" ? low : math.min(open, close)
smooth_top = ta.sma(candle_top, trigger_smoothing)
smooth_bottom = ta.sma(candle_bottom, trigger_smoothing)
tr = candle_top - candle_bottom
atr = ta.sma(tr, atr_length)
var float sr_ma = na
var float current_range = na
var float top_range = na
var float bottom_range = na
flag = smooth_top > top_range or smooth_bottom < bottom_range or na(current_range)
if flag
sr_ma := source
current_range := atr * multiplier
top_range := sr_ma + current_range
bottom_range := sr_ma - current_range
out = simple_filter(sr_ma, output_smoothing, duel_filter)
smooth_top_range = simple_filter(top_range, output_smoothing, duel_filter)
smooth_bottom_range = simple_filter(bottom_range, output_smoothing, duel_filter)
[out, smooth_top_range, smooth_bottom_range]
// === Inputs ===
source = input.source(close, "Source", group = "Settings")
output_smoothing = input.int(100, "Length", minval = 0, group = "Settings") + 1
use_double = input.bool(true, "Double Filter", group = "Settings")
smoothing = input.int(4, "Trigger Smoothing", minval = 0, group = "Settings") + 1
atr_length = input.int(200, "ATR Length", minval = 1, group = "Settings")
multiplier = input.float(6, "Range Multiplier", minval = 0, step = 0.125, group = "Settings")
range_switch = input.string("Body", "Range Style", ["Body", "Wick"], group = "Settings")
// === Color Inputs ===
bullish_color = input.color(color.rgb(33, 255, 120), "Bullish Color", group = "Color")
bearish_color = input.color(color.rgb(255, 33, 33), "Bearish Color", group = "Color")
neutral_color = input.color(color.rgb(137, 137, 137), "Neutral Color", tooltip = "This doubles as the solid color.", group = "Color")
// === Calculate SR MA & Ranges ===
[sr_ma, top_range, bottom_range] = sr_ma(source, output_smoothing, smoothing, atr_length, multiplier, range_switch, use_double)
// === MA Color Logic ===
ma_delta_neutral = sr_ma - nz(sr_ma[1]) == 0
ma_delta_bullish = sr_ma - nz(sr_ma[1]) > 0
ma_delta_bearish = sr_ma - nz(sr_ma[1]) < 0
ma_color = ma_delta_neutral ? neutral_color : ma_delta_bullish ? bullish_color : bearish_color
// === Plot SR MA and Ranges ===
alpha = color.new(color.red, 100)
ma = plot(sr_ma, "SR MA", ma_color, 4)
top = plot(top_range, "Top Range", ma_color, 2)
bottom = plot(bottom_range, "Bottom Range", ma_color, 2)
fill(ma, top, top_value = top_range, bottom_value = sr_ma, bottom_color = color.new(ma_color, 80), top_color = alpha)
fill(ma, bottom, top_value = sr_ma, bottom_value = bottom_range, top_color = color.new(ma_color, 80), bottom_color = alpha)
// === Detect Color Change ===
var color prev_color = na
color_change = ma_color != prev_color and not na(prev_color)
prev_color := ma_color
color_change_to_bullish = color_change and ma_color == bullish_color
color_change_to_bearish = color_change and ma_color == bearish_color
// === Visual Markers ===
plotshape(color_change_to_bullish, title="MA Color Change to Bullish", location=location.belowbar, color=color.green, style=shape.triangleup, size=size.small, text="Bullish")
plotshape(color_change_to_bearish, title="MA Color Change to Bearish", location=location.abovebar, color=color.red, style=shape.triangledown, size=size.small, text="Bearish")
// === Alerts for Color Changes ===
alertcondition(color_change_to_bullish, title="SR MA Color Changed to Bullish", message="SR MA color changed to Bullish (Uptrend)")
alertcondition(color_change_to_bearish, title="SR MA Color Changed to Bearish", message="SR MA color changed to Bearish (Downtrend)")
2025-06-11
293
글번호 191593
지표
답변완료
오랜만에 인사드리네요 잘부탁 드립니다
input : uselow_bull(true);
input : usehigh_bear(true);
input : line_forward(8);
input : line_back(-200);
input : label_offset(8);
var : use_low_bull(0),use_high_bear(0);
var : bull_dir(False),bear_dir(False),red_bar(false),green_bar(False);
var : strong_bull_dir(False),strong_bear_dir(False),nuetral_bar(False);
var : line_price(naN),label_price(NaN);
var : is_bar_index(0),a(0),b(0),price(0);
var : bull_break(False),bear_break(False);
var : confirmed_bull_(False),bull_value(0);
var : confirmed_bear_(False),bear_value(0);
use_low_bull = IFf(uselow_bull,low,close);
use_high_bear = IFF(usehigh_bear,high,close);
bull_dir = close >= open[1];
bear_dir = close <= open[1];
red_bar = open < close;
green_bar = open > close;
strong_bull_dir = bull_dir and red_bar;
strong_bear_dir = bear_dir and red_bar;
nuetral_bar = strong_bear_dir == False and strong_bull_dir == False;
is_bar_index = index;
if is_bar_index>0 Then
{
TL_Delete(line_price);
Text_Delete(label_price);
a = close;
b = is_bar_index;
line_price = TL_new(sDate,sTime,a,NextBarSdate,NextBarStime,a);
TL_SetColor(line_price, IFf(strong_bull_dir , red ,IFf(strong_bear_dir , lime , IFf(nuetral_bar , orange, Black))));
TL_SetExtRight(line_price,true);
TL_SetExtLeft(line_price,true);
label_price = Text_new(NextBarSdate,NextBarStime,a, ntostr(a,2));
Text_SetColor(label_price,iFf(strong_bull_dir , red ,IFf(strong_bear_dir , lime , IFf(nuetral_bar , orange, Black))));
Text_SetSize(label_price,20);
}
//=================
//BEGIN Definitions
//=================
price = close;
bull_break = price > high[1]
and price > high[2]
and price > high[3]
and price > high[4]
and price > high[5]
and price > high[6]
and price > high[7]
and price > high[8]
and price > high[9]
and price > high[10]
and price > high[11]
and price > high[12]
and price > high[13]
and price > high[14];
//
confirmed_bull_ = bull_break[1] and bull_break == False;
if confirmed_bull_ == true Then
bull_value = high;
if bull_break == bull_break[1] Then
plot1(bull_value,"bull_value",iff(bull_break != bull_break[1],Black ,red));
Else
NoPlot(1);
bear_break = price < low[1]
and price < low[2]
and price < low[3]
and price < low[4]
and price < low[5]
and price < low[6]
and price < low[7]
and price < low[8]
and price < low[9]
and price < low[10]
and price < low[11]
and price < low[11]
and price < low[12]
and price < low[13]
and price < low[14];
//
confirmed_bear_ = bear_break[1] and bear_break == False;
if confirmed_bear_ == true Then
bear_value = low;
if bear_break == bear_break[1] Then
plot2(bear_value,"bear_value",iff(bear_break != bear_break[1],Black,green));
Else
NoPlot(2);
input : rsiLen(6);
input : rsiOverbought(85);
input : rsiOversold(15);
var : rsiValue(0),rsiisoverbt(False),rsiisoversld(False);
var : bear_signal(False),bull_signal(False);
var : bulllabel1(Nan),bulllabel2(nan),bullline(NaN);
var : bearlabel1(Nan),bearlabel2(nan),bearline(NaN);
rsiValue = rsi(rsiLen);
rsiisoverbt = rsiValue >= rsiOverbought;
rsiisoversld = rsiValue <= rsiOversold;
bear_signal = (bear_break[1] and bear_break == False);
bull_signal = (bull_break[1] and bull_break == False);
if bull_signal Then
{
Text_Delete(bulllabel1);
bulllabel1 = Text_New(sDate,sTime,H,"Potential bear Reversal"+NewLine+NewLine);
Text_SetColor(bulllabel1,Green);
Text_SetStyle(bulllabel1,2,1);
Text_Delete(bulllabel2);
bulllabel2 = Text_New(sDate,sTime,H,"▼");
Text_SetColor(bulllabel2,Green);
Text_SetStyle(bulllabel2,2,1);
Text_SetSize(bulllabel2,20);
}
if bull_break Then
{
TL_Delete(bullline);
bullline = TL_new(sDate,sTime,use_high_bear,NextBarSdate,NextBarStime,use_high_bear);
TL_SetExtRight(bullline,true);
TL_SetColor(bullline,Red);
}
if bear_signal then
{
Text_Delete(bearlabel1);
bearlabel1 = text_new(sDate,sTime,L,"▲");
Text_SetColor(bearlabel1,Red);
Text_SetStyle(bearlabel1,2,0);
Text_SetSize(bearlabel1,20);
Text_Delete(bearlabel2);
bearlabel2 = text_new(sDate,sTime,L,NewLine+NewLine+"Potential bull Reversal");
Text_SetColor(bearlabel2,Red);
Text_SetStyle(bearlabel2,2,0);
}
if bear_break Then
{
TL_Delete(bearline);
bearline = TL_new(sDate,sTime,use_low_bull,NextBarSdate,NextBarStime,use_low_bull);
TL_SetExtRight(bearline,true);
TL_SetColor(bearline,green);
}
var : Sell_signal(False),Buy_signal(False);
var : bull_function(False),bear_function(False),custom_signal(False);
Sell_Signal = bull_signal;
Buy_Signal = bear_signal;
bull_function = Buy_Signal;
bear_function = Sell_Signal;
custom_signal = (bull_function or bear_function);
//END CUSTOM FUNCTIONS====
// Plot BUY SELL markers
input : show_sell_signals(false);
input : show_buy_signals(false);
var : tx1(0),tx2(0);
if show_sell_signals == true and Sell_Signal == true Then
{
tx1 = text_new(sDate,sTime,H,"▼");
Text_SetColor(tx1,Red);
Text_SetStyle(tx1,2,1);
tx2 = text_new(sDate,sTime,H,"O-B"+NewLine);
Text_SetColor(tx2,Yellow);
Text_SetStyle(tx2,2,1);
}
if show_buy_signals == true and Buy_Signal == true Then
{
tx1 = text_new(sDate,sTime,L,"▲");
Text_SetColor(tx1,Lime);
Text_SetStyle(tx1,2,0);
tx2 = text_new(sDate,sTime,L,NewLine+"O-S");
Text_SetColor(tx2,Yellow);
Text_SetStyle(tx2,2,0);
}
1, 매수시스템으로 부탁드립니다
2,,, potential bull reversal 표시되는 봉에서는 강력매수 로표시부탁드려요
2025-06-10
254
글번호 191588
시스템
답변완료
MACD 히스토그램 + RSI 요청
안녕하세요, 추가로 이 수식에
RSI 20 이하일 시 매수, RSI 70이상일 시 매도 수식을 추가해주실 수 있으실까요?
> 예스스탁 님이 쓴 글입니다.
> 제목 : Re : macd 히스토그램
>
안녕하세요
예스스탁입니다.
1. 시스템
input : short(12),long(26),sig(9),N(10);
var : osc(0),hh(0),ll(0);
osc = MACD_OSC(short,long,sig);
hh = highest(osc,N);
ll = lowest(osc,N);
if osc > hh[1] then
buy();
if osc < ll[1] then
sell();
2 강조
input : short(12),long(26),sig(9),N(10);
var : osc(0),hh(0),ll(0);
osc = MACD_OSC(short,long,sig);
hh = highest(osc,N);
ll = lowest(osc,N);
if osc > hh[1] then
PlotPaintBar(H,L,"강조",Magenta);
if osc < ll[1] then
PlotPaintBar(H,L,"강조",Cyan);
즐거운 하루되세요
> 부기곰 님이 쓴 글입니다.
> 제목 : macd 히스토그램
> 최근 10거래일 동안의 macd 히스토그램 막대차트의 max와 min을 구하여
진입, 청산하는 전략을 구현하고 싶습니다.
1. max, min을 화살표 혹은 바 색상을 다르게 표시하는법
2. max, min을 구하여 진입, 청산하는 수식
2가지 알려주시면 감사하겠습니다.
2025-06-10
175
글번호 191578
시스템