From df6053878778942f2237065a778d03ac550890db Mon Sep 17 00:00:00 2001 From: Kazhnuz Date: Wed, 7 Nov 2018 13:36:43 +0100 Subject: [PATCH] republicandate: make identation consistent --- republicandate.php | 161 ++++++++++++++++++++++++++++----------------- 1 file changed, 99 insertions(+), 62 deletions(-) diff --git a/republicandate.php b/republicandate.php index 542b783..d6ab135 100644 --- a/republicandate.php +++ b/republicandate.php @@ -1,8 +1,9 @@ gregoriantojd (9, 22, 1805)) or ($debugCalendar==1)) { // Ce calcul prend le relais à partir du 23 septembre 1805 // On commence par déclarer les variables, qui nous servirons à calculer ou on en est rendu. $franciade_simple_nbr_jours = (3*365)+366; @@ -12,6 +13,7 @@ function extended_jdtofrench_romme ($juliandate) { $franciade_millenaire_nbr_jours = (10*$franciade_seculaire_nbr_jours)-1; // On obtien le jour courrant par rapport au début du calendrier révolutionaire $frenchdate = $juliandate - gregoriantojd (9, 22, 1792); + if ($debugCalendar==1) { echo $frenchdate . " jours se sont écoulés depuis le debut du calendrier revolutionnaire.
"; } @@ -19,55 +21,71 @@ function extended_jdtofrench_romme ($juliandate) { // On découpe ce jour courrant suivant les années. $franciade_millenaire = floor($frenchdate/$franciade_millenaire_nbr_jours); $frenchdate = $frenchdate % $franciade_millenaire_nbr_jours; + if ($debugCalendar==1) { echo $franciade_millenaire . " franciades millénaires ( de " . $franciade_millenaire_nbr_jours . " jours ) se sont écoulées depuis le début du calendrier révolutionnaire. " . $frenchdate . " jours se sont écoulés depuis le début de la franciade millénaire actuelle
"; } + $franciade_seculaire = floor($frenchdate/$franciade_seculaire_nbr_jours); $frenchdate = $frenchdate % $franciade_seculaire_nbr_jours; + if ($debugCalendar==1) { echo $franciade_seculaire . " franciades séculaires ( de " . $franciade_seculaire_nbr_jours . " jours ) se sont écoulées depuis le début de la franciade millénaire. " . $frenchdate . " jours se sont écoulé depuis le début de la franciade séculaire actuelle
"; } + if ($frenchdate < (3*$siecle_simple_nbr_jour)) { - $siecle = floor($frenchdate/$siecle_simple_nbr_jour); - $frenchdate = $frenchdate % $siecle_simple_nbr_jour; + $siecle = floor($frenchdate/$siecle_simple_nbr_jour); + $frenchdate = $frenchdate % $siecle_simple_nbr_jour; } else { - $siecle = 3; - $frenchdate = $frenchdate - (3*$siecle_simple_nbr_jour); + $siecle = 3; + $frenchdate = $frenchdate - (3*$siecle_simple_nbr_jour); } + if ($debugCalendar==1) { echo $siecle . " siècles ( de " . $siecle_simple_nbr_jour . " jours ) se sont écoulées depuis le début de la franciade séculaire. " . $frenchdate . " jours se sont écoulé depuis le début du siècle actuel
"; } + $franciade_simple = floor($frenchdate/$franciade_simple_nbr_jours); $frenchdate = $frenchdate % $franciade_simple_nbr_jours; + if ($debugCalendar==1) { echo $franciade_simple . " franciades simples ( de " . $franciade_simple_nbr_jours . " jours ) se sont écoulées depuis le début du siècle. " . $frenchdate . " jours se sont écoulé depuis le début de la franciade actuelle
"; } + if ($frenchdate < (3*365)) { - $annees = floor($frenchdate/365); - $frenchdate = $frenchdate % 365; + $annees = floor($frenchdate/365); + $frenchdate = $frenchdate % 365; } else { - $annees = 3; - $frenchdate = $frenchdate - (3*365); + $annees = 3; + $frenchdate = $frenchdate - (3*365); } + if ($debugCalendar==1) { echo $annees . " années non-sextiles ( de 365 jours ) se sont écoulées depuis le début de la franciade. " . $frenchdate . " jours se sont écoulé depuis le début de l'année
"; } + $annees = ($franciade_millenaire*4000)+($franciade_seculaire*400)+($siecle*100)+($franciade_simple*4)+$annees; $mois = floor($frenchdate/30); $jours = ($frenchdate % 30); + if ($debugCalendar==1) { echo $mois . " mois ( de 30 jours ) se sont écoulées depuis le début de l'année. " . $jours . " jours se sont écoulé depuis le début du mois
"; } + // On rajoute à chaque élément un numéro en plus, parce qu'une date ne commence jamais par 0 :) $annees = $annees+1; $mois = $mois+1; $jours = $jours+1; + $republican_date_string = $mois . "/" . $jours . "/" . $annees; - } else {// Sinon on utilise le calcul de la fonction normal, qui nous permet d'avoir les valeurs révolutionnaires exactes + } else { + // Sinon on utilise le calcul de la fonction normal, qui nous permet d'avoir les valeurs révolutionnaires exactes $republican_date_string = jdtofrench ($juliandate); } + return $republican_date_string; } + function gregorian2FrenchDateArray($m, $d, $y) { $julian_date = gregoriantojd($m, $d, $y); @@ -81,8 +99,10 @@ function gregorian2FrenchDateArray($m, $d, $y) /* convert the year number to roman digits (as most historians do and documents of the time did */ $stryear = $arD[2]; + return array($monthname, $arD[1], $stryear ) ; } + function FrenchMonthNames($mo) { /* The names have been invented by Fabre d'Églantine, a second or rather third rank poet @@ -106,30 +126,34 @@ of primarily pastoral poems, with each name referring to the respective period i return $arMo[$mo-1] ; } + function FrenchDayNames($Day) { - /* The names have been invented by Fabre d'Églantine, a second or rather third rank poet + /* The names have been invented by Fabre d'Églantine, a second or rather third rank poet of primarily pastoral poems, with each name referring to the respective period in the agricultural year; e.g. "Vendémiaire" (approx. September) is derived from "vendange" ("harvest"), "Brumaire" (Ocotober/November) from "brume" ("fog") and so on ... */ - $arDay = array("Primidi", - "Duodi", - "Tridi", - "Quartidi", - "Quintidi", - "Sextidi", - "Septidi", - "Octidi", - "Nonidi", - "Décadi") ; - return $arDay[($Day-1) % 10] ; - + $arDay = array( "Primidi", + "Duodi", + "Tridi", + "Quartidi", + "Quintidi", + "Sextidi", + "Septidi", + "Octidi", + "Nonidi", + "Décadi") ; + + return $arDay[($Day-1) % 10] ; } + function FrenchSaintNames($Month, $Day) { -$arDay = array('Raisin','Safran','Châtaigne','Colchique','Cheval','Balsamine','Carotte','Amaranthe','Panais','Cuve','Pomme de terre','Immortelle','Potiron','Réséda','Âne','Belle de nuit','Citrouille','Sarrasin','Tournesol','Pressoir','Chanvre','Pêche','Navet','Amaryllis','Bœuf','Aubergine','Piment','Tomate','Orge','Tonneau', 'Pomme','Céleri','Poire','Betterave','Oie','Héliotrope','Figue','Scorsonère','Alisier','Charrue','Salsifis','Mâcre','Topinambour','Endive','Dindon','Chervis','Cresson','Dentelaire','Grenade','Herse','Bacchante','Azerole','Garance','Orange','Faisan','Pistache','Macjonc','Coing','Cormier','Rouleau', 'Raiponce','Turneps','Chicorée','Nèfle','Cochon','Mâche','Chou-fleur','Miel','Genièvre','Pioche','Cire','Raifort','Cèdre','Sapin','Chevreuil','Ajonc','Cyprès','Lierre','Sabine','Hoyau','Érable sucré','Bruyère','Roseau','Oseille','Grillon','Pignon','Liège','Truffe','Olive','Pelle', 'Tourbe','Houille','Bitume','Soufre','Chien','Lave','Terre végétale','Fumier','Salpêtre','Fléau','Granit','Argile','Ardoise','Grès','Lapin','Silex','Marne','Pierre à chaux','Marbre','Van','Pierre à plâtre','Sel','Fer','Cuivre','Chat','Étain','Plomb','Zinc','Mercure','Crible', 'Lauréole','Mousse','Fragon','Perce-neige','Taureau','Laurier tin','Amadouvier','Mézéréon','Peuplier','Coignée','Ellébore','Brocoli','Laurier','Avelinier','Vache','Buis','Lichen','If','Pulmonaire','Serpette','Thlaspi','Thimele','Chiendent','Trainasse','Lièvre','Guède','Noisetier','Cyclamen','Chélidoine','Traîneau', 'Tussilage','Cornouiller','Violier','Troène','Bouc','Asaret','Alaterne','Violette','Marceau','Bêche','Narcisse','Orme','Fumeterre','Vélar','Chèvre','Épinard','Doronic','Mouron','Cerfeuil','Cordeau','Mandragore','Persil','Cochléaria','Pâquerette','Thon','Pissenlit','Sylvie','Capillaire','Frêne','Plantoir', 'Primevère','Platane','Asperge','Tulipe','Poule','Bette','Bouleau','Jonquille','Aulne','Couvoir','Pervenche','Charme','Morille','Hêtre','Abeille','Laitue','Mélèze','Ciguë','Radis','Ruche','Gainier','Romaine','Marronnier','Roquette','Pigeon','Lilas (commun)','Anémone','Pensée','Myrtile','Greffoir', 'Rose','Chêne','Fougère','Aubépine','Rossignol','Ancolie','Muguet','Champignon','Hyacinthe','Râteau','Rhubarbe','Sainfoin','Bâton-d´or','Chamerops','Ver à soie','Consoude','Pimprenelle','Corbeille d´or','Arroche','Sarcloir','Statice','Fritillaire','Bourrache','Valériane','Carpe','Fusain','Civette','Buglosse','Sénevé','Houlette', 'Luzerne','Hémérocalle','Trèfle','Angélique','Canard','Mélisse','Fromental','Martagon','Serpolet','Faux','Fraise','Bétoine','Pois','Acacia','Caille','Œillet','Sureau','Pavot','Tilleul','Fourche','Barbeau','Camomille','Chèvrefeuille','Caille-lait','Tanche','Jasmin','Verveine','Thym','Pivoine','Chariot', 'Seigle','Avoine','Oignon','Véronique','Mulet','Romarin','Concombre','Échalote','Absinthe','Faucille','Coriandre','Artichaut','Girofle','Lavande','Chamois','Tabac','Groseille','Gesse','Cerise','Parc','Menthe','Cumin','Haricot','Orcanète','Pintade','Sauge','Ail','Vesce','Blé','Chalemie', 'Épeautre','Bouillon-blanc','Melon','Ivraie','Bélier','Prêle','Armoise','Carthame','Mûre','Arrosoir','Panic','Salicorne','Abricot','Basilic','Brebis','Guimauve','Lin','Amande','Gentiane','Écluse','Carline','Câprier','Lentille','Aunée','Loutre','Myrte','Colza','Lupin','Coton','Moulin', 'Prune','Millet','Lycoperdon','Escourgeon','Saumon','Tubéreuse','Sucrion','Apocyn','Réglisse','Échelle','Pastèque','Fenouil','Épine vinette','Noix','Truite','Citron','Cardère','Nerprun','Tagette','Hotte','Églantier','Noisette','Houblon','Sorgho','Écrevisse','Bigarade','Verge d´or','Maïs','Marron','Panier'); -$absDay = (($Month-1)*30)+$Day; + $arDay = array('Raisin','Safran','Châtaigne','Colchique','Cheval','Balsamine','Carotte','Amaranthe','Panais','Cuve','Pomme de terre','Immortelle','Potiron','Réséda','Âne','Belle de nuit','Citrouille','Sarrasin','Tournesol','Pressoir','Chanvre','Pêche','Navet','Amaryllis','Bœuf','Aubergine','Piment','Tomate','Orge','Tonneau', 'Pomme','Céleri','Poire','Betterave','Oie','Héliotrope','Figue','Scorsonère','Alisier','Charrue','Salsifis','Mâcre','Topinambour','Endive','Dindon','Chervis','Cresson','Dentelaire','Grenade','Herse','Bacchante','Azerole','Garance','Orange','Faisan','Pistache','Macjonc','Coing','Cormier','Rouleau', 'Raiponce','Turneps','Chicorée','Nèfle','Cochon','Mâche','Chou-fleur','Miel','Genièvre','Pioche','Cire','Raifort','Cèdre','Sapin','Chevreuil','Ajonc','Cyprès','Lierre','Sabine','Hoyau','Érable sucré','Bruyère','Roseau','Oseille','Grillon','Pignon','Liège','Truffe','Olive','Pelle', 'Tourbe','Houille','Bitume','Soufre','Chien','Lave','Terre végétale','Fumier','Salpêtre','Fléau','Granit','Argile','Ardoise','Grès','Lapin','Silex','Marne','Pierre à chaux','Marbre','Van','Pierre à plâtre','Sel','Fer','Cuivre','Chat','Étain','Plomb','Zinc','Mercure','Crible', 'Lauréole','Mousse','Fragon','Perce-neige','Taureau','Laurier tin','Amadouvier','Mézéréon','Peuplier','Coignée','Ellébore','Brocoli','Laurier','Avelinier','Vache','Buis','Lichen','If','Pulmonaire','Serpette','Thlaspi','Thimele','Chiendent','Trainasse','Lièvre','Guède','Noisetier','Cyclamen','Chélidoine','Traîneau', 'Tussilage','Cornouiller','Violier','Troène','Bouc','Asaret','Alaterne','Violette','Marceau','Bêche','Narcisse','Orme','Fumeterre','Vélar','Chèvre','Épinard','Doronic','Mouron','Cerfeuil','Cordeau','Mandragore','Persil','Cochléaria','Pâquerette','Thon','Pissenlit','Sylvie','Capillaire','Frêne','Plantoir', 'Primevère','Platane','Asperge','Tulipe','Poule','Bette','Bouleau','Jonquille','Aulne','Couvoir','Pervenche','Charme','Morille','Hêtre','Abeille','Laitue','Mélèze','Ciguë','Radis','Ruche','Gainier','Romaine','Marronnier','Roquette','Pigeon','Lilas (commun)','Anémone','Pensée','Myrtile','Greffoir', 'Rose','Chêne','Fougère','Aubépine','Rossignol','Ancolie','Muguet','Champignon','Hyacinthe','Râteau','Rhubarbe','Sainfoin','Bâton-d´or','Chamerops','Ver à soie','Consoude','Pimprenelle','Corbeille d´or','Arroche','Sarcloir','Statice','Fritillaire','Bourrache','Valériane','Carpe','Fusain','Civette','Buglosse','Sénevé','Houlette', 'Luzerne','Hémérocalle','Trèfle','Angélique','Canard','Mélisse','Fromental','Martagon','Serpolet','Faux','Fraise','Bétoine','Pois','Acacia','Caille','Œillet','Sureau','Pavot','Tilleul','Fourche','Barbeau','Camomille','Chèvrefeuille','Caille-lait','Tanche','Jasmin','Verveine','Thym','Pivoine','Chariot', 'Seigle','Avoine','Oignon','Véronique','Mulet','Romarin','Concombre','Échalote','Absinthe','Faucille','Coriandre','Artichaut','Girofle','Lavande','Chamois','Tabac','Groseille','Gesse','Cerise','Parc','Menthe','Cumin','Haricot','Orcanète','Pintade','Sauge','Ail','Vesce','Blé','Chalemie', 'Épeautre','Bouillon-blanc','Melon','Ivraie','Bélier','Prêle','Armoise','Carthame','Mûre','Arrosoir','Panic','Salicorne','Abricot','Basilic','Brebis','Guimauve','Lin','Amande','Gentiane','Écluse','Carline','Câprier','Lentille','Aunée','Loutre','Myrte','Colza','Lupin','Coton','Moulin', 'Prune','Millet','Lycoperdon','Escourgeon','Saumon','Tubéreuse','Sucrion','Apocyn','Réglisse','Échelle','Pastèque','Fenouil','Épine vinette','Noix','Truite','Citron','Cardère','Nerprun','Tagette','Hotte','Églantier','Noisette','Houblon','Sorgho','Écrevisse','Bigarade','Verge d´or','Maïs','Marron','Panier'); + + $absDay = (($Month-1)*30)+$Day; + if($absDay < count($arDay)+1) - return $arDay[$absDay-1]; + return $arDay[$absDay-1]; } function FrenchSansCullotidesNames($Day) { $arSC = array("Jour de la vertu", @@ -138,8 +162,9 @@ function FrenchSansCullotidesNames($Day) { "Jour de l'opinion", "Jour des récompenses", "Jour de la révolution"); - if($Day < count($arSC)+1) - return $arSC[$Day-1] ; + + if($Day < count($arSC)+1) + return $arSC[$Day-1] ; } function FrenchOrdinalNumber($Day) { $arSC = array("Premier", @@ -148,43 +173,55 @@ function FrenchOrdinalNumber($Day) { "Quatrième", "Cinquième", "Sixième"); - if($Day < count($arSC)+1) - return $arSC[$Day-1] ; + + if($Day < count($arSC)+1) + return $arSC[$Day-1] ; } + function gregorian2FrenchDateString($m,$d,$y) { - $julian_date = gregoriantojd($m, $d, $y); - $french = extended_jdtofrench_romme($julian_date); - if($french == "0/0/0") - return "" ; - $arD = explode("/", $french) ; - $monthname = FrenchMonthNames($arD[0]) ; - $dayname = FrenchDayNames($arD[1]); - if ($arD[0]==13) { - $dayMonthString = FrenchSansCullotidesNames($arD[1]) . ", "; - $saintString = FrenchOrdinalNumber($arD[1]) . " jour des " . $monthname; - } else { - $dayMonthString = $dayname . ", " . $arD[1] . " " . $monthname . ", "; - $saintString = FrenchSaintNames($arD[0],$arD[1]); - } - $yearString = "an " . $arD[2]; - return $dayMonthString . $yearString . "
" . $saintString . ""; + $julian_date = gregoriantojd($m, $d, $y); + $french = extended_jdtofrench_romme($julian_date); + + if($french == "0/0/0") + return "" ; + + $arD = explode("/", $french) ; + $monthname = FrenchMonthNames($arD[0]) ; + $dayname = FrenchDayNames($arD[1]); + + if ($arD[0]==13) { + $dayMonthString = FrenchSansCullotidesNames($arD[1]) . ", "; + $saintString = FrenchOrdinalNumber($arD[1]) . " jour des " . $monthname; + } else { + $dayMonthString = $dayname . ", " . $arD[1] . " " . $monthname . ", "; + $saintString = FrenchSaintNames($arD[0],$arD[1]); + } + + $yearString = "an " . $arD[2]; + + return $dayMonthString . $yearString . "
" . $saintString . ""; } + function gregorian2FrenchDateStringShort($m,$d,$y) { - $julian_date = gregoriantojd($m, $d, $y); - $french = extended_jdtofrench_romme($julian_date); - if($french == "0/0/0") - return "" ; - $arD = explode("/", $french) ; - $monthname = FrenchMonthNames($arD[0]) ; - $dayname = FrenchDayNames($arD[1]); - if ($arD[0]==13) { - $dayMonthString = FrenchSansCullotidesNames($arD[1]) . ", "; - $saintString = FrenchOrdinalNumber($arD[1]) . " jour des " . $monthname; - } else { - $dayMonthString = $arD[1] . " " . $monthname . ", "; - $saintString = FrenchSaintNames($arD[0],$arD[1]); - } - $yearString = "an " . $arD[2]; - return $dayMonthString . $yearString; + $julian_date = gregoriantojd($m, $d, $y); + $french = extended_jdtofrench_romme($julian_date); + if($french == "0/0/0") + return "" ; + + $arD = explode("/", $french) ; + $monthname = FrenchMonthNames($arD[0]) ; + $dayname = FrenchDayNames($arD[1]); + + if ($arD[0]==13) { + $dayMonthString = FrenchSansCullotidesNames($arD[1]) . ", "; + $saintString = FrenchOrdinalNumber($arD[1]) . " jour des " . $monthname; + } else { + $dayMonthString = $arD[1] . " " . $monthname . ", "; + $saintString = FrenchSaintNames($arD[0],$arD[1]); + } + + $yearString = "an " . $arD[2]; + + return $dayMonthString . $yearString; } ?>