Trend Impulse with Range Filter V2

• 11/02/2020 at 10:33 AM #149120
  Ichimoku Reading

  Hello,

  Today, I publish the V2 of the previous indicator.

  This one is very similar to the first one however, it includes more precise calculations.
  I chose to take the same sequence of the graph so that you can compare the two images.

  The notable effects are the detection of the ranges, they are done much earlier.
  The entry points or pulse points remain the same, which means that the indicator is not seen with a secondary filter, but rather an adjustment in terms of precision.

  The external variable remains the same and the use of the same

  IV

  // //=/===============/=//=/===============/=//=/ Indicator Range Trend // RxUP = 0 GxUP = 153 BxUP = 255 RxDOWN = 102 GxDOWN = 102 BxDOWN = 102 // //=/===============/=//=/===============/=//=/ Range // //=/ Range Settings once rngfilt=close if barindex>max(14,27) then rngscale=max(1,min(rngscale,7)) scale = 2.618*average[14,1](abs(close-close[1])) endif r=average[27,1](scale) hh=close ll=close if 1<>1 then hh=high ll=low endif if 1=1 then if hh>rngfilt[1] then if (hh-r)<rngfilt[1] then rngfilt=rngfilt[1] else rngfilt=hh-r endif elsif (ll+r)>rngfilt[1] then rngfilt=rngfilt[1] else rngfilt=ll+r endif else if hh>=rngfilt[1]+r then rngfilt=(rngfilt[1]) + (abs(hh - (rngfilt[1]))/r)*r elsif ll<=rngfilt[1]-r then rngfilt=(rngfilt[1]) - (abs(ll - (rngfilt[1]))/r)*r else rngfilt=rngfilt[1] endif endif hiband = rngfilt + r loband = rngfilt - r if rngfilt>rngfilt[1] then upward=1 downward=0 endif if rngfilt<rngfilt[1] then upward=0 downward=1 endif TrendFast = rngfilt TrendMedium = Average[2](rngfilt) TrendLong = Average[4](rngfilt) Limitt = (close+TrendFast)/2 // //=/===============/=//=/===============/=//=/ Trend Color // //=/ Trend Fast Color Settings if upward > 0 and TrendFast > TrendFast[1] then cr = RxUP cg = GxUP cb = BxUP ct = 250 elsif downward > 0 and TrendFast < TrendFast[1] then cr = RxDOWN cg = GxDOWN cb = BxDOWN ct = 250 elsif upward > 0 and TrendFast = TrendFast[1] then cr = RxUP cg = GxUP cb = BxUP ct = 100 elsif downward > 0 and TrendFast = TrendFast[1] then cr = RxDOWN cg = GxDOWN cb = BxDOWN ct = 100 endif // //=/===============/=//=/===============/=//=/ Candle // //=/ Bullish Conditions 1P UP1 = upward > 0 UP2 = close > TrendFast UP3 = close > TrendLong UP4 = close > TrendMedium UP5 = TrendFast > TrendFast[1] UP6 = TrendLong > TrendLong[1] UP7 = TrendMedium > TrendMedium[1] UP8 = low =< Limitt UP9 = close > MID4 BullishConditions1P = UP1 and UP2 and UP3 and UP4 and UP5 and UP6 and UP7 and UP8 and UP9 //=/ Bullish Conditions 1PS UPS1 = upward > 0 UPS2 = close > TrendFast UPS3 = close > TrendLong UPS4 = close > TrendMedium UPS5 = TrendFast > TrendFast[1] UPS6 = TrendLong > TrendLong[1] UPS7 = TrendMedium > TrendMedium[1] UPS8 = low > Limitt UPS9 = Limitt => MID4 UPS10 = close > MID4 BullishConditions1PS = UPS1 and UPS2 and UPS3 and UPS4 and UPS5 and UPS6 and UPS7 and UPS8 and UPS9 and UPS10 //=/ Bullish Conditions 1 U1 = upward > 0 U2 = close > TrendFast U3 = close > TrendLong U4 = close > TrendMedium U5 = TrendFast > TrendFast[1] U6 = TrendLong > TrendLong[1] U7 = TrendMedium > TrendMedium[1] U8 = low > Limitt U9 = close > MID4 BullishConditions1 = U1 and U2 and U3 and U4 and U5 and U6 and U7 and U8 and U9 //=/ Bullish Conditions 2 UX1 = upward > 0 UX2 = close > TrendFast UX3 = close > TrendLong UX4 = close > TrendMedium UX5 = TrendFast = TrendFast[1] UX6 = TrendLong > TrendLong[1] UX7 = TrendMedium > TrendMedium[1] UX8 = low > Limitt UX9 = close > MID4 BullishConditions2 = UX1 and UX2 and UX3 and UX4 and UX5 and UX6 and UX7 and UX8 and UX9 //=/ Bullish Conditions 3 UXX1 = upward > 0 UXX2 = close > TrendFast UXX3 = close > TrendLong UXX4 = close > TrendMedium UXX5 = TrendFast = TrendFast[1] UXX6 = TrendLong > TrendLong[1] UXX7 = TrendMedium = TrendMedium[1] UXX8 = low > Limitt UXX9 = close > MID4 BullishConditions3 = UXX1 and UXX2 and UXX3 and UXX4 and UXX5 and UXX6 and UXX7 and UXX8 and UXX9 //=//=// //=/ Bearish Conditions 1P EP1 = downward > 0 EP2 = close < TrendFast EP3 = close < TrendLong EP4 = close < TrendMedium EP5 = TrendFast < TrendFast[1] EP6 = TrendLong < TrendLong[1] EP7 = TrendMedium < TrendMedium[1] EP8 = high => Limitt EP9 = close < MID11 BearishConditions1P = EP1 and EP2 and EP3 and EP4 and EP5 and EP6 and EP7 and EP8 and EP9 //=/ Bearish Conditions 1PS EPS1 = downward > 0 EPS2 = close < TrendFast EPS3 = close < TrendLong EPS4 = close < TrendMedium EPS5 = TrendFast < TrendFast[1] EPS6 = TrendLong < TrendLong[1] EPS7 = TrendMedium < TrendMedium[1] EPS8 = high < Limitt EPS9 = Limitt =< MID11 EPS10 = close < MID11 BearishConditions1PS = EPS1 and EPS2 and EPS3 and EPS4 and EPS5 and EPS6 and EPS7 and EPS8 and EPS9 and EPS10 //=/ Bearish Conditions 1 E1 = downward > 0 E2 = close < TrendFast E3 = close < TrendLong E4 = close < TrendMedium E5 = TrendFast < TrendFast[1] E6 = TrendLong < TrendLong[1] E7 = TrendMedium < TrendMedium[1] E8 = high < Limitt E9 = close < MID11 BearishConditions1 = E1 and E2 and E3 and E4 and E5 and E6 and E7 and E8 and E9 //=/ Bearish Conditions 2 EX1 = downward > 0 EX2 = close < TrendFast EX3 = close < TrendLong EX4 = close < TrendMedium EX5 = TrendFast = TrendFast[1] EX6 = TrendLong < TrendLong[1] EX7 = TrendMedium < TrendMedium[1] EX8 = high < Limitt EX9 = close < MID11 BearishConditions2 = EX1 and EX2 and EX3 and EX4 and EX5 and EX6 and EX7 and EX8 and EX9 //=/ Bearish Conditions 3 EXX1 = downward > 0 EXX2 = close < TrendFast EXX3 = close < TrendLong EXX4 = close < TrendMedium EXX5 = TrendFast = TrendFast[1] EXX6 = TrendLong < TrendLong[1] EXX7 = TrendMedium = TrendMedium[1] EXX8 = high < Limitt EXX9 = close < MID11 BearishConditions3 = EXX1 and EXX2 and EXX3 and EXX4 and EXX5 and EXX6 and EXX7 and EXX8 and EXX9 //=/ Candle Color Settings if BullishConditions1P then br = RxUP bg = GxUP bb = BxUP tz = 250 elsif BullishConditions1PS then br = RxUP bg = GxUP bb = BxUP tz = 250 elsif BullishConditions1 then br = RxUP bg = GxUP bb = BxUP tz = 185 elsif BullishConditions2 then br = RxUP bg = GxUP bb = BxUP tz = 125 elsif BullishConditions3 then br = RxUP bg = GxUP bb = BxUP tz = 100 //=//=// elsif BearishConditions1P then br = RxDOWN bg = GxDOWN bb = BxDOWN tz = 250 elsif BearishConditions1PS then br = RxDOWN bg = GxDOWN bb = BxDOWN tz = 250 elsif BearishConditions1 then br = RxDOWN bg = GxDOWN bb = BxDOWN tz = 185 elsif BearishConditions2 then br = RxDOWN bg = GxDOWN bb = BxDOWN tz = 125 elsif BearishConditions3 then br = RxDOWN bg = GxDOWN bb = BxDOWN tz = 100 //=//=// else br = 204 bg = 204 bb = 204 tz = 180 endif drawcandle(open,high,low,close) coloured(br,bg,bb,tz) // //=/===============/=//=/===============/=//=/ Visual // //=/ Visual Settings MIDX1 = (hiband-TrendFast)/8 MID1 = (TrendFast+MIDX1) MID2 = (MID1+MIDX1) MID3 = (MID2+MIDX1) MID4 = (MID3+MIDX1) MID5 = (MID4+MIDX1) MID6 = (MID5+MIDX1) MID7 = (MID6+MIDX1) MIDX2 = (TrendFast-loband)/8 MID8 = (TrendFast-MIDX2) MID9 = (MID8-MIDX2) MID10 = (MID9-MIDX2) MID11 = (MID10-MIDX2) MID12 = (MID11-MIDX2) MID13 = (MID12-MIDX2) MID14 = (MID13-MIDX2) // //=/===============/=//=/===============/=//=/ End // return TrendFast coloured (cr,cg,cb,ct) style(line,2) as "Trend Fast" , MID1 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID1" , MID2 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID2" , MID3 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID3" , MID4 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID4" , MID5 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID5" , MID6 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID6" , MID7 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID7" , MID8 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID8" , MID9 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID9" , MID10 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID10" , MID11 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID11" , MID12 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID12" , MID13 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID13" , MID14 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID14" , hiband coloured (RxUP,GxUP,BxUP,15) style(line,1) as "Hiband" , loband coloured (RxUP,GxUP,BxUP,15) style(line,1) as "Loband" , Limitt coloured (cr,cg,cb,ct) style(line,1) as "Limit"

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331 332 333

  // //=/===============/=//=/===============/=//=/ Indicator Range Trend //   RxUP = 0 GxUP = 153 BxUP = 255   RxDOWN = 102 GxDOWN = 102 BxDOWN = 102   // //=/===============/=//=/===============/=//=/ Range //   //=/ Range Settings once rngfilt=close   if barindex>max(14,27) then rngscale=max(1,min(rngscale,7))   scale = 2.618*average[14,1](abs(close-close[1]))   endif   r=average[27,1](scale)   hh=close ll=close if 1<>1 then hh=high ll=low endif if 1=1 then if hh>rngfilt[1] then if (hh-r)<rngfilt[1] then rngfilt=rngfilt[1] else rngfilt=hh-r endif elsif (ll+r)>rngfilt[1] then rngfilt=rngfilt[1] else rngfilt=ll+r endif else if hh>=rngfilt[1]+r then rngfilt=(rngfilt[1]) + (abs(hh - (rngfilt[1]))/r)*r elsif ll<=rngfilt[1]-r then rngfilt=(rngfilt[1]) - (abs(ll - (rngfilt[1]))/r)*r else rngfilt=rngfilt[1] endif endif   hiband    = rngfilt + r loband    = rngfilt - r   if rngfilt>rngfilt[1] then upward=1 downward=0 endif if rngfilt<rngfilt[1] then upward=0 downward=1 endif   TrendFast = rngfilt TrendMedium = Average[2](rngfilt) TrendLong = Average[4](rngfilt) Limitt = (close+TrendFast)/2   // //=/===============/=//=/===============/=//=/ Trend Color //   //=/ Trend Fast Color Settings if upward > 0 and TrendFast > TrendFast[1] then cr = RxUP cg = GxUP cb = BxUP ct = 250   elsif downward > 0 and TrendFast < TrendFast[1] then cr = RxDOWN cg = GxDOWN cb = BxDOWN ct = 250   elsif upward > 0 and TrendFast = TrendFast[1] then cr = RxUP cg = GxUP cb = BxUP ct = 100   elsif downward > 0 and TrendFast = TrendFast[1] then cr = RxDOWN cg = GxDOWN cb = BxDOWN ct = 100   endif   // //=/===============/=//=/===============/=//=/ Candle //   //=/ Bullish Conditions 1P UP1 = upward > 0 UP2 = close > TrendFast UP3 = close > TrendLong UP4 = close > TrendMedium UP5 = TrendFast > TrendFast[1] UP6 = TrendLong > TrendLong[1] UP7 = TrendMedium > TrendMedium[1] UP8 = low =< Limitt UP9 = close > MID4 BullishConditions1P = UP1 and UP2 and UP3 and UP4 and UP5 and UP6 and UP7 and UP8 and UP9   //=/ Bullish Conditions 1PS UPS1 = upward > 0 UPS2 = close > TrendFast UPS3 = close > TrendLong UPS4 = close > TrendMedium UPS5 = TrendFast > TrendFast[1] UPS6 = TrendLong > TrendLong[1] UPS7 = TrendMedium > TrendMedium[1] UPS8 = low > Limitt UPS9 = Limitt => MID4 UPS10 = close > MID4 BullishConditions1PS = UPS1 and UPS2 and UPS3 and UPS4 and UPS5 and UPS6 and UPS7 and UPS8 and UPS9 and UPS10   //=/ Bullish Conditions 1 U1 = upward > 0 U2 = close > TrendFast U3 = close > TrendLong U4 = close > TrendMedium U5 = TrendFast > TrendFast[1] U6 = TrendLong > TrendLong[1] U7 = TrendMedium > TrendMedium[1] U8 = low > Limitt U9 = close > MID4 BullishConditions1 = U1 and U2 and U3 and U4 and U5 and U6 and U7 and U8 and U9   //=/ Bullish Conditions 2 UX1 = upward > 0 UX2 = close > TrendFast UX3 = close > TrendLong UX4 = close > TrendMedium UX5 = TrendFast = TrendFast[1] UX6 = TrendLong > TrendLong[1] UX7 = TrendMedium > TrendMedium[1] UX8 = low > Limitt UX9 = close > MID4 BullishConditions2 = UX1 and UX2 and UX3 and UX4 and UX5 and UX6 and UX7 and UX8 and UX9   //=/ Bullish Conditions 3 UXX1 = upward > 0 UXX2 = close > TrendFast UXX3 = close > TrendLong UXX4 = close > TrendMedium UXX5 = TrendFast = TrendFast[1] UXX6 = TrendLong > TrendLong[1] UXX7 = TrendMedium = TrendMedium[1] UXX8 = low > Limitt UXX9 = close > MID4 BullishConditions3 = UXX1 and UXX2 and UXX3 and UXX4 and UXX5 and UXX6 and UXX7 and UXX8 and UXX9   //=//=//   //=/ Bearish Conditions 1P EP1 = downward > 0 EP2 = close < TrendFast EP3 = close < TrendLong EP4 = close < TrendMedium EP5 = TrendFast < TrendFast[1] EP6 = TrendLong < TrendLong[1] EP7 = TrendMedium < TrendMedium[1] EP8 = high => Limitt EP9 = close < MID11 BearishConditions1P = EP1 and EP2 and EP3 and EP4 and EP5 and EP6 and EP7 and EP8 and EP9   //=/ Bearish Conditions 1PS EPS1 = downward > 0 EPS2 = close < TrendFast EPS3 = close < TrendLong EPS4 = close < TrendMedium EPS5 = TrendFast < TrendFast[1] EPS6 = TrendLong < TrendLong[1] EPS7 = TrendMedium < TrendMedium[1] EPS8 = high < Limitt EPS9 = Limitt =< MID11 EPS10 = close < MID11 BearishConditions1PS = EPS1 and EPS2 and EPS3 and EPS4 and EPS5 and EPS6 and EPS7 and EPS8 and EPS9 and EPS10   //=/ Bearish Conditions 1 E1 = downward > 0 E2 = close < TrendFast E3 = close < TrendLong E4 = close < TrendMedium E5 = TrendFast < TrendFast[1] E6 = TrendLong < TrendLong[1] E7 = TrendMedium < TrendMedium[1] E8 = high < Limitt E9 = close < MID11 BearishConditions1 = E1 and E2 and E3 and E4 and E5 and E6 and E7 and E8 and E9   //=/ Bearish Conditions 2 EX1 = downward > 0 EX2 = close < TrendFast EX3 = close < TrendLong EX4 = close < TrendMedium EX5 = TrendFast = TrendFast[1] EX6 = TrendLong < TrendLong[1] EX7 = TrendMedium < TrendMedium[1] EX8 = high < Limitt EX9 = close < MID11 BearishConditions2 = EX1 and EX2 and EX3 and EX4 and EX5 and EX6 and EX7 and EX8 and EX9   //=/ Bearish Conditions 3 EXX1 = downward > 0 EXX2 = close < TrendFast EXX3 = close < TrendLong EXX4 = close < TrendMedium EXX5 = TrendFast = TrendFast[1] EXX6 = TrendLong < TrendLong[1] EXX7 = TrendMedium = TrendMedium[1] EXX8 = high < Limitt EXX9 = close < MID11 BearishConditions3 = EXX1 and EXX2 and EXX3 and EXX4 and EXX5 and EXX6 and EXX7 and EXX8 and EXX9   //=/ Candle Color Settings if BullishConditions1P then br = RxUP bg = GxUP bb = BxUP tz = 250   elsif BullishConditions1PS then br = RxUP bg = GxUP bb = BxUP tz = 250   elsif BullishConditions1 then br = RxUP bg = GxUP bb = BxUP tz = 185   elsif BullishConditions2 then br = RxUP bg = GxUP bb = BxUP tz = 125   elsif BullishConditions3 then br = RxUP bg = GxUP bb = BxUP tz = 100   //=//=// elsif BearishConditions1P then br = RxDOWN bg = GxDOWN bb = BxDOWN tz = 250   elsif BearishConditions1PS then br = RxDOWN bg = GxDOWN bb = BxDOWN tz = 250   elsif BearishConditions1 then br = RxDOWN bg = GxDOWN bb = BxDOWN tz = 185   elsif BearishConditions2 then br = RxDOWN bg = GxDOWN bb = BxDOWN tz = 125   elsif BearishConditions3 then br = RxDOWN bg = GxDOWN bb = BxDOWN tz = 100   //=//=//   else br = 204 bg = 204 bb = 204 tz = 180 endif   drawcandle(open,high,low,close) coloured(br,bg,bb,tz)   // //=/===============/=//=/===============/=//=/ Visual //   //=/ Visual Settings MIDX1 = (hiband-TrendFast)/8 MID1 = (TrendFast+MIDX1) MID2 = (MID1+MIDX1) MID3 = (MID2+MIDX1) MID4 = (MID3+MIDX1) MID5 = (MID4+MIDX1) MID6 = (MID5+MIDX1) MID7 = (MID6+MIDX1)   MIDX2 = (TrendFast-loband)/8 MID8 = (TrendFast-MIDX2) MID9 = (MID8-MIDX2) MID10 = (MID9-MIDX2) MID11 = (MID10-MIDX2) MID12 = (MID11-MIDX2) MID13 = (MID12-MIDX2) MID14 = (MID13-MIDX2)   // //=/===============/=//=/===============/=//=/ End //   return TrendFast coloured (cr,cg,cb,ct) style(line,2) as "Trend Fast"     ,     MID1 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID1"     ,     MID2 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID2"     ,     MID3 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID3"    ,    MID4 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID4"     ,     MID5 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID5"      ,     MID6 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID6"     ,     MID7 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID7"     ,     MID8 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID8"     ,     MID9 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID9"     ,     MID10 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID10"     ,     MID11 coloured (RxDOWN,GxDOWN,BxDOWN,15) style(line,1) as "MID11"     ,     MID12 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID12"     ,     MID13 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID13"     ,     MID14 coloured (RxUP,GxUP,BxUP,15) style(line,1) as "MID14"     ,     hiband coloured (RxUP,GxUP,BxUP,15) style(line,1) as "Hiband"     ,     loband coloured (RxUP,GxUP,BxUP,15) style(line,1) as "Loband"     ,     Limitt coloured (cr,cg,cb,ct) style(line,1) as "Limit"

   

  1 user thanked author for this post.

  Nolubok

  

  Ichimoku Reading

  Participant

  Topics: 41

  Replies: 99

  Been thanked: 28 times
  11/02/2020 at 10:41 AM #149271
  Nicolas

  Thanks for sharing. I added the link to this forum thread in your first version of the indicator in the library: Trend Impulse with Range Filter

  1 user thanked author for this post.

  Ichimoku Reading

  

  Nicolas

  Keymaster

  Topics: 81

  Replies: 20863

  Been thanked: 4773 times
  11/02/2020 at 8:24 PM #149323
  Ichimoku Reading

  La V3

  // //=/===============/=//=/===============/=//=/ Indicator Range Trend // RxUP = 0 GxUP = 153 BxUP = 255 RxDOWN = 102 GxDOWN = 102 BxDOWN = 102 RxRange = 204 GxRange = 204 BxRange = 204 RxForce = 199 GxForce = 19 BxForce = 19 RangeScale = 2.338 // //=/===============/=//=/===============/=//=/ Range // //=/ Range Settings once RRange=close if barindex>max(14,27) then RNGScale=max(1,min(RNGScale,7)) scale = RangeScale*average[14,1](abs(close-close[1]))//2.338 endif r = average[27,1](scale) HH = close LL = close if 1 <> 1 then HH = high LL = low endif if 1 = 1 then if HH > RRange[1] then if (HH-R) < RRange[1] then RRange = RRange[1] else RRange = (HH-R) endif elsif (LL+R) > RRange[1] then RRange = RRange[1] else RRange = (LL+R) endif else if HH >= (RRange[1]+R) then RRange = (RRange[1]) + (abs (HH - (RRange[1]) )/ R)*R elsif LL <= (RRange[1]-R) then RRange = (RRange[1]) - (abs (LL - (RRange[1]) )/ R)*R else RRange = RRange[1] endif endif UpRange = RRange + R DwRange = RRange - R if RRange > RRange[1] then upward = 1 downward = 0 endif if RRange < RRange[1] then upward = 0 downward = 1 endif Trend = RRange TrendMedium = average[2](Trend) TrendLong= average[3](Trend) ForceINT = (close+Trend)/2 MidPLH = Trend + (UpRange - Trend)/2 MidPLB = Trend - (Trend - DwRange)/2 // //=/===============/=//=/===============/=//=/ Trend Color // //=/ Trend Color Settings if upward > 0 and Trend > Trend[1] then UPTrend = 1 DWTrend = 0 cr = RxUP cg = GxUP cb = BxUP ct = 250 elsif downward > 0 and Trend < Trend[1] then UPTrend = 0 DWTrend = 1 cr = RxDOWN cg = GxDOWN cb = BxDOWN ct = 250 elsif upward > 0 and Trend = Trend[1] then UPTrend = 0 DWTrend = 0 cr = RxUP cg = GxUP cb = BxUP ct = 250 elsif downward > 0 and Trend = Trend[1] then UPTrend = 0 DWTrend = 0 cr = RxDOWN cg = GxDOWN cb = BxDOWN ct = 250 endif // //=/===============/=//=/===============/=//=/ ForceINT Color // //=/ ForceINT Color Settings if upward > 0 and ForceINT => MID4 then fr = RxForce fg = GxForce fb = BxForce ft = 250 elsif downward > 0 and ForceINT =< MID11 then fr = RxForce fg = GxForce fb = BxForce ft = 250 elsif upward > 0 and ForceINT < MID4 then fr = RxUP fg = GxUP fb = BxUP ft = 250 elsif downward > 0 and ForceINT > MID11 then fr = RxDOWN fg = GxDOWN fb = BxDOWN ft = 250 endif // //=/===============/=//=/===============/=//=/ Candle // //=/ Bullish Conditions 1 UP1 = UpWard > 0 UP2 = UPTrend > 0 UP3 = low =< ForceINT BullishConditions1 = UP1 and UP2 and UP3 //=/ Bullish Conditions 2 UPX1 = UpWard > 0 UPX2 = UPTrend > 0 UPX3 = low > ForceINT BullishConditions2 = UPX1 and UPX2 and UPX3 //=/ Bullish Conditions 3 UPXX1 = UpWard > 0 UPXX2 = Trend = Trend[1] UPXX3 = TrendMedium > TrendMedium[1] UPXX4 = close > MidPLH BullishConditions3 = UPXX1 and UPXX2 and UPXX3 and UPXX4 //=/ Bullish Conditions 4 UPXXX1 = UpWard > 0 UPXXX2 = Trend = Trend[1] UPXXX3 = TrendMedium = TrendMedium[1] UPXXX4 = TrendLong > TrendLong[1] UPXXX5 = close > MidPLH BullishConditions4 = UPXXX1 and UPXXX2 and UPXXX3 and UPXXX4 and UPXXX5 //=/ Bullish Conditions R UPR1 = UpWard > 0 UPR2 = Close < Trend BullishConditionsR = UPR1 and UPR2 //=//=// //=/ Bearish Conditions 1 EP1 = DownWard > 0 EP2 = DWTrend > 0 EP3 = high => ForceINT BearishConditions1 = EP1 and EP2 and EP3 //=/ Bearish Conditions 2 EPX1 = DownWard > 0 EPX2 = DWTrend > 0 EPX3 = high < ForceINT BearishConditions2 = EPX1 and EPX2 and EPX3 //=/ Bearish Conditions 3 EPXX1 = DownWard > 0 EPXX2 = Trend = Trend[1] EPXX3 = TrendMedium < TrendMedium[1] EPXX4 = close < MidPLB BearishConditions3 = EPXX1 and EPXX2 and EPXX3 and EPXX4 //=/ Bearish Conditions 4 EPXXX1 = DownWard > 0 EPXXX2 = Trend = Trend[1] EPXXX3 = TrendMedium = TrendMedium[1] EPXXX4 = TrendLong < TrendLong[1] EPXXX5 = close < MidPLB BearishConditions4 = EPXXX1 and EPXXX2 and EPXXX3 and EPXXX4 and EPXXX5 //=/ Bearish Conditions R EPR1 = DownWard > 0 EPR2 = Close > Trend BearishConditionsR = EPR1 and EPR2 //=/ Candle Color Settings if BullishConditions1 then R = RxUP G = GxUP B = BxUP T = 250 elsif BullishConditions2 then R = RxUP G = GxUP B = BxUP T = 200 elsif BullishConditions3 then R = RxUP G = GxUP B = BxUP T = 200 elsif BullishConditions4 then R = RxUP G = GxUP B = BxUP T = 200 elsif BullishConditionsR then R = RxRange G = GxRange B = BxRange T = 150 //=//=// elsif BearishConditions1 then R = RxDOWN G = GxDOWN B = BxDOWN T = 250 elsif BearishConditions2 then R = RxDOWN G = GxDOWN B = BxDOWN T = 200 elsif BearishConditions3 then R = RxDOWN G = GxDOWN B = BxDOWN T = 200 elsif BearishConditions4 then R = RxDOWN G = GxDOWN B = BxDOWN T = 200 elsif BearishConditionsR then R = RxRange G = GxRange B = BxRange T = 150 //=//=// else R = 204 G = 204 B = 204 T = 250 endif drawcandle(open,high,low,close) coloured(R,G,B,T) // //=/===============/=//=/===============/=//=/ End // // //=/===============/=//=/===============/=//=/ Visual // //=/ Visual Settings MIDX1 = (UpRange-Trend)/8 MID1 = (Trend+MIDX1) MID2 = (MID1+MIDX1) MID3 = (MID2+MIDX1) MID4 = (MID3+MIDX1) MID5 = (MID4+MIDX1) MID6 = (MID5+MIDX1) MID7 = (MID6+MIDX1) MIDX2 = (Trend-DwRange)/8 MID8 = (Trend-MIDX2) MID9 = (MID8-MIDX2) MID10 = (MID9-MIDX2) MID11 = (MID10-MIDX2) MID12 = (MID11-MIDX2) MID13 = (MID12-MIDX2) MID14 = (MID13-MIDX2) return Trend coloured (cr,cg,cb,ct) style(line,2) as "Trend", ForceINT coloured (fr,fg,fb,ft) style(line,1) as "ForceINT", UpRange coloured (RxUP,GxUP,BxUP,15) style(line,1) as "UpRange", DwRange coloured (RxUP,GxUP,BxUP,15) style(line,1) as "DwRange", MID1 coloured (RxUP,GxUP,BxUP,150) style(line,1) as "MID1", MID2 coloured (RxUP,GxUP,BxUP,130) style(line,1) as "MID2", MID3 coloured (RxUP,GxUP,BxUP,110) style(line,1) as "MID3", MID4 coloured (RxUP,GxUP,BxUP,90) style(line,1) as "MID4", MID5 coloured (RxUP,GxUP,BxUP,70) style(line,1) as "MID5", MID6 coloured (RxUP,GxUP,BxUP,50) style(line,1) as "MID6", MID7 coloured (RxUP,GxUP,BxUP,30) style(line,1) as "MID7", MID8 coloured (RxDOWN,GxDOWN,BxDOWN,150) style(line,1) as "MID8", MID9 coloured (RxDOWN,GxDOWN,BxDOWN,130) style(line,1) as "MID9", MID10 coloured (RxDOWN,GxDOWN,BxDOWN,110) style(line,1) as "MID10", MID11 coloured (RxDOWN,GxDOWN,BxDOWN,90) style(line,1) as "MID11", MID12 coloured (RxDOWN,GxDOWN,BxDOWN,70) style(line,1) as "MID12", MID13 coloured (RxDOWN,GxDOWN,BxDOWN,50) style(line,1) as "MID13", MID14 coloured (RxDOWN,GxDOWN,BxDOWN,30) style(line,1) as "MID14"

  1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 251 252 253 254 255 256 257 258 259 260 261 262 263 264 265 266 267 268 269 270 271 272 273 274 275 276 277 278 279 280 281 282 283 284 285 286 287 288 289 290 291 292 293 294 295 296 297 298 299 300 301 302 303 304 305 306 307 308 309 310 311 312 313 314 315 316 317 318 319 320 321 322 323 324 325 326 327 328 329 330 331

  // //=/===============/=//=/===============/=//=/ Indicator Range Trend //   RxUP = 0 GxUP = 153 BxUP = 255   RxDOWN = 102 GxDOWN = 102 BxDOWN = 102   RxRange = 204 GxRange = 204 BxRange = 204   RxForce = 199 GxForce = 19 BxForce = 19   RangeScale = 2.338   // //=/===============/=//=/===============/=//=/ Range //   //=/ Range Settings once RRange=close   if barindex>max(14,27) then RNGScale=max(1,min(RNGScale,7))   scale = RangeScale*average[14,1](abs(close-close[1]))//2.338   endif   r = average[27,1](scale)   HH = close LL = close   if 1 <> 1 then HH = high LL = low endif   if 1 = 1 then if HH > RRange[1] then if (HH-R) < RRange[1] then RRange = RRange[1] else RRange = (HH-R) endif elsif (LL+R) > RRange[1] then RRange = RRange[1] else RRange = (LL+R) endif   else if HH >= (RRange[1]+R) then RRange = (RRange[1]) + (abs (HH - (RRange[1]) )/ R)*R elsif LL <= (RRange[1]-R) then RRange = (RRange[1]) - (abs (LL - (RRange[1]) )/ R)*R else RRange = RRange[1] endif endif   UpRange    = RRange + R DwRange    = RRange - R   if RRange > RRange[1] then upward = 1 downward = 0 endif if RRange < RRange[1] then upward = 0 downward = 1 endif   Trend = RRange TrendMedium = average[2](Trend) TrendLong= average[3](Trend) ForceINT = (close+Trend)/2     MidPLH = Trend + (UpRange - Trend)/2 MidPLB = Trend - (Trend - DwRange)/2   // //=/===============/=//=/===============/=//=/ Trend Color //   //=/ Trend Color Settings if upward > 0 and Trend > Trend[1] then UPTrend = 1 DWTrend = 0 cr = RxUP cg = GxUP cb = BxUP ct = 250   elsif downward > 0 and Trend < Trend[1] then UPTrend = 0 DWTrend = 1 cr = RxDOWN cg = GxDOWN cb = BxDOWN ct = 250   elsif upward > 0 and Trend = Trend[1] then UPTrend = 0 DWTrend = 0 cr = RxUP cg = GxUP cb = BxUP ct = 250   elsif downward > 0 and Trend = Trend[1] then UPTrend = 0 DWTrend = 0 cr = RxDOWN cg = GxDOWN cb = BxDOWN ct = 250   endif   // //=/===============/=//=/===============/=//=/ ForceINT Color //   //=/ ForceINT Color Settings if upward > 0 and ForceINT => MID4 then fr = RxForce fg = GxForce fb = BxForce ft = 250   elsif downward > 0 and ForceINT =< MID11 then fr = RxForce fg = GxForce fb = BxForce ft = 250   elsif upward > 0 and ForceINT < MID4 then fr = RxUP fg = GxUP fb = BxUP ft = 250   elsif downward > 0 and ForceINT > MID11 then fr = RxDOWN fg = GxDOWN fb = BxDOWN ft = 250   endif   // //=/===============/=//=/===============/=//=/ Candle //   //=/ Bullish Conditions 1 UP1 = UpWard > 0 UP2 = UPTrend > 0 UP3 = low =< ForceINT BullishConditions1 = UP1 and UP2 and UP3   //=/ Bullish Conditions 2 UPX1 = UpWard > 0 UPX2 = UPTrend > 0 UPX3 = low > ForceINT BullishConditions2 = UPX1 and UPX2 and UPX3   //=/ Bullish Conditions 3 UPXX1 = UpWard > 0 UPXX2 = Trend = Trend[1] UPXX3 = TrendMedium > TrendMedium[1] UPXX4 = close > MidPLH BullishConditions3 = UPXX1 and UPXX2 and UPXX3 and UPXX4   //=/ Bullish Conditions 4 UPXXX1 = UpWard > 0 UPXXX2 = Trend = Trend[1] UPXXX3 = TrendMedium = TrendMedium[1] UPXXX4 = TrendLong > TrendLong[1] UPXXX5 = close > MidPLH BullishConditions4 = UPXXX1 and UPXXX2 and UPXXX3 and UPXXX4 and UPXXX5   //=/ Bullish Conditions R UPR1 = UpWard > 0 UPR2 = Close < Trend BullishConditionsR = UPR1 and UPR2   //=//=//   //=/ Bearish Conditions 1 EP1 = DownWard > 0 EP2 = DWTrend > 0 EP3 = high => ForceINT BearishConditions1 = EP1 and EP2 and EP3   //=/ Bearish Conditions 2 EPX1 = DownWard > 0 EPX2 = DWTrend > 0 EPX3 = high < ForceINT BearishConditions2 = EPX1 and EPX2 and EPX3   //=/ Bearish Conditions 3 EPXX1 = DownWard > 0 EPXX2 = Trend = Trend[1] EPXX3 = TrendMedium < TrendMedium[1] EPXX4 = close < MidPLB BearishConditions3 = EPXX1 and EPXX2 and EPXX3 and EPXX4   //=/ Bearish Conditions 4 EPXXX1 = DownWard > 0 EPXXX2 = Trend = Trend[1] EPXXX3 = TrendMedium = TrendMedium[1] EPXXX4 = TrendLong < TrendLong[1] EPXXX5 = close < MidPLB BearishConditions4 = EPXXX1 and EPXXX2 and EPXXX3 and EPXXX4 and EPXXX5   //=/ Bearish Conditions R EPR1 = DownWard > 0 EPR2 = Close > Trend BearishConditionsR = EPR1 and EPR2   //=/ Candle Color Settings if BullishConditions1 then R = RxUP G = GxUP B = BxUP T = 250   elsif BullishConditions2 then R = RxUP G = GxUP B = BxUP T = 200   elsif BullishConditions3 then R = RxUP G = GxUP B = BxUP T = 200   elsif BullishConditions4 then R = RxUP G = GxUP B = BxUP T = 200   elsif BullishConditionsR then R = RxRange G = GxRange B = BxRange T = 150   //=//=// elsif BearishConditions1 then R = RxDOWN G = GxDOWN B = BxDOWN T = 250   elsif BearishConditions2 then R = RxDOWN G = GxDOWN B = BxDOWN T = 200   elsif BearishConditions3 then R = RxDOWN G = GxDOWN B = BxDOWN T = 200   elsif BearishConditions4 then R = RxDOWN G = GxDOWN B = BxDOWN T = 200   elsif BearishConditionsR then R = RxRange G = GxRange B = BxRange T = 150   //=//=//   else R = 204 G = 204 B = 204 T = 250 endif   drawcandle(open,high,low,close) coloured(R,G,B,T)   // //=/===============/=//=/===============/=//=/ End //   // //=/===============/=//=/===============/=//=/ Visual // //=/ Visual Settings MIDX1 = (UpRange-Trend)/8 MID1 = (Trend+MIDX1) MID2 = (MID1+MIDX1) MID3 = (MID2+MIDX1) MID4 = (MID3+MIDX1) MID5 = (MID4+MIDX1) MID6 = (MID5+MIDX1) MID7 = (MID6+MIDX1) MIDX2 = (Trend-DwRange)/8 MID8 = (Trend-MIDX2) MID9 = (MID8-MIDX2) MID10 = (MID9-MIDX2) MID11 = (MID10-MIDX2) MID12 = (MID11-MIDX2) MID13 = (MID12-MIDX2) MID14 = (MID13-MIDX2)   return Trend coloured (cr,cg,cb,ct) style(line,2) as "Trend", ForceINT coloured (fr,fg,fb,ft) style(line,1) as "ForceINT", UpRange coloured (RxUP,GxUP,BxUP,15) style(line,1) as "UpRange", DwRange coloured (RxUP,GxUP,BxUP,15) style(line,1) as "DwRange", MID1 coloured (RxUP,GxUP,BxUP,150) style(line,1) as "MID1", MID2 coloured (RxUP,GxUP,BxUP,130) style(line,1) as "MID2", MID3 coloured (RxUP,GxUP,BxUP,110) style(line,1) as "MID3", MID4 coloured (RxUP,GxUP,BxUP,90) style(line,1) as "MID4", MID5 coloured (RxUP,GxUP,BxUP,70) style(line,1) as "MID5", MID6 coloured (RxUP,GxUP,BxUP,50) style(line,1) as "MID6", MID7 coloured (RxUP,GxUP,BxUP,30) style(line,1) as "MID7", MID8 coloured (RxDOWN,GxDOWN,BxDOWN,150) style(line,1) as "MID8", MID9 coloured (RxDOWN,GxDOWN,BxDOWN,130) style(line,1) as "MID9", MID10 coloured (RxDOWN,GxDOWN,BxDOWN,110) style(line,1) as "MID10", MID11 coloured (RxDOWN,GxDOWN,BxDOWN,90) style(line,1) as "MID11", MID12 coloured (RxDOWN,GxDOWN,BxDOWN,70) style(line,1) as "MID12", MID13 coloured (RxDOWN,GxDOWN,BxDOWN,50) style(line,1) as "MID13", MID14 coloured (RxDOWN,GxDOWN,BxDOWN,30) style(line,1) as "MID14"

   

   

  3 users thanked author for this post.

  Moda, PLermite, Luciole

  

  Ichimoku Reading

  Participant

  Topics: 41

  Replies: 99

  Been thanked: 28 times
  11/08/2020 at 11:52 AM #149828
  ullle73

  in a nutshell, buy when candles turn blue? go short when black?

  

  ullle73

  Participant

  Topics: 51

  Replies: 178

  Been thanked: 7 times
• Author
  Posts