Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

cal-tex.el

2 réponses
Avatar
Laurent FRANCOIS
Bonjour,

J'essaie d'obtenir un agenda imprimable
de la forme:

lundi 1er janvier 2009
8h -------
8h15 -------
8h30 -------
[]
18h -------

Ce que j'ai trouvé de plus rapprochant avec le mode calendar --> t d
ce qui donne un document latex qui est parfait sauf que l'intervalle est
horaire et pas tous les quart d'heure.

J'ai reussi a customisé le cal-tex.el mais je ne trouve pas
ou est paramétré l'intervalle horaire

Est-ce que quelqu'un peut m'aider?

Merci beaucoup

2 réponses

Avatar
Laurent FRANCOIS
Laurent FRANCOIS wrote:
Bonjour,

J'essaie d'obtenir un agenda imprimable
de la forme:

lundi 1er janvier 2009
8h -------
8h15 -------
8h30 -------
[]
18h -------




Ma copine trouvé une solution

[snip]
(calendar-for-loop i from cal-tex-daily-start to cal-tex-daily-end do
(cal-tex-cmd "noindent")
(setq hour (if cal-tex-24
i
(mod i 12))) ;;; utile si on veut un format en 12h
(if (= 0 hour) (setq hour 12))


(cal-tex-b-makebox "1cm" "c")
(cal-tex-arg (number-to-string hour))
(cal-tex-e-makebox)
(cal-tex-rule "0mm" "15.5cm" ".2mm")
(cal-tex-nl ".2cm")

(cal-tex-b-makebox "1cm" "c")
(cal-tex-arg "tiny{15}" )
(cal-tex-e-makebox)
(cal-tex-rule "0mm" "15.5cm" ".2mm")
(cal-tex-nl ".2cm")

(cal-tex-b-makebox "1cm" "c")
(cal-tex-arg "tiny{30}" )
(cal-tex-e-makebox)
(cal-tex-rule "0mm" "15.5cm" ".2mm")
(cal-tex-nl ".2cm")

(cal-tex-b-makebox "1cm" "c")
(cal-tex-arg "tiny{45}" )
(cal-tex-e-makebox)
(cal-tex-rule "0mm" "15.5cm" ".2mm")
(cal-tex-nl ".2cm")

[snip]

Ca ne tient pas sur une page A4 mais bon je vais finir par y arriver

Merci
Avatar
Laurent FRANCOIS
Laurent FRANCOIS wrote:


J'ai trouvé une solution:

[snip]
(calendar-for-loop i from cal-tex-daily-start to cal-tex-daily-end do
(cal-tex-cmd "noindent")
(setq hour (if cal-tex-24
i
(mod i 12))) ;;; utile si on veut un format en 12h
(if (= 0 hour) (setq hour 12))


(cal-tex-b-makebox "1cm" "c")
(cal-tex-arg (number-to-string hour))
(cal-tex-e-makebox)
(cal-tex-rule "0mm" "15.5cm" ".2mm")
(cal-tex-nl ".2cm")

(cal-tex-b-makebox "1cm" "c")
(cal-tex-arg "tiny{15}" )
(cal-tex-e-makebox)
(cal-tex-rule "0mm" "15.5cm" ".2mm")
(cal-tex-nl ".2cm")

(cal-tex-b-makebox "1cm" "c")
(cal-tex-arg "tiny{30}" )
(cal-tex-e-makebox)
(cal-tex-rule "0mm" "15.5cm" ".2mm")
(cal-tex-nl ".2cm")

(cal-tex-b-makebox "1cm" "c")
(cal-tex-arg "tiny{45}" )
(cal-tex-e-makebox)
(cal-tex-rule "0mm" "15.5cm" ".2mm")
(cal-tex-nl ".2cm")
[snip]

Ca ne tient pas sur une page A4 mais bon je vais y arriver.

Merci