summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/luatex/chickenize/chickenize.tex
diff options
context:
space:
mode:
Diffstat (limited to 'Master/texmf-dist/tex/luatex/chickenize/chickenize.tex')
-rw-r--r--Master/texmf-dist/tex/luatex/chickenize/chickenize.tex139
1 files changed, 135 insertions, 4 deletions
diff --git a/Master/texmf-dist/tex/luatex/chickenize/chickenize.tex b/Master/texmf-dist/tex/luatex/chickenize/chickenize.tex
index aa48c984574..d1d211c572f 100644
--- a/Master/texmf-dist/tex/luatex/chickenize/chickenize.tex
+++ b/Master/texmf-dist/tex/luatex/chickenize/chickenize.tex
@@ -8,7 +8,7 @@
%%
%% EXPERIMENTAL CODE
%%
-%% This package is copyright © 2017 Arno L. Trautmann. It may be distributed and/or
+%% This package is copyright © 2021 Arno L. Trautmann. It may be distributed and/or
%% modified under the conditions of the LaTeX Project Public License, either version 1.3c
%% of this license or (at your option) any later version. This work has the LPPL mainten-
%% ance status ‘maintained’.
@@ -18,11 +18,10 @@
\bgroup%
\fontspec{Latin Modern Sans}%
A%
- \kern-.4em \raisebox{.65ex}{\scalebox{0.3}{L}}%
- \kern-.0em \raisebox{-0.98ex}{T}%
+ \kern-.375em \raisebox{.65ex}{\scalebox{0.3}{L}}%
+ \kern.03em \raisebox{-.99ex}{T}%
\egroup%
}
-
\def\allownumberincommands{
\catcode`\0=11
\catcode`\1=11
@@ -170,9 +169,37 @@
\textbackslash\textbackslash\textbackslash\textbackslash\textbackslash\textbackslash\textbackslash\textbackslash\textbackslash\textbackslash... the true name of Ba'al, the soul-eater}
}
+\def\francize{
+ \directlua{luatexbase.add_to_callback("pre_linebreak_filter",francize,"francize")}}
+
+\def\unfrancize{
+ \directlua{luatexbase.remove_from_callback("pre_linebreak_filter",francize)}}
+
\def\gameoflife{
Your Life Is Tetris. Stop Playing It Like Chess.
}
+\def\gameofchicken#1{\directlua{
+GOCrule_live = {2,3}
+GOCrule_spawn = {3}
+GOCrule_antilive = {2,3}
+GOCrule_antispawn = {3}
+GOCcellcode = "\\scalebox{0.03}{\\drawchicken}"
+GOCcellcode = "\\scalebox{0.03}{\\drawcov}"
+GOCx = 100
+GOCy = 100
+GOCiter = 150
+GOC_console = false
+GOC_pdf = true
+GOCsleep = 0
+GOCdensity = 100
+#1
+gameofchicken()
+
+if (GOCmakegif == true) then
+ luatexbase.add_to_callback("wrapup_run",make_a_gif,"makeagif")
+end
+}}
+\let\gameofchimken\gameofchicken % yeah, that had to be.
\def\guttenbergenize{ %% makes only sense when using LaTeX
\AtBeginDocument{
@@ -208,6 +235,16 @@
\let\hendlnize\chickenize % homage to Hendl/Chicken
\let\unhendlnize\unchickenize % may the soldering strength always be with him
+\def\italianizerandwords{
+ \directlua{luatexbase.add_to_callback("pre_linebreak_filter",italianizerandwords,"italianizerandwords")}}
+\def\unitalianizerandwords{
+ \directlua{luatexbase.remove_from_callback("pre_linebreak_filter","italianizerandwords")}}
+
+\def\italianize{
+ \directlua{luatexbase.add_to_callback("pre_linebreak_filter",italianize,"italianize")}}
+\def\unitalianize{
+ \directlua{luatexbase.remove_from_callback("pre_linebreak_filter","italianize")}}
+
\def\kernmanipulate{
\directlua{luatexbase.add_to_callback("pre_linebreak_filter",kernmanipulate,"kernmanipulate")}}
@@ -300,6 +337,13 @@
\def\unrandomuclc{
\directlua{luatexbase.remove_from_callback("pre_linebreak_filter","randomuclc")}}
+\def\relationship{%
+ \directlua{luatexbase.add_to_callback("post_linebreak_filter",cutparagraph,"cut paragraph")
+ luatexbase.add_to_callback("stop_run",missingcharstext,"charsmissing")
+ relationship()
+ }
+}
+
\let\rongorongonize\boustrophedoninverse
\let\unrongorongonize\unboustrophedoninverse
@@ -436,6 +480,93 @@
sloppyline(wing_front,wing_bottom) sloppyline(wing_back,wing_bottom)
}
}
+\long\def\drawcov{
+ \luadraw{90}{
+ covbody = {200,50}
+ covbody_rad = 50
+
+ covcrown_rad = 5
+ crownno = 13
+ for i=1,crownno do
+ crownpos = {covbody[1]+1.4*covbody_rad*math.sin(2*math.pi/crownno*i),covbody[2]+1.4*covbody_rad*math.cos(2*math.pi/crownno*i)}
+ crownconnect = {covbody[1]+covbody_rad*math.sin(2*math.pi/crownno*i),covbody[2]+covbody_rad*math.cos(2*math.pi/crownno*i)}
+ sloppycircle(crownpos,covcrown_rad)
+ sloppyline(crownpos,crownconnect)
+ end
+
+ covcrown_rad = 6
+ crownno = 8
+ for i=1,crownno do
+ crownpos = {covbody[1]+0.8*covbody_rad*math.sin(2*math.pi/crownno*i),covbody[2]+0.8*covbody_rad*math.cos(2*math.pi/crownno*i)}
+ crownconnect = {covbody[1]+0.5*covbody_rad*math.sin(2*math.pi/crownno*i),covbody[2]+0.5*covbody_rad*math.cos(2*math.pi/crownno*i)}
+ sloppycircle(crownpos,covcrown_rad)
+ sloppyline(crownpos,crownconnect)
+ end
+
+ covcrown_rad = 8
+ sloppycircle(covbody,covcrown_rad)
+ sloppycircle(covbody,covbody_rad)
+ sloppyline(covbody,covbody)
+ }
+}
+\long\def\drawhorse{
+ \luadraw{90}{
+ horsebod = {100,-40}
+ sloppyellipsis(horsebod,50,20)
+ horsehead = {20,0}
+ sloppyellipsis(horsehead,25,15)
+ sloppyline({35,-10},{50,-40})
+ sloppyline({45,5},{80,-25})
+ sloppyline({60,-50},{60,-90})
+ sloppyline({70,-50},{70,-90})
+ sloppyline({130,-50},{130,-90})
+ sloppyline({140,-50},{140,-90})
+ sloppyline({150,-40},{160,-60})
+ sloppyline({150,-38},{160,-58})
+ sloppyline({150,-42},{160,-62})
+ sloppyline({-5,-10},{10,-5})
+ sloppyellipsis({30,5},5,2) %% it's an eye, aye?
+ sloppyline({27,15},{34,25})
+ sloppyline({34,25},{37,13})
+ }
+}
+\long\def\drawfathorse{
+ \luadraw{90}{
+ horsebod = {100,-40}
+ sloppyellipsis(horsebod,50,40)
+ horsehead = {20,0}
+ sloppyellipsis(horsehead,25,15)
+ sloppyline({35,-10},{50,-40})
+ sloppyline({45,5},{70,-15})
+ sloppyline({60,-70},{60,-90})
+ sloppyline({70,-70},{70,-90})
+ sloppyline({130,-70},{130,-90})
+ sloppyline({140,-70},{140,-90})
+ sloppyline({150,-40},{160,-60})
+ sloppyline({150,-38},{160,-58})
+ sloppyline({150,-42},{160,-62})
+ sloppyline({-5,-10},{10,-5})
+ sloppyellipsis({30,5},5,2) %% it's an eye, aye?
+ sloppyline({27,15},{34,25})
+ sloppyline({34,25},{37,13})
+ }
+}
+\long\def\drawunicorn{
+\color{pink!90!black}
+ \drawhorse
+ \luadraw{0}{
+ sloppyline({15,20},{15,50})
+ sloppyline({15,50},{25,20})
+ }
+}
+\long\def\drawfatunicorn{
+\color{pink!90!black}
+ \drawfathorse
+ \luadraw{0}{
+ sloppyline({15,20},{15,50})
+ sloppyline({15,50},{25,20})
+ }
+}
%%
%%
%% End of file `chickenize.tex'.