How to draw a waving flag in TikZTikZ and FIFA WorldCup 2018: Flags of NationsTikZ: Cropping the Bounding BoxRotate a node but not its content: the case of the ellipse decorationNational flag using TikZHow to define the default vertical distance between nodes?Drawing a flag in Tikz!TikZ: Drawing an arc from an intersection to an intersectionHow to prevent rounded and duplicated tick labels in pgfplots with fixed precision?Esperanto flag in Tikz?Algerian flag in TikzLine up nested tikz enviroments or how to get rid of them
Has there ever been an airliner design involving reducing generator load by installing solar panels?
What does the "remote control" for a QF-4 look like?
Can a vampire attack twice with their claws using Multiattack?
Malcev's paper "On a class of homogeneous spaces" in English
Which country benefited the most from UN Security Council vetoes?
What is a clear way to write a bar that has an extra beat?
If human space travel is limited by the G force vulnerability, is there a way to counter G forces?
Perform and show arithmetic with LuaLaTeX
How to format long polynomial?
What's the output of a record needle playing an out-of-speed record
Can I ask the recruiters in my resume to put the reason why I am rejected?
Why doesn't Newton's third law mean a person bounces back to where they started when they hit the ground?
LWC SFDX source push error TypeError: LWC1009: decl.moveTo is not a function
dbcc cleantable batch size explanation
Arrow those variables!
Is it tax fraud for an individual to declare non-taxable revenue as taxable income? (US tax laws)
Why is consensus so controversial in Britain?
How much RAM could one put in a typical 80386 setup?
What is the word for reserving something for yourself before others do?
Why do I get two different answers for this counting problem?
Is it possible to run Internet Explorer on OS X El Capitan?
How do I draw and define two right triangles next to each other?
Maximum likelihood parameters deviate from posterior distributions
How does one intimidate enemies without having the capacity for violence?
How to draw a waving flag in TikZ
TikZ and FIFA WorldCup 2018: Flags of NationsTikZ: Cropping the Bounding BoxRotate a node but not its content: the case of the ellipse decorationNational flag using TikZHow to define the default vertical distance between nodes?Drawing a flag in Tikz!TikZ: Drawing an arc from an intersection to an intersectionHow to prevent rounded and duplicated tick labels in pgfplots with fixed precision?Esperanto flag in Tikz?Algerian flag in TikzLine up nested tikz enviroments or how to get rid of them
Let's take the flag of Germany as an example, because the flag is way quite simple and its waving state can be easily drawn "manually". But I am asking about general flag (the flag of any country/group, even the flag of my team).
Normal flag (1)
documentclass[tikz]standalone
usepackagexcolor
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
begintikzpicture
fill[gerbla] (0,2) rectangle (5,3);
fill[gerred] (0,1) rectangle (5,2);
fill[geryel] (0,0) rectangle (5,1);
endtikzpicture
enddocument
Waving flag (2) (the ratio may not be true)
documentclass[tikz]standalone
usepackagexcolor
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
begintikzpicture
fill[gerbla] (0,3) to[out=0,in=180] (4,2) -- (4,1) to[out=180,in=0] (0,2) -- cycle;
fill[gerred] (0,2) to[out=0,in=180] (4,1) -- (4,0) to[out=180,in=0] (0,1) -- cycle;
fill[geryel] (0,1) to[out=0,in=180] (4,0) -- (4,-1) to[out=180,in=0] (0,0) -- cycle;
endtikzpicture
enddocument
Advanced waving flag (3)
(unTikZified – image taken from Emojipedia)
Question
How to draw a waving flag? In other word, say I already have a rectangle-shape flag (1), with many patterns and items on it (even with some includegraphics
), how can I "wave" (1) to get (2), where
- The ratio length/width is still correct.
- The images, patterns, etc. on the flag are waved too, and these items still fit correctly with the overall flag.
Bonus question
If I already have (1) or (2), how can I get shadow effects and light effects like (3)?
The code for the flag of the United States, as requested by @marmot:
documentclass[tikz]standalone
usetikzlibraryshapes
usepackagexcolor
begindocument
begintikzpicture
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
endtikzpicture
enddocument
tikz-pgf
add a comment |
Let's take the flag of Germany as an example, because the flag is way quite simple and its waving state can be easily drawn "manually". But I am asking about general flag (the flag of any country/group, even the flag of my team).
Normal flag (1)
documentclass[tikz]standalone
usepackagexcolor
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
begintikzpicture
fill[gerbla] (0,2) rectangle (5,3);
fill[gerred] (0,1) rectangle (5,2);
fill[geryel] (0,0) rectangle (5,1);
endtikzpicture
enddocument
Waving flag (2) (the ratio may not be true)
documentclass[tikz]standalone
usepackagexcolor
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
begintikzpicture
fill[gerbla] (0,3) to[out=0,in=180] (4,2) -- (4,1) to[out=180,in=0] (0,2) -- cycle;
fill[gerred] (0,2) to[out=0,in=180] (4,1) -- (4,0) to[out=180,in=0] (0,1) -- cycle;
fill[geryel] (0,1) to[out=0,in=180] (4,0) -- (4,-1) to[out=180,in=0] (0,0) -- cycle;
endtikzpicture
enddocument
Advanced waving flag (3)
(unTikZified – image taken from Emojipedia)
Question
How to draw a waving flag? In other word, say I already have a rectangle-shape flag (1), with many patterns and items on it (even with some includegraphics
), how can I "wave" (1) to get (2), where
- The ratio length/width is still correct.
- The images, patterns, etc. on the flag are waved too, and these items still fit correctly with the overall flag.
Bonus question
If I already have (1) or (2), how can I get shadow effects and light effects like (3)?
The code for the flag of the United States, as requested by @marmot:
documentclass[tikz]standalone
usetikzlibraryshapes
usepackagexcolor
begindocument
begintikzpicture
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
endtikzpicture
enddocument
tikz-pgf
add a comment |
Let's take the flag of Germany as an example, because the flag is way quite simple and its waving state can be easily drawn "manually". But I am asking about general flag (the flag of any country/group, even the flag of my team).
Normal flag (1)
documentclass[tikz]standalone
usepackagexcolor
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
begintikzpicture
fill[gerbla] (0,2) rectangle (5,3);
fill[gerred] (0,1) rectangle (5,2);
fill[geryel] (0,0) rectangle (5,1);
endtikzpicture
enddocument
Waving flag (2) (the ratio may not be true)
documentclass[tikz]standalone
usepackagexcolor
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
begintikzpicture
fill[gerbla] (0,3) to[out=0,in=180] (4,2) -- (4,1) to[out=180,in=0] (0,2) -- cycle;
fill[gerred] (0,2) to[out=0,in=180] (4,1) -- (4,0) to[out=180,in=0] (0,1) -- cycle;
fill[geryel] (0,1) to[out=0,in=180] (4,0) -- (4,-1) to[out=180,in=0] (0,0) -- cycle;
endtikzpicture
enddocument
Advanced waving flag (3)
(unTikZified – image taken from Emojipedia)
Question
How to draw a waving flag? In other word, say I already have a rectangle-shape flag (1), with many patterns and items on it (even with some includegraphics
), how can I "wave" (1) to get (2), where
- The ratio length/width is still correct.
- The images, patterns, etc. on the flag are waved too, and these items still fit correctly with the overall flag.
Bonus question
If I already have (1) or (2), how can I get shadow effects and light effects like (3)?
The code for the flag of the United States, as requested by @marmot:
documentclass[tikz]standalone
usetikzlibraryshapes
usepackagexcolor
begindocument
begintikzpicture
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
endtikzpicture
enddocument
tikz-pgf
Let's take the flag of Germany as an example, because the flag is way quite simple and its waving state can be easily drawn "manually". But I am asking about general flag (the flag of any country/group, even the flag of my team).
Normal flag (1)
documentclass[tikz]standalone
usepackagexcolor
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
begintikzpicture
fill[gerbla] (0,2) rectangle (5,3);
fill[gerred] (0,1) rectangle (5,2);
fill[geryel] (0,0) rectangle (5,1);
endtikzpicture
enddocument
Waving flag (2) (the ratio may not be true)
documentclass[tikz]standalone
usepackagexcolor
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
begintikzpicture
fill[gerbla] (0,3) to[out=0,in=180] (4,2) -- (4,1) to[out=180,in=0] (0,2) -- cycle;
fill[gerred] (0,2) to[out=0,in=180] (4,1) -- (4,0) to[out=180,in=0] (0,1) -- cycle;
fill[geryel] (0,1) to[out=0,in=180] (4,0) -- (4,-1) to[out=180,in=0] (0,0) -- cycle;
endtikzpicture
enddocument
Advanced waving flag (3)
(unTikZified – image taken from Emojipedia)
Question
How to draw a waving flag? In other word, say I already have a rectangle-shape flag (1), with many patterns and items on it (even with some includegraphics
), how can I "wave" (1) to get (2), where
- The ratio length/width is still correct.
- The images, patterns, etc. on the flag are waved too, and these items still fit correctly with the overall flag.
Bonus question
If I already have (1) or (2), how can I get shadow effects and light effects like (3)?
The code for the flag of the United States, as requested by @marmot:
documentclass[tikz]standalone
usetikzlibraryshapes
usepackagexcolor
begindocument
begintikzpicture
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
endtikzpicture
enddocument
tikz-pgf
tikz-pgf
edited 25 mins ago
JouleV
asked 1 hour ago
JouleVJouleV
10.9k22560
10.9k22560
add a comment |
add a comment |
1 Answer
1
active
oldest
votes
You can use nonlinear transformations to achieve this effect.
documentclass[tikz,border=3.14mm]standalone
usepgfmodulenonlineartransformations
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandGermanFlag%
fill[gerbla] (0,2) rectangle (4,3);
fill[gerred] (0,1) rectangle (4,2);
fill[geryel] (0,0) rectangle (4,1);
begindocument
begintikzpicture[font=sffamily,scale=1]
beginscope[local bounding box=linear]
GermanFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=5cm,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
GermanFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (2,3);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(2,0) rectangle (4,3);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
Of course, this works with any flag you have the TikZ code for, including of course your nice US flag.
documentclass[tikz,border=3.14mm]standalone
usetikzlibraryshapes
usepgfmodulenonlineartransformations
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandUSFlag%
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,
minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
begindocument
begintikzpicture[font=sffamily,scale=2,transform shape]
beginscope[local bounding box=linear]
USFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=2.5cm,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
USFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (0.95,1);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0.95,0) rectangle (1.9,1);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
And here is something for Black Mild.
documentclass[tikz,border=3.14mm]standalone
usetikzlibraryshapes
usepgfmodulenonlineartransformations
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandUSFlag%
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,
minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
begindocument
foreach X in 0,5,...,355
begintikzpicture[font=sffamily,scale=2,transform shape]
beginscope[xshift=X pt,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
USFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (0.95,1);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0.95,0) rectangle (1.9,1);
endscope
endtikzpicture
enddocument
This answer has the codes for many flags, out of which I picked Iceland. (Note that if the flag contains shapes, you need to say transform shape nonlinear=true
.) The shading can be added on top.
documentclass[tikz,border=3.14mm]standalone
usepgfmodulenonlineartransformations
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
definecolorSkyBluergb0.00784314,0.32156864,0.61176473
definecolorFireRedrgb0.86274511,0.11764706,0.20784314
newcommandIcelandFlag
fill[SkyBlue] (0,0) rectangle (25,18);
fill[white] (7,0) rectangle (11,18);
fill[white] (0,7) rectangle (25,11);
fill[FireRed] (8,0) rectangle (10,18);
fill[FireRed] (0,8) rectangle (25,10);
begindocument
begintikzpicture[font=sffamily,scale=0.15]
beginscope[local bounding box=linear]
IcelandFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=35cm,local bounding box=nonlinear]
pgftransformnonlinearflagtransformation
IcelandFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (12.5,18);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(12.5,0) rectangle (25,18);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
In order to draw a 3d flag, you may use tikz-3dplot
.
With shade
you can get something like this.
documentclass[tikz]standalone
usepackagetikz-3dplot
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
tdplotsetmaincoords7020
begintikzpicture[tdplot_main_coords]
% draw[-stealth] (0,0,0) -- (2,0,0) node[pos=1.1]$x$;
% draw[-stealth] (0,0,0) -- (0,2,0) node[pos=1.1]$y$;
foreach X [count=Y] in gerbla,gerred,geryel
shade[left color=X,right color=X!70!black,middle color=X!70!white]
plot[variable=x,domain=0:2] (x,0.2*sin(x*90),4-Y)
--
plot[variable=x,domain=2:0] (x,0.2*sin(x*90),3-Y);
shade[left color=X!70!black,right color=X,middle color=X!70!white]
plot[variable=x,domain=2:4] (x,0.2*sin(x*90),4-Y)
--
plot[variable=x,domain=4:2] (x,0.2*sin(x*90),3-Y);
endtikzpicture
enddocument
I'm afraid this only answers the bonus question, for flags of Germany, Netherlands, etc. only. How can it deal with, for example, the US flag?
– JouleV
1 hour ago
@JouleV I switched gears completely and used nonlinear transformations. That way you can wave any flag you have the TikZ code for.
– marmot
42 mins ago
@JouleV Yours is an example if an awesome TikZ question @ marmot and answer, +2
– CarLaTeX
26 mins ago
1
@JouleV It does work if you settransform shape nonlinear=true
.
– marmot
15 mins ago
1
@marmot One word: perfect! Thanks you very much!!!!!
– JouleV
11 mins ago
|
show 6 more comments
Your Answer
StackExchange.ready(function()
var channelOptions =
tags: "".split(" "),
id: "85"
;
initTagRenderer("".split(" "), "".split(" "), channelOptions);
StackExchange.using("externalEditor", function()
// Have to fire editor after snippets, if snippets enabled
if (StackExchange.settings.snippets.snippetsEnabled)
StackExchange.using("snippets", function()
createEditor();
);
else
createEditor();
);
function createEditor()
StackExchange.prepareEditor(
heartbeatType: 'answer',
autoActivateHeartbeat: false,
convertImagesToLinks: false,
noModals: true,
showLowRepImageUploadWarning: true,
reputationToPostImages: null,
bindNavPrevention: true,
postfix: "",
imageUploader:
brandingHtml: "Powered by u003ca class="icon-imgur-white" href="https://imgur.com/"u003eu003c/au003e",
contentPolicyHtml: "User contributions licensed under u003ca href="https://creativecommons.org/licenses/by-sa/3.0/"u003ecc by-sa 3.0 with attribution requiredu003c/au003e u003ca href="https://stackoverflow.com/legal/content-policy"u003e(content policy)u003c/au003e",
allowUrls: true
,
onDemand: true,
discardSelector: ".discard-answer"
,immediatelyShowMarkdownHelp:true
);
);
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2ftex.stackexchange.com%2fquestions%2f483459%2fhow-to-draw-a-waving-flag-in-tikz%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
1 Answer
1
active
oldest
votes
1 Answer
1
active
oldest
votes
active
oldest
votes
active
oldest
votes
You can use nonlinear transformations to achieve this effect.
documentclass[tikz,border=3.14mm]standalone
usepgfmodulenonlineartransformations
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandGermanFlag%
fill[gerbla] (0,2) rectangle (4,3);
fill[gerred] (0,1) rectangle (4,2);
fill[geryel] (0,0) rectangle (4,1);
begindocument
begintikzpicture[font=sffamily,scale=1]
beginscope[local bounding box=linear]
GermanFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=5cm,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
GermanFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (2,3);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(2,0) rectangle (4,3);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
Of course, this works with any flag you have the TikZ code for, including of course your nice US flag.
documentclass[tikz,border=3.14mm]standalone
usetikzlibraryshapes
usepgfmodulenonlineartransformations
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandUSFlag%
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,
minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
begindocument
begintikzpicture[font=sffamily,scale=2,transform shape]
beginscope[local bounding box=linear]
USFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=2.5cm,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
USFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (0.95,1);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0.95,0) rectangle (1.9,1);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
And here is something for Black Mild.
documentclass[tikz,border=3.14mm]standalone
usetikzlibraryshapes
usepgfmodulenonlineartransformations
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandUSFlag%
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,
minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
begindocument
foreach X in 0,5,...,355
begintikzpicture[font=sffamily,scale=2,transform shape]
beginscope[xshift=X pt,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
USFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (0.95,1);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0.95,0) rectangle (1.9,1);
endscope
endtikzpicture
enddocument
This answer has the codes for many flags, out of which I picked Iceland. (Note that if the flag contains shapes, you need to say transform shape nonlinear=true
.) The shading can be added on top.
documentclass[tikz,border=3.14mm]standalone
usepgfmodulenonlineartransformations
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
definecolorSkyBluergb0.00784314,0.32156864,0.61176473
definecolorFireRedrgb0.86274511,0.11764706,0.20784314
newcommandIcelandFlag
fill[SkyBlue] (0,0) rectangle (25,18);
fill[white] (7,0) rectangle (11,18);
fill[white] (0,7) rectangle (25,11);
fill[FireRed] (8,0) rectangle (10,18);
fill[FireRed] (0,8) rectangle (25,10);
begindocument
begintikzpicture[font=sffamily,scale=0.15]
beginscope[local bounding box=linear]
IcelandFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=35cm,local bounding box=nonlinear]
pgftransformnonlinearflagtransformation
IcelandFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (12.5,18);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(12.5,0) rectangle (25,18);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
In order to draw a 3d flag, you may use tikz-3dplot
.
With shade
you can get something like this.
documentclass[tikz]standalone
usepackagetikz-3dplot
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
tdplotsetmaincoords7020
begintikzpicture[tdplot_main_coords]
% draw[-stealth] (0,0,0) -- (2,0,0) node[pos=1.1]$x$;
% draw[-stealth] (0,0,0) -- (0,2,0) node[pos=1.1]$y$;
foreach X [count=Y] in gerbla,gerred,geryel
shade[left color=X,right color=X!70!black,middle color=X!70!white]
plot[variable=x,domain=0:2] (x,0.2*sin(x*90),4-Y)
--
plot[variable=x,domain=2:0] (x,0.2*sin(x*90),3-Y);
shade[left color=X!70!black,right color=X,middle color=X!70!white]
plot[variable=x,domain=2:4] (x,0.2*sin(x*90),4-Y)
--
plot[variable=x,domain=4:2] (x,0.2*sin(x*90),3-Y);
endtikzpicture
enddocument
I'm afraid this only answers the bonus question, for flags of Germany, Netherlands, etc. only. How can it deal with, for example, the US flag?
– JouleV
1 hour ago
@JouleV I switched gears completely and used nonlinear transformations. That way you can wave any flag you have the TikZ code for.
– marmot
42 mins ago
@JouleV Yours is an example if an awesome TikZ question @ marmot and answer, +2
– CarLaTeX
26 mins ago
1
@JouleV It does work if you settransform shape nonlinear=true
.
– marmot
15 mins ago
1
@marmot One word: perfect! Thanks you very much!!!!!
– JouleV
11 mins ago
|
show 6 more comments
You can use nonlinear transformations to achieve this effect.
documentclass[tikz,border=3.14mm]standalone
usepgfmodulenonlineartransformations
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandGermanFlag%
fill[gerbla] (0,2) rectangle (4,3);
fill[gerred] (0,1) rectangle (4,2);
fill[geryel] (0,0) rectangle (4,1);
begindocument
begintikzpicture[font=sffamily,scale=1]
beginscope[local bounding box=linear]
GermanFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=5cm,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
GermanFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (2,3);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(2,0) rectangle (4,3);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
Of course, this works with any flag you have the TikZ code for, including of course your nice US flag.
documentclass[tikz,border=3.14mm]standalone
usetikzlibraryshapes
usepgfmodulenonlineartransformations
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandUSFlag%
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,
minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
begindocument
begintikzpicture[font=sffamily,scale=2,transform shape]
beginscope[local bounding box=linear]
USFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=2.5cm,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
USFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (0.95,1);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0.95,0) rectangle (1.9,1);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
And here is something for Black Mild.
documentclass[tikz,border=3.14mm]standalone
usetikzlibraryshapes
usepgfmodulenonlineartransformations
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandUSFlag%
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,
minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
begindocument
foreach X in 0,5,...,355
begintikzpicture[font=sffamily,scale=2,transform shape]
beginscope[xshift=X pt,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
USFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (0.95,1);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0.95,0) rectangle (1.9,1);
endscope
endtikzpicture
enddocument
This answer has the codes for many flags, out of which I picked Iceland. (Note that if the flag contains shapes, you need to say transform shape nonlinear=true
.) The shading can be added on top.
documentclass[tikz,border=3.14mm]standalone
usepgfmodulenonlineartransformations
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
definecolorSkyBluergb0.00784314,0.32156864,0.61176473
definecolorFireRedrgb0.86274511,0.11764706,0.20784314
newcommandIcelandFlag
fill[SkyBlue] (0,0) rectangle (25,18);
fill[white] (7,0) rectangle (11,18);
fill[white] (0,7) rectangle (25,11);
fill[FireRed] (8,0) rectangle (10,18);
fill[FireRed] (0,8) rectangle (25,10);
begindocument
begintikzpicture[font=sffamily,scale=0.15]
beginscope[local bounding box=linear]
IcelandFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=35cm,local bounding box=nonlinear]
pgftransformnonlinearflagtransformation
IcelandFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (12.5,18);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(12.5,0) rectangle (25,18);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
In order to draw a 3d flag, you may use tikz-3dplot
.
With shade
you can get something like this.
documentclass[tikz]standalone
usepackagetikz-3dplot
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
tdplotsetmaincoords7020
begintikzpicture[tdplot_main_coords]
% draw[-stealth] (0,0,0) -- (2,0,0) node[pos=1.1]$x$;
% draw[-stealth] (0,0,0) -- (0,2,0) node[pos=1.1]$y$;
foreach X [count=Y] in gerbla,gerred,geryel
shade[left color=X,right color=X!70!black,middle color=X!70!white]
plot[variable=x,domain=0:2] (x,0.2*sin(x*90),4-Y)
--
plot[variable=x,domain=2:0] (x,0.2*sin(x*90),3-Y);
shade[left color=X!70!black,right color=X,middle color=X!70!white]
plot[variable=x,domain=2:4] (x,0.2*sin(x*90),4-Y)
--
plot[variable=x,domain=4:2] (x,0.2*sin(x*90),3-Y);
endtikzpicture
enddocument
I'm afraid this only answers the bonus question, for flags of Germany, Netherlands, etc. only. How can it deal with, for example, the US flag?
– JouleV
1 hour ago
@JouleV I switched gears completely and used nonlinear transformations. That way you can wave any flag you have the TikZ code for.
– marmot
42 mins ago
@JouleV Yours is an example if an awesome TikZ question @ marmot and answer, +2
– CarLaTeX
26 mins ago
1
@JouleV It does work if you settransform shape nonlinear=true
.
– marmot
15 mins ago
1
@marmot One word: perfect! Thanks you very much!!!!!
– JouleV
11 mins ago
|
show 6 more comments
You can use nonlinear transformations to achieve this effect.
documentclass[tikz,border=3.14mm]standalone
usepgfmodulenonlineartransformations
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandGermanFlag%
fill[gerbla] (0,2) rectangle (4,3);
fill[gerred] (0,1) rectangle (4,2);
fill[geryel] (0,0) rectangle (4,1);
begindocument
begintikzpicture[font=sffamily,scale=1]
beginscope[local bounding box=linear]
GermanFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=5cm,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
GermanFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (2,3);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(2,0) rectangle (4,3);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
Of course, this works with any flag you have the TikZ code for, including of course your nice US flag.
documentclass[tikz,border=3.14mm]standalone
usetikzlibraryshapes
usepgfmodulenonlineartransformations
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandUSFlag%
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,
minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
begindocument
begintikzpicture[font=sffamily,scale=2,transform shape]
beginscope[local bounding box=linear]
USFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=2.5cm,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
USFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (0.95,1);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0.95,0) rectangle (1.9,1);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
And here is something for Black Mild.
documentclass[tikz,border=3.14mm]standalone
usetikzlibraryshapes
usepgfmodulenonlineartransformations
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandUSFlag%
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,
minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
begindocument
foreach X in 0,5,...,355
begintikzpicture[font=sffamily,scale=2,transform shape]
beginscope[xshift=X pt,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
USFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (0.95,1);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0.95,0) rectangle (1.9,1);
endscope
endtikzpicture
enddocument
This answer has the codes for many flags, out of which I picked Iceland. (Note that if the flag contains shapes, you need to say transform shape nonlinear=true
.) The shading can be added on top.
documentclass[tikz,border=3.14mm]standalone
usepgfmodulenonlineartransformations
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
definecolorSkyBluergb0.00784314,0.32156864,0.61176473
definecolorFireRedrgb0.86274511,0.11764706,0.20784314
newcommandIcelandFlag
fill[SkyBlue] (0,0) rectangle (25,18);
fill[white] (7,0) rectangle (11,18);
fill[white] (0,7) rectangle (25,11);
fill[FireRed] (8,0) rectangle (10,18);
fill[FireRed] (0,8) rectangle (25,10);
begindocument
begintikzpicture[font=sffamily,scale=0.15]
beginscope[local bounding box=linear]
IcelandFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=35cm,local bounding box=nonlinear]
pgftransformnonlinearflagtransformation
IcelandFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (12.5,18);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(12.5,0) rectangle (25,18);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
In order to draw a 3d flag, you may use tikz-3dplot
.
With shade
you can get something like this.
documentclass[tikz]standalone
usepackagetikz-3dplot
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
tdplotsetmaincoords7020
begintikzpicture[tdplot_main_coords]
% draw[-stealth] (0,0,0) -- (2,0,0) node[pos=1.1]$x$;
% draw[-stealth] (0,0,0) -- (0,2,0) node[pos=1.1]$y$;
foreach X [count=Y] in gerbla,gerred,geryel
shade[left color=X,right color=X!70!black,middle color=X!70!white]
plot[variable=x,domain=0:2] (x,0.2*sin(x*90),4-Y)
--
plot[variable=x,domain=2:0] (x,0.2*sin(x*90),3-Y);
shade[left color=X!70!black,right color=X,middle color=X!70!white]
plot[variable=x,domain=2:4] (x,0.2*sin(x*90),4-Y)
--
plot[variable=x,domain=4:2] (x,0.2*sin(x*90),3-Y);
endtikzpicture
enddocument
You can use nonlinear transformations to achieve this effect.
documentclass[tikz,border=3.14mm]standalone
usepgfmodulenonlineartransformations
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandGermanFlag%
fill[gerbla] (0,2) rectangle (4,3);
fill[gerred] (0,1) rectangle (4,2);
fill[geryel] (0,0) rectangle (4,1);
begindocument
begintikzpicture[font=sffamily,scale=1]
beginscope[local bounding box=linear]
GermanFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=5cm,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
GermanFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (2,3);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(2,0) rectangle (4,3);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
Of course, this works with any flag you have the TikZ code for, including of course your nice US flag.
documentclass[tikz,border=3.14mm]standalone
usetikzlibraryshapes
usepgfmodulenonlineartransformations
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandUSFlag%
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,
minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
begindocument
begintikzpicture[font=sffamily,scale=2,transform shape]
beginscope[local bounding box=linear]
USFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=2.5cm,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
USFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (0.95,1);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0.95,0) rectangle (1.9,1);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
And here is something for Black Mild.
documentclass[tikz,border=3.14mm]standalone
usetikzlibraryshapes
usepgfmodulenonlineartransformations
definecolorusbluergb.234,.233,.430
definecolorusaredrgb.698,.132,.203
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
newcommandUSFlag%
fill[usared] (0,0) rectangle (1.9,1);
foreach i in 1,3,...,11
fill[white] (0,i/13) rectangle (1.9,(i+1)/13);
fill [usblue] (0,6/13) rectangle (1.9*2/5,1);
foreach i in 1,2,3,4,5,6
foreach j in 1,2,3,4,5
node[star,star points=5,star point ratio=2.25,fill=white,
minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i-(1.9/30),6/13+(7/130)+(7*(j-1)/65)) ;
foreach i in 1,2,3,4,5
foreach j in 1,2,3,4
node[star,star points=5,star point ratio=2.25,fill=white,minimum size=0.0616cm,inner sep=0pt] at ((1.9/15)*i,6/13+(7*j/65)) ;
begindocument
foreach X in 0,5,...,355
begintikzpicture[font=sffamily,scale=2,transform shape]
beginscope[xshift=X pt,local bounding box=nonlinear,transform shape
nonlinear=true]
pgftransformnonlinearflagtransformation
USFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (0.95,1);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0.95,0) rectangle (1.9,1);
endscope
endtikzpicture
enddocument
This answer has the codes for many flags, out of which I picked Iceland. (Note that if the flag contains shapes, you need to say transform shape nonlinear=true
.) The shading can be added on top.
documentclass[tikz,border=3.14mm]standalone
usepgfmodulenonlineartransformations
makeatletter
defflagtransformation%
pgf@xa=pgf@x%
pgf@ya=pgf@y%
%typeoutoldspace x=pgf@xaspace old space y=pgf@ya%
pgfmathsetmacromyypgf@ya+7*sin(pgf@xa*3.6)-0.1*pgf@xa%
%typeoutatspace x=thepgf@xa:space newspace y=myy%
pgf@y=myy pt
makeatother
definecolorSkyBluergb0.00784314,0.32156864,0.61176473
definecolorFireRedrgb0.86274511,0.11764706,0.20784314
newcommandIcelandFlag
fill[SkyBlue] (0,0) rectangle (25,18);
fill[white] (7,0) rectangle (11,18);
fill[white] (0,7) rectangle (25,11);
fill[FireRed] (8,0) rectangle (10,18);
fill[FireRed] (0,8) rectangle (25,10);
begindocument
begintikzpicture[font=sffamily,scale=0.15]
beginscope[local bounding box=linear]
IcelandFlag
endscope
node[anchor=south] (lin) at (linear.north)linear;
beginscope[xshift=35cm,local bounding box=nonlinear]
pgftransformnonlinearflagtransformation
IcelandFlag
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(0,0) rectangle (12.5,18);
shade[left color=black,right color=black,middle color=white,opacity=0.15]
(12.5,0) rectangle (25,18);
endscope
node[anchor=south] at (lin.south-|nonlinear.north)nonlinear;
endtikzpicture
enddocument
In order to draw a 3d flag, you may use tikz-3dplot
.
With shade
you can get something like this.
documentclass[tikz]standalone
usepackagetikz-3dplot
definecolorgerblaRGB0,0,0
definecolorgerredRGB255,0,0
definecolorgeryelRGB255,204,0
begindocument
tdplotsetmaincoords7020
begintikzpicture[tdplot_main_coords]
% draw[-stealth] (0,0,0) -- (2,0,0) node[pos=1.1]$x$;
% draw[-stealth] (0,0,0) -- (0,2,0) node[pos=1.1]$y$;
foreach X [count=Y] in gerbla,gerred,geryel
shade[left color=X,right color=X!70!black,middle color=X!70!white]
plot[variable=x,domain=0:2] (x,0.2*sin(x*90),4-Y)
--
plot[variable=x,domain=2:0] (x,0.2*sin(x*90),3-Y);
shade[left color=X!70!black,right color=X,middle color=X!70!white]
plot[variable=x,domain=2:4] (x,0.2*sin(x*90),4-Y)
--
plot[variable=x,domain=4:2] (x,0.2*sin(x*90),3-Y);
endtikzpicture
enddocument
edited 5 mins ago
answered 1 hour ago
marmotmarmot
115k5145276
115k5145276
I'm afraid this only answers the bonus question, for flags of Germany, Netherlands, etc. only. How can it deal with, for example, the US flag?
– JouleV
1 hour ago
@JouleV I switched gears completely and used nonlinear transformations. That way you can wave any flag you have the TikZ code for.
– marmot
42 mins ago
@JouleV Yours is an example if an awesome TikZ question @ marmot and answer, +2
– CarLaTeX
26 mins ago
1
@JouleV It does work if you settransform shape nonlinear=true
.
– marmot
15 mins ago
1
@marmot One word: perfect! Thanks you very much!!!!!
– JouleV
11 mins ago
|
show 6 more comments
I'm afraid this only answers the bonus question, for flags of Germany, Netherlands, etc. only. How can it deal with, for example, the US flag?
– JouleV
1 hour ago
@JouleV I switched gears completely and used nonlinear transformations. That way you can wave any flag you have the TikZ code for.
– marmot
42 mins ago
@JouleV Yours is an example if an awesome TikZ question @ marmot and answer, +2
– CarLaTeX
26 mins ago
1
@JouleV It does work if you settransform shape nonlinear=true
.
– marmot
15 mins ago
1
@marmot One word: perfect! Thanks you very much!!!!!
– JouleV
11 mins ago
I'm afraid this only answers the bonus question, for flags of Germany, Netherlands, etc. only. How can it deal with, for example, the US flag?
– JouleV
1 hour ago
I'm afraid this only answers the bonus question, for flags of Germany, Netherlands, etc. only. How can it deal with, for example, the US flag?
– JouleV
1 hour ago
@JouleV I switched gears completely and used nonlinear transformations. That way you can wave any flag you have the TikZ code for.
– marmot
42 mins ago
@JouleV I switched gears completely and used nonlinear transformations. That way you can wave any flag you have the TikZ code for.
– marmot
42 mins ago
@JouleV Yours is an example if an awesome TikZ question @ marmot and answer, +2
– CarLaTeX
26 mins ago
@JouleV Yours is an example if an awesome TikZ question @ marmot and answer, +2
– CarLaTeX
26 mins ago
1
1
@JouleV It does work if you set
transform shape nonlinear=true
.– marmot
15 mins ago
@JouleV It does work if you set
transform shape nonlinear=true
.– marmot
15 mins ago
1
1
@marmot One word: perfect! Thanks you very much!!!!!
– JouleV
11 mins ago
@marmot One word: perfect! Thanks you very much!!!!!
– JouleV
11 mins ago
|
show 6 more comments
Thanks for contributing an answer to TeX - LaTeX Stack Exchange!
- Please be sure to answer the question. Provide details and share your research!
But avoid …
- Asking for help, clarification, or responding to other answers.
- Making statements based on opinion; back them up with references or personal experience.
To learn more, see our tips on writing great answers.
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2ftex.stackexchange.com%2fquestions%2f483459%2fhow-to-draw-a-waving-flag-in-tikz%23new-answer', 'question_page');
);
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Sign up or log in
StackExchange.ready(function ()
StackExchange.helpers.onClickDraftSave('#login-link');
);
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Sign up using Google
Sign up using Facebook
Sign up using Email and Password
Post as a guest
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown
Required, but never shown