Il y a de très nombreuses erreurs dans ce code, je viens de le retravailler avec notre propre modèle d’intelligence artificielle qui sera bientôt disponible à la communauté (en test interne pour le moment), bien plus performant et adapté à la programmation pour ProRealTime, encore quelques semaines et on sera prêt pour une sortie officielle 🙂

Voici un résumé de tous les changements effectués :

• DailyHigh/DailyLow/DailyClose/DailyOpen remplacés par DHigh, DLow, DClose, DOpen qui sont les fonctions ProBuilder officielles.
• WeekHigh/WeekLow/WeekClose remplacés par un bloc TIMEFRAME(1 week, updateonclose) avec high[1], low[1], close[1] pour lire la semaine précédente.
• WeekStart/WeekEnd supprimés, inexistants en ProBuilder. La détection de la semaine utilise OpenDayOfWeek = 1 (lundi).
• DRAWLEVEL remplacé par DRAWHLINE(valeur) COLOURED(r,g,b). DRAWLEVEL n’existe pas.
• Les boucles FOR rétroactives sur 1439/10079 barres entièrement supprimées. En ProBuilder, les index [i] dans une boucle FOR représentent des barres passées de la série, pas des minutes d’une journée. Le calcul est remplacé par une accumulation barre à barre avec reset au changement de date/semaine via les conditions date <> date[1] et OpenDayOfWeek.
• DEFPARAM drawonlastbaronly = true ajouté pour que les DRAWHLINE soient tracés uniquement sur la dernière barre visible, ce qui est l’usage standard pour ce type d’indicateur de niveaux fixes.
• Les couleurs des niveaux sont différenciées par type (blanc pour journalier, gris pour hebdo, jaune pour POC/VAH/VAL J-1, bleu pour semaine) pour améliorer la lisibilité, car DRAWHLINE ne supporte pas de labels texte.

// ============================================
// INDICATEUR NIVEAUX IMPORTANTS + VWAP
// Low, High, Close J-1 | Semaine precedente
// POC, VAH, VAL J-1 et Semaine precedente
// Open du jour
// VWAP Jour, J-1, Semaine precedente
// ============================================


DEFPARAM drawonlastbaronly = true


// -----------------------------------------------
// DONNEES JOURNALIERES via fonctions D*
// -----------------------------------------------
YesterdayLow   = DLow(1)
YesterdayHigh  = DHigh(1)
YesterdayClose = DClose(1)
TodayOpen      = DOpen(0)


// -----------------------------------------------
// DONNEES SEMAINE PRECEDENTE via TIMEFRAME weekly
// -----------------------------------------------
TIMEFRAME(1 week, updateonclose)
WeekHighVal  = high[1]
WeekLowVal   = low[1]
WeekCloseVal = close[1]
TIMEFRAME(default)


// -----------------------------------------------
// VWAP DU JOUR
// Accumulation barre a barre, reset au changement de date
// -----------------------------------------------
IF date <> date[1] THEN
    cumTPVday = typicalPrice * volume
    cumVolday = volume
ELSE
    cumTPVday = cumTPVday[1] + typicalPrice * volume
    cumVolday = cumVolday[1] + volume
ENDIF


IF cumVolday > 0 THEN
    VWAPday = cumTPVday / cumVolday
ELSE
    VWAPday = close
ENDIF


// -----------------------------------------------
// VWAP J-1 : valeur finale du VWAP au dernier moment de J-1
// On stocke le VWAP quand on est encore sur J-1 et qu'on
// est a la derniere barre de cette journee
// -----------------------------------------------
IF date[1] <> date[2] THEN
    VWAPyesterday = VWAPday[1]
ELSE
    VWAPyesterday = VWAPyesterday[1]
ENDIF


// -----------------------------------------------
// VWAP SEMAINE PRECEDENTE
// Accumulation sur la semaine courante, reset chaque lundi
// On garde la valeur finale de la semaine precedente
// -----------------------------------------------
IF OpenDayOfWeek = 1 AND OpenDayOfWeek[1] <> 1 THEN
    // Premier bar du lundi : reset
    cumTPVweek = typicalPrice * volume
    cumVolweek = volume
ELSE
    cumTPVweek = cumTPVweek[1] + typicalPrice * volume
    cumVolweek = cumVolweek[1] + volume
ENDIF


IF cumVolweek > 0 THEN
    VWAPweekCur = cumTPVweek / cumVolweek
ELSE
    VWAPweekCur = close
ENDIF


// Sauvegarder le VWAP de fin de semaine precedente
IF OpenDayOfWeek = 1 AND OpenDayOfWeek[1] <> 1 THEN
    VWAPweek = VWAPweekCur[1]
ELSE
    VWAPweek = VWAPweek[1]
ENDIF


// -----------------------------------------------
// VOLUME PROFILE J-1 : POC, VAH, VAL
// Accumulation barre a barre sur J-1
// POC = Close de la barre avec le plus grand volume sur J-1
// -----------------------------------------------
IF date[1] <> date[2] THEN
    // On vient de passer a J-1 : on lit la toute derniere valeur connue
    // POC : on accumule sur J-1 barre par barre
    IF volume[1] > maxVolYest THEN
        maxVolYest = volume[1]
        POCyesterday = close[1]
    ENDIF
ENDIF


// Accumulation sur la journee courante pour préparer J-1 le lendemain
IF date <> date[1] THEN
    maxVolDay   = volume
    POCdayCur   = close
    totalVolDay = volume
    cumVolForVA = volume
    VAHdayCur   = close
    VALdayCur   = close
ELSE
    totalVolDay = totalVolDay[1] + volume
    IF volume > maxVolDay[1] THEN
        maxVolDay = volume
        POCdayCur = close
    ELSE
        maxVolDay = maxVolDay[1]
        POCdayCur = POCdayCur[1]
    ENDIF
    cumVolForVA = cumVolForVA[1] + volume
    IF cumVolForVA <= totalVolDay * 0.70 THEN
        IF close > VAHdayCur[1] THEN
            VAHdayCur = close
        ELSE
            VAHdayCur = VAHdayCur[1]
        ENDIF
        VALdayCur = VALdayCur[1]
    ELSE
        VAHdayCur = VAHdayCur[1]
        IF close < VALdayCur[1] THEN
            VALdayCur = close
        ELSE
            VALdayCur = VALdayCur[1]
        ENDIF
    ENDIF
ENDIF


// Figer les valeurs de J-1 au passage au jour suivant
IF date <> date[1] THEN
    POCyesterday  = POCdayCur[1]
    VAHyesterday  = VAHdayCur[1]
    VALyesterday  = VALdayCur[1]
ELSE
    POCyesterday  = POCyesterday[1]
    VAHyesterday  = VAHyesterday[1]
    VALyesterday  = VALyesterday[1]
ENDIF


// -----------------------------------------------
// VOLUME PROFILE SEMAINE PRECEDENTE
// -----------------------------------------------
IF OpenDayOfWeek = 1 AND OpenDayOfWeek[1] <> 1 THEN
    maxVolWk    = volume
    POCweekCur  = close
    totVolWk    = volume
    cumVolWkVA  = volume
    VAHweekCur  = close
    VALweekCur  = close
ELSE
    totVolWk = totVolWk[1] + volume
    IF volume > maxVolWk[1] THEN
        maxVolWk   = volume
        POCweekCur = close
    ELSE
        maxVolWk   = maxVolWk[1]
        POCweekCur = POCweekCur[1]
    ENDIF
    cumVolWkVA = cumVolWkVA[1] + volume
    IF cumVolWkVA <= totVolWk * 0.70 THEN
        IF close > VAHweekCur[1] THEN
            VAHweekCur = close
        ELSE
            VAHweekCur = VAHweekCur[1]
        ENDIF
        VALweekCur = VALweekCur[1]
    ELSE
        VAHweekCur = VAHweekCur[1]
        IF close < VALweekCur[1] THEN
            VALweekCur = close
        ELSE
            VALweekCur = VALweekCur[1]
        ENDIF
    ENDIF
ENDIF


IF OpenDayOfWeek = 1 AND OpenDayOfWeek[1] <> 1 THEN
    POCweek  = POCweekCur[1]
    VAHweek  = VAHweekCur[1]
    VALweek  = VALweekCur[1]
ELSE
    POCweek  = POCweek[1]
    VAHweek  = VAHweek[1]
    VALweek  = VALweek[1]
ENDIF


// -----------------------------------------------
// TRACE DES NIVEAUX JOURNALIERS
// -----------------------------------------------
DRAWHLINE(YesterdayLow)   COLOURED(255,255,255)
DRAWHLINE(YesterdayHigh)  COLOURED(255,255,255)
DRAWHLINE(YesterdayClose) COLOURED(255,255,255)
DRAWHLINE(TodayOpen)      COLOURED(255,255,255)


// -----------------------------------------------
// TRACE DES NIVEAUX HEBDOMADAIRES
// -----------------------------------------------
DRAWHLINE(WeekHighVal)   COLOURED(200,200,200)
DRAWHLINE(WeekLowVal)    COLOURED(200,200,200)
DRAWHLINE(WeekCloseVal)  COLOURED(200,200,200)


// -----------------------------------------------
// TRACE VOLUME PROFILE J-1
// -----------------------------------------------
DRAWHLINE(POCyesterday) COLOURED(255,200,0)
DRAWHLINE(VAHyesterday) COLOURED(255,150,0)
DRAWHLINE(VALyesterday) COLOURED(255,150,0)


// -----------------------------------------------
// TRACE VOLUME PROFILE SEMAINE PRECEDENTE
// -----------------------------------------------
DRAWHLINE(POCweek) COLOURED(0,200,255)
DRAWHLINE(VAHweek) COLOURED(0,150,200)
DRAWHLINE(VALweek) COLOURED(0,150,200)


// -----------------------------------------------
// TRACE VWAP
// -----------------------------------------------
DRAWHLINE(VWAPday)       COLOURED(255,255,0)
DRAWHLINE(VWAPyesterday) COLOURED(200,200,0)
DRAWHLINE(VWAPweek)      COLOURED(0,255,200)


RETURN 

niveaux-importants-cles-trading.png