Join useThinkScript to post your question to a community of 21,000+ developers and traders.
Perfect.
Code for Watchlist Posed per Request.
Code:# RSM_WL # #CHANGELOG # 2021.1.31 - V1.0 @SuryaKiranC - RSM Watch List study - to be used as watchlist: # Based on @Cos251 RSM_SCAN Code. # - Stocks currently in UpTrend # - Stocks currently in DownTrend # - Stocks where UpTrendJustSarted - first bar of UpTrend for scanend TF # - Stocks where DownTrendJustStarted - first bar of DownTrend for scanned TF # - Stocks where UpTredJustEnded - first NO Trend bar after UpTrend # - Stocks where DownTrendJustEnded - first NO Trend bar after DownTrend # - Recommend using default studies for SCANS of RSI, Stochastics or MACD for efficiency # #REQUIREMENTS - RSI Set to 7, EXPONENTIAL # Stoch Slow 14 and 3 WILDERS # MACD 12,26,9 WEIGHTED # # #CREDITS # requesed by "@Joseph Patrick 18" # #LINK # https://rockwell-files.s3.amazonaws.com/PXCompanionGuide2ndEd_cover.pdf # Markus Heikoetter who is the author of the Power X Strategy # https://usethinkscript.com/threads/mimicking-power-x-strategy-by-markus-heitkoetter.4283/ # ################################################################ ########## RSI ######### ################################################################ def lengthRSI = 7; def price = close; def averageTypeRSI = AverageType.EXPONENTIAL; def NetChgAvg = MovingAverage(averageTypeRSI, price - price[1], lengthRSI); def TotChgAvg = MovingAverage(averageTypeRSI, AbsValue(price - price[1]), lengthRSI); def ChgRatio = if TotChgAvg != 0 then NetChgAvg / TotChgAvg else 0; def RSI = 50 * (ChgRatio + 1); ################################################################ ########## Stochastic Slow ######### ################################################################ def over_boughtSt = 80; def over_soldSt = 20; def KPeriod = 14; def DPeriod = 3; def priceH = high; def priceL = low; def priceC = close; def averageTypeStoch = AverageType.WILDERS; def SlowK = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, if (averageTypeStoch == 1) then AverageType.SIMPLE else AverageType.EXPONENTIAL).FullK; def SlowD = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, if (averageTypeStoch == 1) then AverageType.SIMPLE else AverageType.EXPONENTIAL).FullD; ################################################################# ############ MACD Calculation ######### ################################################################# def fastLength = 12; def slowLength = 26; def MACDLength = 9; def averageTypeMACD = AverageType.WEIGHTED; def Value = MovingAverage(averageTypeMACD, close, fastLength) - MovingAverage(averageTypeMACD, close, slowLength); def Avg = MovingAverage(averageTypeMACD, Value, MACDLength); def Diff = Value - Avg; ################################################################# ############ SCAN Variables ######### ################################################################# # If you want to scan for stocks that are not in either trend you can add two filters and scan for false for both conditions # The UpTrend and DownTrend plots can be used to scan for stocks that are currently in that trend def UpTrend = if RSI > 50 and SlowK > 50 and Value > Avg then 1 else 0; def DownTrend = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; # The UpTrendJustStarted and DownTrendJustStarted plots can be used to find stocks that have just started # a trend in either direction def UpTrendJustStartedBool = if RSI > 50 and SlowK > 50 and Value > Avg then 1 else 0; def DownTrendJustStartedBool = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; def UpTrendJustStarted = if UpTrendJustStartedBool == 1 and UpTrendJustStartedBool[1] == 0 then 1 else 0; def DownTrendJustStarted = if DownTrendJustStartedBool == 1 and DownTrendJustStartedBool[1] == 0 then 1 else 0; def UpTrendJustEnded = if UpTrendJustStartedBool[1] == 1 and UpTrendJustStartedBool == 0 then 1 else 0; def DownTrendJustEnded = if DownTrendJustStartedBool[1] == 1 and DownTrendJustStartedBool == 0 then 1 else 0; def GetTrend = if UptrendJustStarted then 3 else if Uptrend then 2 else if UpTrendJustEnded then 1 else if DownTrendJustStarted then -1 else if DownTrend then -2 else if DownTrendJustEnded then -3 else 0; AddLabel (yes, if GetTrend == 3 then "UpTrendJustStarted" else if GetTrend == 2 then "UpTrend" else if GetTrend == 1 then "UpTrendJustEnded" else if GetTrend == -1 then "DownTrendJustStarted" else if GetTrend == -2 then "DownTrend" else if GetTrend == -3 then "DownTrendJustEnded" else "NoTrend",Color.BLACK); AssignBackgroundColor( if GetTrend == 3 then Color.LIGHT_GREEN else if GetTrend == 2 then Color.Green else if GetTrend == -1 then Color.LIGHT_RED else if GetTrend == -2 then Color.RED else Color.WHITE);
Version 1.1 For watch list with BarCount Since Up/Down Trend has started. Only for those 2 trends coded for now. Please use Version 1.0 if you have performance concerns, I haven't tested the code during market hours yet.
Code:# RSM_WL # #CHANGELOG # 2021.3.5 - V1.1 @SuryaKiranC - BarCount for how long Up/Down Trend is in progress. # 2021.1.31 - V1.0 @SuryaKiranC - RSM Watch List study - to be used as watchlist: # Based on @Cos251 RSM_SCAN Code. # - Stocks currently in UpTrend # - Stocks currently in DownTrend # - Stocks where UpTrendJustSarted - first bar of UpTrend for scanend TF # - Stocks where DownTrendJustStarted - first bar of DownTrend for scanned TF # - Stocks where UpTredJustEnded - first NO Trend bar after UpTrend # - Stocks where DownTrendJustEnded - first NO Trend bar after DownTrend # - Recommend using default studies for SCANS of RSI, Stochastics or MACD for efficiency # #REQUIREMENTS - RSI Set to 7, EXPONENTIAL # Stoch Slow 14 and 3 WILDERS # MACD 12,26,9 WEIGHTED # # #CREDITS # requesed by "@Joseph Patrick 18" # #LINK # https://rockwell-files.s3.amazonaws.com/PXCompanionGuide2ndEd_cover.pdf # Markus Heikoetter who is the author of the Power X Strategy # https://usethinkscript.com/threads/mimicking-power-x-strategy-by-markus-heitkoetter.4283/ # ################################################################ ########## RSI ######### ################################################################ def lengthRSI = 7; def price = close; def averageTypeRSI = AverageType.EXPONENTIAL; def NetChgAvg = MovingAverage(averageTypeRSI, price - price[1], lengthRSI); def TotChgAvg = MovingAverage(averageTypeRSI, AbsValue(price - price[1]), lengthRSI); def ChgRatio = if TotChgAvg != 0 then NetChgAvg / TotChgAvg else 0; def RSI = 50 * (ChgRatio + 1); ################################################################ ########## Stochastic Slow ######### ################################################################ def over_boughtSt = 80; def over_soldSt = 20; def KPeriod = 14; def DPeriod = 3; def priceH = high; def priceL = low; def priceC = close; def averageTypeStoch = AverageType.WILDERS; def SlowK = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, if (averageTypeStoch == 1) then AverageType.SIMPLE else AverageType.EXPONENTIAL).FullK; def SlowD = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, if (averageTypeStoch == 1) then AverageType.SIMPLE else AverageType.EXPONENTIAL).FullD; ################################################################# ############ MACD Calculation ######### ################################################################# def fastLength = 12; def slowLength = 26; def MACDLength = 9; def averageTypeMACD = AverageType.WEIGHTED; def Value = MovingAverage(averageTypeMACD, close, fastLength) - MovingAverage(averageTypeMACD, close, slowLength); def Avg = MovingAverage(averageTypeMACD, Value, MACDLength); def Diff = Value - Avg; ################################################################# ############ SCAN Variables ######### ################################################################# # If you want to scan for stocks that are not in either trend you can add two filters and scan for false for both conditions # The UpTrend and DownTrend plots can be used to scan for stocks that are currently in that trend def UpTrend = if RSI > 50 and SlowK > 50 and Value > Avg then 1 else 0; def DownTrend = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; def bnumUp; def bnumDown; def closeUpTrendStart; def closeDownTrendStart; def UpTrendBarCount; def DownTrendBarCount; if UpTrend and (!UpTrend[1] or DownTrend[1]) { bnumUp = BarNumber(); bnumDown = 0; closeUpTrendStart = close; closeDownTrendStart = 0; UpTrendBarCount = 1; DownTrendBarCount = 0; } else if UpTrend { bnumUp = bnumUp[1]; bnumDown = 0; closeUpTrendStart = closeUpTrendStart[1]; closeDownTrendStart = 0; UpTrendBarCount = UpTrendBarCount[1] + 1; DownTrendBarCount = 0; } else if DownTrend and (!DownTrend[1] or UpTrend[1]) { bnumUp = 0; bnumDown = BarNumber(); closeDownTrendStart = close; closeUpTrendStart = 0; UpTrendBarCount = 0; DownTrendBarCount = 1; } else if DownTrend { bnumDown = bnumDown[1]; closeDownTrendStart = closeDownTrendStart[1]; DownTrendBarCount = DownTrendBarCount[1] + 1; bnumUp = 0; closeUpTrendStart = 0; UpTrendBarCount = 0; } else { bnumUp = 0; bnumDown = 0; closeUpTrendStart = 0; closeDownTrendStart = 0; UpTrendBarCount = 0; DownTrendBarCount = 0; } # The UpTrendJustStarted and DownTrendJustStarted plots can be used to find stocks that have just started # a trend in either direction def UpTrendJustStartedBool = if RSI > 50 and SlowK > 50 and Value > Avg then 1 else 0; def DownTrendJustStartedBool = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; def UpTrendJustStarted = if UpTrendJustStartedBool == 1 and UpTrendJustStartedBool[1] == 0 then 1 else 0; def DownTrendJustStarted = if DownTrendJustStartedBool == 1 and DownTrendJustStartedBool[1] == 0 then 1 else 0; def UpTrendJustEnded = if UpTrendJustStartedBool[1] == 1 and UpTrendJustStartedBool == 0 then 1 else 0; def DownTrendJustEnded = if DownTrendJustStartedBool[1] == 1 and DownTrendJustStartedBool == 0 then 1 else 0; def GetTrend = if UptrendJustStarted then 3 else if Uptrend then 2 else if UpTrendJustEnded then 1 else if DownTrendJustStarted then -1 else if DownTrend then -2 else if DownTrendJustEnded then -3 else 0; AddLabel (yes, if GetTrend == 3 then "UpTrendJustStarted" else if GetTrend == 2 then "BC:" + UpTrendBarCount + " UpTrend" else if GetTrend == 1 then "UpTrendJustEnded" else if GetTrend == -1 then "DownTrendJustStarted" else if GetTrend == -2 then "BC:" + DownTrendBarCount + " DownTrend" else if GetTrend == -3 then "DownTrendJustEnded" else "NoTrend",Color.BLACK); AssignBackgroundColor( if GetTrend == 3 then Color.LIGHT_GREEN else if GetTrend == 2 then Color.Green else if GetTrend == -1 then Color.LIGHT_RED else if GetTrend == -2 then Color.RED else Color.WHITE);
I’m loving what you are doing and I have the indicator loaded up but for some reason the targets keep showing up as N/APerfect.
Code for Watchlist Posed per Request.
Code:# RSM_WL # #CHANGELOG # 2021.1.31 - V1.0 @SuryaKiranC - RSM Watch List study - to be used as watchlist: # Based on @Cos251 RSM_SCAN Code. # - Stocks currently in UpTrend # - Stocks currently in DownTrend # - Stocks where UpTrendJustSarted - first bar of UpTrend for scanend TF # - Stocks where DownTrendJustStarted - first bar of DownTrend for scanned TF # - Stocks where UpTredJustEnded - first NO Trend bar after UpTrend # - Stocks where DownTrendJustEnded - first NO Trend bar after DownTrend # - Recommend using default studies for SCANS of RSI, Stochastics or MACD for efficiency # #REQUIREMENTS - RSI Set to 7, EXPONENTIAL # Stoch Slow 14 and 3 WILDERS # MACD 12,26,9 WEIGHTED # # #CREDITS # requesed by "@Joseph Patrick 18" # #LINK # https://rockwell-files.s3.amazonaws.com/PXCompanionGuide2ndEd_cover.pdf # Markus Heikoetter who is the author of the Power X Strategy # https://usethinkscript.com/threads/mimicking-power-x-strategy-by-markus-heitkoetter.4283/ # ################################################################ ########## RSI ######### ################################################################ def lengthRSI = 7; def price = close; def averageTypeRSI = AverageType.EXPONENTIAL; def NetChgAvg = MovingAverage(averageTypeRSI, price - price[1], lengthRSI); def TotChgAvg = MovingAverage(averageTypeRSI, AbsValue(price - price[1]), lengthRSI); def ChgRatio = if TotChgAvg != 0 then NetChgAvg / TotChgAvg else 0; def RSI = 50 * (ChgRatio + 1); ################################################################ ########## Stochastic Slow ######### ################################################################ def over_boughtSt = 80; def over_soldSt = 20; def KPeriod = 14; def DPeriod = 3; def priceH = high; def priceL = low; def priceC = close; def averageTypeStoch = AverageType.WILDERS; def SlowK = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, if (averageTypeStoch == 1) then AverageType.SIMPLE else AverageType.EXPONENTIAL).FullK; def SlowD = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, if (averageTypeStoch == 1) then AverageType.SIMPLE else AverageType.EXPONENTIAL).FullD; ################################################################# ############ MACD Calculation ######### ################################################################# def fastLength = 12; def slowLength = 26; def MACDLength = 9; def averageTypeMACD = AverageType.WEIGHTED; def Value = MovingAverage(averageTypeMACD, close, fastLength) - MovingAverage(averageTypeMACD, close, slowLength); def Avg = MovingAverage(averageTypeMACD, Value, MACDLength); def Diff = Value - Avg; ################################################################# ############ SCAN Variables ######### ################################################################# # If you want to scan for stocks that are not in either trend you can add two filters and scan for false for both conditions # The UpTrend and DownTrend plots can be used to scan for stocks that are currently in that trend def UpTrend = if RSI > 50 and SlowK > 50 and Value > Avg then 1 else 0; def DownTrend = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; # The UpTrendJustStarted and DownTrendJustStarted plots can be used to find stocks that have just started # a trend in either direction def UpTrendJustStartedBool = if RSI > 50 and SlowK > 50 and Value > Avg then 1 else 0; def DownTrendJustStartedBool = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; def UpTrendJustStarted = if UpTrendJustStartedBool == 1 and UpTrendJustStartedBool[1] == 0 then 1 else 0; def DownTrendJustStarted = if DownTrendJustStartedBool == 1 and DownTrendJustStartedBool[1] == 0 then 1 else 0; def UpTrendJustEnded = if UpTrendJustStartedBool[1] == 1 and UpTrendJustStartedBool == 0 then 1 else 0; def DownTrendJustEnded = if DownTrendJustStartedBool[1] == 1 and DownTrendJustStartedBool == 0 then 1 else 0; def GetTrend = if UptrendJustStarted then 3 else if Uptrend then 2 else if UpTrendJustEnded then 1 else if DownTrendJustStarted then -1 else if DownTrend then -2 else if DownTrendJustEnded then -3 else 0; AddLabel (yes, if GetTrend == 3 then "UpTrendJustStarted" else if GetTrend == 2 then "UpTrend" else if GetTrend == 1 then "UpTrendJustEnded" else if GetTrend == -1 then "DownTrendJustStarted" else if GetTrend == -2 then "DownTrend" else if GetTrend == -3 then "DownTrendJustEnded" else "NoTrend",Color.BLACK); AssignBackgroundColor( if GetTrend == 3 then Color.LIGHT_GREEN else if GetTrend == 2 then Color.Green else if GetTrend == -1 then Color.LIGHT_RED else if GetTrend == -2 then Color.RED else Color.WHITE);
Version 1.1 For watch list with BarCount Since Up/Down Trend has started. Only for those 2 trends coded for now. Please use Version 1.0 if you have performance concerns, I haven't tested the code during market hours yet.
Code:# RSM_WL # #CHANGELOG # 2021.3.5 - V1.1 @SuryaKiranC - BarCount for how long Up/Down Trend is in progress. # 2021.1.31 - V1.0 @SuryaKiranC - RSM Watch List study - to be used as watchlist: # Based on @Cos251 RSM_SCAN Code. # - Stocks currently in UpTrend # - Stocks currently in DownTrend # - Stocks where UpTrendJustSarted - first bar of UpTrend for scanend TF # - Stocks where DownTrendJustStarted - first bar of DownTrend for scanned TF # - Stocks where UpTredJustEnded - first NO Trend bar after UpTrend # - Stocks where DownTrendJustEnded - first NO Trend bar after DownTrend # - Recommend using default studies for SCANS of RSI, Stochastics or MACD for efficiency # #REQUIREMENTS - RSI Set to 7, EXPONENTIAL # Stoch Slow 14 and 3 WILDERS # MACD 12,26,9 WEIGHTED # # #CREDITS # requesed by "@Joseph Patrick 18" # #LINK # https://rockwell-files.s3.amazonaws.com/PXCompanionGuide2ndEd_cover.pdf # Markus Heikoetter who is the author of the Power X Strategy # https://usethinkscript.com/threads/mimicking-power-x-strategy-by-markus-heitkoetter.4283/ # ################################################################ ########## RSI ######### ################################################################ def lengthRSI = 7; def price = close; def averageTypeRSI = AverageType.EXPONENTIAL; def NetChgAvg = MovingAverage(averageTypeRSI, price - price[1], lengthRSI); def TotChgAvg = MovingAverage(averageTypeRSI, AbsValue(price - price[1]), lengthRSI); def ChgRatio = if TotChgAvg != 0 then NetChgAvg / TotChgAvg else 0; def RSI = 50 * (ChgRatio + 1); ################################################################ ########## Stochastic Slow ######### ################################################################ def over_boughtSt = 80; def over_soldSt = 20; def KPeriod = 14; def DPeriod = 3; def priceH = high; def priceL = low; def priceC = close; def averageTypeStoch = AverageType.WILDERS; def SlowK = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, if (averageTypeStoch == 1) then AverageType.SIMPLE else AverageType.EXPONENTIAL).FullK; def SlowD = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, if (averageTypeStoch == 1) then AverageType.SIMPLE else AverageType.EXPONENTIAL).FullD; ################################################################# ############ MACD Calculation ######### ################################################################# def fastLength = 12; def slowLength = 26; def MACDLength = 9; def averageTypeMACD = AverageType.WEIGHTED; def Value = MovingAverage(averageTypeMACD, close, fastLength) - MovingAverage(averageTypeMACD, close, slowLength); def Avg = MovingAverage(averageTypeMACD, Value, MACDLength); def Diff = Value - Avg; ################################################################# ############ SCAN Variables ######### ################################################################# # If you want to scan for stocks that are not in either trend you can add two filters and scan for false for both conditions # The UpTrend and DownTrend plots can be used to scan for stocks that are currently in that trend def UpTrend = if RSI > 50 and SlowK > 50 and Value > Avg then 1 else 0; def DownTrend = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; def bnumUp; def bnumDown; def closeUpTrendStart; def closeDownTrendStart; def UpTrendBarCount; def DownTrendBarCount; if UpTrend and (!UpTrend[1] or DownTrend[1]) { bnumUp = BarNumber(); bnumDown = 0; closeUpTrendStart = close; closeDownTrendStart = 0; UpTrendBarCount = 1; DownTrendBarCount = 0; } else if UpTrend { bnumUp = bnumUp[1]; bnumDown = 0; closeUpTrendStart = closeUpTrendStart[1]; closeDownTrendStart = 0; UpTrendBarCount = UpTrendBarCount[1] + 1; DownTrendBarCount = 0; } else if DownTrend and (!DownTrend[1] or UpTrend[1]) { bnumUp = 0; bnumDown = BarNumber(); closeDownTrendStart = close; closeUpTrendStart = 0; UpTrendBarCount = 0; DownTrendBarCount = 1; } else if DownTrend { bnumDown = bnumDown[1]; closeDownTrendStart = closeDownTrendStart[1]; DownTrendBarCount = DownTrendBarCount[1] + 1; bnumUp = 0; closeUpTrendStart = 0; UpTrendBarCount = 0; } else { bnumUp = 0; bnumDown = 0; closeUpTrendStart = 0; closeDownTrendStart = 0; UpTrendBarCount = 0; DownTrendBarCount = 0; } # The UpTrendJustStarted and DownTrendJustStarted plots can be used to find stocks that have just started # a trend in either direction def UpTrendJustStartedBool = if RSI > 50 and SlowK > 50 and Value > Avg then 1 else 0; def DownTrendJustStartedBool = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; def UpTrendJustStarted = if UpTrendJustStartedBool == 1 and UpTrendJustStartedBool[1] == 0 then 1 else 0; def DownTrendJustStarted = if DownTrendJustStartedBool == 1 and DownTrendJustStartedBool[1] == 0 then 1 else 0; def UpTrendJustEnded = if UpTrendJustStartedBool[1] == 1 and UpTrendJustStartedBool == 0 then 1 else 0; def DownTrendJustEnded = if DownTrendJustStartedBool[1] == 1 and DownTrendJustStartedBool == 0 then 1 else 0; def GetTrend = if UptrendJustStarted then 3 else if Uptrend then 2 else if UpTrendJustEnded then 1 else if DownTrendJustStarted then -1 else if DownTrend then -2 else if DownTrendJustEnded then -3 else 0; AddLabel (yes, if GetTrend == 3 then "UpTrendJustStarted" else if GetTrend == 2 then "BC:" + UpTrendBarCount + " UpTrend" else if GetTrend == 1 then "UpTrendJustEnded" else if GetTrend == -1 then "DownTrendJustStarted" else if GetTrend == -2 then "BC:" + DownTrendBarCount + " DownTrend" else if GetTrend == -3 then "DownTrendJustEnded" else "NoTrend",Color.BLACK); AssignBackgroundColor( if GetTrend == 3 then Color.LIGHT_GREEN else if GetTrend == 2 then Color.Green else if GetTrend == -1 then Color.LIGHT_RED else if GetTrend == -2 then Color.RED else Color.WHITE);
I’m lovine what you are doing and I have this loaded up in my TOS but for some reason all the target labels are showing N/A, please helpUpdate - Version 1.7
A quick update to this indicator for those of you that may be using it. See below for changes in this version.
Added the following:
- Added additional price targets (7, 8, 9) as an input option (ShowExtraTargets789) - can be turned on and off independent of targets 1-6 but dependent on trend
- Added ADX triangle plot to stoploss in either direction. Indicates if ADX is greater than previous ADX[1] and denotes if ADR has crossed above ADXR for trend confirmation/strength
- ADX Uptrend - White = ADX > ADX[1], RED = ADX crossed above ADXR, CYAN = ADX > 35
- ADX DownTrend - Purple = ADX > ADX[1], GREEN = ADX crossed above ADXR, YELLOW = ADX > 35
- Added ability to show ADX triangles without plotting ADR Targets and Shading
After quite a bit of collaboration from several members - we wanted to provide a central reference point for this indicator. The original request for this write up came from @Joseph Patrick 18 to replicate a well known strategy known as Power X. For the purposes of this indicator, it is being referred to as RSM (RSI, Stochastic,MACD) Indicator.
I'd like to thank the following members for their contributions: @Joseph Patrick 18 , @SuryaKiranC, @RickAns, @TradeUp (and many others, sorry if I forgot you)
Basic requirements for this indicator:
Trend Identification
- Use RSI, Stochastic and MACD standard indicators (with minor settings tweak) to identify trends
- RSI - Set to 7, EXPONENTIAL MOVING AVERAGE
- Stochastic Slow- Set to 14 and 3, WILDERS AVERAGE
- MACD - Set to 12,26,9 - WEIGHTED AVERAGE
- Paint Candles accordintly - (GREEN/UP, RED/DOWN)
Reference material for strategy: https://rockwell-files.s3.amazonaws.com/PXCompanionGuide2ndEd_cover.pdf
Indicators Available (See below for code). The following scripts are provided for this indicator:
* - Quick personal note - thanks so much for letting me work on this project and for you patience. I had a chance to learn quite a bit and hopefully improve my trading in the process. Great community here!!!!!!!!!!!
- RSM Upper - works on any TF and TICK Charts
- Color candles, Plots Arrows and displays informational labels
- Most settings can be turned off if desired
- RSM Lower
- 3 Indicators in 1 - can be added to chart seperatly and choose indicator desired
- Can plot RSI, Stochastic, RSI & Stochastic, or MACD Only as lower study with shading and candle painting
- RSM MTF
- Adds Labels for ALL TF's to show current status of RSM Signal
- RSM SCAN - Use to scan for the following:
- Stocks currently in UpTrend
- Stocks just starting UpTrend
- Stocks currently in DownTrend
- Stocks just starting DownTrend
Disclaimer
This indicator may or may not be suitable for you. Constructive criticism welcomed in order to improve. Please report any bugs so we can continue to improve it.
RSM Upper
Features
- Paint Bars (Green, Red, Gray)
- Shade chart area per trend
- Select between trade type (Long,Short,Both)
- Dynamic calculation of ADR/ATR at moment of trend start
- Select between ADR/ATR for target and stop loss calculations
- Plot ADR/ATR target lines while trend is active (on/off)
- Plot 3 targets up/down by default
- Plot additional targets (4-6) if desired (on/off)
- Shade the ADR/ATR zones (on/off)
- Stop loss multiplier selection
- Show Labels for first 3 targets
- Show Labels for Trend info
Code:#START OF RSI/Stochastic/MACD Confluence Strategy for ThinkOrSwim #RSM_STANDARD_UPPER # #CHANGELOG # # 2021.04.13 V1.7 @cos251 - Added additional price targets (7, 8, 9) as an input option (ShowExtraTargets789) - can be turned on and off independent of targets 1-6 but # - dependent on trend # - Added ADX triangle plot to stoploss in either direction. Indicates if ADX is greater than previous ADX[1] and denotes if ADR has crossed # - above ADXR for trend confirmation/strength # - ADX Uptrend - White = ADX > ADX[1], RED = ADX crossed above ADXR, CYAN = ADX > 35 # - ADX DownTrend - Purple = ADX > ADX[1], GREEN = ADX crossed above ADXR, YELLOW = ADX > 35 # # 2021.01.15 V1.6 @SuryaKirnaC # - Modifed ADR Zones shading colors # - Adjusted Indicator and target labels for space # - Made audible alerts user configurable via settings # # 2021.01.04 V1.5 @cos251 - Fixed long, short ADR Zone plots to match TradeType selection (Long, Short, BOTH) - will only plot as selected # # 2020.12.21 V1.4 @cos251 - Added input "plotADR" # - plots dynamic ATR/ADR targets- default plots 3 targets - can be turned off by setting "plotADR" to no # - Added input "showExtraTargets" # - - plots dynamic ATR/ADR targets- for targets 4, 5, and 6 # - Added input "showADRZones" # - Dynamic shading of ATR/ADR targets - can be turned off in settings using "showADRZones" # - Added dynamic calculation of both ATR and ADR. User can select between ATR and ADR in settings # - Added input "showADRLabels" # - Added Dynamic Target labels for UpTrend or DownTrend; they will be green or red depending on Up or Down trend # - Added input "showTodayOnly" # - Added option to display shaded ADR/ATR zones for today only "showTodayOnly" # - if set to no - ADR/ATR plots will be plotted for all available data on chart # - Added ability to plot ATR or ADR on DAY chart - MUST TURN OFF "showTodayOnly" # - Added Labels that can be used for "debug" - MUST change "debug" setting to yes # - Added Trend information labels that can be turned on/off # # # 2020.11.30 V1.3 @cos251 - Stripped down TICK Version; No ADR since time based aggregation period do not work on TICK # Charts # # 2020.11.30 V1.2 @cos251 - Add ADR plots and shading per request; will tweak these settings to improve overall # options # 2020.11.12 V1.1 @cos251 - Changed from strategy to standard study. Added Green Arrow UP # and Red Arrow down when trend starts. Added option to change to high # timeframe but this WILL repaint; if used, should be used with other # indicators to confirm an entry/exit. # # 2020.10.27 V1.0 @cos251 - Added RSI, StochasticSlow and MACD to same indicator # - also calculates MACD; # - Will shade the lower plot area of the following conditions are met # Shade GREEN = RSI > 50 and SlowK > 50 and (macd)Value > (macd)Avg # Shade RED = RSI < 50 and SlowK < 50 and (macd)Value < (macd)Avg # # #REQUIREMENTS - RSI Set to 7, EXPONENTIAL # Stoch Slow 14 and 3 WILDERS # MACD 12,26,9 WEIGHTED declare upper; ################################################################ ########## Variables ######### ################################################################ input paintBars = yes; input showRSMShade = no; input tradetype = { "long", "short", default "both" }; input rangeType = { default "ADR", "ATR" }; input stopLossMultiplier = 1.0; input plotADR = yes; input showADRZones = yes; input showTodayOnly = yes; input showTrendLabels = no; input showADRLabels = no; input showExtraTargets = no; input showExtraTargets789 = no; input showADXTriangle = yes; input lengthADX = 21; input showIndicatorLabels = no; input audibleAlerts = yes; input debug = no; # change to "NO" after testing ################################################################ ########## ATR/ADR Calc ######### ################################################################ input ATRlength = 14; input ATRaverageType = AverageType.WILDERS; def Range; if rangeType == rangeType.ATR { Range = MovingAverage(ATRaverageType, TrueRange(high, close, low), ATRlength); } else { Range = Average(high - low, 7); } ################################################################ ########## Booleans Set for Plot Use ######### ################################################################ def afterStart = GetTime() > RegularTradingStart(GetYYYYMMDD()); def beforeEnd = GetTime() < RegularTradingEnd(GetYYYYMMDD()); def today = if GetLastDay() == GetDay() then 1 else Double.NaN; def dailyO = if today and afterStart and beforeEnd then DailyOpen() else Double.NaN; plot openPrice = if dailyO then DailyOpen() else Double.NaN; AddLabel(if debug then yes else no, "Day = :" + today); AddLabel(if debug then yes else no, "Day = :" + GetDay()); ################################################################ ########## ADX Indicator Reference ######### ################################################################ def ADX = reference ADX(); def ADXR = (ADX + ADX[lengthADX - 1]) / 2; ################################################################ ########## RSI ######### ################################################################ input lengthRSI = 7; input price = close; input averageTypeRSI = AverageType.EXPONENTIAL; def NetChgAvg = MovingAverage(averageTypeRSI, close - close[1], lengthRSI); def TotChgAvg = MovingAverage(averageTypeRSI, AbsValue(close - close[1]), lengthRSI); def ChgRatio = if TotChgAvg != 0 then NetChgAvg / TotChgAvg else 0; def RSI = 50 * (ChgRatio + 1); ################################################################ ########## Stochastic Slow ######### ################################################################ input over_boughtSt = 80; input over_soldSt = 20; input KPeriod = 14; input DPeriod = 3; input averageTypeStoch = AverageType.WILDERS; def SlowK = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, high, low, close, 3, averageTypeStoch).FullK; def SlowD = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, high, low, close, 3, averageTypeStoch).FullD; ################################################################ ########## MACD ######### ################################################################ input fastLength = 12; input slowLength = 26; input MACDLength = 9; input averageTypeMACD = AverageType.WEIGHTED; def Value = MovingAverage(averageTypeMACD, close, fastLength) - MovingAverage(averageTypeMACD, close, slowLength); def Avg = MovingAverage(averageTypeMACD, Value, MACDLength); def Diff = Value - Avg; ################################################################ ########## Assign Price Color ######### ################################################################ AssignPriceColor(if paintBars and RSI >= 50 and SlowK >= 50 and Value > Avg then Color.GREEN else if paintBars and RSI < 50 and SlowK < 50 and Value < Avg then Color.RED else if paintBars then Color.DARK_GRAY else Color.CURRENT); ################################################################# ##### Up/Down Trend Check/SCAN Variables ######### ################################################################# plot UpTrend = if RSI >= 50 and SlowK >= 50 and Value > Avg then 1 else 0; plot DownTrend = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; UpTrend.Hide(); DownTrend.Hide(); plot upArrow = if UpTrend == 1 and UpTrend[1] == 0 and (tradetype == tradetype.long or tradetype == tradetype.both) then low else Double.NaN; upArrow.SetPaintingStrategy(PaintingStrategy.ARROW_UP); upArrow.SetDefaultColor(Color.GREEN); upArrow.SetLineWeight(4); plot downArrow = if DownTrend == 1 and DownTrend[1] == 0 and (tradetype == tradetype.short or tradetype == tradetype.both) then high else Double.NaN; downArrow.SetPaintingStrategy(PaintingStrategy.ARROW_DOWN); downArrow.SetDefaultColor(Color.RED); downArrow.SetLineWeight(4); def bnumUp; def bnumDown; def closeUpTrendStart; def closeDownTrendStart; def UpTrendBarCount; def DownTrendBarCount; if UpTrend and (!UpTrend[1] or DownTrend[1]) { bnumUp = BarNumber(); bnumDown = 0; closeUpTrendStart = close; closeDownTrendStart = 0; UpTrendBarCount = 1; DownTrendBarCount = 0; } else if UpTrend { bnumUp = bnumUp[1]; bnumDown = 0; closeUpTrendStart = closeUpTrendStart[1]; closeDownTrendStart = 0; UpTrendBarCount = UpTrendBarCount[1] + 1; DownTrendBarCount = 0; } else if DownTrend and (!DownTrend[1] or UpTrend[1]) { bnumUp = 0; bnumDown = BarNumber(); closeDownTrendStart = close; closeUpTrendStart = 0; UpTrendBarCount = 0; DownTrendBarCount = 1; } else if DownTrend { bnumDown = bnumDown[1]; closeDownTrendStart = closeDownTrendStart[1]; DownTrendBarCount = DownTrendBarCount[1] + 1; bnumUp = 0; closeUpTrendStart = 0; UpTrendBarCount = 0; } else { bnumUp = 0; bnumDown = 0; closeUpTrendStart = 0; closeDownTrendStart = 0; UpTrendBarCount = 0; DownTrendBarCount = 0; } def c; if BarNumber() == bnumUp or BarNumber() == bnumDown { c = Range; } else if UpTrend or DownTrend { c = c[1]; } else { c = 0; } AddLabel(if debug then yes else no, "Current Bar:" + BarNumber()); AddLabel(if debug then yes else no, "C:" + c); AddLabel( if debug then yes else no, "PlotADR: " + plotADR); AddLabel( if debug then yes else no, "TodayOnly: " + showTodayOnly); ################################################################# ############ ADR/ATR Targets Shading ######### ################################################################# # - UpTrend Targets and StopLoss plot UpTrendStopLoss = if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and !showTodayOnly then closeUpTrendStart - (c * stopLossMultiplier) else if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd then closeUpTrendStart - c else Double.NaN; plot oneADRPlus = if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and !showTodayOnly then closeUpTrendStart + (c * 1) else if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd then closeUpTrendStart + c else Double.NaN; plot twoADRPlus = if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and !showTodayOnly then closeUpTrendStart + (c * 2) else if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd then closeUpTrendStart + (c * 2) else Double.NaN; plot threeADRPlus = if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and !showTodayOnly then closeUpTrendStart + (c * 3) else if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd then closeUpTrendStart + (c * 3) else Double.NaN; plot fourADRPlus = if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and !showTodayOnly and showExtraTargets then closeUpTrendStart + (c * 4) else if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets then closeUpTrendStart + (c * 4) else Double.NaN; plot fiveADRPlus = if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and !showTodayOnly and showExtraTargets then closeUpTrendStart + (c * 5) else if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets then closeUpTrendStart + (c * 5) else Double.NaN; plot sixADRPlus = if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and !showTodayOnly and showExtraTargets then closeUpTrendStart + (c * 6) else if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets then closeUpTrendStart + (c * 6) else Double.NaN; plot sevenADRPlus = if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and !showTodayOnly and showExtraTargets and showExtraTargets789 then closeUpTrendStart + (c * 7) else if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets and showExtraTargets789 then closeUpTrendStart + (c * 7) else Double.NaN; plot eightADRPlus = if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and !showTodayOnly and showExtraTargets and showExtraTargets789 then closeUpTrendStart + (c * 8) else if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets and showExtraTargets789 then closeUpTrendStart + (c * 8) else Double.NaN; plot nineADRPlus = if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and !showTodayOnly and showExtraTargets and showExtraTargets789 then closeUpTrendStart + (c * 9) else if (tradetype == tradetype.both or tradetype == tradetype.long) and UpTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets and showExtraTargets789 then closeUpTrendStart + (c * 9) else Double.NaN; # - DownTrend Targets and StopLoss plot DownTrendStopLoss = if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and !showTodayOnly then closeDownTrendStart + (c * stopLossMultiplier) else if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd then closeDownTrendStart + c else Double.NaN; plot oneADRMinus = if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and !showTodayOnly then closeDownTrendStart - c else if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd then closeDownTrendStart - c else Double.NaN; plot twoADRMinus = if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and !showTodayOnly then closeDownTrendStart - (c * 2) else if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd then closeDownTrendStart - (c * 2) else Double.NaN; plot threeADRMinus = if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and !showTodayOnly then closeDownTrendStart - (c * 3) else if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd then closeDownTrendStart - (c * 3) else Double.NaN; plot fourADRMinus = if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and !showTodayOnly and showExtraTargets then closeDownTrendStart - (c * 4) else if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets then closeDownTrendStart - (c * 4) else Double.NaN; plot fiveADRMinus = if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and !showTodayOnly and showExtraTargets then closeDownTrendStart - (c * 5) else if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets then closeDownTrendStart - (c * 5) else Double.NaN; plot sixADRMinus = if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and !showTodayOnly and showExtraTargets then closeDownTrendStart - (c * 6) else if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets then closeDownTrendStart - (c * 6) else Double.NaN; plot sevenADRMinus = if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and !showTodayOnly and showExtraTargets and showExtraTargets789 then closeDownTrendStart - (c * 7) else if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets and showExtraTargets789 then closeDownTrendStart - (c * 7) else Double.NaN; plot eightADRMinus = if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and !showTodayOnly and showExtraTargets and showExtraTargets789 then closeDownTrendStart - (c * 8) else if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets and showExtraTargets789 then closeDownTrendStart - (c * 8) else Double.NaN; plot nineADRMinus = if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and !showTodayOnly and showExtraTargets and showExtraTargets789 then closeDownTrendStart - (c * 9) else if (tradetype == tradetype.both or tradetype == tradetype.short) and DownTrend and plotADR and showTodayOnly and today and afterStart and beforeEnd and showExtraTargets and showExtraTargets789 then closeDownTrendStart - (c * 9) else Double.NaN; UpTrendStopLoss.SetDefaultColor(Color.LIGHT_RED); oneADRPlus.SetDefaultColor(Color.LIGHT_GREEN); twoADRPlus.SetDefaultColor(Color.LIGHT_GREEN); threeADRPlus.SetDefaultColor(Color.LIGHT_GREEN); fourADRPlus.SetDefaultColor(Color.LIGHT_GREEN); fiveADRPlus.SetDefaultColor(Color.LIGHT_GREEN); sixADRPlus.SetDefaultColor(Color.LIGHT_GREEN); sevenADRPlus.SetDefaultColor(Color.LIGHT_GREEN); eightADRPlus.SetDefaultColor(Color.LIGHT_GREEN); nineADRPlus.SetDefaultColor(Color.LIGHT_GREEN); DownTrendStopLoss.SetDefaultColor(Color.LIGHT_GREEN); oneADRMinus.SetDefaultColor(Color.LIGHT_RED); twoADRMinus.SetDefaultColor(Color.LIGHT_RED); threeADRMinus.SetDefaultColor(Color.LIGHT_RED); fourADRMinus.SetDefaultColor(Color.LIGHT_RED); fiveADRMinus.SetDefaultColor(Color.LIGHT_RED); sixADRMinus.SetDefaultColor(Color.LIGHT_RED); sevenADRMinus.SetDefaultColor(Color.LIGHT_RED); eightADRMinus.SetDefaultColor(Color.LIGHT_RED); nineADRMinus.SetDefaultColor(Color.LIGHT_RED); ########### ADX Triangle Plot ################################### plot ADXTriangleUp = if showADXTriangle and UpTrend and ADX > ADX[1] and !showTodayOnly then closeUpTrendStart - (c * stopLossMultiplier) else if showADXTriangle and UpTrend and ADX > ADX[1] and showTodayOnly and today then closeUpTrendStart - (c * stopLossMultiplier) else Double.NaN; ADXTriangleUp.SetPaintingStrategy(PaintingStrategy.TRIANGLES); ADXTriangleUp.SetDefaultColor(Color.WHITE); ADXTriangleUp.AssignValueColor(if ADX > ADXR and ADX[1] < ADXR[1] then Color.RED else if ADX > 35 then Color.CYAN else Color.CURRENT); ADXTriangleUp.SetLineWeight(1); plot ADXBubbleDown = if showADXTriangle and DownTrend and ADX > ADX[1] and !showTodayOnly then closeDownTrendStart + (c * stopLossMultiplier) else if showADXTriangle and DownTrend and ADX > ADX[1] and showTodayOnly and today then closeDownTrendStart + (c * stopLossMultiplier) else Double.NaN; ADXBubbleDown.SetPaintingStrategy(PaintingStrategy.TRIANGLES); ADXBubbleDown.SetDefaultColor(Color.MAGENTA); ADXBubbleDown.AssignValueColor(if ADX > ADXR and ADX[1] < ADXR[1] then Color.GREEN else if ADX > 35 then Color.YELLOW else Color.CURRENT); ADXBubbleDown.SetLineWeight(1); ################################################################# ############ ADR/ATR Zone Shading ######### ################################################################# def u = if UpTrend then closeUpTrendStart else Double.NaN; def d = if DownTrend then closeDownTrendStart else Double.NaN; def bnumUpCheck = if bnumUp != 0 then 1 else Double.NaN; def bnumDownCheck = if bnumDown != 0 then 1 else Double.NaN; AddCloud(if showADRZones and UpTrend and bnumUpCheck and showExtraTargets and showExtraTargets789 then nineADRPlus else if showADRZones and UpTrend and bnumUpCheck and showExtraTargets then sixADRPlus else if showADRZones and UpTrend and bnumUpCheck then threeADRPlus else Double.NaN, if showADRZones and UpTrend and bnumUpCheck then u else Double.NaN , CreateColor(213, 252, 213)); AddCloud(if showADRZones and UpTrend then u else Double.NaN, if showADRZones and UpTrend then UpTrendStopLoss else Double.NaN , CreateColor(255, 174, 174)); # - Shade Downtrend ADR/ATR zones AddCloud( if showADRZones and DownTrend and bnumDownCheck then d else Double.NaN ,if showADRZones and DownTrend and bnumDownCheck and showExtraTargets and showExtraTargets789 then nineADRminus else if showADRZones and DownTrend and bnumDownCheck and showExtraTargets then sixADRMinus else if showADRZones and DownTrend and bnumDownCheck then threeADRMinus else Double.NaN, CreateColor(213, 252, 213)); AddCloud(if showADRZones and DownTrend then DownTrendStopLoss else Double.NaN, if showADRZones and DownTrend then d else Double.NaN, CreateColor(255, 174, 174)); ################################################################# #### RSM shade areas based on criteria; adjust as needed #### ################################################################# AddCloud(if showRSMShade and RSI >= 50 and SlowK >= 50 and Value > Avg then Double.POSITIVE_INFINITY else Double.NaN, if RSI >= 50 and SlowK >= 50 and Value > Avg then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_GREEN); AddCloud(if showRSMShade and RSI < 50 and SlowK < 50 and Value < Avg then Double.POSITIVE_INFINITY else Double.NaN, if RSI < 50 and SlowK < 50 and Value < Avg then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_RED); ################################################################# ############ Labels disable/blockout as needed ######### ################################################################# # - Trend Labels AddLabel(showTrendLabels and (bnumDown != 0 or bnumUp != 0), "Trend BAR#: " + (if bnumUp > 0 then bnumUp else + bnumDown), if bnumUp > 0 then Color.GREEN else Color.RED); AddLabel(showTrendLabels and (bnumDown != 0 or bnumUp != 0), "Trend @ $:" + (if bnumUp > 0 then closeUpTrendStart else + closeDownTrendStart), if bnumUp > 0 then Color.GREEN else Color.RED); AddLabel(showTrendLabels, "Tot Bars:" + (if bnumUp > 0 then UpTrendBarCount else DownTrendBarCount), if bnumUp > 0 then Color.GREEN else Color.RED); AddLabel(showTrendLabels, "RSM:" + (if UpTrend == 1 then "L" else if DownTrend == 1 then "S" else "I"), if UpTrend == 1 then Color.GREEN else if DownTrend == 1 then Color.RED else Color.GRAY); # - ADR/ATR Labels Targets AddLabel(showADRLabels, "Open:" + dailyO, Color.ORANGE); AddLabel(showADRLabels and (UpTrend or DownTrend), "Target #1: " + (if UpTrend then Round(oneADRPlus, 2) else if DownTrend then Round(oneADRMinus, 2) else Double.NaN) + " ", if UpTrend then Color.GREEN else if DownTrend then Color.RED else Color.GRAY); AddLabel(showADRLabels and (UpTrend or DownTrend), "Target #2: " + (if UpTrend then Round(twoADRPlus, 2) else if DownTrend then Round(twoADRMinus, 2) else Double.NaN) + " ", if UpTrend then Color.GREEN else if DownTrend then Color.RED else Color.GRAY); AddLabel(showADRLabels and (UpTrend or DownTrend), "Target #3: " + (if UpTrend then Round(threeADRPlus, 2) else if DownTrend then Round(threeADRMinus, 2) else Double.NaN) + " ", if UpTrend then Color.GREEN else if DownTrend then Color.RED else Color.GRAY); # - Indicator Label AddLabel(if showIndicatorLabels then yes else no, "RSI:" + Round (RSI, 2) + " | sK:" + Round(SlowK, 2) + " | Macd:" + Round(Value, 4) + " ", Color.ORANGE); #### ALERTS Sound Alert(audibleAlerts and upArrow, "RSM UpTrend Started", Alert.BAR, Sound.Ding); Alert(audibleAlerts and downArrow, "RSM DownTrend Started", Alert.BAR, Sound.Ding);
RSM Lower
Features
- 3 Indicators in 1
- RSI - Only
- Stochastic - Only
- RSI & Stochastic
- MACD - Only
- Will shade lower area when trend is confirmed for each indicator individually
- All settings for each indicator made avaiable in settings for user configuration
- Paint Bars if not used with upper study - user configurable
Code:#RSM_Lower_v1.3 # #CHANGELOG # # 2021.01.11 V1.3 @cos251 - Addjusted lower shading to shade trends when individual indicator crosses respective midline # Shading will match if stochPlots is set to "Both" (RSI & Stochastci) # # 2020.11.30 V1.2 @cos251 - Added quick option to select plot(s) (RSI, Stochastic, Both or MACDOnly), set SlowD to enabled, # user can uncheck SlowD plot if desired; adjusted coloring and shading to work with # any plot selected; Combined plots for ease of use. # # 2020.10.30 V1.1 @cos251 - Added UpTrend and DownTrend variables that can be used for a SCAN (HAS BEEN REMOVED) # 2020.10.27 V1.0 @cos251 - Added RSI, StochasticSlow and MACD to same indicator; this # will plot only RSI and Stochastic but also # - calculates MACD; Will shade the lower plot area of the following conditions are met # Shade GREEN = RSI > 50 and SlowK > 50 and (macd)Value > (macd)Avg # Shade RED = RSI < 50 and SlowK < 50 and (macd)Value < (macd)Avg # #REQUIREMENTS - RSI Set to 7, EXPONENTIAL # Stoch Slow 14 and 3 WILDERS # MACD 12,26,9 WEIGHTED # # #CREDITS # requesed by "@Joseph Patrick 18" # #LINK # https://rockwell-files.s3.amazonaws.com/PXCompanionGuide2ndEd_cover.pdf # Markus Heikoetter who is the author of the Power X Strategy # https://usethinkscript.com/threads/mimicking-power-x-strategy-by-markus-heitkoetter.4283/ # #USAGE # declare lower; input paintBars = yes; input selectPlots = { default "RSI", "Stochastic", "Both", "MACDOnly" }; ################################################################ ########## RSI ######### ################################################################ input lengthRSI = 7; input over_BoughtRSI = 80; input over_SoldRSI = 20; input price = close; input averageTypeRSI = AverageType.EXPONENTIAL; input showBreakoutSignalsRSI = no; input showRSI_obos = no; def NetChgAvg = MovingAverage(averageTypeRSI, price - price[1], lengthRSI); def TotChgAvg = MovingAverage(averageTypeRSI, AbsValue(price - price[1]), lengthRSI); def ChgRatio = if TotChgAvg != 0 then NetChgAvg / TotChgAvg else 0; def calcRSI = 50 * (ChgRatio + 1); plot RSI = if selectPlots == selectPlots.RSI or selectPlots == selectPlots.Both then calcRSI else Double.NaN; plot OverSold_RSI = if (selectPlots == selectPlots.RSI or selectPlots == selectPlots.Both) and showRSI_obos then over_SoldRSI else Double.NaN; plot OverBought_RSI = if (selectPlots == selectPlots.RSI or selectPlots == selectPlots.Both) and showRSI_obos then over_BoughtRSI else Double.NaN; plot UpSignalRSI = if RSI crosses above OverSold_RSI then OverSold_RSI else Double.NaN; plot DownSignalRSI = if RSI crosses below OverBought_RSI then OverBought_RSI else Double.NaN; UpSignalRSI.SetHiding(!showBreakoutSignalsRSI); DownSignalRSI.SetHiding(!showBreakoutSignalsRSI); RSI.DefineColor("OverBought", GetColor(5)); RSI.DefineColor("Normal", Color.YELLOW); RSI.DefineColor("OverSold", GetColor(1)); #RSI.AssignValueColor(if RSI > rsiover_Bought then RSI.Color("OverBought") else if RSI < rsiover_Sold then RSI.Color("OverSold") else RSI.Color("Normal")); OverSold_RSI.SetDefaultColor(GetColor(8)); OverBought_RSI.SetDefaultColor(GetColor(8)); UpSignalRSI.SetDefaultColor(Color.UPTICK); UpSignalRSI.SetPaintingStrategy(PaintingStrategy.ARROW_UP); DownSignalRSI.SetDefaultColor(Color.DOWNTICK); DownSignalRSI.SetPaintingStrategy(PaintingStrategy.ARROW_DOWN); ################################################################ ########## Stochastic Slow ######### ################################################################ input over_boughtSt = 80; input over_soldSt = 20; input KPeriod = 14; input DPeriod = 3; input priceH = high; input priceL = low; input priceC = close; input averageTypeStoch = AverageType.WILDERS; input showBreakoutSignalsStoch = {default "No", "On SlowK", "On SlowD", "On SlowK & SlowD"}; input showStochastic_ob_os = no; def calcSlowK = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, averageTypeStoch).FullK; def calcSlowD = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, averageTypeStoch).FullD; plot SlowK = if selectPlots == selectPlots.Stochastic or selectPlots == selectPlots.Both then calcSlowK else Double.NaN; plot SlowD = if selectPlots == selectPlots.Stochastic or selectPlots == selectPlots.Both then calcSlowD else Double.NaN; plot OverBoughtSt = if (selectPlots == selectPlots.Stochastic or selectPlots == selectPlots.Both) and showStochastic_ob_os then over_boughtSt else Double.NaN; plot OverSoldSt = if (selectPlots == selectPlots.Stochastic or selectPlots == selectPlots.Both) and showStochastic_ob_os then over_soldSt else Double.NaN; def upK = SlowK crosses above OverSoldSt; def upD = SlowD crosses above OverSoldSt; def downK = SlowK crosses below OverBoughtSt; def downD = SlowD crosses below OverBoughtSt; plot UpSignalSt; plot DownSignalSt; switch (showBreakoutSignalsStoch) { case "No": UpSignalSt = Double.NaN; DownSignalSt = Double.NaN; case "On SlowK": UpSignalSt = if upK then OverSoldSt else Double.NaN; DownSignalSt = if downK then OverBoughtSt else Double.NaN; case "On SlowD": UpSignalSt = if upD then OverSoldSt else Double.NaN; DownSignalSt = if downD then OverBoughtSt else Double.NaN; case "On SlowK & SlowD": UpSignalSt = if upK or upD then OverSoldSt else Double.NaN; DownSignalSt = if downK or downD then OverBoughtSt else Double.NaN; } UpSignalSt.SetHiding(showBreakoutSignalsStoch == showBreakoutSignalsStoch."No"); DownSignalSt.SetHiding(showBreakoutSignalsStoch == showBreakoutSignalsStoch."No"); SlowK.SetDefaultColor(Color.WHITE); SlowD.SetDefaultColor(Color.DARK_ORANGE); OverBoughtSt.SetDefaultColor(GetColor(1)); OverSoldSt.SetDefaultColor(GetColor(1)); UpSignalSt.SetDefaultColor(Color.UPTICK); UpSignalSt.SetPaintingStrategy(PaintingStrategy.ARROW_UP); DownSignalSt.SetDefaultColor(Color.DOWNTICK); DownSignalSt.SetPaintingStrategy(PaintingStrategy.ARROW_DOWN); ################################################################# #MACD Calculation input fastLength = 12; input slowLength = 26; input MACDLength = 9; input averageTypeMACD = AverageType.WEIGHTED; input showBreakoutSignalsMACD = no; def calcValue = MovingAverage(averageTypeMACD, close, fastLength) - MovingAverage(averageTypeMACD, close, slowLength); def calcAvg = MovingAverage(averageTypeMACD, calcValue, MACDLength); def calcDiff = calcValue - calcAvg; plot ZeroLine = if selectPlots == selectPlots.MACDOnly then 0 else Double.NaN; plot Value = if selectPlots == selectPlots.MACDOnly then calcValue else Double.NaN; plot Avg = if selectPlots == selectPlots.MACDOnly then calcAvg else Double.NaN; plot Diff = if selectPlots == selectPlots.MACDOnly then calcDiff else Double.NaN; plot UpSignalMACD = if calcDiff crosses above 0 then 0 else Double.NaN; plot DownSignalMACD = if calcDiff crosses below 0 then 0 else Double.NaN; UpSignalMACD.SetHiding(!showBreakoutSignalsMACD); DownSignalMACD.SetHiding(!showBreakoutSignalsMACD); Value.SetDefaultColor(Color.GREEN); Avg.SetDefaultColor(Color.RED); Diff.SetDefaultColor(GetColor(5)); Diff.SetPaintingStrategy(PaintingStrategy.HISTOGRAM); Diff.SetLineWeight(4); Diff.DefineColor("Positive and Up", Color.CYAN); Diff.DefineColor("Positive and Down", Color.BLUE); Diff.DefineColor("Negative and Down", Color.RED); Diff.DefineColor("Negative and Up", Color.YELLOW); Diff.AssignValueColor(if Diff >= 0 then if Diff > Diff[1] then Diff.Color("Positive and Up") else Diff.Color("Positive and Down") else if Diff < Diff[1] then Diff.Color("Negative and Down") else Diff.Color("Negative and Up")); ZeroLine.SetDefaultColor(GetColor(0)); UpSignalMACD.SetDefaultColor(Color.UPTICK); UpSignalMACD.SetPaintingStrategy(PaintingStrategy.ARROW_UP); DownSignalMACD.SetDefaultColor(Color.DOWNTICK); DownSignalMACD.SetPaintingStrategy(PaintingStrategy.ARROW_DOWN); # Check Each Signal for over 50 and MACD for Value > Avg def rsiGreen = if calcRSI > 50 then 1 else Double.NaN; def rsiRed = if calcRSI < 50 then 1 else Double.NaN; def stochGreen = if calcSlowK >= 50 then 1 else Double.NaN; def stochRed = if calcSlowK < 50 then 1 else Double.NaN; def macdGreen = if calcValue > calcAvg then 1 else Double.NaN; def macdRed = if calcValue < calcAvg then 1 else Double.NaN; def green = if rsiGreen and stochGreen and macdGreen then 1 else Double.NaN; def red = if rsiRed and stochRed and macdRed then 1 else Double.NaN; #RSI Color Assignment per requeset RSI.AssignValueColor(if calcRSI > 50 and calcSlowK > 50 and calcValue > calcAvg then Color.GREEN else if calcRSI < 50 and calcSlowK < 50 and calcValue < calcAvg then Color.RED else Color.DARK_GRAY); #AssignPriceColor AssignPriceColor(if paintBars and calcRSI > 50 and calcSlowK > 50 and calcValue > calcAvg then Color.GREEN else if paintBars and calcRSI < 50 and calcSlowK < 50 and calcValue < calcAvg then Color.RED else if paintBars then Color.DARK_GRAY else Color.CURRENT); ################################################################# ############ Shade areas based on criteria; adjust as needed ## ################################################################# AddCloud(if rsiGreen and stochGreen and selectPlots == selectPlots.Both then Double.POSITIVE_INFINITY else Double.NaN, if rsiGreen and StochGreen and selectPlots == selectPlots.Both then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_GREEN); AddCloud(if rsiRed and stochRed and selectPlots == selectPlots.Both then Double.POSITIVE_INFINITY else Double.NaN, if rsiRed and stochRed and selectPlots == selectPlots.Both then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_RED); AddCloud(if rsiGreen and selectPlots == selectPlots.RSI then Double.POSITIVE_INFINITY else Double.NaN, if rsiGreen and selectPlots == selectPlots.RSI then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_GREEN); AddCloud(if rsiRed and selectPlots == selectPlots.RSI then Double.POSITIVE_INFINITY else Double.NaN, if rsiRed and selectPlots == selectPlots.RSI then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_RED); AddCloud(if stochGreen and selectPlots == selectPlots.Stochastic then Double.POSITIVE_INFINITY else Double.NaN, if stochGreen and selectPlots == selectPlots.Stochastic then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_GREEN); AddCloud(if stochRed and selectPlots == selectPlots.Stochastic then Double.POSITIVE_INFINITY else Double.NaN, if stochRed and selectPlots == selectPlots.Stochastic then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_RED); AddCloud(if macdGreen and selectPlots == selectPlots.MACDOnly then Double.POSITIVE_INFINITY else Double.NaN, if macdGreen and selectPlots == selectPlots.MACDOnly then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_GREEN); AddCloud(if macdRed and selectPlots == selectPlots.MACDOnly then Double.POSITIVE_INFINITY else Double.NaN, if macdRed and selectPlots == selectPlots.MACDOnly then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_RED); plot fifty = if selectPlots == selectPlots.RSI or selectPlots == selectPlots.Stochastic or selectPlots == selectPlots.Both then 50 else Double.NaN; fifty.SetDefaultColor(Color.RED);
RSM MTF (Labels)
Features
- Provides chart labels (upper left corner of price chart) with current status of MTF RSM Trend for the following TF's
- 1m, 2m, 3m, 4m, 5m, 10m, 15m, 20m, 30m, 1h, 2h, 4h, 1d, 2d, 3d, 4d, 1wk, 1mnth
- Add indicator for each time frame you would like shown
Code:#START OF RSI/Stochastic/MACD Confluence Strategy for ThinkOrSwim # RSM_MTF_Labels # #CHANGELOG # 2020.12.30 V2.1 @SuryaKiranC - Fork from @cos251 Version, to reduce the number of lines in code and optimize for performance. # # 2020.12.11 V1.1 @cos251 - Added 2D, 3D, 4D, 1WK, 1MNTH Agg Period Labels # # 2020.12.02 V1.0 @cos251 - Added RSM signal calculation for following timeframes: # - 1m, 2m, 5m, 15m, 30m, 1h, 2h, 4h, D # - Label will be added to top of chart for every allowed TF # - Label will read "TF:L(Long):S(Short):I(Idle)" # - Label Color will be green, red or gray accordingly # # #REQUIREMENTS - RSI Set to 7, EXPONENTIAL # Stoch Slow 14 and 3 WILDERS # MACD 12,26,9 WEIGHTED # #ORIGINAL REQUEST - @Joseph Patrick 18 # - Link: https://usethinkscript.com/threads/mimicking-power-x-strategy-by-markus-heitkoetter.4283/ # # input period = AggregationPeriod.DAY; DefineGlobalColor("UpTrend", Color.Green); DefineGlobalColor("DownTrend", Color.RED); DefineGlobalColor("NoTrend", Color.GRAY); script RSM_ { input aP = AggregationPeriod.DAY; # RSI def lengthRSI = 7; def averageTypeRSI = AverageType.EXPONENTIAL; # Stochastic def over_boughtSt = 80; def over_soldSt = 20; def KPeriod = 14; def DPeriod = 3; input averageTypeStoch = AverageType.WILDERS; # MACD def fastLength = 12; def slowLength = 26; def MACDLength = 9; def averageTypeMACD = AverageType.WEIGHTED; ############################################################### ########## RSI ######### ################################################################ def NetChgAvg = MovingAverage(averageTypeRSI, close(period = aP) - close(period = aP)[1], lengthRSI); def TotChgAvg = MovingAverage(averageTypeRSI, AbsValue(close(period = aP) - close(period = aP)[1]), lengthRSI); def ChgRatio = if TotChgAvg != 0 then NetChgAvg / TotChgAvg else 0; def RSI_ = 50 * (ChgRatio + 1); ################################################################ ########## Stochastic Slow ######### ################################################################ def SlowK_ = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, high(period = aP), low(period = aP), close(period = aP), 3, if (averageTypeStoch == 1) then AverageType.SIMPLE else AverageType.EXPONENTIAL).FullK; def SlowD_ = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, high(period = aP), low(period = aP), close(period = aP), 3, if (averageTypeStoch == 1) then AverageType.SIMPLE else AverageType.EXPONENTIAL).FullD; ################################################################ ########## MACD ########### ################################################################ def Value_ = MovingAverage(averageTypeMACD, close(period = aP), fastLength) - MovingAverage(averageTypeMACD, close(period = aP), slowLength); def Avg_ = MovingAverage(averageTypeMACD, Value_, MACDLength); def Diff_ = Value_ - Avg_; ################################################################# ########## Trend & Labels ######### ################################################################# def UpTrend_ = if RSI_ >= 50 and SlowK_ >= 50 and Value_ > Avg_ then 1 else 0; def DownTrend_ = if RSI_ < 50 and SlowK_ < 50 and Value_ < Avg_ then 1 else 0; plot Trend_ = if UpTrend_ then 1 else if DownTrend_ then 0 else -1; } def currentPeriod = GetAggregationPeriod(); def RSM; if period >= currentPeriod { RSM = RSM_(aP = period); } else { RSM = Double.NaN; } AddLabel(!IsNaN(RSM), if period == AggregationPeriod.MONTH then "M" else if period == AggregationPeriod.WEEK then "W" else if period == AggregationPeriod.FOUR_DAYS then "4D" else if period == AggregationPeriod.THREE_DAYS then "3D" else if period == AggregationPeriod.TWO_DAYS then "2D" else if period == AggregationPeriod.DAY then "D" else if period == AggregationPeriod.FOUR_HOURS then "4H" else if period == AggregationPeriod.TWO_HOURS then "2H" else if period == AggregationPeriod.HOUR then "60m" else if period == AggregationPeriod.THIRTY_MIN then "30m" else if period == AggregationPeriod.TWENTY_MIN then "20m" else if period == AggregationPeriod.FIFTEEN_MIN then "15m" else if period == AggregationPeriod.TEN_MIN then "10m" else if period == AggregationPeriod.FIVE_MIN then "5m" else if period == AggregationPeriod.FOUR_MIN then "4m" else if period == AggregationPeriod.THREE_MIN then "3m" else if period == AggregationPeriod.TWO_MIN then "2m" else if period == AggregationPeriod.MIN then "1m" else "", if RSM == 1 then GlobalColor("UpTrend") else if RSM == 0 then GlobalColor("DownTrend") else GlobalColor("NoTrend"));
RSM SCAN
- Scanner Setup Instructions:
- Click Create (Create New Study)
- Remove the default plot statement and past the code block from RSM_SCAN.
- Save the study with name "RSM_SCAN", make sure it is not loaded in your studies on the right, if it is loaded by default when you saved it, please remove we don't need this on chart study.
- Go to Scan, Remove all the filters and add a new filter, select "Study" as a filter, Default study selected will be "ADXCrossOver", Click on Pencil Icon next to Default TimeFrame "D" and click "ThinkScript Editor".
- Here you can past one of the scan query RSM_SCAN().UpTrendJustStarted or RSM_SCAN().DownTrendJustStarted.
- You can even limit the scan results, select a default narrowed down list as "S&P 500" under "Scan In, on the scan tab itself.
- Finally you can save the scan query with a name.
- Repeat Step 4 to 7, for other scan queries.
- The following scan queries are available
- RSM_Scan().UpTrend (UpTrend in Progress, in the selected timeframe for Scan)
- RSM_Scan().UpTrendJustStarted (Uptrend Just started, in the selected timeframe for Scan)
- RSM_Scan().DownTrend (DownTrend in Progress, in the selected timeframe for Scan)
- RSM_Scan().DownTrendJustStarted (DownTrend Just started, in the selected timeframe for Scan)
- RSM_Scan().UpTrendJustEnded (UpTrend finished, in the selected timeframe for Scan)
- RSM_Scan().DownTrendJustEnded (DownTrend finished, in the selected timeframe for Scan)
- As always, please match the chart timeframe to your Scanner Settings for review.
Code:#START OF RSI/Stochastic/MACD Confluence combo for ThinkOrSwim # # RSM_SCAN # #CHANGELOG # 2020.12.05 - V1.0 @cos251 - RSM SCANS study - to be used to scan for following conditions: # - Stocks currently in UpTrend # - Stocks currently in DownTrend # - Stocks where UpTrendJustSarted - first bar of UpTrend for scanend TF # - Stocks where DownTrendJustStarted - first bar of DownTrend for scanned TF # - Stocks where UpTredJustEnded - first NO Trend bar after UpTrend # - Stocks where DownTrendJustEnded - first NO Trend bar after DownTrend # - Recommend using default studies for SCANS of RSI, Stochastics or MACD for efficiency # #REQUIREMENTS - RSI Set to 7, EXPONENTIAL # Stoch Slow 14 and 3 WILDERS # MACD 12,26,9 WEIGHTED # # #CREDITS # requesed by "@Joseph Patrick 18" # #LINK # https://rockwell-files.s3.amazonaws.com/PXCompanionGuide2ndEd_cover.pdf # Markus Heikoetter who is the author of the Power X Strategy # https://usethinkscript.com/threads/mimicking-power-x-strategy-by-markus-heitkoetter.4283/ # #USAGE # declare lower; plot fiftyLine = 50; ################################################################ ########## RSI ######### ################################################################ input lengthRSI = 7; input over_BoughtRSI = 80; input over_SoldRSI = 20; input price = close; input averageTypeRSI = AverageType.EXPONENTIAL; def NetChgAvg = MovingAverage(averageTypeRSI, price - price[1], lengthRSI); def TotChgAvg = MovingAverage(averageTypeRSI, AbsValue(price - price[1]), lengthRSI); def ChgRatio = if TotChgAvg != 0 then NetChgAvg / TotChgAvg else 0; def RSI = 50 * (ChgRatio + 1); ################################################################ ########## Stochastic Slow ######### ################################################################ input over_boughtSt = 80; input over_soldSt = 20; input KPeriod = 14; input DPeriod = 3; input priceH = high; input priceL = low; input priceC = close; input averageTypeStoch = AverageType.WILDERS; def SlowK = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, averageTypeStoch).FullK; def SlowD = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, averageTypeStoch).FullD; ################################################################# ############ MACD Calculation ######### ################################################################# input fastLength = 12; input slowLength = 26; input MACDLength = 9; input averageTypeMACD = AverageType.WEIGHTED; def Value = MovingAverage(averageTypeMACD, close, fastLength) - MovingAverage(averageTypeMACD, close, slowLength); def Avg = MovingAverage(averageTypeMACD, Value, MACDLength); def Diff = Value - Avg; ################################################################# ############ SCAN Variables ######### ################################################################# # If you want to scan for stocks that are not in either trend you can add two filters and scan for false for both conditions # The UpTrend and DownTrend plots can be used to scan for stocks that are currently in that trend plot UpTrend = if RSI > 50 and SlowK > 50 and Value > Avg then 1 else Double.NaN; plot DownTrend = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else Double.NaN; UpTrend.Hide(); DownTrend.Hide(); # The UpTrendJustStarted and DownTrendJustStarted plots can be used to find stocks that have just started # a trend in either direction def UpTrendJustStartedBool = if RSI > 50 and SlowK > 50 and Value > Avg then 1 else 0; def DownTrendJustStartedBool = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; plot UpTrendJustStarted = if UpTrendJustStartedBool == 1 and UpTrendJustStartedBool[1] == 0 then 1 else Double.NaN; plot DownTrendJustStarted = if DownTrendJustStartedBool == 1 and DownTrendJustStartedBool[1] == 0 then 1 else Double.NaN; UpTrendJustStarted.Hide(); DownTrendJustStarted.Hide(); plot UpTrendJustEnded= if UpTrendJustStartedBool[1] == 1 and UpTrendJustStartedBool == 0 then 1 else Double.NaN; plot DownTrendJustEnded= if DownTrendJustStartedBool[1] == 1 and DownTrendJustStartedBool == 0 then 1 else Double.NaN; UpTrendJustEnded.Hide(); DownTrendJustEnded.Hide();
STRATEGY
Below is code for a basic start to a strategy. Please use as you wish.
The orders are set to only open and close during RTH. Please adjust for what you may be looking for. Thanks.
Code:#START OF RSI/Stochastic/MACD Confluence Strategy for ThinkOrSwim # RSM Strategy - BASIC #CHANGELOG # 2020.10.27 V1.0 @cos251 - Added RSI, StochasticSlow and MACD to same indicator # - also calculates MACD; # Will shade the lower plot area of the following conditions are met # Shade GREEN = RSI > 50 and SlowK > 50 and (macd)Value > (macd)Avg # Shade RED = RSI < 50 and SlowK < 50 and (macd)Value < (macd)Avg # #REQUIREMENTS - RSI Set to 7, EXPONENTIAL # Stoch Slow 14 and 3 WILDERS # MACD 12,26,9 WEIGHTED declare upper; ################################################################ ########## AddOrder Prep ######### ################################################################ def bar = BarNumber(); def CloseAllCondition = SecondstillTime(1558) == 0; def EOD = if SecondsTillTime(1558) == 0 and SecondsFromTime(1558) == 0 then 1 else 0; def NotActive = if SecondsFromTime(1550) > 0 then 1 else 0; def Active1 = if SecondsFromTime(0930) > 0 then 1 else 0; def notrades = if SecondstillTime(1500) > 0 then 1 else 0; ################################################################ ########## RSI ######### ################################################################ input paintBars = yes; input showShade = no; input tradetype = { default "long", "short", "both" }; input lengthRSI = 7; input price = close; input averageTypeRSI = AverageType.EXPONENTIAL; def NetChgAvg = MovingAverage(averageTypeRSI, price - price[1], lengthRSI); def TotChgAvg = MovingAverage(averageTypeRSI, AbsValue(price - price[1]), lengthRSI); def ChgRatio = if TotChgAvg != 0 then NetChgAvg / TotChgAvg else 0; def RSI = 50 * (ChgRatio + 1); ################################################################ ########## Stochastic Slow ######### ################################################################ input over_boughtSt = 80; input over_soldSt = 20; input KPeriod = 14; input DPeriod = 3; input priceH = high; input priceL = low; input priceC = close; input averageTypeStoch = AverageType.WILDERS; def SlowK = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, averageTypeStoch).FullK; def SlowD = reference StochasticFull(over_boughtSt, over_soldSt, KPeriod, DPeriod, priceH, priceL, priceC, 3, averageTypeStoch).FullD; ################################################################# #MACD Calculation input fastLength = 12; input slowLength = 26; input MACDLength = 9; input averageTypeMACD = AverageType.WEIGHTED; def Value = MovingAverage(averageTypeMACD, close, fastLength) - MovingAverage(averageTypeMACD, close, slowLength); def Avg = MovingAverage(averageTypeMACD, Value, MACDLength); def Diff = Value - Avg; #AssignPriceColor AssignPriceColor(if paintBars and RSI >= 50 and SlowK >= 50 and Value > Avg then Color.GREEN else if paintBars and RSI < 50 and SlowK < 50 and Value < Avg then Color.RED else if paintBars then Color.DARK_GRAY else Color.CURRENT); ################################################################# ############ Shade areas based on criteria; adjust as needed ## ################################################################# AddCloud(if showShade and RSI >= 50 and SlowK >= 50 and Value > Avg then Double.POSITIVE_INFINITY else Double.NaN, if RSI >= 50 and SlowK >= 50 and Value > Avg then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_Green); AddCloud(if showShade and RSI < 50 and SlowK < 50 and Value < Avg then Double.POSITIVE_INFINITY else Double.NaN, if RSI < 50 and SlowK < 50 and Value < Avg then Double.NEGATIVE_INFINITY else Double.NaN, Color.LIGHT_RED); ################################################################# ############ SCAN Variables ######### ################################################################# plot UpTrend = if RSI >= 50 and SlowK >= 50 and Value > Avg then 1 else 0; plot DownTrend = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0; def LongBuy = if UpTrend == 1 and UpTrend[1] == 0 then 1 else 0; def LongExit = if UpTrend[1] == 1 and UpTrend == 0 then 1 else 0; def ShortSell = if DownTrend == 1 and DownTrend[1] == 0 then 1 else 0; def ShortExit = if DownTrend == 0 and DownTrend[1] == 1 then 1 else 0; UpTrend.Hide(); DownTrend.Hide(); AddLabel(yes, if UpTrend == 1 then "::RSM-Signal:LONG" else if DownTrend == 1 then "::RSM-Signal:SHORT" else "::RSM-Signal:IDLE", if UpTrend == 1 then Color.GREEN else if DownTrend == 1 then Color.RED else Color.GRAY); plot upArrow = if UpTrend == 1 and UpTrend[1] == 0 then low else Double.NaN; upArrow.SetPaintingStrategy(PaintingStrategy.ARROW_UP); upArrow.SetDefaultColor(Color.GREEN); plot downArrow = if DownTrend == 1 and DownTrend[1] == 0 then high else Double.NaN; downArrow.SetPaintingStrategy(PaintingStrategy.ARROW_DOWN); downArrow.SetDefaultColor(Color.RED); ### BUY #AddOrder(OrderType.BUY_TO_OPEN, LongBuy == 1 and (tradetype == tradetype.long or tradetype == tradetype.both), open, tickcolor = GetColor(9), #arrowcolor = GetColor(9), name = "LONG"); #AddOrder(OrderType.SELL_TO_CLOSE, LongExit == 1 and (tradetype == tradetype.long or tradetype == tradetype.both), open, tickcolor = #GetColor(9), arrowcolor = GetColor(9), name = "LONG_EXIT"); AddOrder(OrderType.BUY_AUTO, LongBuy == 1 and (tradetype == tradetype.long or tradetype == tradetype.both) and Active1 and notrades, price = close, tickcolor = Color.ORANGE, arrowcolor = Color.ORANGE, name = "BUY"); AddOrder(OrderType.Sell_To_Close, LongExit == 1 and (tradetype == tradetype.long or tradetype == tradetype.both), price = open[-1], tickcolor = Color.ORANGE, arrowcolor = Color.ORANGE, name = "Sell To Close"); AddOrder(OrderType.Sell_TO_CLOSE, EOD or closeAllCondition, price = close, tickcolor = Color.ORANGE, arrowcolor = Color.ORANGE, name = "SELL EOD"); ### SELL #AddOrder(OrderType.SELL_TO_OPEN, ShortSell == 1 and (tradetype == tradetype.short or tradetype == tradetype.both), open, tickcolor = #GetColor(9), arrowcolor = GetColor(8), name = "SHORT"); #AddOrder(OrderType.BUY_TO_CLOSE, ShortExit == 1 and (tradetype == tradetype.short or tradetype == tradetype.both), open, tickcolor = #GetColor(9), arrowcolor = GetColor(8), name = "Short_EXIT"); AddOrder(OrderType.SELL_AUTO, ShortSell == 1 and (tradetype == tradetype.short or tradetype == tradetype.both) and Active1 and notrades , price = close, tickcolor = Color.YELLOW, arrowcolor = Color.YELLOW, name = "SELL"); AddOrder(OrderType.Buy_To_Close, ShortExit == 1 and (tradetype == tradetype.short or tradetype == tradetype.both), price = open[-1], tickcolor = Color.ORANGE, arrowcolor = Color.ORANGE, name = "Buy To Close"); AddOrder(OrderType.BUY_TO_CLOSE, EOD or closeAllCondition, price = close, tickcolor = Color.ORANGE, arrowcolor = Color.ORANGE, name = "BUY EOD");
################################################################
########## Assign Price Color #########
################################################################
AssignPriceColor(if paintBars and RSI >= 50 and SlowK >= 50 and Value > Avg then Color.GREEN else if paintBars and RSI < 50 and SlowK < 50 and Value < Avg then Color.RED else if paintBars then Color.DARK_GRAY else Color.CURRENT);
#################################################################
##### Up/Down Trend Check/SCAN Variables #########
#################################################################
plot UpTrend = if RSI >= 50 and SlowK >= 50 and Value > Avg then 1 else 0;
plot DownTrend = if RSI < 50 and SlowK < 50 and Value < Avg then 1 else 0;
signal = histLine > 0 and rsiLine > 50 and stochLine > 50 ? "buy" : histLine <= 0 and rsiLine <= 50 and stochLine <= 50 ? "sell" : "none"
Good catch on the differences between ToS and TradeView version of RSI / Stoch >= vs >50, @mindgap.
Your question on the Profit Target would be the 3rd line. Markus has it at 3x ADR and cos251 has it marked in 1x increments. Plus an option for more extensions. A clever idea I think , it can help to quickly show where the price is within the range.
If you referring to WL not showing RSM signals and showing NaN or loading in WL columns, this is due to your WL being big. Try a smaller Watchlist.I’m loving what you are doing and I have the indicator loaded up but for some reason the targets keep showing up as N/A
I’m lovine what you are doing and I have this loaded up in my TOS but for some reason all the target labels are showing N/A, please help
Can you post a screenshot or examples of tickers?hi I'm having an issue with the targets as well, and I made the adjustments you suggested and the labels do show up now but each target says n/a
Target #1: N/A Target #2: N/A Target#3: N/A
and I also noticed for some tickers it doesn't show any target labels at all.
@SuryaKiranC @cos251
@suryaGo to Upper Indicator Properties and make sure the settings are as following.
Plot ADR = Yes
Show ADR Zones = Yes
Show Today only = Yes, if you want only to see today's ADR Zones, but if you want for all the Days in chart frame, Set it to No.
Show Extra Tragets = Yes, only if you want to see more than default 3 Targets.
Honestly, there are lot of properties at each of these scripts, I would recommend the playing around with this a bit more, specially the once the are yes/no options and see what you line on the charts. Use the weekend enable/disable things a bit and see what you like.
Also use ondemand and play with it a bit. make the trades in ondemand. I know it is slow and painful, if you don't put in the time, you never know what's the worth of this information.
-S
Can you post a screenshot or examples of tickers?
-Surya
here is a link showing two different tickers one I actually got to show the target labels now (BAC) and one don't show the target label at all (UMC)Can you post a screenshot or examples of tickers?
-Surya
Rick - There is a strategy supplied with addorders on page-1 which is what I used.. Not study..@fromPok this would go more under Study instead of Strategy. A Strategy in ToS scripts would include some line(s) starting with
" AddOrder(OrderType. " ... and then buy or sell commands within the code. Usually near the end. There are none in this code so the Floating P/L has nothing to go by.
@fromPok Oops, my bad. That's what I get for using an earlier version which does not include that newer, extra bit of code. I should have looked.
@SuryaKiranC any suggestions?Rick - There is a strategy supplied with addorders on page-1 which is what I used.. Not study..
I hope @cos251 can look into the RSI / Stoch value issue. I think Markus explains that both values have to be above 50 not 50 at all. I tried to take out the = symbols but with no change in the chart. Maybe somebody else can shed some light on this issue.
@RickAns Thank you for verifying the Profit Target. That makes it pretty easy to see. Do we know which ADR was used to determine the PT? Also, I can't see an ADR value for any given day anywhere in the chart section. Any idea where I can turn it on or add some code to make it visible?
Thank you!
Thanks for this setup, I have read Markus report, this looks very promising.Quick question, I plotted the indicator but I'm not getting the shaded box areas up in the price area of the chart showing the progressive levels and adx triangles. I'm getting the go long arrow. Thanks for any guidance.... Thank You
Thread starter | Similar threads | Forum | Replies | Date |
---|---|---|---|---|
C | RSM Indicator for ThinkorSwim | Indicators | 99 | |
Repaints Cup and Handle Indicator for ThinkorSwim | Indicators | 24 | ||
The Ultimate Buy and Sell Indicator for ThinkOrSwim | Indicators | 5 | ||
Z-Score Probability Indicator for ThinkOrSwim | Indicators | 26 | ||
HTF PO3 Indicator For ThinkOrSwim | Indicators | 42 |
Start a new thread and receive assistance from our community.
useThinkScript is the #1 community of stock market investors using indicators and other tools to power their trading strategies. Traders of all skill levels use our forums to learn about scripting and indicators, help each other, and discover new ways to gain an edge in the markets.
We get it. Our forum can be intimidating, if not overwhelming. With thousands of topics, tens of thousands of posts, our community has created an incredibly deep knowledge base for stock traders. No one can ever exhaust every resource provided on our site.
If you are new, or just looking for guidance, here are some helpful links to get you started.