texlive[76143] Master/texmf-dist: coloredbelts (25aug25)

commits+karl at tug.org commits+karl at tug.org
Mon Aug 25 21:58:14 CEST 2025


Revision: 76143
          https://tug.org/svn/texlive?view=revision&revision=76143
Author:   karl
Date:     2025-08-25 21:58:13 +0200 (Mon, 25 Aug 2025)
Log Message:
-----------
coloredbelts (25aug25)

Modified Paths:
--------------
    trunk/Master/texmf-dist/doc/latex/coloredbelts/README.md
    trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-en.pdf
    trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-en.tex
    trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-fr.pdf
    trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-fr.tex
    trunk/Master/texmf-dist/tex/latex/coloredbelts/coloredbelts.sty

Modified: trunk/Master/texmf-dist/doc/latex/coloredbelts/README.md
===================================================================
--- trunk/Master/texmf-dist/doc/latex/coloredbelts/README.md	2025-08-24 23:41:51 UTC (rev 76142)
+++ trunk/Master/texmf-dist/doc/latex/coloredbelts/README.md	2025-08-25 19:58:13 UTC (rev 76143)
@@ -1,8 +1,15 @@
 coloredbelts is a package with colored judo's belts.
+
 -----------------------------------------------------------------
+
 coloredbelts est un package avec des ceintures de judo, colorées.
+
 -----------------------------------------------------------------
+
 Author.......: Cédric Pierquet
+
 email........: cpierquet at outlook.fr
+
 Licence......: Released under the LaTeX Project Public License v1.3c or later, see http://www.latex-project.org/lppl.txt
+
 Licence svg  : CC BY-SA 3.0 https://commons.wikimedia.org/wiki/File:Judo_yellow_belt.svg
\ No newline at end of file

Modified: trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-en.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-en.tex
===================================================================
--- trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-en.tex	2025-08-24 23:41:51 UTC (rev 76142)
+++ trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-en.tex	2025-08-25 19:58:13 UTC (rev 76143)
@@ -37,8 +37,8 @@
 \usepackage[margin=2cm]{geometry}
 \setlength{\parindent}{0pt}
 
-\def\TPversion{0.1.4}
-\def\TPdate{25/06/2025}
+\def\TPversion{0.1.5}
+\def\TPdate{25/08/2025}
 \def\HtRet{0.45}\def\LgRect{1.5}
 \usepackage{tcolorbox}
 
@@ -135,7 +135,7 @@
 
 The package loads within the preamble, with \MontreCode{\textbackslash usepackage\{coloredbelts\}}.
 
-The only loaded packages are \MontreCode{graphicx}, \MontreCode{calc}, \MontreCode{simplekv} and \MontreCode{xstring}.
+The only loaded package is \MontreCode{graphicx}, the rest of the code is in \hologo{LaTeX3}.
 
 \begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
 \usepackage{coloredbelts}
@@ -231,6 +231,8 @@
 
 \section{History}
 
+\verb|v0.1.5|:~~~~Code rewritten in \hologo{LaTeX3}
+
 \verb|v0.1.4|:~~~~Key \textsf{Strut} for automatic height
 
 \verb|v0.1.3|:~~~~Better management of files

Modified: trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-fr.pdf
===================================================================
(Binary files differ)

Modified: trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-fr.tex
===================================================================
--- trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-fr.tex	2025-08-24 23:41:51 UTC (rev 76142)
+++ trunk/Master/texmf-dist/doc/latex/coloredbelts/coloredbelts-doc-fr.tex	2025-08-25 19:58:13 UTC (rev 76143)
@@ -36,8 +36,8 @@
 \usepackage[margin=2cm]{geometry}
 \setlength{\parindent}{0pt}
 
-\def\TPversion{0.1.4}
-\def\TPdate{25 juin 2025}
+\def\TPversion{0.1.5}
+\def\TPdate{25 août 2025}
 \def\HtRet{0.45}\def\LgRect{1.5}
 \usepackage{tcolorbox}
 
@@ -134,7 +134,7 @@
 
 Le package se charge dans le préambule, via \MontreCode{\textbackslash usepackage\{coloredbelts\}}.
 
-Les seuls packages chargés sont \MontreCode{graphicx}, \MontreCode{calc} et \MontreCode{simplekv} et \MontreCode{xstring}.
+Le seuls package chargés est \MontreCode{graphicx}, le reste du code est en \hologo{LaTeX3}.
 
 \begin{codehigh}[language=latex/latex2,style/main=cyan!10,style/code=cyan!10]
 \usepackage{coloredbelts}
@@ -230,6 +230,8 @@
 
 \section{Historique}
 
+\verb|v0.1.5|~:~~~~Passage à \hologo{LaTeX3}
+
 \verb|v0.1.4|~:~~~~Ajout d'une clé \textsf{Strut} pour la hauteur automatique
 
 \verb|v0.1.3|~:~~~~Uniformisation des fichiers

Modified: trunk/Master/texmf-dist/tex/latex/coloredbelts/coloredbelts.sty
===================================================================
--- trunk/Master/texmf-dist/tex/latex/coloredbelts/coloredbelts.sty	2025-08-24 23:41:51 UTC (rev 76142)
+++ trunk/Master/texmf-dist/tex/latex/coloredbelts/coloredbelts.sty	2025-08-25 19:58:13 UTC (rev 76143)
@@ -4,9 +4,10 @@
 %               : Tks to Sascha Christmann for "in betweeen" colors
 
 \NeedsTeXFormat{LaTeX2e}
-\ProvidesPackage{coloredbelts}[2025/06/25 0.1.4 Colored Judo's belts]
+\ProvidesExplPackage{coloredbelts}{2025-08-25}{0.1.5}{Colored Judo's belts}
 
 %====HISTORIQUE
+% v 0.1.5	Passage en LaTeX3
 % v 0.1.4	Option strut
 % v 0.1.3	Uniformisation des fichiers
 % v 0.1.2	Amélioration de la gestion des longueurs
@@ -15,146 +16,189 @@
 
 %====BASE
 \RequirePackage{graphicx}
-%\RequirePackage{tikz}
-\RequirePackage{xstring}
-\RequirePackage{calc}
-\RequirePackage{simplekv}
 
 %====DIMENSIONS
-\newlength{\tmp at ceinture@hauteur at totale}
-\newlength{\tmp at ceinture@profondeur}
-\newlength{\judobeltraise}
+\dim_new:N \g_judobelt_totheight_dim
+\dim_new:N \g_judobelt_depth_dim
+\dim_new:N \g_judobeltraise_dim
 
-%====CLÉS
-\defKV[ceinturejudo]{Hauteur=\def\judobeltheight{#1},DecalV=\setlength\judobeltraise{#1},Strut=\def\judobeltstrut{#1}}
-\setKVdefault[ceinturejudo]{Hauteur=auto,DecalV=0pt,Strut=abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ}
+%====VARIABLES
+\tl_new:N \l_judobeltheight_tl
+\tl_new:N \l_judobeltstrut_tl
+\tl_new:N \l_judobeltcolor_tl
 
-%====COMMANDE
-\NewDocumentCommand\CeintureCouleur{ s O{} m }{%
-	%gestion des couleurs
-	\def\tmp at ceinture@couleur{yellow}%
-	\IfStrEq{#3}{white}{\def\tmp at ceinture@couleur{white}}{}%
-	\IfStrEq{#3}{blanc}{\def\tmp at ceinture@couleur{white}}{}%
-	\IfStrEq{#3}{jaune}{\def\tmp at ceinture@couleur{yellow}}{}%
-	\IfStrEq{#3}{yellow}{\def\tmp at ceinture@couleur{yellow}}{}%
-	\IfStrEq{#3}{orange}{\def\tmp at ceinture@couleur{orange}}{}%
-	\IfStrEq{#3}{red}{\def\tmp at ceinture@couleur{red}}{}%
-	\IfStrEq{#3}{rouge}{\def\tmp at ceinture@couleur{red}}{}%
-	\IfStrEq{#3}{bleu}{\def\tmp at ceinture@couleur{blue}}{}%
-	\IfStrEq{#3}{blue}{\def\tmp at ceinture@couleur{blue}}{}%
-	\IfStrEq{#3}{purple}{\def\tmp at ceinture@couleur{purple}}{}%
-	\IfStrEq{#3}{violet}{\def\tmp at ceinture@couleur{purple}}{}%
-	\IfStrEq{#3}{marron}{\def\tmp at ceinture@couleur{brown}}{}%
-	\IfStrEq{#3}{brown}{\def\tmp at ceinture@couleur{brown}}{}%
-	\IfStrEq{#3}{green}{\def\tmp at ceinture@couleur{green}}{}%
-	\IfStrEq{#3}{vert}{\def\tmp at ceinture@couleur{green}}{}%
-	\IfStrEq{#3}{rose}{\def\tmp at ceinture@couleur{pink}}{}%
-	\IfStrEq{#3}{pink}{\def\tmp at ceinture@couleur{pink}}{}%
-	\IfStrEq{#3}{gris}{\def\tmp at ceinture@couleur{gray}}{}%
-	\IfStrEq{#3}{gray}{\def\tmp at ceinture@couleur{gray}}{}%
-	\IfStrEq{#3}{noir}{\def\tmp at ceinture@couleur{black}}{}%
-	\IfStrEq{#3}{black}{\def\tmp at ceinture@couleur{black}}{}%
-	\IfStrEq{#3}{white-yellow}{\def\tmp at ceinture@couleur{white-yellow}}{}%
-	\IfStrEq{#3}{blanc-jaune}{\def\tmp at ceinture@couleur{white-yellow}}{}%
-	\IfStrEq{#3}{yellow-orange}{\def\tmp at ceinture@couleur{yellow-orange}}{}%
-	\IfStrEq{#3}{jaune-orange}{\def\tmp at ceinture@couleur{yellow-orange}}{}%
-	\IfStrEq{#3}{orange-green}{\def\tmp at ceinture@couleur{orange-green}}{}%
-	\IfStrEq{#3}{orange-vert}{\def\tmp at ceinture@couleur{orange-green}}{}%
-	\IfStrEq{#3}{green-blue}{\def\tmp at ceinture@couleur{green-blue}}{}%
-	\IfStrEq{#3}{vert-bleu}{\def\tmp at ceinture@couleur{green-blue}}{}%
-	\IfStrEq{#3}{purple-brown}{\def\tmp at ceinture@couleur{purple-brown}}{}%
-	\IfStrEq{#3}{violet-marron}{\def\tmp at ceinture@couleur{purple-brown}}{}%
-	\IfStrEq{#3}{blue-brown}{\def\tmp at ceinture@couleur{blue-brown}}{}%
-	\IfStrEq{#3}{bleu-marron}{\def\tmp at ceinture@couleur{blue-brown}}{}%
-	\IfStrEq{#3}{blue-purple}{\def\tmp at ceinture@couleur{blue-purple}}{}%
-	\IfStrEq{#3}{bleu-violet}{\def\tmp at ceinture@couleur{blue-purple}}{}%
-	\IfStrEq{#3}{brown-black}{\def\tmp at ceinture@couleur{brown-black}}{}%
-	\IfStrEq{#3}{marron-noir}{\def\tmp at ceinture@couleur{brown-black}}{}%
-	%étoilée := includegraphics simple
-	\IfBooleanTF{#1}%
-		{%
-			\includegraphics[#2]{judobelt-\tmp at ceinture@couleur.pdf}
-		}%
-		{%
-			\useKVdefault[ceinturejudo]%
-			\setKV[ceinturejudo]{#2}%
-			\IfStrEq{\judobeltheight}{auto}%
-				{%
-					%hauteur auto
-					\settototalheight{\tmp at ceinture@hauteur at totale}{\hbox{\judobeltstrut}}%
-					\settodepth{\tmp at ceinture@profondeur}{\hbox{\judobeltstrut}}%
-					\raisebox{-\tmp at ceinture@profondeur+0.025\tmp at ceinture@hauteur at totale}{\includegraphics[height=0.95\tmp at ceinture@hauteur at totale]{judobelt-\tmp at ceinture@couleur.pdf}}%
-				}%
-				{%
-					\raisebox{\judobeltraise}{\includegraphics[height=\judobeltheight]{judobelt-\tmp at ceinture@couleur.pdf}}%
-				}%
-		}%
-}
+%====CLÉS (version française)
+\keys_define:nn { ceinturejudo }
+  {
+    Hauteur .tl_set:N = \l_judobeltheight_tl,
+    Hauteur .initial:n = {auto},
+    DecalV .dim_set:N = \l_judobeltraise_dim,
+    DecalV .initial:n = {0pt},
+    Strut .tl_set:N = \l_judobeltstrut_tl,
+    Strut .initial:n = {abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ}
+  }
 
-%====CLÉS
-\defKV[judobelt]{Height=\def\judobeltheight{#1},OffsetV=\setlength\judobeltraise{#1},Strut=\def\judobeltstrut{#1}}
-\setKVdefault[judobelt]{Height=auto,OffsetV=0pt,Strut=abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ}
+%====COMMANDE FR
+\NewDocumentCommand\CeintureCouleur{ s O{} m }
+  {
+    \group_begin:
+    % Gestion des couleurs
+    \str_case:enF { #3 }
+      {
+        {white}{\def\tmp at ceinture@couleur{white}}
+        {blanc}{\def\tmp at ceinture@couleur{white}}
+        {jaune}{\def\tmp at ceinture@couleur{yellow}}
+        {yellow}{\def\tmp at ceinture@couleur{yellow}}
+        {orange}{\def\tmp at ceinture@couleur{orange}}
+        {red}{\def\tmp at ceinture@couleur{red}}
+        {rouge}{\def\tmp at ceinture@couleur{red}}
+        {bleu}{\def\tmp at ceinture@couleur{blue}}
+        {blue}{\def\tmp at ceinture@couleur{blue}}
+        {purple}{\def\tmp at ceinture@couleur{purple}}
+        {violet}{\def\tmp at ceinture@couleur{purple}}
+        {marron}{\def\tmp at ceinture@couleur{brown}}
+        {brown}{\def\tmp at ceinture@couleur{brown}}
+        {green}{\def\tmp at ceinture@couleur{green}}
+        {vert}{\def\tmp at ceinture@couleur{green}}
+        {rose}{\def\tmp at ceinture@couleur{pink}}
+        {pink}{\def\tmp at ceinture@couleur{pink}}
+        {gris}{\def\tmp at ceinture@couleur{gray}}
+        {gray}{\def\tmp at ceinture@couleur{gray}}
+        {noir}{\def\tmp at ceinture@couleur{black}}
+        {black}{\def\tmp at ceinture@couleur{black}}
+        {white-yellow}{\def\tmp at ceinture@couleur{white-yellow}}
+        {blanc-jaune}{\def\tmp at ceinture@couleur{white-yellow}}
+        {yellow-orange}{\def\tmp at ceinture@couleur{yellow-orange}}
+        {jaune-orange}{\def\tmp at ceinture@couleur{yellow-orange}}
+        {orange-green}{\def\tmp at ceinture@couleur{orange-green}}
+        {orange-vert}{\def\tmp at ceinture@couleur{orange-green}}
+        {green-blue}{\def\tmp at ceinture@couleur{green-blue}}
+        {vert-bleu}{\def\tmp at ceinture@couleur{green-blue}}
+        {purple-brown}{\def\tmp at ceinture@couleur{purple-brown}}
+        {violet-marron}{\def\tmp at ceinture@couleur{purple-brown}}
+        {blue-brown}{\def\tmp at ceinture@couleur{blue-brown}}
+        {bleu-marron}{\def\tmp at ceinture@couleur{blue-brown}}
+        {blue-purple}{\def\tmp at ceinture@couleur{blue-purple}}
+        {bleu-violet}{\def\tmp at ceinture@couleur{blue-purple}}
+        {brown-black}{\def\tmp at ceinture@couleur{brown-black}}
+        {marron-noir}{\def\tmp at ceinture@couleur{brown-black}}
+      }
+      {\def\tmp at ceinture@couleur{yellow}}
+    
+    % Étoilée := includegraphics simple
+    \bool_if:NTF #1
+      {
+        \includegraphics[#2]{judobelt-\tmp at ceinture@couleur.pdf}
+      }
+      {
+        \keys_set:nn { ceinturejudo } { #2 }
+        \str_if_eq:eeTF { \tl_to_str:N \l_judobeltheight_tl } { auto }
+          {
+            % hauteur auto
+            \hbox_set:Nn \l_tmpa_box { \tl_use:N \l_judobeltstrut_tl }
+            \dim_set:Nn \g_judobelt_totheight_dim { \box_dp:N \l_tmpa_box + \box_ht:N \l_tmpa_box }
+            \dim_set:Nn \g_judobelt_depth_dim { \box_dp:N \l_tmpa_box }
+            \dim_set:Nn \g_judobeltraise_dim
+              {
+                -\g_judobelt_depth_dim + \fp_eval:n { 0.025 * \dim_to_decimal_in_unit:nn { \g_judobelt_totheight_dim } { 1pt } } pt
+              }
+            \raisebox{ \dim_use:N \g_judobeltraise_dim }
+            {
+              \includegraphics[height={\dim_eval:n { 0.95\g_judobelt_totheight_dim }}]{judobelt-\tmp at ceinture@couleur.pdf}
+            }
+          }
+          {
+            \raisebox{\dim_use:N \l_judobeltraise_dim}{\includegraphics[height={\l_judobeltheight_tl}]{judobelt-\tmp at ceinture@couleur.pdf}}
+          }
+      }
+    \group_end:
+  }
 
-%====COMMANDE
-\NewDocumentCommand\ColorBelt{ s O{} m }{%
-	%gestion des couleurs
-	\def\tmp at ceinture@couleur{yellow}%
-	\IfStrEq{#3}{white}{\def\tmp at ceinture@couleur{white}}{}%
-	\IfStrEq{#3}{blanc}{\def\tmp at ceinture@couleur{white}}{}%
-	\IfStrEq{#3}{jaune}{\def\tmp at ceinture@couleur{yellow}}{}%
-	\IfStrEq{#3}{yellow}{\def\tmp at ceinture@couleur{yellow}}{}%
-	\IfStrEq{#3}{orange}{\def\tmp at ceinture@couleur{orange}}{}%
-	\IfStrEq{#3}{red}{\def\tmp at ceinture@couleur{red}}{}%
-	\IfStrEq{#3}{rouge}{\def\tmp at ceinture@couleur{red}}{}%
-	\IfStrEq{#3}{bleu}{\def\tmp at ceinture@couleur{blue}}{}%
-	\IfStrEq{#3}{blue}{\def\tmp at ceinture@couleur{blue}}{}%
-	\IfStrEq{#3}{purple}{\def\tmp at ceinture@couleur{purple}}{}%
-	\IfStrEq{#3}{violet}{\def\tmp at ceinture@couleur{purple}}{}%
-	\IfStrEq{#3}{marron}{\def\tmp at ceinture@couleur{brown}}{}%
-	\IfStrEq{#3}{brown}{\def\tmp at ceinture@couleur{brown}}{}%
-	\IfStrEq{#3}{green}{\def\tmp at ceinture@couleur{green}}{}%
-	\IfStrEq{#3}{vert}{\def\tmp at ceinture@couleur{green}}{}%
-	\IfStrEq{#3}{rose}{\def\tmp at ceinture@couleur{pink}}{}%
-	\IfStrEq{#3}{pink}{\def\tmp at ceinture@couleur{pink}}{}%
-	\IfStrEq{#3}{gris}{\def\tmp at ceinture@couleur{gray}}{}%
-	\IfStrEq{#3}{gray}{\def\tmp at ceinture@couleur{gray}}{}%
-	\IfStrEq{#3}{noir}{\def\tmp at ceinture@couleur{black}}{}%
-	\IfStrEq{#3}{black}{\def\tmp at ceinture@couleur{black}}{}%
-	\IfStrEq{#3}{white-yellow}{\def\tmp at ceinture@couleur{white-yellow}}{}%
-	\IfStrEq{#3}{blanc-jaune}{\def\tmp at ceinture@couleur{white-yellow}}{}%
-	\IfStrEq{#3}{yellow-orange}{\def\tmp at ceinture@couleur{yellow-orange}}{}%
-	\IfStrEq{#3}{jaune-orange}{\def\tmp at ceinture@couleur{yellow-orange}}{}%
-	\IfStrEq{#3}{orange-green}{\def\tmp at ceinture@couleur{orange-green}}{}%
-	\IfStrEq{#3}{orange-vert}{\def\tmp at ceinture@couleur{orange-green}}{}%
-	\IfStrEq{#3}{green-blue}{\def\tmp at ceinture@couleur{green-blue}}{}%
-	\IfStrEq{#3}{vert-bleu}{\def\tmp at ceinture@couleur{green-blue}}{}%
-	\IfStrEq{#3}{purple-brown}{\def\tmp at ceinture@couleur{purple-brown}}{}%
-	\IfStrEq{#3}{violet-marron}{\def\tmp at ceinture@couleur{purple-brown}}{}%
-	\IfStrEq{#3}{blue-brown}{\def\tmp at ceinture@couleur{blue-brown}}{}%
-	\IfStrEq{#3}{bleu-marron}{\def\tmp at ceinture@couleur{blue-brown}}{}%
-	\IfStrEq{#3}{blue-purple}{\def\tmp at ceinture@couleur{blue-purple}}{}%
-	\IfStrEq{#3}{bleu-violet}{\def\tmp at ceinture@couleur{blue-purple}}{}%
-	\IfStrEq{#3}{brown-black}{\def\tmp at ceinture@couleur{brown-black}}{}%
-	\IfStrEq{#3}{marron-noir}{\def\tmp at ceinture@couleur{brown-black}}{}%
-	%étoilée := includegraphics simple
-	\IfBooleanTF{#1}%
-		{%
-			\includegraphics[#2]{judobelt-\tmp at ceinture@couleur.pdf}
-		}%
-		{%
-			\useKVdefault[judobelt]%
-			\setKV[judobelt]{#2}%
-			\IfStrEq{\judobeltheight}{auto}%
-				{%
-					%hauteur auto
-					\settototalheight{\tmp at ceinture@hauteur at totale}{\hbox{\judobeltstrut}}%
-					\settodepth{\tmp at ceinture@profondeur}{\hbox{\judobeltstrut}}%
-					\raisebox{-\tmp at ceinture@profondeur+0.025\tmp at ceinture@hauteur at totale}{\includegraphics[height=0.95\tmp at ceinture@hauteur at totale]{judobelt-\tmp at ceinture@couleur.pdf}}%
-				}%
-				{%
-					\raisebox{\judobeltraise}{\includegraphics[height=\judobeltheight]{judobelt-\tmp at ceinture@couleur.pdf}}%
-				}%
-		}%
-}
+%====KEYS (version anglaise)
+\keys_define:nn { judobelt }
+  {
+    Height .tl_set:N = \l_judobeltheight_tl,
+    Height .initial:n = {auto},
+    OffsetV .dim_set:N = \l_judobeltraise_dim,
+    OffsetV .initial:n = {0pt},
+    Strut .tl_set:N = \l_judobeltstrut_tl,
+    Strut .initial:n = {abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZ}
+  }
 
+%====COMMANDE EN
+\NewDocumentCommand\ColorBelt{ s O{} m }
+  {
+    \group_begin:
+    % Color gest
+    \str_case:enF { #3 }
+      {
+        {white}{\def\tmp at ceinture@couleur{white}}
+        {blanc}{\def\tmp at ceinture@couleur{white}}
+        {jaune}{\def\tmp at ceinture@couleur{yellow}}
+        {yellow}{\def\tmp at ceinture@couleur{yellow}}
+        {orange}{\def\tmp at ceinture@couleur{orange}}
+        {red}{\def\tmp at ceinture@couleur{red}}
+        {rouge}{\def\tmp at ceinture@couleur{red}}
+        {bleu}{\def\tmp at ceinture@couleur{blue}}
+        {blue}{\def\tmp at ceinture@couleur{blue}}
+        {purple}{\def\tmp at ceinture@couleur{purple}}
+        {violet}{\def\tmp at ceinture@couleur{purple}}
+        {marron}{\def\tmp at ceinture@couleur{brown}}
+        {brown}{\def\tmp at ceinture@couleur{brown}}
+        {green}{\def\tmp at ceinture@couleur{green}}
+        {vert}{\def\tmp at ceinture@couleur{green}}
+        {rose}{\def\tmp at ceinture@couleur{pink}}
+        {pink}{\def\tmp at ceinture@couleur{pink}}
+        {gris}{\def\tmp at ceinture@couleur{gray}}
+        {gray}{\def\tmp at ceinture@couleur{gray}}
+        {noir}{\def\tmp at ceinture@couleur{black}}
+        {black}{\def\tmp at ceinture@couleur{black}}
+        {white-yellow}{\def\tmp at ceinture@couleur{white-yellow}}
+        {blanc-jaune}{\def\tmp at ceinture@couleur{white-yellow}}
+        {yellow-orange}{\def\tmp at ceinture@couleur{yellow-orange}}
+        {jaune-orange}{\def\tmp at ceinture@couleur{yellow-orange}}
+        {orange-green}{\def\tmp at ceinture@couleur{orange-green}}
+        {orange-vert}{\def\tmp at ceinture@couleur{orange-green}}
+        {green-blue}{\def\tmp at ceinture@couleur{green-blue}}
+        {vert-bleu}{\def\tmp at ceinture@couleur{green-blue}}
+        {purple-brown}{\def\tmp at ceinture@couleur{purple-brown}}
+        {violet-marron}{\def\tmp at ceinture@couleur{purple-brown}}
+        {blue-brown}{\def\tmp at ceinture@couleur{blue-brown}}
+        {bleu-marron}{\def\tmp at ceinture@couleur{blue-brown}}
+        {blue-purple}{\def\tmp at ceinture@couleur{blue-purple}}
+        {bleu-violet}{\def\tmp at ceinture@couleur{blue-purple}}
+        {brown-black}{\def\tmp at ceinture@couleur{brown-black}}
+        {marron-noir}{\def\tmp at ceinture@couleur{brown-black}}
+      }
+      {\def\tmp at ceinture@couleur{yellow}}
+    
+    % Starred := simple includegraphics
+    \bool_if:NTF #1
+      {
+        \includegraphics[#2]{judobelt-\tmp at ceinture@couleur.pdf}
+      }
+      {
+        \keys_set:nn { judobelt } { #2 }
+        \str_if_eq:eeTF { \tl_to_str:N \l_judobeltheight_tl } { auto }
+          {
+            % hauteur auto
+            \hbox_set:Nn \l_tmpa_box { \tl_use:N \l_judobeltstrut_tl }
+            \dim_set:Nn \g_judobelt_totheight_dim { \box_dp:N \l_tmpa_box + \box_ht:N \l_tmpa_box }
+            \dim_set:Nn \g_judobelt_depth_dim { \box_dp:N \l_tmpa_box }
+            \dim_set:Nn \g_judobeltraise_dim
+              {
+                -\g_judobelt_depth_dim + \fp_eval:n { 0.025 * \dim_to_decimal_in_unit:nn { \g_judobelt_totheight_dim } { 1pt } } pt
+              }
+            \raisebox{ \dim_use:N \g_judobeltraise_dim }
+            {
+              \includegraphics[height={\dim_eval:n { 0.95\g_judobelt_totheight_dim }}]{judobelt-\tmp at ceinture@couleur.pdf}
+            }
+          }
+          {
+            \raisebox{\dim_use:N \l_judobeltraise_dim}{\includegraphics[height={\l_judobeltheight_tl}]{judobelt-\tmp at ceinture@couleur.pdf}}
+          }
+      }
+    \group_end:
+  }
+
 \endinput
\ No newline at end of file



More information about the tex-live-commits mailing list.