# TCM Panglima Terakhir

Dilihat 77
77
//TCM, Panglima terakhir
// Le RSI et idéal pour voir la force d'un mouvement
study(title = "TCM Panglima Terakhir", shorttitle = "TCM Panglima Terakhir", overlay = true)

//Mode
Factor=input(title="TCM Panglima Terakhir", defval=3, minval=1,maxval = 100)
ATR=input(title="ATR", defval=7, minval=1,maxval = 100)
RSI = input(title="RSI", defval=7, minval=1, maxval = 100)

//Super Trend ATR
Up=hl2-(Factor*atr(ATR))
Dn=hl2+(Factor*atr(ATR))

TUp=close>TUp? max(Up,TUp) : Up
TDown=close<TDown? min(Dn,TDown) : Dn

Trend = close > TDown ? 1: close< TUp? -1: nz (Trend,1)
Tsl = Trend==1? TUp: TDown

linecolor = Trend == 1 ? green : red

//RSI
src = close,

ep = 2 * RSI - 1
auc = ema ( max( src - src, 0 ), ep )
adc = ema ( max( src - src , 0 ), ep )
x1 = ( RSI - 1) * ( adc * 70 / (100-70) - auc)
ub = iff( x1 >= 0, src + x1, src + x1 * (100-70)/70 )
x2 = ( RSI - 1) * ( adc * 30 / (100-30) - auc)
lb = iff( x2 >= 0, src + x2, src + x2 * (100-30)/30 )

//Affichage
plot( avg (ub, lb ), color=purple, style = line, linewidth=1, title="RSI")
plot( Tsl , color = linecolor , style = line , linewidth = 1,title = "SuperTrend ATR")
ID Bahasa Indonesia
EN English
EN English (UK)
EN English (IN)
DE Deutsch
FR Français
ES Español
IT Italiano
PL Polski
SV Svenska
TR Türkçe
RU Русский
PT Português
MS Bahasa Melayu
TH ภาษาไทย
VI Tiếng Việt
JA 日本語
KO 한국어
ZH 简体中文
ZH 繁體中文
AR العربية
HE עברית