PHP psaume Examples

Programming Language: PHP

Method/Function: psaume

Examples at hotexamples.com: 4

PHP psaume - 4 examples found. These are the top rated real world PHP examples of psaume extracted from open source projects. You can rate examples to help us improve the quality of examples.

Example #1

Show file

File: none.php Project: bmaire28/LiturgiaHorarum

function none($jour, $date_l, $date_fr, $var, $propre, $temp)
{
    /*
     * Chargement du squelette de None dans $lau
     * remplissage de $none pour l'affichage de l'office
     *
     */
    $row = 0;
    $fp = fopen("offices_r/none.csv", "r");
    $jrdelasemaine--;
    while ($data = fgetcsv($fp, 1000, ";")) {
        $latin = $data[0];
        $francais = $data[1];
        $lau[$row]['latin'] = $latin;
        $lau[$row]['francais'] = $francais;
        $row++;
    }
    fclose($fp);
    $max = $row;
    $none = "<table>";
    for ($row = 0; $row < $max; $row++) {
        $lat = $lau[$row]['latin'];
        $fr = $lau[$row]['francais'];
        $testAlleluia = utf8_encode($lat);
        if ($tem == "Tempus Quadragesimae" && $testAlleluia == "Allelúia.") {
            $lat = "";
            $fr = "";
        }
        if ($tem == "Tempus passionis" && $testAlleluia == "Allelúia.") {
            $lat = "";
            $fr = "";
        }
        if ($lat == "#JOUR") {
            if ($propre['jour']['latin']) {
                $pr_lat = $propre['jour']['latin'];
                $pr_fr = $propre['jour']['francais'];
            }
            if (!$pr_lat) {
                $pr_lat = $temp['jour']['latin'];
                $pr_fr = $temp['jour']['francais'];
            }
            if ($pr_lat) {
                $none .= "<tr><td style=\"width: 49%; text-align: center;\"><p style=\"font-weight: bold;\">{$pr_lat}</p></td>";
                $none .= "<td style=\"width: 49%; text-align: center;\"><p style=\"font-weight: bold;\">{$pr_fr}</p></td></tr>";
            }
            if ($propre['intitule']['latin']) {
                $intitule_lat = $propre['intitule']['latin'];
                $intitule_fr = $propre['intitule']['francais'];
            }
            if (!$intitule_lat) {
                $intitule_lat = $temp['intitule']['latin'];
                $intitule_fr = $temp['intitule']['francais'];
            }
            if ($intitule_lat) {
                $none .= "<tr><td style=\"width: 49%; text-align: center;\"><p style=\"font-weight: bold;\">{$intitule_lat}</p></td>";
                $none .= "<td style=\"width: 49%; text-align: center;\"><p style=\"font-weight: bold;\">{$intitule_fr}</p></td></tr>";
            }
            if (!$rang_lat) {
                $rang_lat = $propre['rang']['latin'];
                $rang_fr = $propre['rang']['francais'];
            }
            if ($rang_lat) {
                $none .= "<tr><td style=\"width: 49%; text-align: center;\"><h3>{$rang_lat}</h3></td>";
                $none .= "<td style=\"width: 49%; text-align: center;\"><h3>{$rang_fr}</h3></td></tr>";
            }
            if (!$pr_lat and !$intitule_lat and !$rang_lat) {
                $none .= "<tr><td style=\"width: 49%; text-align: center;\"><h2>{$jours_l[$jrdelasemaine]} ad Nonam.</h2></td>\r\n  \t\t\t\t\t<td style=\"width: 49%; text-align: center;\"><h2>{$jours_fr[$jrdelasemaine]} &agrave; None.</h2></td></tr>";
            } else {
                $none .= "<tr><td style=\"width: 49%; text-align: center;\"><h2>Ad Nonam</h2></td>";
                $none .= "<td style=\"width: 49%; text-align: center;\"><h2>A None</h2></td></tr>";
            }
        } elseif ($lat == "#HYMNUS_nonam") {
            if ($propre['HYMNUS_nonam']['latin']) {
                $hymne9 = $propre['HYMNUS_nonam']['latin'];
            } elseif ($temp['HYMNUS_nonam']['latin']) {
                $hymne9 = $temp['HYMNUS_nonam']['latin'];
            } else {
                $hymne9 = $var['HYMNUS_nonam']['latin'];
            }
            $none .= hymne($hymne9);
        } elseif ($lat == "#ANT1*") {
            if ($propre['ant4']['latin']) {
                $antlat = nl2br($propre['ant4']['latin']);
                $antfr = nl2br($propre['ant4']['francais']);
            } elseif ($temp['ant4']['latin']) {
                $antlat = nl2br($temp['ant4']['latin']);
                $antfr = nl2br($temp['ant4']['francais']);
            } else {
                $antlat = $var['ant4']['latin'];
                $antfr = $var['ant4']['francais'];
            }
            $none .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#PS1") {
            $psaume = "ps125";
            $none .= psaume($psaume);
        } elseif ($lat == "#ANT1") {
            if ($propre['ant4']['latin']) {
                $antlat = nl2br($propre['ant4']['latin']);
                $antfr = nl2br($propre['ant4']['francais']);
            } elseif ($temp['ant4']['latin']) {
                $antlat = nl2br($temp['ant4']['latin']);
                $antfr = nl2br($temp['ant4']['francais']);
            } else {
                $antlat = $var['ant4']['latin'];
                $antfr = $var['ant4']['francais'];
            }
            $none .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#ANT2*") {
            if ($propre['ant5']['latin']) {
                $antlat = nl2br($propre['ant5']['latin']);
                $antfr = nl2br($propre['ant5']['francais']);
            } elseif ($temp['ant5']['latin']) {
                $antlat = nl2br($temp['ant5']['latin']);
                $antfr = nl2br($temp['ant5']['francais']);
            } else {
                $antlat = $var['ant5']['latin'];
                $antfr = $var['ant5']['francais'];
            }
            $none .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#PS2") {
            $psaume = "ps126";
            $none .= psaume($psaume);
        } elseif ($lat == "#ANT2") {
            if ($propre['ant5']['latin']) {
                $antlat = nl2br($propre['ant5']['latin']);
                $antfr = nl2br($propre['ant5']['francais']);
            } elseif ($temp['ant5']['latin']) {
                $antlat = nl2br($temp['ant5']['latin']);
                $antfr = nl2br($temp['ant5']['francais']);
            } else {
                $antlat = $var['ant4']['latin'];
                $antfr = $var['ant4']['francais'];
            }
            $none .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#ANT3*") {
            if ($propre['ant6']['latin']) {
                $antlat = nl2br($propre['ant6']['latin']);
                $antfr = nl2br($propre['ant6']['francais']);
            } elseif ($temp['ant6']['latin']) {
                $antlat = nl2br($temp['ant6']['latin']);
                $antfr = nl2br($temp['ant6']['francais']);
            } else {
                $antlat = $var['ant6']['latin'];
                $antfr = $var['ant6']['francais'];
            }
            $none .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#PS3") {
            $psaume = "ps127";
            $none .= psaume($psaume);
        } elseif ($lat == "#ANT3") {
            if ($propre['ant6']['latin']) {
                $antlat = nl2br($propre['ant6']['latin']);
                $antfr = nl2br($propre['ant6']['francais']);
            } elseif ($temp['ant6']['latin']) {
                $antlat = nl2br($temp['ant6']['latin']);
                $antfr = nl2br($temp['ant6']['francais']);
            } else {
                $antlat = $var['ant6']['latin'];
                $antfr = $var['ant6']['francais'];
            }
            $none .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#LB_9") {
            if ($propre['LB_9']['latin']) {
                $lectiobrevis = $propre['LB_9']['latin'];
            } elseif ($temp['LB_9']['latin']) {
                $lectiobrevis = $temp['LB_9']['latin'];
            } else {
                $lectiobrevis = $var['LB_9']['latin'];
            }
            $none .= lectiobrevis($lectiobrevis);
        } elseif ($lat == "#RB_9") {
            if ($propre['RB_9']['latin']) {
                $rblat = nl2br($propre['RB_9']['latin']);
                $rbfr = nl2br($propre['RB_9']['francais']);
            } elseif ($temp['RB_9']['latin']) {
                $rblat = nl2br($temp['RB_9']['latin']);
                $rbfr = nl2br($temp['RB_9']['francais']);
            } else {
                $rblat = nl2br($var['RB_9']['latin']);
                $rbfr = nl2br($var['RB_9']['francais']);
            }
            $none .= "<tr><td>{$rblat}</td><td>{$rbfr}</td></tr>";
        } elseif ($lat == "#ORATIO_9") {
            if ($propre['oratio']['latin']) {
                $oratio9lat = $propre['oratio']['latin'];
                $oratio9fr = $propre['oratio']['francais'];
            } elseif ($temp['oratio']['latin']) {
                $oratio9lat = $temp['oratio']['latin'];
                $oratio9fr = $temp['oratio']['francais'];
            } elseif ($var['oratio_9']['latin']) {
                $oratio9lat = $var['oratio_9']['latin'];
                $oratio9fr = $var['oratio_9']['francais'];
            } elseif ($var['oratio']['latin']) {
                $oratio9lat = $var['oratio']['latin'];
                $oratio9fr = $var['oratio']['francais'];
            }
            switch (substr($oratio9lat, -6)) {
                case "istum.":
                    $oratio9lat = str_replace(" Per Christum.", " Per Christum D&oacute;minum nostrum.", $oratio9lat);
                    $oratio9fr .= " Par le Christ notre Seigneur.";
                    break;
                case "minum.":
                    $oratio9lat = str_replace(substr($oratio9lat, -13), " Per Christum D&oacute;minum nostrum.", $oratio9lat);
                    $oratio9fr .= " Par le Christ notre Seigneur.";
                    break;
                case "tecum.":
                    $oratio9lat = str_replace(" Qui tecum.", " Qui vivit et regnat in s&aelig;cula s&aelig;cul&oacute;rum.", $oratio9lat);
                    $oratio9fr .= " Lui qui vit et r&egrave;gne pour tous les si&egrave;cles des si&egrave;cles.";
                    break;
                case "vivit.":
                    $oratio9lat = str_replace(" Qui vivit.", " Qui vivit et regnat in s&aelig;cula s&aelig;cul&oacute;rum.", $oratio9lat);
                    $oratio9fr .= " Lui qui vit et r&egrave;gne pour tous les si&egrave;cles des si&egrave;cles.";
                    break;
                case "vivis.":
                    $oratio9lat = str_replace(" Qui vivis.", " Qui vivis et regnas in s&aelig;cula s&aelig;cul&oacute;rum.", $oratio9lat);
                    $oratio9fr .= " Toi qui vis et r&egrave;gnes pour tous les si&egrave;cles des si&egrave;cles.";
                    break;
            }
            $none .= "<tr><td>Or&eacute;mus</td><td>Prions</td></tr>\r\n\t    \t\t<tr><td>{$oratio9lat}</td><td>{$oratio9fr}</td></tr>";
        } else {
            $none .= "<tr><td>{$lat}</td><td>{$fr}</td></tr>";
        }
    }
    $none .= "</table>";
    $none = rougis_verset($none);
    return $none;
}

Example #2

Show file

File: vepres.php Project: bmaire28/LiturgiaHorarum

function vepres($jour, $date_l, $date_fr, $var, $propre, $temp)
{
    /*
     * Chargement du squelette des Vepres dans $vesp
     * remplissage de $vepres pour l'affichage de l'office
     *
     */
    $row = 0;
    $fp = fopen("offices_r/vepres.csv", "r");
    $jrdelasemaine--;
    while ($data = fgetcsv($fp, 1000, ";")) {
        $latin = $data[0];
        $francais = $data[1];
        $vesp[$row]['latin'] = $latin;
        $vesp[$row]['francais'] = $francais;
        $row++;
    }
    fclose($fp);
    $max = $row;
    $vepres = "<table>";
    for ($row = 0; $row < $max; $row++) {
        $lat = $vesp[$row]['latin'];
        $fr = $vesp[$row]['francais'];
        $testAlleluia = utf8_encode($lat);
        if ($tem == "Tempus Quadragesimae" && $testAlleluia == "Allelúia.") {
            $lat = "";
            $fr = "";
        }
        if ($tem == "Tempus passionis" && $testAlleluia == "Allelúia.") {
            $lat = "";
            $fr = "";
        }
        if ($lat == "#JOUR") {
            if ($propre['jour']['latin']) {
                $pr_lat = $propre['jour']['latin'];
                $pr_fr = $propre['jour']['francais'];
            }
            if (!$pr_lat or $calendarium['1V'][$demain]) {
                $pr_lat = $temp['jour']['latin'];
                $pr_fr = $temp['jour']['francais'];
            }
            if ($pr_lat) {
                $vepres .= "<tr><td style=\"width: 49%; text-align: center;\"><p style=\"font-weight: bold;\">{$pr_lat}</p></td>";
                $vepres .= "<td style=\"width: 49%; text-align: center;\"><p style=\"font-weight: bold;\">{$pr_fr}</p></td></tr>";
                $oratiolat = $propre['oratio']['latin'];
                $oratiofr = $propre['oratio']['francais'];
            }
            if ($propre['intitule']['latin']) {
                $intitule_lat = $propre['intitule']['latin'];
                $intitule_fr = $propre['intitule']['francais'];
            }
            if (!$intitule_lat or $calendarium['1V'][$demain]) {
                $intitule_lat = $temp['intitule']['latin'];
                $intitule_fr = $temp['intitule']['francais'];
            }
            if ($intitule_lat) {
                $vepres .= "<tr><td style=\"width: 49%; text-align: center;\"><p style=\"font-weight: bold;\">{$intitule_lat}</p></td>";
                $vepres .= "<td style=\"width: 49%; text-align: center;\"><p style=\"font-weight: bold;\">{$intitule_fr}</p></td></tr>";
                $oratiolat = $propre['oratio']['latin'];
                $oratiofr = $propre['oratio']['francais'];
            }
            if ($propre['rang']['latin']) {
                $rang_lat = $propre['rang']['latin'];
                $rang_fr = $propre['rang']['francais'];
            }
            if (!$rang_lat or $calendarium['1V'][$demain]) {
                $rang_lat = $temp['rang']['latin'];
                $rang_fr = $temp['rang']['francais'];
            }
            if ($rang_lat) {
                $vepres .= "<tr><td style=\"width: 49%; text-align: center;\"><h3> {$rang_lat}</h3></td>";
                $vepres .= "<td style=\"width: 49%; text-align: center;\"><h3>{$rang_fr}</h3></td></tr>";
                $oratiolat = $propre['oratio']['latin'];
                $oratiofr = $propre['oratio']['francais'];
            }
            if ($pr_lat or $intitule_lat or $rang_lat) {
                $vepres .= "<tr><td style=\"width: 49%; text-align: center;\"><h2>{$date_l} Vesperas</h2></td>";
                $vepres .= "<td style=\"width: 49%; text-align: center;\"><h2>{$date_fr} V&ecirc;pres</h2></td></tr>";
            } else {
                $vepres .= "<tr><td style=\"width: 49%; text-align: center;\"><h2>{$jours_l[$jrdelasemaine]} Vesperas</h2></td>";
                $vepres .= "<td style=\"width: 49%; text-align: center;\"><h2>{$jours_fr[$jrdelasemaine]} V&ecirc;pres</h2></td></tr>";
            }
        } elseif ($lat == "#HYMNUS") {
            if ($propre['HYMNUS_vepres']['latin']) {
                $hymne = $propre['HYMNUS_vepres']['latin'];
            } elseif ($temp['HYMNUS_vepres']['latin']) {
                $hymne = $temp['HYMNUS_vepres']['latin'];
            } else {
                $hymne = $var['HYMNUS_vesperas']['latin'];
            }
            $vepres .= hymne($hymne);
        } elseif ($lat == "#ANT1*") {
            if ($propre['ant7']['latin']) {
                $antlat = $propre['ant7']['latin'];
                $antfr = $propre['ant7']['francais'];
            } elseif ($temp['ant7']['latin']) {
                $antlat = $temp['ant7']['latin'];
                $antfr = $temp['ant7']['francais'];
            } else {
                $antfr = $var['ant7']['francais'];
                $antlat = $var['ant7']['latin'];
            }
            $vepres .= "<tr><td><p><span style=\"color:red\">Ant. 1 </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. 1 </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#PS1") {
            if ($propre['ps7']['latin']) {
                $psaume = $propre['ps7']['latin'];
            } elseif ($temp['ps7']['latin']) {
                $psaume = $temp['ps7']['latin'];
            } elseif ($var['ps7']['latin']) {
                $psaume = $var['ps7']['latin'];
            }
            //else $psaume=$reference['ps7'];
            $vepres .= psaume($psaume);
        } elseif ($lat == "#ANT1") {
            if ($propre['ant7']['latin']) {
                $antlat = $propre['ant7']['latin'];
                $antfr = $propre['ant7']['francais'];
            } elseif ($temp['ant7']['latin']) {
                $antlat = $temp['ant7']['latin'];
                $antfr = $temp['ant7']['francais'];
            } else {
                $antfr = $var['ant7']['francais'];
                $antlat = $var['ant7']['latin'];
            }
            $vepres .= "<tr><td><p><span style=\"color:red\">Ant. 1 </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. 1 </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#ANT2*") {
            if ($propre['ant8']['latin']) {
                $antlat = $propre['ant8']['latin'];
                $antfr = $propre['ant8']['francais'];
            } elseif ($temp['ant8']['latin']) {
                $antlat = $temp['ant8']['latin'];
                $antfr = $temp['ant8']['francais'];
            } else {
                $antfr = $var['ant8']['francais'];
                $antlat = $var['ant8']['latin'];
            }
            $vepres .= "<tr><td><p><span style=\"color:red\">Ant. 2 </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. 2 </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#PS2") {
            if ($propre['ps8']['latin']) {
                $psaume = $propre['ps8']['latin'];
            } elseif ($temp['ps8']['latin']) {
                $psaume = $temp['ps8']['latin'];
            } elseif ($var['ps8']['latin']) {
                $psaume = $var['ps8']['latin'];
            } else {
                $psaume = $reference['ps8'];
            }
            $vepres .= psaume($psaume);
        } elseif ($lat == "#ANT2") {
            if ($propre['ant8']['latin']) {
                $antlat = $propre['ant8']['latin'];
                $antfr = $propre['ant8']['francais'];
            } elseif ($temp['ant8']['latin']) {
                $antlat = $temp['ant8']['latin'];
                $antfr = $temp['ant8']['francais'];
            } else {
                $antfr = $var['ant8']['francais'];
                $antlat = $var['ant8']['latin'];
            }
            $vepres .= "<tr><td><p><span style=\"color:red\">Ant. 2 </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. 2 </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#ANT3*") {
            if ($propre['ant9']['latin']) {
                $antlat = $propre['ant9']['latin'];
                $antfr = $propre['ant9']['francais'];
            } elseif ($temp['ant9']['latin']) {
                $antlat = $temp['ant9']['latin'];
                $antfr = $temp['ant9']['francais'];
            } else {
                $antfr = $var['ant9']['francais'];
                $antlat = $var['ant9']['latin'];
            }
            $vepres .= "<tr><td><p><span style=\"color:red\">Ant. 3 </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. 3 </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#PS3") {
            if ($propre['ps9']['latin']) {
                $psaume = $propre['ps9']['latin'];
            } elseif ($temp['ps9']['latin']) {
                $psaume = $temp['ps9']['latin'];
            } elseif ($var['ps9']['latin']) {
                $psaume = $var['ps9']['latin'];
            } elseif ($var['ps9']['latin']) {
                $psaume = $var['ps9']['latin'];
            } else {
                $psaume = $reference['ps9'];
            }
            $vepres .= psaume($psaume);
        } elseif ($lat == "#ANT3") {
            if ($propre['ant9']['latin']) {
                $antlat = $propre['ant9']['latin'];
                $antfr = $propre['ant9']['francais'];
            } elseif ($temp['ant9']['latin']) {
                $antlat = $temp['ant9']['latin'];
                $antfr = $temp['ant9']['francais'];
            } else {
                $antfr = $var['ant9']['francais'];
                $antlat = $var['ant9']['latin'];
            }
            $vepres .= "<tr><td><p><span style=\"color:red\">Ant. 3 </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. 3 </span> {$antfr}</p></td></tr>";
        } elseif ($lat == "#LB") {
            if ($propre['LB_soir']['latin']) {
                $LB_soir = $propre['LB_soir']['latin'];
            } elseif ($temp['LB_soir']['latin']) {
                $LB_soir = $temp['LB_soir']['latin'];
            } else {
                $LB_soir = $var['LB_soir']['latin'];
            }
            $vepres .= lectiobrevis($LB_soir);
        } elseif ($lat == "#RB") {
            if ($propre['RB_soir']['latin']) {
                $rblat = nl2br($propre['RB_soir']['latin']);
                $rbfr = nl2br($propre['RB_soir']['francais']);
            } elseif ($temp['RB_soir']['latin']) {
                $rblat = nl2br($temp['RB_soir']['latin']);
                $rbfr = nl2br($temp['RB_soir']['francais']);
            } else {
                $rblat = nl2br($var['RB_soir']['latin']);
                $rbfr = nl2br($var['RB_soir']['francais']);
            }
            $vepres .= "<tr><td><h2>Responsorium Breve</h2></td>\r\n\t    \t\t<td><h2>R&eacute;pons bref</h2></td></tr>\r\n\t    \t\t<tr><td>{$rblat}</td>\r\n\t    \t\t<td>{$rbfr}</td></tr>";
        } elseif ($lat == "#ANT_MAGN") {
            $magnificat = "magnificat_" . $lettre;
            if ($propre[$magnificat]['latin']) {
                $magniflat = $propre[$magnificat]['latin'];
                $magniffr = $propre[$magnificat]['francais'];
            } elseif ($propre['magnificat']['latin']) {
                $magniflat = $propre['magnificat']['latin'];
                $magniffr = $propre['magnificat']['francais'];
            } elseif ($temp['magnificat']['latin']) {
                $magniflat = $temp['magnificat']['latin'];
                $magniffr = $temp['magnificat']['francais'];
            } else {
                if (!$magniflat) {
                    $magniflat = $var['magnificat']['latin'];
                }
                if (!$magniffr) {
                    $magniffr = $var['magnificat']['francais'];
                }
            }
            $vepres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$magniflat}</p></td>\r\n\t    \t\t<td><p><span style=\"color:red\">Ant. </span>{$magniffr}</p></td></tr>";
        } elseif ($lat == "#MAGNIFICAT") {
            $vepres .= psaume("magnificat");
        } elseif ($lat == "#PRECES") {
            if ($propre['preces_soir']['latin']) {
                $preces = $propre['preces_soir']['latin'];
            } elseif ($temp['preces_soir']['latin']) {
                $preces = $temp['preces_soir']['latin'];
            } else {
                $preces = $var['preces_soir']['latin'];
            }
            $vepres .= preces($preces);
        } elseif ($lat == "#PATER") {
            $vepres .= psaume("pater");
        } elseif ($lat == "#ORATIO") {
            if ($propre['oratio_soir']['latin']) {
                $oratiolat = $propre['oratio_soir']['latin'];
                $oratiofr = $propre['oratio_soir']['francais'];
            } elseif ($propre['oratio']['latin']) {
                $oratiolat = $propre['oratio']['latin'];
                $oratiofr = $propre['oratio']['francais'];
            } elseif ($temp['oratio_soir']['latin']) {
                $oratiolat = $temp['oratio_soir']['latin'];
                $oratiofr = $temp['oratio_soir']['francais'];
            } elseif ($temp['oratio']['latin']) {
                $oratiolat = $temp['oratio']['latin'];
                $oratiofr = $temp['oratio']['francais'];
            } elseif ($oratiolat = $var['oratio_vesperas']['latin']) {
                $oratiolat = $var['oratio_vesperas']['latin'];
                $oratiofr = $var['oratio_vesperas']['francais'];
            } elseif ($oratiolat = $var['oratio']['latin']) {
                $oratiolat = $var['oratio']['latin'];
                $oratiofr = $var['oratio']['francais'];
            }
            if (substr($oratiolat, -6) == "minum.") {
                $oratiolat = str_replace(substr($oratiolat, -13), " Per D&oacute;minum nostrum Iesum Christum, F&iacute;lium tuum, qui tecum vivit et regnat in unit&aacute;te Sp&iacute;ritus Sancti, Deus, per &oacute;mnia s&aelig;cula s&aelig;cul&oacute;rum.", $oratiolat);
                $oratiofr .= " Par notre Seigneur J&eacute;sus-Christ, ton Fils, qui vit et r&egrave;gne avec toi dans l'unit&eacute; du Saint-Esprit, Dieu, pour tous les si&egrave;cles des si&egrave;cles.";
            }
            if (substr($oratiolat, -17) == " Qui tecum vivit.") {
                $oratiolat = str_replace(" Qui tecum vivit.", " Qui tecum vivit et regnat in unit&aacute;te Sp&iacute;ritus Sancti, Deus, per &oacute;mnia s&aelig;cula s&aelig;cul&oacute;rum.", $oratiolat);
                $oratiofr .= " Lui qui vit et r&egrave;gne avec toi dans l'unit&eacute; du Saint-Esprit, Dieu, pour tous les si&egrave;cles des si&egrave;cles.";
            }
            if (substr($oratiolat, -11) == " Qui vivis.") {
                $oratiolat = str_replace(" Qui vivis.", " Qui vivis et regnas cum Deo Patre in unit&aacute;te Sp&iacute;ritus Sancti, Deus, per &oacute;mnia s&aelig;cula s&aelig;cul&oacute;rum.", $oratiolat);
                $oratiofr .= " Toi qui vis et r&egrave;gnes avec Dieu le P&egrave;re dans l'unit&eacute; du Saint-Esprit, Dieu, pour tous les si&egrave;cles des si&egrave;cles.";
            }
            $vepres .= "<tr><td>{$oratiolat}</td>\r\n\t    \t\t<td>{$oratiofr}</td></tr>";
        } elseif ($lat == "Ite in pace. " && ($calendarium['hebdomada'][$jour] == "Infra octavam paschae" or $calendarium['temporal'][$jour] == "Dominica Pentecostes" or $calendarium['temporal'][$demain] == "Dominica Pentecostes")) {
            $lat = "Ite in pace, allel&uacute;ia, allel&uacute;ia.";
            $fr = "Allez en paix, all&eacute;luia, all&eacute;luia.";
            $vepres .= "<tr><td>{$lat}</td>\r\n\t\t\t\t<td>{$fr}</td></tr>";
        } elseif ($lat == "R/. Deo gr�tias." && ($calendarium['hebdomada'][$jour] == "Infra octavam paschae" or $calendarium['temporal'][$jour] == "Dominica Pentecostes" or $calendarium['temporal'][$demain] == "Dominica Pentecostes")) {
            $lat = "R/. Deo gr&aacute;tias, allel&uacute;ia, allel&uacute;ia.";
            $fr = "R/. Rendons gr&acirc;ces &agrave; Dieu, all&eacute;luia, all&eacute;luia.";
            $vepres .= "<tr><td>{$lat}</td>\r\n\t    \t\t<td>{$fr}</td></tr>";
        } else {
            $vepres .= "<tr><td>{$lat}</td>\r\n\t\t\t<td>{$fr}</td></tr>";
        }
    }
    $vepres .= "</table>";
    $vepres = rougis_verset($vepres);
    return $vepres;
}

Example #3

Show file

File: tenebres.php Project: bmaire28/LiturgiaHorarum

function tenebres($jour, $date_l, $date_fr, $var, $propre, $temp)
{
    /*
     * Impression directe de l'Office
     */
    $tenebres = "<table>";
    $intitule_lat = nl2br($temp['intitule']['latin']);
    $intitule_fr = nl2br($temp['intitule']['francais']);
    $tenebres .= "<tr><td style=\"width: 49%; text-align: center;\"><h1>Tenebr&aelig;</H1></td>\n";
    $tenebres .= "<td style=\"width: 49%; text-align: center;\"><h1>Office des T&eacute;n&egrave;bres</h1></td></tr>\n";
    $tenebres .= "<tr><td style=\"width: 49%; text-align: center;\"><h1>{$intitule_lat}</h1></td>\n";
    $tenebres .= "<td style=\"width: 49%; text-align: center;\"><h1>{$intitule_fr}</h1></td></tr>\n";
    /*
     * Invitatoire
     */
    $tenebres .= "<tr><td><h2>AD INVITATORIUM</h2></td>\n\r\n\t\t\t\t\t<td><h2>INVITATOIRE</h2></td></tr>\n";
    $tenebres .= "<tr><td>V/. Domine, labia mea aperies.</td>\n\r\n\t\t\t\t\t<td>V/. Seigneur, ouvre mes l&egrave;vres,</td></tr>\n\r\n\t    \t\t<tr><td>R/. Et os meum annuntiabit laudem tuam.</td>\r\n\t    \t\t\t<td>R/. et ma bouche publiera ta louange.</td></tr>\n";
    $antlat = nl2br($temp['invitatoire']['latin']);
    $antfr = nl2br($temp['invitatoire']['francais']);
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume("ps94_inv");
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    /*
     * Hymne
     */
    $tenebres .= "<tr><td><h2>AD VIGILIAS</h2></td>\n\r\n\t\t\t\t\t<td><h2>VIGILES</h2></td></tr>\n";
    $hymne = $temp['hymne']['latin'];
    $tenebres .= hymne($hymne);
    /*
     * 1er Nocturne
     */
    $tenebres .= "<tr><td><h2>IN I NOCTURNO</h2></td>\n\r\n\t\t\t\t\t<td><h2>Ier NOCTURNE</h2></td></tr>\n";
    // PS VIG1-1
    $antlat = nl2br($temp['ant11']['latin']);
    $antfr = nl2br($temp['ant11']['francais']);
    $psaume = $temp['ps11']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 1 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 1 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS VIG1-2
    $antlat = nl2br($temp['ant12']['latin']);
    $antfr = nl2br($temp['ant12']['francais']);
    $psaume = $temp['ps12']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 2 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 2 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS VIG1-3
    $antlat = nl2br($temp['ant13']['latin']);
    $antfr = nl2br($temp['ant13']['francais']);
    $psaume = $temp['ps13']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 3 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 3 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS VIG1-4
    $antlat = nl2br($temp['ant14']['latin']);
    $antfr = nl2br($temp['ant14']['francais']);
    $psaume = $temp['ps14']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 4 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 4 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS VIG1-5
    $antlat = nl2br($temp['ant15']['latin']);
    $antfr = nl2br($temp['ant15']['francais']);
    $psaume = $temp['ps15']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 5 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 5 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS VIG1-6
    $antlat = nl2br($temp['ant16']['latin']);
    $antfr = nl2br($temp['ant16']['francais']);
    $psaume = $temp['ps16']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 6 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 6 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // verset 1
    $verslat = nl2br($temp['V_1']['latin']);
    $versfr = nl2br($temp['V_1']['francais']);
    $tenebres .= "<tr><td><h2>Versus</h2></td>\n\r\n\t\t\t\t<td><h2>Verset</h2></td></tr>\n\r\n\t    \t\t<tr><td>{$verslat}</td><td>{$versfr}</td></tr>\n\r\n\t    \t\t<tr><td><h5>On garde le silence, le temps d'un Notre P&egrave;re.</h5></td>\r\n\t    \t\t<td><h5>On garde le silence, le temps d'un Notre P&egrave;re.</h5></td></tr>\n";
    // Lectio 1
    $LB_matin = $temp['LB_1']['latin'];
    $tenebres .= lectiobrevis($LB_matin);
    // RB 1
    $rblat = nl2br($temp['RB_1']['latin']);
    $rbfr = nl2br($temp['RB_1']['francais']);
    $tenebres .= "<tr><td><h2>Responsorium</h2></td>\n\r\n\t\t\t\t\t<td><h2>R&eacute;pons</h2></td></tr>\n\r\n\t    \t\t<tr><td>{$rblat}</td><td>{$rbfr}</td></tr>\n";
    /*
     * 2e Nocturne
     */
    $tenebres .= "<tr><td><h2>IN II NOCTURNO</h2></td>\n\r\n\t\t\t\t\t<td><h2>IIe NOCTURNE</h2></td></tr>\n";
    // PS VIG2-1
    $antlat = nl2br($temp['ant21']['latin']);
    $antfr = nl2br($temp['ant21']['francais']);
    $psaume = $temp['ps21']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 1 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 1 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS VIG2-2
    $antlat = nl2br($temp['ant22']['latin']);
    $antfr = nl2br($temp['ant22']['francais']);
    $psaume = $temp['ps22']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 2 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 2 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS VIG2-3
    $antlat = nl2br($temp['ant23']['latin']);
    $antfr = nl2br($temp['ant23']['francais']);
    $psaume = $temp['ps23']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 3 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 3 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS VIG2-4
    $antlat = nl2br($temp['ant24']['latin']);
    $antfr = nl2br($temp['ant24']['francais']);
    $psaume = $temp['ps24']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 4 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 4 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS VIG2-5
    $antlat = nl2br($temp['ant25']['latin']);
    $antfr = nl2br($temp['ant25']['francais']);
    $psaume = $temp['ps25']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 5 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 5 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS VIG2-6
    $antlat = nl2br($temp['ant26']['latin']);
    $antfr = nl2br($temp['ant26']['francais']);
    $psaume = $temp['ps26']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 6 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 6 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // verset 2
    $verslat = nl2br($temp['V_2']['latin']);
    $versfr = nl2br($temp['V_2']['francais']);
    $tenebres .= "<tr><td><h2>Versus</h2></td>\n\r\n\t\t\t\t<td><h2>Verset</h2></td></tr>\n\r\n\t    \t\t<tr><td>{$verslat}</td><td>{$versfr}</td></tr>\n\r\n\t    \t\t<tr><td><h5>On garde le silence, le temps d'un Notre P&egrave;re.</h5></td>\r\n\t    \t\t<td><h5>On garde le silence, le temps d'un Notre P&egrave;re.</h5></td></tr>\n";
    // Lectio 2
    $LB_matin = $temp['LB_2']['latin'];
    $tenebres .= lectiobrevis($LB_matin);
    // RB 2
    $rblat = nl2br($temp['RB_2']['latin']);
    $rbfr = nl2br($temp['RB_2']['francais']);
    $tenebres .= "<tr><td><h2>Responsorium</h2></td>\n\r\n\t\t\t\t\t<td><h2>R&eacute;pons</h2></td></tr>\n\r\n\t    \t\t<tr><td>{$rblat}</td><td>{$rbfr}</td></tr>\n";
    /*
     * 3e Nocturne
     * 3 cantique AT sous 1 antienne unique
     */
    $tenebres .= "<tr><td><h2>IN III NOCTURNO</h2></td>\n\r\n\t\t\t\t\t<td><h2>IIIe NOCTURNE</h2></td></tr>\n";
    //
    $antlat = nl2br($temp['ant31']['latin']);
    $antfr = nl2br($temp['ant31']['francais']);
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 1 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 1 </span> {$antfr}</p></td></tr>\n";
    $psaume = $temp['ps31']['latin'];
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $psaume = $temp['ps32']['latin'];
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $psaume = $temp['ps33']['latin'];
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // verset 3
    $verslat = nl2br($temp['V_3']['latin']);
    $versfr = nl2br($temp['V_3']['francais']);
    $tenebres .= "<tr><td><h2>Versus</h2></td>\n\r\n\t\t\t\t<td><h2>Verset</h2></td></tr>\n\r\n\t    \t\t<tr><td>{$verslat}</td><td>{$versfr}</td></tr>\n\r\n\t    \t\t<tr><td><h5>On garde le silence, le temps d'un Notre P&egrave;re.</h5></td>\r\n\t    \t\t<td><h5>On garde le silence, le temps d'un Notre P&egrave;re.</h5></td></tr>\n";
    // Lectio 3
    $LB_matin = $temp['LB_3']['latin'];
    $tenebres .= lectiobrevis($LB_matin);
    // RB 3
    $rblat = nl2br($temp['RB_3']['latin']);
    $rbfr = nl2br($temp['RB_3']['francais']);
    $tenebres .= "<tr><td><h2>Responsorium</h2></td>\n\r\n\t\t\t\t\t<td><h2>R&eacute;pons</h2></td></tr>\n\r\n\t    \t\t<tr><td>{$rblat}</td><td>{$rbfr}</td></tr>\n";
    /*
     * Laudes
     */
    $tenebres .= "<tr><td><h2>AD LAUDES MATUTINAS</h2></td>\n\r\n\t\t\t\t\t<td><h2>AUX LAUDES</h2></td></tr>\n";
    // PS L-1
    $antlat = nl2br($temp['antl1']['latin']);
    $antfr = nl2br($temp['antl1']['francais']);
    $psaume = 'ps50';
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 1 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 1 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS L-2
    $antlat = nl2br($temp['antl2']['latin']);
    $antfr = nl2br($temp['antl2']['francais']);
    $psaume = $temp['psl2']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 2 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 2 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS L-3
    $antlat = nl2br($temp['antl3']['latin']);
    $antfr = nl2br($temp['antl3']['francais']);
    $psaume = $temp['psl3']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 3 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 3 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS L-4
    $antlat = nl2br($temp['antl4']['latin']);
    $antfr = nl2br($temp['antl4']['francais']);
    $psaume = $temp['psl4']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 4 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 4 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // PS L-5
    $antlat = nl2br($temp['antl5']['latin']);
    $antfr = nl2br($temp['antl5']['francais']);
    $psaume = $temp['psl5']['latin'];
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. 5 </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. 5 </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // Lectio L
    $LB_matin = $temp['LB_matin']['latin'];
    $tenebres .= lectiobrevis($LB_matin);
    // RB 3
    $rblat = nl2br($temp['RB_matin']['latin']);
    $rbfr = nl2br($temp['RB_matin']['francais']);
    $tenebres .= "<tr><td><h2>Responsorium</h2></td>\n\r\n\t\t\t\t\t<td><h2>R&eacute;pons</h2></td></tr>\n\r\n\t    \t\t<tr><td>{$rblat}</td><td>{$rbfr}</td></tr>\n";
    // Benedictus
    $antlat = nl2br($temp['benedictus']['latin']);
    $antfr = nl2br($temp['benedictus']['francais']);
    $psaume = 'benedictus';
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    $tenebres .= psaume($psaume);
    $tenebres .= "<tr><td>Gloria Patri, et F&iacute;lio, * et Spir&iacute;tui Sancto.</td>\n\r\n\t\t\t\t\t<td>Gloire au P&egrave;re, au Fils et au Saint Esprit.</td></tr>\n\r\n\t    \t\t<tr><td>Sicut erat in principio, et nunc et semper * et in s&aelig;cula s&aelig;cul&oacute;rum. Amen.</td>\r\n\t    \t\t\t<td>Comme il &eacute;tait au commencement, maintenant et toujours, et dans les si&egrave;cles des si&egrave;cles. Amen.</td></tr>\n";
    $tenebres .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$antlat}</p></td>\n\r\n\t\t\t\t\t\t<td><p><span style=\"color:red\">Ant. </span> {$antfr}</p></td></tr>\n";
    // Preces + Pater
    $tenebres .= "<tr><td><h2>Acclamtio finalis</h2></td>\n\r\n\t\t\t\t\t<td><h2>Acclamations finales</h2></td></tr>\n";
    $tenebres .= "<tr><td>V/. Kyrie eleison R/. Kyrie eleison</td>\n\r\n\t\t\t\t\t<td>V/. Seigneur, ayez piti&eacute; R/. Seigneur, ayez piti&eacute;</td></tr>\n";
    $tenebres .= "<tr><td>V/. Christe eleison R/. Christe eleison</td>\n\r\n\t\t\t\t\t<td>V/. &Ocirc; Christ, ayez piti&eacute; R/. &Ocirc; Christ, ayez piti&eacute;</td></tr>\n";
    $tenebres .= "<tr><td>V/. Kyrie eleison R/. Kyrie eleison</td>\n\r\n\t\t\t\t\t<td>V/. Seigneur, ayez piti&eacute; R/. Seigneur, ayez piti&eacute;</td></tr>\n";
    $tenebres .= "<tr><td>V/. Pater noster, qui es in c&aelig;lis,</td><td>V/. Notre P&egravere, qui es aux Cieux,</td></tr>\n\r\n\t\t\t<tr><td>sanctific&eacute;tur nomen tuum: adv&eacute;niat regnum tuum:</td><td>que ton nom soit sanctifi&eacute;; que ton r&egrave;gne arrive;</td></tr>\n\r\n\t\t\t<tr><td>fiat vol&uacute;ntas tua, sicut in c&aelig;lo et in terra.</td><td>que ta volont&eacute; soit faite au Ciel comme sur la terre.</td></tr>\n\r\n\t\t\t<tr><td>Panem nostrum quotidi&aacute;num da nobis h&oacute;die:</td><td>Donne-nous aujourd'hui notre pain quotidien,</td></tr>\n\r\n\t\t\t <tr><td>et dim&iacute;tte nobis d&eacute;bita nostra, sicut et nos dim&iacute;ttimus debit&oacute;ribus nostris:</td><td>et remets-nous nos dettes, comme nous les remettons nous-m&ecirc;mes &agrave; nos d&eacute;biteurs ;</td></tr>\n\r\n\t\t\t <tr><td>et ne nos ind&uacute;cas in tentati&oacute;nem</td><td>et ne nous abandonne pas dans l'&eacute;preuve, </td></tr>\r\n\t\t\t<tr><td>R/. sed l&iacute;bera nos a malo.</td><td>R/. mais d&eacute;livre-nous du malin.</td></tr>\n";
    // Oraison
    $tenebres .= "<tr><td><h2>Oratio</h2></td>\n\r\n\t\t\t\t\t<td><h2>Oraison</h2></td></tr>\n";
    $oratiolat = $temp['oratio']['latin'];
    $oratiofr = $temp['oratio']['francais'];
    if (substr($oratiolat, -6) == "minum.") {
        $oratiolat = str_replace(substr($oratiolat, -13), " Per D&oacute;minum nostrum Iesum Christum, F&iacute;lium tuum, qui tecum vivit et regnat in unit&aacute;te Sp&iacute;ritus Sancti, Deus, per &oacute;mnia s&aelig;cula s&aelig;cul&oacute;rum.", $oratiolat);
        $oratiofr .= " Par notre Seigneur J&eacute;sus-Christ, ton Fils, qui vit et r&egrave;gne avec toi dans l'unit&eacute; du Saint-Esprit, Dieu, pour tous les si&egrave;cles des si&egrave;cles.";
    }
    if (substr($oratiolat, -11) == " Qui tecum.") {
        $oratiolat = str_replace(" Qui tecum.", " Qui tecum vivit et regnat in unit&aacute;te Sp&iacute;ritus Sancti, Deus, per &oacute;mnia s&aelig;cula s&aelig;cul&oacute;rum.", $oratiolat);
        $oratiofr .= " Lui qui vit et r&egrave;gne avec toi dans l'unit&eacute; du Saint-Esprit, Dieu, pour tous les si&egrave;cles des si&egrave;cles.";
    }
    if (substr($oratiolat, -11) == " Qui vivis.") {
        $oratiolat = str_replace(" Qui vivis.", " Qui vivis et regnas cum Deo Patre in unit&aacute;te Sp&iacute;ritus Sancti, Deus, per &oacute;mnia s&aelig;cula s&aelig;cul&oacute;rum.", $oratiolat);
        $oratiofr .= " Toi qui vis et r&egrave;gnes avec Dieu le P&egrave;re dans l'unit&eacute; du Saint-Esprit, Dieu, pour tous les si&egrave;cles des si&egrave;cles.";
    }
    $tenebres .= "<tr><td>{$oratiolat}</td><td>{$oratiofr}</td></tr>";
    $tenebres .= "<tr><td>V/. Benedicamus Domino.</td>\n\r\n\t\t\t\t\t<td>V/. B&eacute;nissons le Seigneur.</td></tr>\n\r\n\t    \t\t<tr><td>R/. Deo gratias.</td>\r\n\t    \t\t\t<td>R/. Nous rendos gr&acirc;ce &agrave; Dieu.</td></tr>\n";
    $tenebres .= "</table>";
    $tenebres = rougis_verset($tenebres);
    return $tenebres;
}

Example #4

Show file

File: complies.php Project: bmaire28/LiturgiaHorarum

function complies($jour, $calendarium)
{
    $var = null;
    $tem = $calendarium['tempus'][$jour];
    switch ($tem) {
        case "Tempus Adventus":
            $psautier = "adven";
            break;
        case "Tempus Nativitatis":
            $psautier = "noel";
            break;
        case "Tempus per annum":
            $psautier = "perannum";
            break;
        case "Tempus Quadragesimae":
            $psautier = "quadragesimae";
            break;
        case "Tempus passionis":
            $psautier = "hebdomada_sancta";
            break;
        case "Tempus Paschale":
            $psautier = "pascha";
            break;
        default:
            print "<br><i>Cet office n'est pas encore compl&egrave;tement disponible. Merci de bien vouloir patienter. <a href=\"nous_contacter./index.php\">Vous pouvez nous aider &agrave; compl&eacute;ter ce travail.</a></i>";
            return;
            break;
    }
    $jours_l = array("Dominica, post II Vesperas, ad ", "Feria secunda, ad ", "Feria tertia, ad ", "Feria quarta, ad ", "Feria quinta, ad ", "Feria sexta, ad ", "Dominica, post I Vesperas, ad ");
    $jours_fr = array("Le Dimanche apr&egrave;s les IIes V&ecirc;pres, aux  ", "Le Lundi aux ", "Le Mardi aux ", "Le Mercredi aux ", "Le Jeudi aux ", "Le Vendredi aux ", "Le Dimanche, apr&egrave;s les I&egrave;res V&ecirc;pres, aux ");
    $anno = substr($jour, 0, 4);
    $mense = substr($jour, 4, 2);
    $die = substr($jour, 6, 2);
    $day = mktime(12, 0, 0, $mense, $die, $anno);
    $jrdelasemaine = date("w", $day);
    $date_fr = $jours_fr[$jrdelasemaine];
    $date_l = $jours_l[$jrdelasemaine];
    $jrdelasemaine++;
    // pour avoir dimanche=1 etc...
    $spsautier = $calendarium['hebdomada_psalterium'][$jour];
    $tomorow = $day + 60 * 60 * 24;
    $demain = date("Ymd", $tomorow);
    if ($calendarium['1V'][$demain] == 1 && $calendarium['priorite'][$jour] > $calendarium['priorite'][$demain] && $jrdelasemaine != 7) {
        ////////////////////////////////////////
        /// il y a des "1ères Complies"  //////
        //////////////////////////////////////
        $fp = fopen("propres_r/complies/comp_FVS.csv", "r");
        while ($data = fgetcsv($fp, 1000, ";")) {
            $id = $data[0];
            $var[$id]['latin'] = $data[1];
            $var[$id]['francais'] = $data[2];
            $row++;
        }
        $LB_comp = null;
        $RB_comp = null;
        $pr_lat = null;
        $pr_fr = null;
        $intitule_lat = null;
        $intitule_fr = null;
        $rang_lat = null;
        $rang_fr = null;
        $preces = null;
        $ps2 = 1;
        $tempo = $calendarium['intitule'][$demain];
        $fp = fopen("propres_r/temporal/" . $tempo . ".csv", "r");
        while ($data = fgetcsv($fp, 1000, ";")) {
            $id = $data[0];
            $temp[$id]['latin'] = $data[1];
            $temp[$id]['francais'] = $data[2];
            $row++;
        }
        fclose($fp);
        if ($temp['intitule']['latin']) {
            $intitule_lat = $temp['intitule']['latin'];
        }
        if ($temp['intitule']['francais']) {
            $intitule_fr = $temp['intitule']['francais'];
        }
        $rang_lat = "Sollemnitas";
        $rang_fr = "Solennit&eacute;";
        $complies_lat = "Post I Vesperas, ad Completorium";
        $complies_fr = "Apr&egrave;s les I&egrave;res V&ecirc;pres, aux Complies";
        $date_l = $intitule_lat . "<br> Post I Vesperas, ad ";
        $date_fr = $intitule_fr . "<br> Apr&egrave;s les I&egrave;res V&ecirc;pres, aux ";
    }
    if ($calendarium['1V'][$jour] == 1 && $calendarium['priorite'][$jour] < $calendarium['priorite'][$demain] && $jrdelasemaine != 1) {
        ////////////////////////////////////////
        /// il y a des "2ndes Complies"  //////
        //////////////////////////////////////
        $fp = fopen("propres_r/complies/comp_FS.csv", "r");
        while ($data = fgetcsv($fp, 1000, ";")) {
            $id = $data[0];
            $var[$id]['latin'] = $data[1];
            $var[$id]['francais'] = $data[2];
            $row++;
        }
        $LB_comp = null;
        $RB_comp = null;
        $pr_lat = null;
        $pr_fr = null;
        $intitule_lat = null;
        $intitule_fr = null;
        $rang_lat = null;
        $rang_fr = null;
        $preces = null;
        $ps2 = 1;
        $tempo = $calendarium['intitule'][$jour];
        $fp = fopen("propres_r/temporal/" . $tempo . ".csv", "r");
        while ($data = fgetcsv($fp, 1000, ";")) {
            $id = $data[0];
            $temp[$id]['latin'] = $data[1];
            $temp[$id]['francais'] = $data[2];
            $row++;
        }
        fclose($fp);
        if ($temp['intitule']['latin']) {
            $intitule_lat = $temp['intitule']['latin'];
        }
        if ($temp['intitule']['francais']) {
            $intitule_fr = $temp['intitule']['francais'];
        }
        $rang_lat = "Sollemnitas";
        $rang_fr = "Solennit&eacute;";
        $date_l = $intitule_lat . "<br> Post II Vesperas, ad ";
        $date_fr = $intitule_fr . "<br> Apr&egrave;s les IIes V&ecirc;pres, aux ";
    }
    if (!$var) {
        $fp = fopen("propres_r/complies/comp_F" . $jrdelasemaine . ".csv", "r");
        while ($data = fgetcsv($fp, 1000, ";")) {
            $id = $data[0];
            $latin = $data[1];
            $francais = $data[2];
            $var[$id]['latin'] = $latin;
            $var[$id]['francais'] = $francais;
            $row++;
        }
        fclose($fp);
    }
    $row = 0;
    $fp = fopen("offices_r/complies.csv", "r");
    while ($data = fgetcsv($fp, 1000, ";")) {
        $latin = $data[0];
        $francais = $data[1];
        $comp[$row]['latin'] = $latin;
        $comp[$row]['francais'] = $francais;
        $row++;
    }
    $max = $row;
    $complies = "<table>";
    for ($row = 0; $row < $max; $row++) {
        $lat = $comp[$row]['latin'];
        $fr = $comp[$row]['francais'];
        //Suppression de l'Alléluia en Carême et Semaine Sainte
        if ($tem == "Tempus Quadragesimae" && $lat == "Allel�ia.") {
            $lat = "";
            $fr = "";
        }
        if ($tem == "Tempus passionis" && $lat == "Allel�ia.") {
            $lat = "";
            $fr = "";
        }
        switch ($lat) {
            case "#JOUR":
                $complies .= "<tr><td style=\"width: 49%; text-align: center;\"><h2>{$date_l} Completorium</h2></td>\r\n            \t\t<td style=\"width: 49%; text-align: center;\"><h2>{$date_fr} Complies</h2></td></tr>";
                if ($rang_lat) {
                    $complies .= "<tr><td style=\"width: 49%; text-align: center;\"><h3>{$rang_lat}</h3></td>\r\n            \t\t<td style=\"width: 49%; text-align: center;\"><h3>{$rang_fr}</h3></td></tr>";
                }
                break;
                //fin du case #JOUR
            //fin du case #JOUR
            case "#HYMNUS":
                switch ($tem) {
                    case "Tempus Paschale":
                        $complies .= hymne(utf8_decode("hy_Iesu, redémptor"));
                        break;
                    case "Tempus Quadragesimae":
                    case "Tempus per annum":
                        switch ($calendarium['hebdomada_psalterium'][$jour]) {
                            case 1:
                            case 3:
                                $complies .= hymne(utf8_decode("hy_Te lucis"));
                                break;
                            case 2:
                            case 4:
                                $complies .= hymne(utf8_decode("hy_Christe, qui, splendor"));
                                break;
                        }
                        break;
                    case "Tempus Adventus":
                        $seizedec = mktime(12, 0, 0, 12, 16, $anno);
                        if ($day <= $seizedec) {
                            $complies .= hymne("hy_Te lucis");
                        } else {
                            $complies .= hymne("hy_Christe, qui, splendor");
                        }
                        break;
                    case "Tempus Nativitatis":
                        $sixjanv = mktime(12, 0, 0, 1, 6, $anno);
                        if ($mense == "12") {
                            $annosuivante = $anno + 1;
                            $sixjanv = mktime(12, 0, 0, 1, 6, $annosuivante);
                        }
                        if ($day <= $sixjanv) {
                            $complies .= hymne("hy_Te lucis");
                        } else {
                            $complies .= hymne("hy_Christe, qui, splendor");
                        }
                        break;
                }
                //fin du switch $tem
                break;
                //fin du case #HYMNUS
            //fin du case #HYMNUS
            case "#ANT1*":
                $antlat = $var['ant1']['latin'];
                $antfr = $var['ant1']['francais'];
                if ($tem == "Tempus Paschale") {
                    $antlat = "Allel&uacute;ia, allel&uacute;ia, allel&uacute;ia.";
                    $antfr = "All&eacute;luia, all&eacute;luia, all&eacute;luia.";
                }
                $complies .= "<tr><td><p><span style=\"color:red\">Ant. 1 </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. 1 </span> {$antfr}</p></td></tr>";
                break;
                //fin du case #ANT1*
            //fin du case #ANT1*
            case "#PS1":
                $psaume = $var['ps1']['latin'];
                $complies .= psaume($psaume);
                break;
                //fin du case #PS1
            //fin du case #PS1
            case "#ANT1":
                $antlat = $var['ant1']['latin'];
                $antfr = $var['ant1']['francais'];
                if ($tem == "Tempus Paschale") {
                    $antlat = "Allel&uacute;ia, allel&uacute;ia, allel&uacute;ia.";
                    $antfr = "All&eacute;luia, all&eacute;luia, all&eacute;luia.";
                }
                $complies .= "<tr><td><p><span style=\"color:red\">Ant. 1 </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. 1 </span> {$antfr}</p></td></tr>";
                break;
                //fin du case #ANT1
            //fin du case #ANT1
            case "#ANT2*":
                $antlat = $var['ant2']['latin'];
                $antfr = $var['ant2']['francais'];
                if ($antlat == "") {
                    $ps2 = 0;
                    $row++;
                    $row++;
                    $row++;
                    $row++;
                } else {
                    $ps2 = 1;
                    if ($tem == "Tempus Paschale") {
                        $antlat = "Allel&uacute;ia, allel&uacute;ia, allel&uacute;ia.";
                        $antfr = "All&eacute;luia, all&eacute;luia, all&eacute;luia.";
                    }
                    $complies .= "<tr><td><p><span style=\"color:red\">Ant. 2 </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. 2 </span> {$antfr}</p></td></tr>";
                }
                break;
                //fin du case #ANT2*
            //fin du case #ANT2*
            case "#PS2":
                $psaume = $var['ps2']['latin'];
                if ($ps2 == 1) {
                    $complies .= psaume($psaume);
                }
                break;
                //fin du case #PS2
            //fin du case #PS2
            case "#ANT2":
                $antlat = $var['ant2']['latin'];
                $antfr = $var['ant2']['francais'];
                if ($ps2 == 1) {
                    if ($tem == "Tempus Paschale") {
                        $antlat = "Allel&uacute;ia, allel&uacute;ia, allel&uacute;ia.";
                        $antfr = "All&eacute;luia, all&eacute;luia, all&eacute;luia.";
                    }
                    $complies .= "<tr><td><p><span style=\"color:red\">Ant. 2 </span>{$antlat}</p></td>\r\n\t\t\t\t<td><p><span style=\"color:red\">Ant. 2 </span> {$antfr}</p></td></tr>";
                }
                break;
                //fin du case #ANT2
            //fin du case #ANT2
            case "#LB":
                $lectiobrevis = $var['LB_comp']['latin'];
                $complies .= lectiobrevis($lectiobrevis);
                break;
                //fin du case #LB
            //fin du case #LB
            case "#RB":
                if ($tem == "Tempus Paschale") {
                    $rblat = nl2br($var['RB_comp_TP']['latin']);
                    $rbfr = nl2br($var['RB_comp_TP']['francais']);
                } else {
                    $rblat = nl2br($var['RB_comp']['latin']);
                    $rbfr = nl2br($var['RB_comp']['francais']);
                }
                $complies .= "<tr><td><h2>Responsorium Breve</h2></td>\r\n        \t\t<td><h2>R&eacute;pons bref</h2></td></tr>\r\n        \t\t<tr><td>{$rblat}</td><td>{$rbfr}</td></tr>";
                break;
                //fin du case #RB
            //fin du case #RB
            case "#ANT_NUNCD":
                $magniflat = "Salva nos, D&oacute;mine, vigil&aacute;ntes, cust&oacute;di nos dormi&eacute;ntes, ut vigil&eacute;mus cum Christo et requiesc&aacute;mus in pace.";
                $magniffr = "Sauve nous, Seigneur, quand nous veillons, garde nous quand nous dormons, et nous veillerons avec le Messie et nous reposerons en paix.";
                if ($tem == "Tempus Paschale") {
                    $magniflat .= " allel&uacute;ia.";
                    $magniffr .= " all&eacute;luia.";
                }
                $complies .= "<tr><td><p><span style=\"color:red\">Ant. </span>{$magniflat}</p></td>\r\n        \t\t<td><p><span style=\"color:red\">Ant. </span> {$magniffr}</p></td></tr>";
                break;
                //fin du case #ANT_NUNCD
            //fin du case #ANT_NUNCD
            case "#NUNCDIMITTIS":
                $complies .= psaume("nuncdimittis");
                break;
                //fin du case #NUNCDIMITTIS
            //fin du case #NUNCDIMITTIS
            case "#ORATIO":
                if (!$oratiolat) {
                    $oratiolat = $var['oratio_vesperas']['latin'];
                    $oratiofr = $var['oratio_vesperas']['francais'];
                }
                if ($calendarium['hebdomada'][$jour] == "Infra octavam paschae") {
                    $oratiolat = "Vox nostra te, D&oacute;mine, hum&iacute;liter deprec&eacute;tur, ut, dom&oacute;nic&aelig; resurrecti&oacute;nis hac die myst&eacute;rio celebr&aacute;to, in pace tua sec&uacute;ri a malis &oacute;mnibus quiesc&aacute;mus, et in tua resurg&aacute;mus laude gaud&eacute;ntes. Per Christum D&oacute;minum nostrum.";
                    $oratiofr = "Notre voix te supplie humblement, Seigneur. Nous avons c&eacute;l&eacute;br&eacute; aujourd'hui le myst&egrave;re de la r&eacute;surrection du Seigneur : fais-nous reposer dans ta paix &agrave; l'abri de tout mal, et nous relever pour chanter joyeusement ta louange. Par le Christ notre Seigneur.";
                }
                $complies .= "<tr><td>{$oratiolat}</td><td>{$oratiofr}</td></tr>";
                break;
                //fin du case #ORATIO
            //fin du case #ORATIO
            case "#ANT_MARIALE":
                $ant_marie = "";
                switch ($tem) {
                    case "Tempus Paschale":
                        $ant_marie = "ant_regina caeli";
                        break;
                    case "Tempus Quadragesimae":
                        $ant_marie = "ant_ave regina";
                        break;
                    case "Tempus passionis":
                        $ant_marie = "ant_ave regina";
                        break;
                    case "Tempus Nativitatis":
                        $ant_marie = "ant_alma redemtoris";
                        break;
                    case "Tempus Adventus":
                        $ant_marie = "ant_alma redemtoris";
                        break;
                    case "Tempus per annum":
                        $deuxfev = mktime(12, 0, 0, 2, 2, $anno);
                        if ($mense == "01" or $mense == "02" or $mense == "03") {
                            $ant_marie = "ant_ave regina";
                        } elseif ($tempo == "IN ASSUMPTIONE B. MARIAE VIRGINIS") {
                            $ant_marie = "ant_ave regina";
                        } else {
                            $ant_marie = "ant_salve regina";
                        }
                }
                if ($calendarium['1V'][$demain] == 1 && $calendarium['priorite'][$jour] > $calendarium['priorite'][$demain] && $jrdelasemaine != 7) {
                    $ant_marie = "ant_sub tuum";
                }
                $complies .= hymne($ant_marie);
                break;
                //fin du case #ANT_MARIALE
            //fin du case #ANT_MARIALE
            default:
                $complies .= "<tr><td>{$lat}</td><td>{$fr}</td></tr>";
                break;
                //fin default
        }
        // fin switch $lat
    }
    // fin boucle for
    $complies .= "</table>";
    $complies = rougis_verset($complies);
    return $complies;
}