Indicateur phases de lune : conversion Pine vers ProRealTime

Viewing 4 posts - 1 through 4 (of 4 total)

Author

Posts

02/19/2026 at 9:47 AM #258294 quote

Bateson

Participant

Junior

Bonjour,

je souhaiterai convertir le code Pine Script ci-joint pour pouvoir l’utiliser sur PRT.

Lunar Phase (LUNAR) — Indicator by mihakralj — TradingView

Merci d’avance de votre aide

// The MIT License (MIT)
// © mihakralj
//@version=6
indicator("Lunar Phase (LUNAR)", "LUNAR", overlay=false)


//@function Calculates precise lunar phase using orbital mechanics
//@param none Uses timestamp of open (start of the bar) for calculations
//@returns float Lunar phase from 0.0 (new moon) through 1.0 (full moon)
//@Includes orbital perturbation terms and epoch corrections
lunar() =>
    jd = (time / 86400000.0) + 2440587.5
    T = (jd - 2451545.0) / 36525.0
    Lp = (218.3164477 + 481267.88123421 * T - 0.0015786 * T * T + T * T * T / 538841.0 - T * T * T * T / 65194000.0) % 360.0
    D = (297.8501921 + 445267.1114034 * T - 0.0018819 * T * T + T * T * T / 545868.0 - T * T * T * T / 113065000.0) % 360.0
    M = (357.5291092 + 35999.0502909 * T - 0.0001536 * T * T + T * T * T / 24490000.0) % 360.0
    Mp = (134.9633964 + 477198.8675055 * T + 0.0087414 * T * T + T * T * T / 69699.0 - T * T * T * T / 14712000.0) % 360.0
    F = (93.2720950 + 483202.0175233 * T - 0.0036539 * T * T - T * T * T / 3526000.0 + T * T * T * T / 863310000.0) % 360.0
    Lp_rad = Lp * math.pi / 180.0
    D_rad = D * math.pi / 180.0
    M_rad = M * math.pi / 180.0
    Mp_rad = Mp * math.pi / 180.0
    F_rad = F * math.pi / 180.0
    dL = 6288.016 * math.sin(Mp_rad) + 1274.242 * math.sin(2.0 * D_rad - Mp_rad) +
         658.314 * math.sin(2.0 * D_rad) + 214.818 * math.sin(2.0 * Mp_rad) +
         186.986 * math.sin(M_rad) + 109.154 * math.sin(2.0 * F_rad)
    L_moon = Lp + dL / 1000000.0
    M_sun = (357.5291092 + 35999.0502909 * T - 0.0001536 * T * T + T * T * T / 24490000.0) % 360.0
    L_sun = (280.46646 + 36000.76983 * T + 0.0003032 * T * T) % 360.0
    phase_angle = ((L_moon - L_sun) % 360.0) * math.pi / 180.0
    phase = (1.0 - math.cos(phase_angle)) / 2.0
    phase




// Calculation
lunarPhase = lunar()


// Plot the lunar phase line
plot(lunarPhase, "Lunar Phase", color.yellow, 2)


// Calculate derivatives to find local maxima/minima and inflection points
delta1 = lunarPhase - lunarPhase[1]


// New Moon detection (at the trough)
newMoonCondition = lunarPhase < 0.1 and lunarPhase[1] < 0.1 and delta1 > 0 and delta1[1] < 0
plotchar(newMoonCondition ? lunarPhase[1] : na, "New Moon", "🌑", location.absolute, color.white, size = size.tiny, offset=-1)


// First Quarter detection (crossing 0.5 going up)
firstQuarterCondition = lunarPhase[1] < 0.5 and lunarPhase >= 0.5 and delta1 > 0
plotchar(firstQuarterCondition ? lunarPhase[1] : na, "First Quarter", "🌓", location.absolute, color.white, size = size.tiny, offset=-1)


// Full Moon detection (at the peak)
fullMoonCondition = lunarPhase > 0.88 and lunarPhase[1] > 0.88 and delta1 <= 0 and delta1[1] >= 0
plotchar(fullMoonCondition ? lunarPhase[1] : na, "Full Moon", "🌕", location.absolute, color.white, size = size.tiny, offset=-1)


// Last Quarter detection (crossing 0.5 going down)
lastQuarterCondition = lunarPhase[1] > 0.5 and lunarPhase <= 0.5 and delta1 < 0
plotchar(lastQuarterCondition ? lunarPhase[1] : na, "Last Quarter", "🌗", location.absolute, color.white, size = size.tiny, offset=-1)

02/19/2026 at 10:50 AM #258300 quote

Nicolas

Keymaster

Legend

Bonjour, merci de poster votre message dans le forum du groupe dédié pour la prochaine fois demande de conversion (je viens de déplacer votre sujet) :

TradingView to ProRealTime Translation Center

02/19/2026 at 11:06 AM #258302 quote

Iván González

Moderator

Legend

Bonjour. Voici l’indicateur.

Je vais déplacer la publication vers le groupe de traduction de TradingView.

//---------------------------------------------------//
// PRC_Lunar Phase Indicator by mihakralj
// version = 0
// 19.02.2026
// Iván González @ www.prorealcode.com
// Sharing ProRealTime knowledge
//---------------------------------------------------//
// 1. Julian Date using OpenTimestamp (UNIX time in seconds)
//---------------------------------------------------//
jd = (OpenTimestamp / 86400.0) + 2440587.5
T = (jd - 2451545.0) / 36525.0
//---------------------------------------------------//
// 2. Polynomial calculations with manual Float Modulo 360 for precision
//---------------------------------------------------//
LpRaw = 218.3164477 + 481267.88123421 * T - 0.0015786 * T * T + T * T * T / 538841.0 - T * T * T * T / 65194000.0
Lp = LpRaw - 360.0 * FLOOR(LpRaw / 360.0)

DRaw = 297.8501921 + 445267.1114034 * T - 0.0018819 * T * T + T * T * T / 545868.0 - T * T * T * T / 113065000.0
Dval = DRaw - 360.0 * FLOOR(DRaw / 360.0)

MRaw = 357.5291092 + 35999.0502909 * T - 0.0001536 * T * T + T * T * T / 24490000.0
Mval = MRaw - 360.0 * FLOOR(MRaw / 360.0)

MpRaw = 134.9633964 + 477198.8675055 * T + 0.0087414 * T * T + T * T * T / 69699.0 - T * T * T * T / 14712000.0
Mp = MpRaw - 360.0 * FLOOR(MpRaw / 360.0)

FRaw = 93.2720950 + 483202.0175233 * T - 0.0036539 * T * T - T * T * T / 3526000.0 + T * T * T * T / 863310000.0
Fval = FRaw - 360.0 * FLOOR(FRaw / 360.0)
//---------------------------------------------------//
// 3. Perturbations
//---------------------------------------------------//
dL = 6288.016 * SIN(Mp) + 1274.242 * SIN(2.0 * Dval - Mp) + 658.314 * SIN(2.0 * Dval) + 214.818 * SIN(2.0 * Mp) + 186.986 * SIN(Mval) + 109.154 * SIN(2.0 * Fval)

Lmoon = Lp + dL / 1000000.0

LsunRaw = 280.46646 + 36000.76983 * T + 0.0003032 * T * T
Lsun = LsunRaw - 360.0 * FLOOR(LsunRaw / 360.0)

phaseAngleRaw = Lmoon - Lsun
phaseAngle = phaseAngleRaw - 360.0 * FLOOR(phaseAngleRaw / 360.0)
//---------------------------------------------------//
// 4. Phase calculation
//---------------------------------------------------//
lunarPhase = (1.0 - COS(phaseAngle)) / 2.0
//---------------------------------------------------//
// 5. Derivatives and Phase Detection
//---------------------------------------------------//
IF barindex > 0 THEN
   delta1 = lunarPhase - lunarPhase[1]
   
   newMoonCond = lunarPhase < 0.1 AND lunarPhase[1] < 0.1 AND delta1 > 0 AND delta1[1] < 0
   firstQCond = lunarPhase[1] < 0.5 AND lunarPhase >= 0.5 AND delta1 > 0
   fullMoonCond = lunarPhase > 0.88 AND lunarPhase[1] > 0.88 AND delta1 <= 0 AND delta1[1] >= 0
   lastQCond = lunarPhase[1] > 0.5 AND lunarPhase <= 0.5 AND delta1 < 0
   //---------------------------------------------------//
   // 6. Plotting symbols
   //---------------------------------------------------//
   IF newMoonCond THEN
      DRAWTEXT("🌑", barindex[1], lunarPhase[1], Dialog, Bold, 16) COLOURED("black")
   ENDIF
   
   IF firstQCond THEN
      DRAWTEXT("🌓", barindex[1], lunarPhase[1], Dialog, Bold, 16) COLOURED("black")
   ENDIF
   
   IF fullMoonCond THEN
      DRAWTEXT("🌕", barindex[1], lunarPhase[1], Dialog, Bold, 16) COLOURED("black")
   ENDIF
   
   IF lastQCond THEN
      DRAWTEXT("🌗", barindex[1], lunarPhase[1], Dialog, Bold, 16) COLOURED("black")
   ENDIF
ENDIF
//---------------------------------------------------//
RETURN lunarPhase COLOURED(255, 255, 0) AS "Lunar Phase"

Nicolas thanked this post