Modification des couleurs

• 10/04/2023 at 7:29 AM #222014
  finplus

  Range filter buy and sell

  // Original Script > @DonovanWall // Adapted Version > @guikroth ////////////////////////////////////////////////////////////////////////// // Settings for 5min chart, BTCUSDC. For Other coin, change the parameters ////////////////////////////////////////////////////////////////////////// // Color variables downColorR = 255 downColorG = 69 downColorB = 0 upColorR = 50 upColorG = 205 upColorB = 50 midColorR = 0 midColorG = 191 midColorB = 255 // Source src = customclose // Sampling Period // Settings for 5min chart, BTCUSDC. For Other coin, change the paremeters // per = defval=100, minval=1, "Sampling Period" // Range Multiplier // mult = defval=3.0, minval=0.1, "Range Multiplier" // Smooth Average Range wper = per*2 -1 avrng = exponentialaverage[per](abs(src-src[1])) smrng = mult * exponentialaverage[wper](avrng) // Range Filter rngfilt = src If src > rngfilt[1] then If rngfilt[1] > src-smrng then rngfilt = rngfilt[1] Else rngfilt = src-smrng endif elsif rngfilt[1] < src+smrng then rngfilt = rngfilt[1] else rngfilt = src+smrng endif filt = rngfilt // Filter Direction upward = 0 If filt > filt[1] then upward = upward[1]+1 elsif filt < filt[1] then upward = 0 else upward = upward[1] endif downward = 0 If filt < filt[1] then downward = downward[1]+1 elsif filt > filt[1] then downward = 0 else downward = downward[1] endif // Target Bands hband = filt + smrng lband = filt - smrng // Colors If upward > 0 then filtcolorR = upColorR filtcolorG = upColorG filtcolorB = upColorB elsif downward > 0 then filtcolorR = downColorR filtcolorG = downColorG filtcolorB = downColorB else filtcolorR = midColorR filtcolorG = midColorG filtcolorB = midColorB endif if src > filt and src > src[1] and upward > 0 then barcolorR = upColorR barcolorG = upColorG barcolorB = upColorB elsif src > filt and src < src[1] and upward > 0 then barcolorR = upColorR barcolorG = upColorG barcolorB = upColorB elsif src < filt and src < src[1] and downward > 0 then barcolorR = downColorR barcolorG = downColorG barcolorB = downColorB elsif src < filt and src > src[1] and downward > 0 then barcolorR = downColorR barcolorG = downColorG barcolorB = downColorB else barcolorR = midColorR barcolorG = midColorG barcolorB = midColorB endif colorbetween(hband,filt,upColorR,upColorG,upColorB,30) colorbetween(lband,filt,downColorR,downColorG,downColorB,30) // Break Outs longCond = (src > filt and src > src[1] and upward > 0) or (src > filt and src < src[1] and upward > 0) shortCond = (src < filt and src < src[1] and downward > 0) or (src < filt and src > src[1] and downward > 0) CondIni = 0 If longCond then CondIni = 1 elsif shortCond then CondIni = -1 else CondIni = CondIni[1] endif longCondition = longCond and CondIni[1] = -1 shortCondition = shortCond and CondIni[1] = 1 //Alerts If longCondition then Drawarrowup(barindex,low-AverageTrueRange[14](close)) coloured("green",255) endif If shortCondition then Drawarrowdown(barindex,high+AverageTrueRange[14](close)) coloured("red",255) endif Return filt style(line,4) coloured(barcolorR,barcolorG,barcolorB,255) as "Range Filter", hband style(line,2) coloured(upColorR,upColorG,upColorB,100) as "High Target", lband style(line,2) coloured(downColorR,downColorG,downColorB,100) as "Low Target" Share this

  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

  // Original Script > @DonovanWall // Adapted Version > @guikroth ////////////////////////////////////////////////////////////////////////// // Settings for 5min chart, BTCUSDC. For Other coin, change the parameters ////////////////////////////////////////////////////////////////////////// // Color variables downColorR = 255 downColorG = 69 downColorB = 0 upColorR = 50 upColorG = 205 upColorB = 50 midColorR = 0 midColorG = 191 midColorB = 255 // Source src = customclose // Sampling Period // Settings for 5min chart, BTCUSDC. For Other coin, change the paremeters // per = defval=100, minval=1, "Sampling Period" // Range Multiplier // mult = defval=3.0, minval=0.1, "Range Multiplier" // Smooth Average Range wper = per*2 -1 avrng = exponentialaverage[per](abs(src-src[1])) smrng = mult * exponentialaverage[wper](avrng) // Range Filter rngfilt = src If src > rngfilt[1] then If rngfilt[1] > src-smrng then rngfilt = rngfilt[1] Else rngfilt = src-smrng endif elsif rngfilt[1] < src+smrng then rngfilt = rngfilt[1] else rngfilt = src+smrng endif filt = rngfilt // Filter Direction upward = 0 If filt > filt[1] then upward = upward[1]+1 elsif filt < filt[1] then upward = 0 else upward = upward[1] endif downward = 0 If filt < filt[1] then downward = downward[1]+1 elsif filt > filt[1] then downward = 0 else downward = downward[1] endif // Target Bands hband = filt + smrng lband = filt - smrng // Colors If upward > 0 then filtcolorR = upColorR filtcolorG = upColorG filtcolorB = upColorB elsif downward > 0 then filtcolorR = downColorR filtcolorG = downColorG filtcolorB = downColorB else filtcolorR = midColorR filtcolorG = midColorG filtcolorB = midColorB endif if src > filt and src > src[1] and upward > 0 then barcolorR = upColorR barcolorG = upColorG barcolorB = upColorB elsif src > filt and src < src[1] and upward > 0 then barcolorR = upColorR barcolorG = upColorG barcolorB = upColorB elsif src < filt and src < src[1] and downward > 0 then barcolorR = downColorR barcolorG = downColorG barcolorB = downColorB elsif src < filt and src > src[1] and downward > 0 then barcolorR = downColorR barcolorG = downColorG barcolorB = downColorB else barcolorR = midColorR barcolorG = midColorG barcolorB = midColorB endif colorbetween(hband,filt,upColorR,upColorG,upColorB,30) colorbetween(lband,filt,downColorR,downColorG,downColorB,30) // Break Outs longCond = (src > filt and src > src[1] and upward > 0) or (src > filt and src < src[1] and upward > 0) shortCond = (src < filt and src < src[1] and downward > 0) or (src < filt and src > src[1] and downward > 0) CondIni = 0 If longCond then CondIni = 1 elsif shortCond then CondIni = -1 else CondIni = CondIni[1] endif longCondition = longCond and CondIni[1] = -1 shortCondition = shortCond and CondIni[1] = 1 //Alerts If longCondition then Drawarrowup(barindex,low-AverageTrueRange[14](close)) coloured("green",255) endif If shortCondition then Drawarrowdown(barindex,high+AverageTrueRange[14](close)) coloured("red",255) endif Return filt style(line,4) coloured(barcolorR,barcolorG,barcolorB,255) as "Range Filter", hband style(line,2) coloured(upColorR,upColorG,upColorB,100) as "High Target", lband style(line,2) coloured(downColorR,downColorG,downColorB,100) as "Low Target" Share this

  Bonjour, j’ai une demande : comment modifier le code pour que lorsque les cours sont dans la zone verte ou rouge; celles-ci changent de couleur : par exemple la zone verte soit modifiée en bleue ou la zone rouge en orange par exemple ? Merci.

  

  finplus

  Participant

  Topics: 104

  Replies: 397

  Been thanked: 8 times
  10/04/2023 at 7:48 AM #222015
  LucasBest

  Bonjour, la coloration des bandes se fait ligne 111 et 112 à l’aide des instructions colorbetween. Il suffit de mettre ces deux instructions entre des conditions (IF THEN ELSE END) en fonction de ce que l’on veut exactement et de changer les couleurs appliquée en fonction des conditions, sachant que la ligne du milieu est filt, le haut hband, le bas lband. Tu peux ne changer que la transparence en fonctions des conditions désirée (ici elle st à 30). Voir : https://www.prorealcode.com/documentation/colorbetween/

  1 user thanked author for this post.

  finplus

  

  LucasBest

  Participant

  Topics: 16

  Replies: 208

  Been thanked: 72 times
  10/04/2023 at 8:02 AM #222016
  finplus

  Merci. Je vais essayer.

  Bonne journée.

  

  finplus

  Participant

  Topics: 104

  Replies: 397

  Been thanked: 8 times
  10/04/2023 at 8:34 AM #222021
  finplus

  Bonjour, j’ai fait comme ceci mais le résultat n’est pas concluant pour l’intensité de la couleur de la zone du haut ne change pas. Une idée du problème SVP ?

   

  if close > filt then
  colorbetween(hband,filt,upColorR,upColorG,upColorB,40)
  endif
  if close < filt then
  colorbetween(hband,filt,upColorR,upColorG,upColorB,20)
  endif
  if close < filt then
  colorbetween(lband,filt,downColorR,downColorG,downColorB,40)
  endif
  if close > filt then
  colorbetween(lband,filt,downColorR,downColorG,downColorB,20)
  endif

  

  finplus

  Participant

  Topics: 104

  Replies: 397

  Been thanked: 8 times
  10/04/2023 at 8:45 AM #222023
  LucasBest

  Il faut rassembler les instructions pour éviter de faire des tests redondant qui ralentissent inutilement l’indicateur…

  if close > filt then
  colorbetween(hband,filt,upColorR,upColorG,upColorB,60)
  colorbetween(lband,filt,downColorR,downColorG,downColorB,10)
  endif
  if close < filt then colorbetween(hband,filt,upColorR,upColorG,upColorB,10) colorbetween(lband,filt,downColorR,downColorG,downColorB,60) endif

  

  LucasBest

  Participant

  Topics: 16

  Replies: 208

  Been thanked: 72 times
  10/04/2023 at 8:48 AM #222024
  finplus

  Merci.

  

  finplus

  Participant

  Topics: 104

  Replies: 397

  Been thanked: 8 times
• Author
  Posts