dayvid

Tim West Long Short or Choppy

290 0 28
seperates trending markets from choppy ones
Remove from Favorite Scripts Add to Favorite Scripts
//Created by ChrisMoody for TimWest on 10/17/2014
study(title="TimWest_Long Short Filters", shorttitle="TimWest_Long-Short-Filters", overlay=true)
source = close
def = input(false, title="------Make Sure ONLY 1 Checkbox Below is checked!!! Or You WILL Get False Results!!!------")
def2 = input(false, title="You Can Check More Than 1 Box To Create Multiple True/False Condition BUT The Background Colors Will Change!!!")
def3 = input(false, title="------If You Select More Than ONE CheckBox Below - Test By Plotting Indicators On Chart To Understand BackGround Colors!!!")
def4 = input(false, title="------ACTIVE CheckBoxes Start BELOW This Line!!!---")
sp = input(true, title="Show BackGround Highlight based on Lookback Period of Price?")
len = input(63, title="Lookback Period to Compare Current Price To.  Tim's Default is 63-Approx. 1 Quarter")
ssma = input(false, title="Show BackGround Highlight based on Cross of Short/Long SMA?")
smas = input(50, title="Short SMA.  Tim's Default is 50 SMA and 200 SMA - Golden Cross - Major Market Trend")
smal = input(200, title="Long SMA.  Tim's Default is 50 SMA and 200 SMA - Golden Cross - Major Market Trend")
sema = input(false, title="Show BackGround Highlight based on Cross of Short/Long EMA?")
emas = input(50, title="Short EMA.  Used for Evaluating Shorter Term Moves -Chuck Hughes 7 Time WorldTradingChampion uses 50-100EMA")
emal = input(100, title="Long EMA.  Used for Evaluating Shorter Term Moves-Chuck Hughes 7 Time WorldTradingChampion uses 50-100EMA")
//Criteria for LookBack of Current Price Vs. Price X bars ago
condpru = close[1] > close[len] ? 1 : 0
condprd = close[1] < close[len] ? 1 : 0
condPrice = sp and condpru ? green : sp and condprd ? red : na
//SMA Criteria
condsmaU = sma(close, smas) > sma(close, smal) ? 1 : 0
condsmaD = sma(close, smas) < sma(close, smal) ? 1 : 0
condSMA = ssma and condsmaU ? green : ssma and condsmaD ? red : na
//EMA Criteria
condemaU = ema(close, emas) > ema(close, emal) ? 1 : 0
condemaD = ema(close, emas) < ema(close, emal) ? 1 : 0
condEMA = sema and condemaU ? green : sema and condemaD ? red : na
//BackGround Hilight Plots
bgcolor(condPrice, transp=70)
bgcolor(condSMA, transp=70)
bgcolor(condEMA, transp=70)
Ideas Scripts Chart
United States
United Kingdom
India
España
Italia
Brasil
Россия
Türkiye
日本
한국
Home Stock Screener Economic Calendar How It Works Chart Features House Rules Moderators For the WEB Widgets Stock Charting Library Priority Support Feature Request Blog & News FAQ Help & Wiki Twitter
Private Messages Chat Ideas Published Followers Following Priority Support Public Profile Profile Settings Billing Sign Out