yyyx-mm-dd

// ==================剥皮指标====================
nf = input.int(title="剥皮指标周期", defval=2, minval=2)
// UpFractal
bool upflagDownFrontier = true
bool upflagUpFrontier0 = true
bool upflagUpFrontier1 = true
bool upflagUpFrontier2 = true
bool upflagUpFrontier3 = true
bool upflagUpFrontier4 = true

for i = 1 to nf
    upflagDownFrontier := upflagDownFrontier and (high[nf-i] < high[nf])
    upflagUpFrontier0 := upflagUpFrontier0 and (high[nf+i] <  high[nf])
    upflagUpFrontier1 := upflagUpFrontier1 and (high[nf+1] <= high[nf] and high[nf+i + 1] < high[nf])
    upflagUpFrontier2 := upflagUpFrontier2 and (high[nf+1] <= high[nf] and high[nf+2] <= high[nf] and high[nf+i + 2] < high[nf])
    upflagUpFrontier3 := upflagUpFrontier3 and (high[nf+1] <= high[nf] and high[nf+2] <= high[nf] and high[nf+3] <= high[nf] and high[nf+i + 3] < high[nf])
    upflagUpFrontier4 := upflagUpFrontier4 and (high[nf+1] <= high[nf] and high[nf+2] <= high[nf] and high[nf+3] <= high[nf] and high[nf+4] <= high[nf] and high[nf+i + 4] < high[nf])
flagUpFrontier = upflagUpFrontier0 or upflagUpFrontier1 or upflagUpFrontier2 or upflagUpFrontier3 or upflagUpFrontier4

kongpailie = ema30 < ema50 and ema50 < ema144
rsikong = ta.rsi(close, 7) >= 50
upFractal = (upflagDownFrontier and flagUpFrontier and kongpailie and rsikong)

// downFractal
bool downflagDownFrontier = true
bool downflagUpFrontier0 = true
bool downflagUpFrontier1 = true
bool downflagUpFrontier2 = true
bool downflagUpFrontier3 = true
bool downflagUpFrontier4 = true

for i = 1 to nf
    downflagDownFrontier := downflagDownFrontier and (low[nf-i] > low[nf])
    downflagUpFrontier0 := downflagUpFrontier0 and (low[nf+i] >  low[nf])
    downflagUpFrontier1 := downflagUpFrontier1 and (low[nf+1] >= low[nf] and low[nf+i + 1] > low[nf])
    downflagUpFrontier2 := downflagUpFrontier2 and (low[nf+1] >= low[nf] and low[nf+2] >= low[nf] and low[nf+i + 2] > low[nf])
    downflagUpFrontier3 := downflagUpFrontier3 and (low[nf+1] >= low[nf] and low[nf+2] >= low[nf] and low[nf+3] >= low[nf] and low[nf+i + 3] > low[nf])
    downflagUpFrontier4 := downflagUpFrontier4 and (low[nf+1] >= low[nf] and low[nf+2] >= low[nf] and low[nf+3] >= low[nf] and low[nf+4] >= low[nf] and low[nf+i + 4] > low[nf])
flagDownFrontier = downflagUpFrontier0 or downflagUpFrontier1 or downflagUpFrontier2 or downflagUpFrontier3 or downflagUpFrontier4

duopailie = ema30 > ema50 and ema50 > ema144
rsiduo = ta.rsi(close, 7) <= 50
downFractal = (downflagDownFrontier and flagDownFrontier and duopailie and rsiduo)


plotshape(upFractal, style=shape.triangledown,   location=location.abovebar, offset=-nf, color=color.red, size = size.tiny)
plotshape(downFractal, style=shape.triangleup, location=location.belowbar, offset=-nf, color=color.green, size = size.tiny)