//@version=6
indicator("Mocheur Combo — 21h50 + Open D + Asian", shorttitle = "Mocheur Combo", overlay = true, max_lines_count = 500, max_labels_count = 500, max_boxes_count = 500)

// Mocheur Combo complet — ① Bougie 21h50 + ② Open journalier + ③ Asian Weekly
// Liquidation = touch (high/low), fuseau Europe/Paris

const string MOCH = "Mocheur"
const string TZ = "Europe/Paris"
const int THURSDAY_CONFIRM_H = 15
const int THURSDAY_CONFIRM_M = 30

string G_GEN = "Général"
bool enCandle2150 = input.bool(true, "① Activer bougie horaire (21h50)", group = G_GEN)
bool enDailyOpen = input.bool(true, "② Activer opens journaliers", group = G_GEN)
bool enAsia = input.bool(true, "③ Activer session Asie + stratégie", group = G_GEN)

string grpThu = "Jeudi — linéaire vs consolidation"
float linearEffMin = input.float(0.35, "Efficacité min. (open→close / range)", minval = 0.15, maxval = 0.9, step = 0.01, group = grpThu)
float linearDirRatio = input.float(1.35, "Ratio bougies directionnelles", minval = 1.05, maxval = 3.0, step = 0.05, group = grpThu)
float linearImpulseMin = input.float(0.45, "Impulsion min. (open → high ou low)", minval = 0.25, maxval = 0.85, step = 0.01, group = grpThu)
float linearCloseExt = input.float(0.38, "Clôture proche extrême (0–1)", minval = 0.25, maxval = 0.5, step = 0.01, group = grpThu, tooltip = "Ex. 0,38 → clôture dans le tiers haut ou bas du range.")

string grpWeek = "Lun–Jeu — Asian classique"
bool showWeekMark1 = input.bool(true, "Pastille 1️⃣ sur le côté liquidé", group = grpWeek)

string MARK1_LBL = "1️⃣"
color colMark1Bg = color.new(#0EA5E9, 0)
color colMark1Txt = color.new(color.white, 0)
string WEEK_ASIAN_CLASSIQUE = "Asian classique : le marché veut liquider les deux côtés (HIGH et LOW). Ce n’est pas obligatoire."
string WEEK_TIP_HIGH = "Asian HIGH liquidé"
string WEEK_TIP_LOW = "Asian LOW liquidé"

string HINT_SURVOL = "Survolez ce symbole pour l’explication."
string MOCH_NOT_100 = "\n\nCe n’est pas une règle à 100 % : il y aura toujours des exceptions."

string WEEK_TOOLTIP_BTN = HINT_SURVOL + "\n\n" + WEEK_ASIAN_CLASSIQUE

string THU_LINEAR_TOOLTIP = HINT_SURVOL + "\n\nJeudi de continuation\n\nL’Asian part clairement dans un sens (même avec petits replis).\nLa journée continue en général dans le même sens.\n\nJeudi continuation = toute la journée dans le même sens.\n\nÀ partir de 15h30 : expansion nette → journée de continuation." + MOCH_NOT_100

string THU_WAIT_TOOLTIP = HINT_SURVOL + "\n\nJeudi — Asian en cours\n\nÀ la fin de session :\n• Linéaire → carte « Jeudi — continuation »\n• Consolidation → Asian classique (lun–mer)"

string FRI_TOOLTIP_BTN = HINT_SURVOL + "\n\nVendredi — Asian\n\nObjectif : liquider le HIGH et le LOW Asian coûte que coûte.\n\n• HIGH liquidé en premier → chercher une vente pour viser le LOW Asian.\n• LOW liquidé en premier → chercher un achat pour viser le HIGH Asian." + MOCH_NOT_100

f_thuIsLinear(float o, float c, float hi, float lo, int bulls, int bears) =>
    float rng = hi - lo
    float eff = rng > 0 ? math.abs(c - o) / rng : 0.0
    float closePos = rng > 0 ? (c - lo) / rng : 0.5
    float mid = (hi + lo) / 2
    float excUp = hi - o
    float excDn = o - lo
    float impulse = rng > 0 ? math.max(excUp, excDn) / rng : 0.0
    bool bullDom = bulls >= bears * linearDirRatio
    bool bearDom = bears >= bulls * linearDirRatio
    bool classic = eff >= linearEffMin and (bullDom or bearDom)
    bool byImpulse = impulse >= linearImpulseMin
    bool byCloseExt = closePos >= 1.0 - linearCloseExt or closePos <= linearCloseExt
    bool sameSide = c >= mid and o >= mid or c <= mid and o <= mid
    bool legThenRebound = impulse >= linearImpulseMin * 0.82 and eff >= 0.20
    classic or byImpulse or byCloseExt or (sameSide and eff >= 0.22) or legThenRebound

f_asianHelp(int dow, int thuType) =>
    string txt = na
    string tip = na
    if dow == dayofweek.friday
        txt := "ⓘ Vendredi"
        tip := FRI_TOOLTIP_BTN
    else if dow == dayofweek.thursday
        if thuType == 1
            txt := "ⓘ Jeudi — continuation"
            tip := THU_LINEAR_TOOLTIP
        else if thuType == 2
            txt := "ⓘ Asian classique"
            tip := WEEK_TOOLTIP_BTN
        else
            txt := "ⓘ Jeudi"
            tip := THU_WAIT_TOOLTIP
    else if dow == dayofweek.monday or dow == dayofweek.tuesday or dow == dayofweek.wednesday
        txt := "ⓘ Asian classique"
        tip := WEEK_TOOLTIP_BTN
    [txt, tip]

string grpAlert = "Alertes"
bool alertsOn = input.bool(true, "Activer alertes TradingView", group = grpAlert)
bool showAsianHelpBtn = input.bool(false, "Carte ⓘ aide au-dessus de l’Asian", group = grpAlert)
int maxHelpCards = input.int(40, "Max cartes ⓘ sur historique", minval = 20, maxval = 200, group = grpAlert, tooltip = "TradingView limite le script à 500 labels — réduire si des pastilles manquent.")

string grpFri = "Vendredi — Asian"
bool showFriMarks = input.bool(true, "Pastille 1️⃣ + Objectif fait", group = grpFri)
bool showFriEodStatus = input.bool(true, "Bilan fin de journée (à côté carte Vendredi)", group = grpFri)
int friLabelOffset = input.int(20, "Label : décalage guide (barres)", minval = 0, maxval = 80, group = grpFri)
bool friShowGuide = input.bool(false, "Trait guide discret", group = grpFri)
bool showFriHelpTable = input.bool(false, "Afficher résumé vendredi (table)", group = grpFri, tooltip = "Survolez la carte ⓘ Vendredi pour l’explication.")

string FRI_LBL_HINT = "Survolez ce symbole pour afficher l’explication."

string FRI_TIP1_HIGH = FRI_LBL_HINT + "\n\nAsian HIGH liquidé — vendredi.\n\nIl faut aller chercher le LOW Asian : chercher une vente." + MOCH_NOT_100
string FRI_TIP1_LOW = FRI_LBL_HINT + "\n\nAsian LOW liquidé — vendredi.\n\nIl faut aller chercher le HIGH Asian : chercher un achat." + MOCH_NOT_100
string FRI_DONE_LBL = "Objectif\nfait"
string FRI_DONE_TIP = FRI_LBL_HINT + "\n\nObjectif fait — Asian vendredi.\n\nLe HIGH et le LOW Asian sont liquidés." + MOCH_NOT_100
string FRI_EOD_TIP = FRI_LBL_HINT + "\n\nBilan fin de journée — vendredi Asian." + MOCH_NOT_100
string FRI_EOD_DONE = "Objectif fait"
string FRI_EOD_FAIL_NONE = "Objectif non fait — aucun côté liquidé"
string FRI_EOD_FAIL_LOW = "Objectif non fait — Asian LOW non liquidé"
string FRI_EOD_FAIL_HIGH = "Objectif non fait — Asian HIGH non liquidé"

f_friEodText(int firstSide, bool gotHigh, bool gotLow) =>
    string txt = FRI_EOD_FAIL_NONE
    if gotHigh and gotLow
        txt := FRI_EOD_DONE
    else if firstSide == 1 and not gotLow
        txt := FRI_EOD_FAIL_LOW
    else if firstSide == 2 and not gotHigh
        txt := FRI_EOD_FAIL_HIGH
    else if firstSide != 0
        txt := firstSide == 1 ? FRI_EOD_FAIL_LOW : FRI_EOD_FAIL_HIGH
    txt

//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
// ① BOUGIE 21H50
//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
string PASTILLE_TIP_2150 = HINT_SURVOL + "\n\nBougie 21h50 (M1)\n\nÀ 21h50, sur la bougie 1 minute, le marché cherche en général à liquider le HIGH et le LOW de cette bougie.\n\nSi les deux côtés sont liquidés : objectif fait pour la bougie 21h50.\n\nSi un côté n’a pas été liquidé avant la fin de journée : attendre l’ouverture de minuit (00h00 " + TZ + ") du lendemain. Il faut attendre minuit — la position à prendre pour liquider le côté restant (HIGH ou LOW de la bougie 21h50) se cherche à partir de cette ouverture de minuit, pas avant." + MOCH_NOT_100

string G_C2150 = "① Bougie horaire (21h50)"
int targetHour = input.int(21, "Heure", minval = 0, maxval = 23, group = G_C2150, tooltip = "Heure " + TZ + " (ex. 21h50).")
int targetMinute = input.int(50, "Minute", minval = 0, maxval = 59, group = G_C2150)
color highColor2150 = input.color(color.new(#A855F7, 0), "Couleur mèche haute", group = G_C2150)
color lowColor2150 = input.color(color.new(#C084FC, 0), "Couleur mèche basse", group = G_C2150)
int lineWidth2150 = input.int(2, "Épaisseur", minval = 1, maxval = 5, group = G_C2150)
string lineStyleIn2150 = input.string("Solid", "Style ligne", options = ["Solid", "Dashed", "Dotted"], group = G_C2150)
int maxHistory2150 = input.int(40, "Nb max de bougies à garder", minval = 1, maxval = 250, group = G_C2150, tooltip = "Réduire si pastilles ⓘ 21h50 manquent (limite ~500 labels partagés).")

lineStyle2150 = lineStyleIn2150 == "Dashed" ? line.style_dashed : lineStyleIn2150 == "Dotted" ? line.style_dotted : line.style_solid

string G_PASTILLE_2150 = "① Pastille 21h50"
bool showPastille2150 = input.bool(true, "Pastille ⓘ à côté de la bougie", group = G_PASTILLE_2150)
bool pastilleM1Only = input.bool(false, "Pastille uniquement sur graphique 1 min", group = G_PASTILLE_2150)
int pastilleBars = input.int(2, "Décalage à gauche (barres)", minval = 0, maxval = 15, group = G_PASTILLE_2150, tooltip = "Écart supplémentaire entre la bougie et les pastilles ⓘ / !.")
int pastilleVertTicks = input.int(12, "Décalage vertical hors bougie (ticks)", minval = 0, maxval = 500, group = G_PASTILLE_2150, tooltip = "Écart prix au-dessus du HIGH / sous le LOW pour que les pastilles ne chevauchent pas les bougies.")
float off2150Y = syminfo.mintick * pastilleVertTicks
color colPastilleBg = input.color(color.new(#A855F7, 12), "Fond pastille", group = G_PASTILLE_2150)
color colPastilleTxt = input.color(color.new(color.white, 0), "Texte pastille", group = G_PASTILLE_2150)
string pastilleSize = input.string(size.tiny, "Taille pastille", options = [size.tiny, size.small, size.normal], group = G_PASTILLE_2150)
bool showEod2150 = input.bool(true, "Pastille ! si côté non liquidé avant minuit", group = G_PASTILLE_2150)
bool showDone2150 = input.bool(true, "Pastille verte si HIGH + LOW liquidés avant minuit", group = G_PASTILLE_2150)

string PASTILLE_LBL_2150 = "ⓘ"
string DONE_LBL_2150 = "21h50\ncomplètement\nliquidé"
string EOD_LBL_2150 = "!"
string DONE_TIP_2150 = HINT_SURVOL + "\n\n21h50 complètement liquidé.\n\nLe HIGH et le LOW de la bougie 21h50 ont été liquidés avant la fin de journée (avant l’open de minuit 00h00 " + TZ + ").\n\nObjectif fait pour la bougie 21h50 — aucune position à chercher après minuit pour ce jour." + MOCH_NOT_100
string EOD_TIP_2150 = HINT_SURVOL + "\n\nBilan fin de journée — bougie 21h50.\n\nUn côté n’a pas été liquidé avant la fin de journée. Attendre l’ouverture de minuit (00h00 " + TZ + ") du lendemain, puis chercher une position pour liquider le HIGH ou le LOW 21h50 qui manque — uniquement à partir de minuit." + MOCH_NOT_100

color colDoneBg = input.color(color.new(#22C55E, 12), "Fond pastille verte", group = G_PASTILLE_2150)
color colDoneTxt = input.color(color.new(color.white, 0), "Texte pastille verte", group = G_PASTILLE_2150)

bool isM1Chart = timeframe.isminutes and timeframe.multiplier == 1
bool showPastilleBar = not pastilleM1Only or isM1Chart

var array<line> highLines2150 = array.new<line>()
var array<line> lowLines2150 = array.new<line>()
var array<float> highPrices2150 = array.new<float>()
var array<float> lowPrices2150 = array.new<float>()
var array<bool> highTouched2150 = array.new<bool>()
var array<bool> lowTouched2150 = array.new<bool>()
var array<label> markLbls2150 = array.new<label>()
var array<label> doneLbls2150 = array.new<label>()

var int candle2150Day = na
var int candle2150Bar = na
var float candle2150H = na
var float candle2150L = na
var bool liq2150H = false
var bool liq2150L = false
var bool done2150Placed = false
var label lbl2150Info = na

f_shift_2150_history() =>
    line.delete(array.shift(highLines2150))
    line.delete(array.shift(lowLines2150))
    array.shift(highPrices2150)
    array.shift(lowPrices2150)
    array.shift(highTouched2150)
    array.shift(lowTouched2150)
    if array.size(markLbls2150) > 0
        label.delete(array.shift(markLbls2150))
    if array.size(doneLbls2150) > 0
        label.delete(array.shift(doneLbls2150))

f_pastille_2150(int xBar, float yHigh) =>
    label.new(xBar - pastilleBars, yHigh + off2150Y, PASTILLE_LBL_2150, xloc = xloc.bar_index, style = label.style_label_down, color = colPastilleBg, textcolor = colPastilleTxt, size = pastilleSize, tooltip = PASTILLE_TIP_2150)

f_pastille_done_2150() =>
    float yMid = (candle2150H + candle2150L) / 2
    label.new(candle2150Bar - pastilleBars, yMid, DONE_LBL_2150, xloc = xloc.bar_index, style = label.style_label_right, color = colDoneBg, textcolor = colDoneTxt, size = pastilleSize, tooltip = DONE_TIP_2150)

f_eod_text_2150() =>
    string txt = ""
    if not liq2150H and not liq2150L
        txt := "21h50 — attendre minuit, puis liquider HIGH et LOW"
    else if not liq2150H
        txt := "21h50 — attendre minuit, puis liquider HIGH"
    else
        txt := "21h50 — attendre minuit, puis liquider LOW"
    txt

//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
// ② OPEN JOURNALIER
//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
string G_OPEN = "② Open journalier"
int maxDaysOpen = input.int(60, "Jours affichés (historique)", minval = 1, maxval = 499, group = G_OPEN, tooltip = "Limite ~500 lignes/labels partagées avec 21h50 + Asian.")
int rightExtOpen = input.int(30, "Extension à droite — jour en cours (barres)", minval = 1, maxval = 200, group = G_OPEN)
int labelBarsOpen = input.int(2, "Décalage du « d » à gauche (barres)", minval = 0, maxval = 15, group = G_OPEN, tooltip = "Écart entre la bougie et la pastille « d ».")

string G_OPEN_STYLE = "② Open — style"
color lineColorCur = input.color(color.new(#22C55E, 0), "Couleur — open du jour", group = G_OPEN_STYLE)
color lineColorHist = input.color(color.new(#22C55E, 55), "Couleur — opens passés", group = G_OPEN_STYLE)
int lineWidthOpen = input.int(2, "Épaisseur — jour en cours", minval = 1, maxval = 4, group = G_OPEN_STYLE)
int lineWidthHist = input.int(1, "Épaisseur — historique", minval = 1, maxval = 3, group = G_OPEN_STYLE)
string lineStOpen = input.string(line.style_solid, "Style de ligne", options = [line.style_solid, line.style_dotted, line.style_dashed], group = G_OPEN_STYLE)
string lblSizeCur = input.string(size.small, "Taille « d » — jour en cours", options = [size.tiny, size.small, size.normal], group = G_OPEN_STYLE)
string lblSizeHist = input.string(size.tiny, "Taille « d » — historique", options = [size.auto, size.tiny, size.small], group = G_OPEN_STYLE)
bool lblBgOpen = input.bool(true, "Fond discret derrière le « d »", group = G_OPEN_STYLE)
color lblBgCur = input.color(color.new(#22C55E, 25), "Fond pastille — jour en cours", group = G_OPEN_STYLE)
color lblBgHist = input.color(color.new(#22C55E, 70), "Fond pastille — historique", group = G_OPEN_STYLE)
bool showPriceScaleOpen = input.bool(true, "Niveau open du jour (échelle prix)", group = G_OPEN_STYLE)

string LBL_OPEN = "d"
string TIP_OPEN = MOCH + " — Open Daily\n\nOpen du jour (00h00 " + TZ + ").\n\nL’open daily agit comme un aimant pour le marché."

var line curLineOpen = na
var label curLblOpen = na
var array<line> historyOpen = array.new<line>()
var array<label> histLblsOpen = array.new<label>()

f_del_open_pair() =>
    if array.size(historyOpen) > 0
        line.delete(array.shift(historyOpen))
    if array.size(histLblsOpen) > 0
        label.delete(array.shift(histLblsOpen))

f_style_lbl_open(int xPos, bool isCur, float y) =>
    color txt = isCur ? lineColorCur : lineColorHist
    color bg = lblBgOpen ? (isCur ? lblBgCur : lblBgHist) : color(na)
    string sz = isCur ? lblSizeCur : lblSizeHist
    label.new(xPos - labelBarsOpen, y, LBL_OPEN, xloc = xloc.bar_index, style = label.style_label_upper_right, textcolor = txt, color = bg, size = sz, tooltip = TIP_OPEN)

//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
// ③ SESSION ASIE — identique au Mocheur Combo
//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
string G_ASIA = "③ Session Asie"
int asiaStartH = input.int(2, "Heure début session (Paris)", minval = 0, maxval = 23, group = G_ASIA, tooltip = "Europe/Paris — défaut 02h00.")
int asiaStartM = input.int(0, "Minute début session (Paris)", minval = 0, maxval = 59, group = G_ASIA)
int asiaEndH = input.int(8, "Heure fin session (Paris)", minval = 0, maxval = 23, group = G_ASIA, tooltip = "Europe/Paris — défaut 08h00 (la barre de 08h00 est hors session).")
int asiaEndM = input.int(0, "Minute fin session (Paris)", minval = 0, maxval = 59, group = G_ASIA)

f_asiaMinsNow() =>
    hour(time, TZ) * 60 + minute(time, TZ)

f_inAsiaSession() =>
    int nowM = f_asiaMinsNow()
    int startM = asiaStartH * 60 + asiaStartM
    int endM = asiaEndH * 60 + asiaEndM
    nowM >= startM and nowM < endM
color rColorAsia = input.color(color.aqua, "Couleur niveaux H/L", group = G_ASIA)
string rStyleAsia = input.string(line.style_solid, "Style H/L", options = [line.style_solid, line.style_dotted, line.style_dashed, line.style_arrow_both, line.style_arrow_left, line.style_arrow_right], group = G_ASIA)
int rWidthAsia = input.int(1, "Épaisseur H/L", minval = 1, maxval = 5, group = G_ASIA)
color mColorAsia = input.color(color.orange, "Couleur milieu", group = G_ASIA)
string mStyleAsia = input.string(line.style_solid, "Style milieu", options = [line.style_solid, line.style_dotted, line.style_dashed, line.style_arrow_both, line.style_arrow_left, line.style_arrow_right], group = G_ASIA)
int mWidthAsia = input.int(1, "Épaisseur milieu", minval = 1, maxval = 5, group = G_ASIA)
color bgColorAsia = input.color(color.new(color.aqua, 70), "Fond session", group = G_ASIA)
string maTypeAsia = "Static"

dowParis() =>
    dayofweek(time, TZ)

isMonWed() =>
    d = dowParis()
    d == dayofweek.monday or d == dayofweek.tuesday or d == dayofweek.wednesday

isThursday() =>
    dowParis() == dayofweek.thursday

isFriday() =>
    dowParis() == dayofweek.friday

bool timeIsAllowed = f_inAsiaSession()
bool newSession = timeIsAllowed and not timeIsAllowed[1]

var float refHighAsia = na
var float refLowAsia = na
refHighAsia := timeIsAllowed and not timeIsAllowed[1] ? high : timeIsAllowed and timeIsAllowed[1] ? math.max(high, refHighAsia) : refHighAsia
refLowAsia := timeIsAllowed and not timeIsAllowed[1] ? low : timeIsAllowed and timeIsAllowed[1] ? math.min(low, refLowAsia) : refLowAsia

var int xAsia = na
xAsia := newSession ? time : xAsia

var int l01_x1_s1 = na
var int l01_x2_s1 = na
var float l01_y1_s1 = na
var float l01_y2_s1 = na
var int l02_x1_s1 = na
var int l02_x2_s1 = na
var float l02_y1_s1 = na
var float l02_y2_s1 = na

var line l01 = na
var line l02 = na
var line l01_s1 = na
var line l02_s1 = na
var line maLine = na
var box box1 = na
var box boxCur = na

int extMs = 8 * 60 * 60 * 1000

var float asianH = na
var float asianL = na
var int asianKey = na
var float sessO = na
var float sessC = na
var int sessBull = 0
var int sessBear = 0
var int asianTypeThu = 0
var bool thuLinear = false
var bool thuExpansion = false
var bool thuExpBull = false
var label asianHelpLive = na
var array<label> asianHelpHist = array.new<label>()
var array<label> friEodHist = array.new<label>()
int friEodOffsetMs = 2 * 60 * 60 * 1000

if enAsia
    if newSession
        sessO := open
        sessC := close
        sessBull := 0
        sessBear := 0
        if showAsianHelpBtn
            if not na(asianHelpLive)
                label.delete(asianHelpLive)
            int dowLive = dayofweek(time, TZ)
            [txtLive, tipLive] = f_asianHelp(dowLive, 0)
            if not na(txtLive)
                asianHelpLive := label.new(xAsia, refHighAsia, txtLive, style = label.style_label_down, xloc = xloc.bar_time, color = color.new(rColorAsia, 25), textcolor = color.white, size = size.tiny, tooltip = tipLive)
        l01_s1 := line.new(l01_x1_s1, l01_y1_s1, l01_x2_s1, l01_y2_s1, xloc = xloc.bar_time, color = rColorAsia, width = rWidthAsia, style = rStyleAsia)
        l02_s1 := line.new(l02_x1_s1, l02_y1_s1, l02_x2_s1, l02_y2_s1, xloc = xloc.bar_time, color = rColorAsia, width = rWidthAsia, style = rStyleAsia)
        boxCur := box.new(l01_x1_s1, l01_y1_s1, l01_x2_s1 - extMs, l02_y2_s1, border_color = color.white, border_width = 0, border_style = line.style_solid, extend = extend.none, xloc = xloc.bar_time, bgcolor = bgColorAsia)
        if maTypeAsia == "Static"
            maLine := line.new((l01_x1_s1 + l02_x1_s1) / 2, (l01_y1_s1 + l02_y1_s1) / 2, (l01_x2_s1 + l02_x2_s1) / 2, (l01_y2_s1 + l02_y2_s1) / 2, xloc = xloc.bar_time, color = mColorAsia, width = mWidthAsia, style = mStyleAsia)

    if timeIsAllowed and not newSession
        sessC := close
        if close > open
            sessBull += 1
        else if close < open
            sessBear += 1
        line.delete(l01)
        line.delete(l02)
        line.delete(maLine)
        box.delete(box1)
        l01 := line.new(xAsia, refHighAsia, time + extMs, refHighAsia, xloc = xloc.bar_time, color = rColorAsia, width = rWidthAsia, style = rStyleAsia)
        l02 := line.new(xAsia, refLowAsia, time + extMs, refLowAsia, xloc = xloc.bar_time, color = rColorAsia, width = rWidthAsia, style = rStyleAsia)
        if maTypeAsia == "Static"
            float midAsia = (refHighAsia + refLowAsia) / 2
            maLine := line.new(xAsia, midAsia, time + extMs, midAsia, xloc = xloc.bar_time, color = mColorAsia, width = mWidthAsia, style = mStyleAsia)
        box1 := box.new(xAsia, refHighAsia, time, refLowAsia, border_color = color.white, border_width = 0, border_style = line.style_solid, extend = extend.none, xloc = xloc.bar_time, bgcolor = bgColorAsia)

    bool asiaJustClosed = not timeIsAllowed and timeIsAllowed[1] and not newSession
    if asiaJustClosed
        l01_x1_s1 := line.get_x1(l01)
        l01_x2_s1 := line.get_x2(l01)
        l01_y1_s1 := line.get_y1(l01)
        l01_y2_s1 := line.get_y2(l01)
        l02_x1_s1 := line.get_x1(l02)
        l02_x2_s1 := line.get_x2(l02)
        l02_y1_s1 := line.get_y1(l02)
        l02_y2_s1 := line.get_y2(l02)
        asianH := refHighAsia
        asianL := refLowAsia
        asianKey := time("D", TZ)
        if isThursday()
            thuLinear := f_thuIsLinear(sessO, sessC, asianH, asianL, sessBull, sessBear)
            asianTypeThu := thuLinear ? 1 : 2
            thuExpansion := false
        else
            thuLinear := false
            asianTypeThu := 0
        if showAsianHelpBtn
            if not na(asianHelpLive)
                label.delete(asianHelpLive)
                asianHelpLive := na
            int dowEnd = dayofweek(time, TZ)
            int thuEnd = asianTypeThu
            [txtEnd, tipEnd] = f_asianHelp(dowEnd, thuEnd)
            if not na(txtEnd)
                label histLbl = label.new(xAsia, refHighAsia, txtEnd, style = label.style_label_down, xloc = xloc.bar_time, color = color.new(rColorAsia, 25), textcolor = color.white, size = size.tiny, tooltip = tipEnd)
                array.push(asianHelpHist, histLbl)
                if array.size(asianHelpHist) > maxHelpCards
                    label.delete(array.shift(asianHelpHist))

//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
// EXÉCUTION — ① 21h50
//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

int dayKey = time("D", TZ)

if enCandle2150
    bool newDayParis2150 = barstate.isfirst ? false : ta.change(dayKey) != 0

    if newDayParis2150 and showPastilleBar and not na(candle2150Bar)
        if liq2150H and liq2150L and showDone2150 and not done2150Placed
            if not na(lbl2150Info)
                label.delete(lbl2150Info)
                lbl2150Info := na
            array.push(doneLbls2150, f_pastille_done_2150())
            done2150Placed := true
        else if showEod2150 and not done2150Placed and (not liq2150H or not liq2150L)
            color eodBg2150 = color.new(#EF4444, 20)
            string eodTip2150 = EOD_TIP_2150 + "\n\n" + f_eod_text_2150()
            if not liq2150H
                label.new(candle2150Bar - pastilleBars, candle2150H + off2150Y, EOD_LBL_2150, xloc = xloc.bar_index, style = label.style_label_down, color = eodBg2150, textcolor = color.white, size = size.small, tooltip = eodTip2150)
            if not liq2150L
                label.new(candle2150Bar - pastilleBars, candle2150L - off2150Y, EOD_LBL_2150, xloc = xloc.bar_index, style = label.style_label_up, color = eodBg2150, textcolor = color.white, size = size.small, tooltip = eodTip2150)
        if not na(lbl2150Info)
            label.delete(lbl2150Info)
            lbl2150Info := na
        done2150Placed := false

    bool isTargetCandle = hour(time, TZ) == targetHour and minute(time, TZ) == targetMinute

    if isTargetCandle
        line hLine2150 = line.new(bar_index, high, bar_index + 1, high, xloc = xloc.bar_index, extend = extend.right, color = highColor2150, width = lineWidth2150, style = lineStyle2150)
        line lLine2150 = line.new(bar_index, low, bar_index + 1, low, xloc = xloc.bar_index, extend = extend.right, color = lowColor2150, width = lineWidth2150, style = lineStyle2150)
        array.push(highLines2150, hLine2150)
        array.push(lowLines2150, lLine2150)
        array.push(highPrices2150, high)
        array.push(lowPrices2150, low)
        array.push(highTouched2150, false)
        array.push(lowTouched2150, false)
        if array.size(highLines2150) >= maxHistory2150
            f_shift_2150_history()
        candle2150Day := dayKey
        candle2150Bar := bar_index
        candle2150H := high
        candle2150L := low
        liq2150H := false
        liq2150L := false
        done2150Placed := false
        if not na(lbl2150Info)
            label.delete(lbl2150Info)
            lbl2150Info := na
        if showPastille2150 and showPastilleBar
            lbl2150Info := f_pastille_2150(bar_index, high)

    if not na(candle2150Bar) and bar_index > candle2150Bar and dayKey == candle2150Day
        if high >= candle2150H
            liq2150H := true
        if low <= candle2150L
            liq2150L := true
        if liq2150H and liq2150L and showDone2150 and not done2150Placed
            if not na(lbl2150Info)
                label.delete(lbl2150Info)
                lbl2150Info := na
            array.push(doneLbls2150, f_pastille_done_2150())
            done2150Placed := true

    if array.size(highLines2150) > 0
        for i = 0 to array.size(highLines2150) - 1
            line hLine2150 = array.get(highLines2150, i)
            line lLine2150 = array.get(lowLines2150, i)
            float hPrice2150 = array.get(highPrices2150, i)
            float lPrice2150 = array.get(lowPrices2150, i)
            bool hDone2150 = array.get(highTouched2150, i)
            bool lDone2150 = array.get(lowTouched2150, i)
            bool isAfterSourceHigh = bar_index > line.get_x1(hLine2150)
            bool isAfterSourceLow = bar_index > line.get_x1(lLine2150)
            if not hDone2150 and isAfterSourceHigh and high >= hPrice2150
                line.set_x2(hLine2150, bar_index)
                line.set_extend(hLine2150, extend.none)
                array.set(highTouched2150, i, true)
            if not lDone2150 and isAfterSourceLow and low <= lPrice2150
                line.set_x2(lLine2150, bar_index)
                line.set_extend(lLine2150, extend.none)
                array.set(lowTouched2150, i, true)

//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
// STRATÉGIE HEBDOMADAIRE
//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━

var int tradeKey = na
var bool weekMarkHigh = false
var bool weekMarkLow = false
var int friFirst = 0
var int friFirstBarIx = na
var bool friFirstPlaced = false
var bool friDoneShown = false
var bool friDayHigh = false
var bool friDayLow = false
var int friCardX = na
var float friCardY = na
var bool friEodPlaced = false

bool friDayJustEnded = dayofweek(time[1], TZ) == dayofweek.friday and dowParis() != dayofweek.friday

if friDayJustEnded and showFriEodStatus and not friEodPlaced and not na(friCardX) and not na(friCardY)
    string eodTxt = f_friEodText(friFirst, friDayHigh, friDayLow)
    color eodBg = friDayHigh and friDayLow ? color.new(color.teal, 20) : color.new(color.red, 25)
    label eodLbl = label.new(friCardX + friEodOffsetMs, friCardY, eodTxt, style = label.style_label_left, xloc = xloc.bar_time, color = eodBg, textcolor = color.white, size = size.tiny, tooltip = FRI_EOD_TIP + "\n\n" + eodTxt)
    array.push(friEodHist, eodLbl)
    if array.size(friEodHist) > 60
        label.delete(array.shift(friEodHist))
    friEodPlaced := true

if dayKey != tradeKey
    tradeKey := dayKey
    weekMarkHigh := false
    weekMarkLow := false
    friFirst := 0
    friFirstBarIx := na
    friFirstPlaced := false
    friDoneShown := false
    friDayHigh := false
    friDayLow := false
    thuExpansion := false
    thuExpBull := false

bool hasLevels = enAsia and not na(asianH) and not na(asianL)
bool hasAsian = hasLevels and (asianKey == dayKey or isFriday())
float rangeAsian = hasLevels ? asianH - asianL : 0.0
bool afterAsia = hasAsian and not timeIsAllowed
bool afterAsiaFri = hasLevels and isFriday() and not timeIsAllowed

bool touchHigh = hasAsian and high >= asianH
bool touchLow = hasAsian and low <= asianL
bool friSweepHigh = afterAsiaFri and high >= asianH and (bar_index == 0 or high[1] < asianH)
bool friSweepLow = afterAsiaFri and low <= asianL and (bar_index == 0 or low[1] > asianL)
bool asiaBarJustClosed = not timeIsAllowed and timeIsAllowed[1]
bool asiaSessionClosed = enAsia and not timeIsAllowed and timeIsAllowed[1] and not newSession

if asiaSessionClosed and isFriday()
    friCardX := xAsia
    friCardY := asianH
    friDayHigh := false
    friDayLow := false
    friEodPlaced := false
    friFirst := 0
    friFirstBarIx := na
    friFirstPlaced := false
    friDoneShown := false

afterThuConfirm() =>
    h = hour(time, TZ)
    m = minute(time, TZ)
    h > THURSDAY_CONFIRM_H or (h == THURSDAY_CONFIRM_H and m >= THURSDAY_CONFIRM_M)

if isThursday() and thuLinear and hasAsian and afterThuConfirm() and not thuExpansion
    bool biasUp = sessC > sessO
    float move = biasUp ? close - asianH : asianL - close
    if move > rangeAsian * 0.25
        thuExpansion := true
        thuExpBull := close > (asianH + asianL) / 2

bool friActive = isFriday() and afterAsiaFri
bool weekActive = afterAsia and not isFriday() and (isMonWed() or (isThursday() and asianTypeThu == 2))
bool liqEventHigh = hasAsian and touchHigh and (asiaBarJustClosed or high[1] < asianH)
bool liqEventLow = hasAsian and touchLow and (asiaBarJustClosed or low[1] > asianL)
bool weekLiqHigh = weekActive and liqEventHigh
bool weekLiqLow = weekActive and liqEventLow

if showWeekMark1
    if weekLiqHigh and not weekMarkHigh
        weekMarkHigh := true
        label.new(bar_index, asianH, MARK1_LBL, style = label.style_label_down, xloc = xloc.bar_index, color = colMark1Bg, textcolor = colMark1Txt, size = size.normal, tooltip = WEEK_TIP_HIGH)
        if alertsOn
            alert(MOCH + " — Asian HIGH liquidé", alert.freq_once_per_bar)
    if weekLiqLow and not weekMarkLow
        weekMarkLow := true
        label.new(bar_index, asianL, MARK1_LBL, style = label.style_label_up, xloc = xloc.bar_index, color = colMark1Bg, textcolor = colMark1Txt, size = size.normal, tooltip = WEEK_TIP_LOW)
        if alertsOn
            alert(MOCH + " — Asian LOW liquidé", alert.freq_once_per_bar)

if friActive
    if touchHigh
        friDayHigh := true
    if touchLow
        friDayLow := true

if showFriMarks and friActive and not friFirstPlaced
    int xLiq = bar_index
    int xLbl = bar_index - friLabelOffset
    if friSweepHigh
        friFirst := 1
        friFirstPlaced := true
        friFirstBarIx := bar_index
        if friShowGuide and friLabelOffset > 0
            line.new(xLbl, asianH, xLiq, asianH, xloc = xloc.bar_index, color = color.new(rColorAsia, 60), width = 1, style = line.style_dotted)
        label.new(xLiq, asianH, MARK1_LBL, style = label.style_label_down, xloc = xloc.bar_index, color = colMark1Bg, textcolor = colMark1Txt, size = size.normal, tooltip = FRI_TIP1_HIGH)
        if alertsOn
            alert(MOCH + " — Vendredi : Asian HIGH liquidé — chercher vente vers LOW Asian", alert.freq_once_per_bar)
    else if friSweepLow
        friFirst := 2
        friFirstPlaced := true
        friFirstBarIx := bar_index
        if friShowGuide and friLabelOffset > 0
            line.new(xLbl, asianL, xLiq, asianL, xloc = xloc.bar_index, color = color.new(rColorAsia, 60), width = 1, style = line.style_dotted)
        label.new(xLiq, asianL, MARK1_LBL, style = label.style_label_up, xloc = xloc.bar_index, color = colMark1Bg, textcolor = colMark1Txt, size = size.normal, tooltip = FRI_TIP1_LOW)
        if alertsOn
            alert(MOCH + " — Vendredi : Asian LOW liquidé — chercher achat vers HIGH Asian", alert.freq_once_per_bar)

if showFriMarks and friActive and not friDoneShown and friFirst != 0 and bar_index > nz(friFirstBarIx, bar_index)
    color doneBg = color.new(color.teal, 15)
    bool friSecondLow = friFirst == 1 and touchLow
    bool friSecondHigh = friFirst == 2 and touchHigh
    if friSecondLow
        friDoneShown := true
        label.new(bar_index, asianL, FRI_DONE_LBL, style = label.style_label_right, xloc = xloc.bar_index, color = doneBg, textcolor = color.white, size = size.small, tooltip = FRI_DONE_TIP)
        if alertsOn
            alert(MOCH + " — Vendredi : objectif fait — Asian HIGH + LOW", alert.freq_once_per_bar)
    else if friSecondHigh
        friDoneShown := true
        label.new(bar_index, asianH, FRI_DONE_LBL, style = label.style_label_right, xloc = xloc.bar_index, color = doneBg, textcolor = color.white, size = size.small, tooltip = FRI_DONE_TIP)
        if alertsOn
            alert(MOCH + " — Vendredi : objectif fait — Asian HIGH + LOW", alert.freq_once_per_bar)

if isFriday() and showFriHelpTable and barstate.islast
    var table friTbl = table.new(position.top_right, 1, 5, bgcolor = color.new(color.black, 15), border_width = 1)
    table.cell(friTbl, 0, 0, MOCH + " — Vendredi", text_color = color.white, text_size = size.small)
    table.cell(friTbl, 0, 1, "Liquider HIGH + LOW (obligatoire)", text_color = color.silver, text_size = size.tiny)
    table.cell(friTbl, 0, 2, "1er HIGH → chercher vente → LOW", text_color = color.silver, text_size = size.tiny)
    table.cell(friTbl, 0, 3, "1er LOW → chercher achat → HIGH", text_color = color.silver, text_size = size.tiny)
    table.cell(friTbl, 0, 4, "Liquider HIGH + LOW", text_color = color.silver, text_size = size.tiny)

//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
// OPEN JOURNALIER — exécution
//━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━━
if enDailyOpen
    int tDayOpen = time("D", TZ)
    bool newDayOpen = barstate.isfirst ? true : ta.change(tDayOpen) != 0

    if newDayOpen
        if not na(curLineOpen)
            int xEndOpen = bar_index - 1
            float yLvOpen = curLineOpen.get_y1()
            curLineOpen.set_x2(xEndOpen)
            curLineOpen.set_color(lineColorHist)
            curLineOpen.set_width(lineWidthHist)
            histLblsOpen.push(f_style_lbl_open(xEndOpen, false, yLvOpen))
            historyOpen.push(curLineOpen)
            while historyOpen.size() > maxDaysOpen
                f_del_open_pair()
            if not na(curLblOpen)
                curLblOpen.delete()
                curLblOpen := na
        curLineOpen := line.new(bar_index, open, bar_index, open, xloc = xloc.bar_index, color = lineColorCur, style = lineStOpen, width = lineWidthOpen)
        if lblBgOpen
            curLblOpen := label.new(bar_index - labelBarsOpen, open, LBL_OPEN, xloc = xloc.bar_index, style = label.style_label_upper_right, textcolor = lineColorCur, color = lblBgCur, size = lblSizeCur, tooltip = TIP_OPEN)
        else
            curLblOpen := label.new(bar_index - labelBarsOpen, open, LBL_OPEN, xloc = xloc.bar_index, style = label.style_label_upper_right, textcolor = lineColorCur, color = color(na), size = lblSizeCur, tooltip = TIP_OPEN)

    int xRightOpen = barstate.islast ? bar_index + rightExtOpen : bar_index
    if not na(curLineOpen)
        curLineOpen.set_x2(xRightOpen)
        curLineOpen.set_color(lineColorCur)
        curLineOpen.set_width(lineWidthOpen)
    if not na(curLblOpen)
        curLblOpen.set_xy(xRightOpen - labelBarsOpen, curLineOpen.get_y1())

float openCur = enDailyOpen and not na(curLineOpen) ? curLineOpen.get_y1() : na
plot(showPriceScaleOpen ? openCur : na, "Open D — jour en cours", lineColorCur, display = display.price_scale + display.data_window)