Parabolic SAR Code

• 07/23/2021 at 10:00 AM #174049
  rochnickols

  SAR ATD

  // Indicateur SAR de Wilder V.11 // Chroniques de Bourse // Merci à Jean M. pour la mise à jour du programme once facteur=0.02 once increment=0.02 once maxfacteur=0.2 extreme1=extreme[1] tendance1=tendance[1] tmpsar1=tmpSAR[1] high1=high[1] low1=low[1] if tendance1 = 1 then extreme = max(extreme1, high) if tmpsar1 > low then tendance = -1 facteur = 0.02 tmpSAR = extreme extreme = low else if extreme > extreme1 and facteur <maxfacteur then facteur = min( maxfacteur, facteur + increment) endif tmpSAR =tmpsar1+facteur*(extreme-tmpsar1) tmpSAR = min(tmpSAR,min(low,low1)) endif elsif tendance1 = -1 then extreme = min(extreme1, low ) if tmpsar1 <high then tendance = 1 facteur = 0.02 tmpSAR = extreme extreme = high else if extreme < extreme1 and facteur <maxfacteur then facteur = min( maxfacteur, facteur + increment ) endif tmpSAR = tmpsar1+facteur*(extreme-tmpsar1) tmpSAR = max(tmpSAR,max(high,high1)) endif else facteur = 0.02 tmpSAR = low extreme = high tendance = 1 endif // couleur du SAR if tmpSAR>=tmpSAR[1] then col=1 else col=-1 endif return tmpSAR[1] coloured by col as "SAR"

  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

  // Indicateur SAR de Wilder V.11 // Chroniques de Bourse // Merci à Jean M. pour la mise à jour du programme   once facteur=0.02 once increment=0.02 once maxfacteur=0.2 extreme1=extreme[1] tendance1=tendance[1] tmpsar1=tmpSAR[1] high1=high[1] low1=low[1]   if tendance1 = 1 then extreme = max(extreme1, high) if tmpsar1 > low then tendance = -1 facteur = 0.02 tmpSAR = extreme extreme = low else if extreme > extreme1 and facteur <maxfacteur then facteur = min( maxfacteur, facteur + increment) endif tmpSAR =tmpsar1+facteur*(extreme-tmpsar1) tmpSAR = min(tmpSAR,min(low,low1)) endif elsif tendance1 = -1 then extreme = min(extreme1, low ) if tmpsar1 <high then tendance = 1 facteur = 0.02 tmpSAR = extreme extreme = high else if extreme < extreme1 and facteur <maxfacteur then facteur = min( maxfacteur, facteur + increment ) endif tmpSAR = tmpsar1+facteur*(extreme-tmpsar1) tmpSAR = max(tmpSAR,max(high,high1)) endif else facteur = 0.02 tmpSAR = low extreme = high tendance = 1 endif // couleur du SAR if tmpSAR>=tmpSAR[1] then col=1 else col=-1 endif return tmpSAR[1] coloured by col as "SAR"

  

  rochnickols

  Participant

  Topics: 1

  Replies: 21

  Been thanked: 1 time
  07/23/2021 at 3:48 PM #174061
  robertogozzi

  Try replacing [1] with [0]  (or nothing)  in the last line:

  return tmpSAR[0] coloured by col as "SAR" //or return tmpSAR coloured by col as "SAR"

  1	return tmpSAR[0] coloured by col as "SAR"  //or return tmpSAR coloured by col as "SAR"

   

  

  robertogozzi

  Moderator

  Topics: 69

  Replies: 16469

  Been thanked: 3643 times
• Author
  Posts