Making motorway with TikZ

Clash Royale CLAN TAG#URR8PPP

up vote
9
down vote

favorite

1

Consider the following MWE:

documentclass[border=5pt,tikz]standalone
usetikzlibrarycalc
tikzset
 car/.style=
 scale=.5,minimum width=.1cm,minimum height=.5cm,fill=#1
 

begindocument
foreach n in 0,10,...,360,350,340,...,0

 begintikzpicture
 fill[green!60!black] ([xshift=1mm,yshift=-1mm]1,0) rectangle ([xshift=-1mm,yshift=1mm]4,-3);
 path ([xshift=1mm,yshift=-1mm]1,0) -- ([xshift=-1mm,yshift=1mm]4,-3) node[midway,fill=green!40!black,circle,inner sep=.3cm] (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above right=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below right=.5cm] at (a) ;
 draw[double distance=2mm,double=gray] (5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1);
 draw[white,densely dashed] (5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1);
 node[shift=(0,1),car=red,rotate=n] at (n:1) ;
 node[shift=(5,1),car=blue,rotate=-n] at (-n:1) ;
 node[shift=(0,-4),car=green,rotate=-n] at (-n:1) ;
 node[shift=(5,-4),car=yellow,rotate=n] at (n:1) ;
 pgfmathsetmacrofactorn/360
 node[rotate=-90,car=purple] at ($(0,0)!factor!(5,0)$) ;
 node[rotate=-90,car=violet] at ($(5,-3)!factor!(0,-3)$) ;
 node[car=brown] at ($(4,1)!factor!(4,-4)$) ;
 node[car=orange] at ($(1,-3)!factor!(1,0)$) ;
 endtikzpicture

enddocument

Here is the output:

My questions is: How can I make the cars to move along those “arc-parts“ of the track? I would have work with ifnum, but I think it is too laborius …

tikz-pgf nodes fun

share|improve this question

edited 7 hours ago

asked 7 hours ago

current_user

2,8321430

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  Can't you just define the full thing to be one path and then place the cars via decorations.matkings?
  – marmot
  6 hours ago
  

  
  
  
  

add a comment | 

up vote
9
down vote

favorite

1

Consider the following MWE:

documentclass[border=5pt,tikz]standalone
usetikzlibrarycalc
tikzset
 car/.style=
 scale=.5,minimum width=.1cm,minimum height=.5cm,fill=#1
 

begindocument
foreach n in 0,10,...,360,350,340,...,0

 begintikzpicture
 fill[green!60!black] ([xshift=1mm,yshift=-1mm]1,0) rectangle ([xshift=-1mm,yshift=1mm]4,-3);
 path ([xshift=1mm,yshift=-1mm]1,0) -- ([xshift=-1mm,yshift=1mm]4,-3) node[midway,fill=green!40!black,circle,inner sep=.3cm] (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above right=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below right=.5cm] at (a) ;
 draw[double distance=2mm,double=gray] (5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1);
 draw[white,densely dashed] (5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1);
 node[shift=(0,1),car=red,rotate=n] at (n:1) ;
 node[shift=(5,1),car=blue,rotate=-n] at (-n:1) ;
 node[shift=(0,-4),car=green,rotate=-n] at (-n:1) ;
 node[shift=(5,-4),car=yellow,rotate=n] at (n:1) ;
 pgfmathsetmacrofactorn/360
 node[rotate=-90,car=purple] at ($(0,0)!factor!(5,0)$) ;
 node[rotate=-90,car=violet] at ($(5,-3)!factor!(0,-3)$) ;
 node[car=brown] at ($(4,1)!factor!(4,-4)$) ;
 node[car=orange] at ($(1,-3)!factor!(1,0)$) ;
 endtikzpicture

enddocument

Here is the output:

My questions is: How can I make the cars to move along those “arc-parts“ of the track? I would have work with ifnum, but I think it is too laborius …

tikz-pgf nodes fun

share|improve this question

edited 7 hours ago

asked 7 hours ago

current_user

2,8321430

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  Can't you just define the full thing to be one path and then place the cars via decorations.matkings?
  – marmot
  6 hours ago
  

  
  
  
  

add a comment | 

up vote
9
down vote

favorite

1

up vote
9
down vote

favorite

1

1

Consider the following MWE:

documentclass[border=5pt,tikz]standalone
usetikzlibrarycalc
tikzset
 car/.style=
 scale=.5,minimum width=.1cm,minimum height=.5cm,fill=#1
 

begindocument
foreach n in 0,10,...,360,350,340,...,0

 begintikzpicture
 fill[green!60!black] ([xshift=1mm,yshift=-1mm]1,0) rectangle ([xshift=-1mm,yshift=1mm]4,-3);
 path ([xshift=1mm,yshift=-1mm]1,0) -- ([xshift=-1mm,yshift=1mm]4,-3) node[midway,fill=green!40!black,circle,inner sep=.3cm] (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above right=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below right=.5cm] at (a) ;
 draw[double distance=2mm,double=gray] (5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1);
 draw[white,densely dashed] (5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1);
 node[shift=(0,1),car=red,rotate=n] at (n:1) ;
 node[shift=(5,1),car=blue,rotate=-n] at (-n:1) ;
 node[shift=(0,-4),car=green,rotate=-n] at (-n:1) ;
 node[shift=(5,-4),car=yellow,rotate=n] at (n:1) ;
 pgfmathsetmacrofactorn/360
 node[rotate=-90,car=purple] at ($(0,0)!factor!(5,0)$) ;
 node[rotate=-90,car=violet] at ($(5,-3)!factor!(0,-3)$) ;
 node[car=brown] at ($(4,1)!factor!(4,-4)$) ;
 node[car=orange] at ($(1,-3)!factor!(1,0)$) ;
 endtikzpicture

enddocument

Here is the output:

My questions is: How can I make the cars to move along those “arc-parts“ of the track? I would have work with ifnum, but I think it is too laborius …

tikz-pgf nodes fun

share|improve this question

edited 7 hours ago

asked 7 hours ago

current_user

2,8321430

Consider the following MWE:

documentclass[border=5pt,tikz]standalone
usetikzlibrarycalc
tikzset
 car/.style=
 scale=.5,minimum width=.1cm,minimum height=.5cm,fill=#1
 

begindocument
foreach n in 0,10,...,360,350,340,...,0

 begintikzpicture
 fill[green!60!black] ([xshift=1mm,yshift=-1mm]1,0) rectangle ([xshift=-1mm,yshift=1mm]4,-3);
 path ([xshift=1mm,yshift=-1mm]1,0) -- ([xshift=-1mm,yshift=1mm]4,-3) node[midway,fill=green!40!black,circle,inner sep=.3cm] (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above right=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below right=.5cm] at (a) ;
 draw[double distance=2mm,double=gray] (5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1);
 draw[white,densely dashed] (5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1);
 node[shift=(0,1),car=red,rotate=n] at (n:1) ;
 node[shift=(5,1),car=blue,rotate=-n] at (-n:1) ;
 node[shift=(0,-4),car=green,rotate=-n] at (-n:1) ;
 node[shift=(5,-4),car=yellow,rotate=n] at (n:1) ;
 pgfmathsetmacrofactorn/360
 node[rotate=-90,car=purple] at ($(0,0)!factor!(5,0)$) ;
 node[rotate=-90,car=violet] at ($(5,-3)!factor!(0,-3)$) ;
 node[car=brown] at ($(4,1)!factor!(4,-4)$) ;
 node[car=orange] at ($(1,-3)!factor!(1,0)$) ;
 endtikzpicture

enddocument

Here is the output:

My questions is: How can I make the cars to move along those “arc-parts“ of the track? I would have work with ifnum, but I think it is too laborius …

tikz-pgf nodes fun

tikz-pgf nodes fun

share|improve this question

edited 7 hours ago

asked 7 hours ago

current_user

2,8321430

share|improve this question

edited 7 hours ago

asked 7 hours ago

current_user

2,8321430

share|improve this question

share|improve this question

edited 7 hours ago

edited 7 hours ago

edited 7 hours ago

asked 7 hours ago

current_user

2,8321430

asked 7 hours ago

current_user

2,8321430

asked 7 hours ago

current_user

2,8321430

2,8321430

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  Can't you just define the full thing to be one path and then place the cars via decorations.matkings?
  – marmot
  6 hours ago
  

  
  
  
  

add a comment | 

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  Can't you just define the full thing to be one path and then place the cars via decorations.matkings?
  – marmot
  6 hours ago
  

  
  
  
  

1

1

Can't you just define the full thing to be one path and then place the cars via decorations.matkings?
– marmot
6 hours ago

Can't you just define the full thing to be one path and then place the cars via decorations.matkings?
– marmot
6 hours ago

add a comment | 

1 Answer
1

active

oldest

votes

up vote
4
down vote

Just for fun: a simple way to put the car at an arbitrary position of the road path. To make @DavidCarlisle happy, cars drive on the wrong side of the road.

documentclass[border=5pt,tikz]standalone
usetikzlibrarycalc,decorations.markings
tikzset
 car/.style=
 scale=.5,minimum width=.1cm,minimum height=.5cm,fill=#1
 ,
 car on road/.style args=at pos #1 with dist #2 and color #3decorate,decoration=markings,
 mark=at position #1 with path (-2pt,#2) coordinate (aux1) 
 (2pt,#2) coordinate (aux2);
 pgftransformreset
 path let p1=($(aux2)-(aux1)$),n1=90+atan2(y1,x1) in
 ($(aux2)!0.5!(aux1)$) node[car=#3,rotate=n1];

begindocument
defroadpath(5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1)
foreach n in 0,5,...,355

 begintikzpicture
 fill[green!60!black] ([xshift=1mm,yshift=-1mm]1,0) rectangle ([xshift=-1mm,yshift=1mm]4,-3);
 path ([xshift=1mm,yshift=-1mm]1,0) -- ([xshift=-1mm,yshift=1mm]4,-3) node[midway,fill=green!40!black,circle,inner sep=.3cm] (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above right=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below right=.5cm] at (a) ;
 draw[double distance=3mm,double=gray] roadpath;
 draw[white,densely dashed] roadpath;
 pgfmathsetmacrofactorn/360
 path[car on road=at pos factor with dist 1mm and color red] roadpath;
 path[car on road=at pos 1-factor with dist -1mm and color blue] roadpath;
 pgfmathsetmacrofactormod(n/360+0.5,1)
 path[car on road=at pos factor with dist 1mm and color cyan] roadpath;
 path[car on road=at pos 1-factor with dist -1mm and color orange] roadpath;
 endtikzpicture

enddocument

share|improve this answer

answered 3 hours ago

marmot

71.6k476152

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  +1 for the wrong side of the road :-D
  – egreg
  2 hours ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  @egreg Of course, in Italy they drive on the right side. And since in the UK they drive on the opposite side, and since the opposite of right is wrong, there is only one possible conclusion ;-)
  – marmot
  2 hours ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  chat.stackexchange.com/transcript/message/30630373#30630373
  – egreg
  2 hours ago
  

  
  
  
  

add a comment | 

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',
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
);



);

 

draft saved

draft discarded

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

Name Email

StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2ftex.stackexchange.com%2fquestions%2f458370%2fmaking-motorway-with-tikz%23new-answer', 'question_page');

);

Post as a guest

Name Email

1 Answer
1

active

oldest

votes

1 Answer
1

active

oldest

votes

active

oldest

votes

active

oldest

votes

up vote
4
down vote

Just for fun: a simple way to put the car at an arbitrary position of the road path. To make @DavidCarlisle happy, cars drive on the wrong side of the road.

documentclass[border=5pt,tikz]standalone
usetikzlibrarycalc,decorations.markings
tikzset
 car/.style=
 scale=.5,minimum width=.1cm,minimum height=.5cm,fill=#1
 ,
 car on road/.style args=at pos #1 with dist #2 and color #3decorate,decoration=markings,
 mark=at position #1 with path (-2pt,#2) coordinate (aux1) 
 (2pt,#2) coordinate (aux2);
 pgftransformreset
 path let p1=($(aux2)-(aux1)$),n1=90+atan2(y1,x1) in
 ($(aux2)!0.5!(aux1)$) node[car=#3,rotate=n1];

begindocument
defroadpath(5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1)
foreach n in 0,5,...,355

 begintikzpicture
 fill[green!60!black] ([xshift=1mm,yshift=-1mm]1,0) rectangle ([xshift=-1mm,yshift=1mm]4,-3);
 path ([xshift=1mm,yshift=-1mm]1,0) -- ([xshift=-1mm,yshift=1mm]4,-3) node[midway,fill=green!40!black,circle,inner sep=.3cm] (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above right=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below right=.5cm] at (a) ;
 draw[double distance=3mm,double=gray] roadpath;
 draw[white,densely dashed] roadpath;
 pgfmathsetmacrofactorn/360
 path[car on road=at pos factor with dist 1mm and color red] roadpath;
 path[car on road=at pos 1-factor with dist -1mm and color blue] roadpath;
 pgfmathsetmacrofactormod(n/360+0.5,1)
 path[car on road=at pos factor with dist 1mm and color cyan] roadpath;
 path[car on road=at pos 1-factor with dist -1mm and color orange] roadpath;
 endtikzpicture

enddocument

share|improve this answer

answered 3 hours ago

marmot

71.6k476152

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  +1 for the wrong side of the road :-D
  – egreg
  2 hours ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  @egreg Of course, in Italy they drive on the right side. And since in the UK they drive on the opposite side, and since the opposite of right is wrong, there is only one possible conclusion ;-)
  – marmot
  2 hours ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  chat.stackexchange.com/transcript/message/30630373#30630373
  – egreg
  2 hours ago
  

  
  
  
  

add a comment | 

up vote
4
down vote

Just for fun: a simple way to put the car at an arbitrary position of the road path. To make @DavidCarlisle happy, cars drive on the wrong side of the road.

documentclass[border=5pt,tikz]standalone
usetikzlibrarycalc,decorations.markings
tikzset
 car/.style=
 scale=.5,minimum width=.1cm,minimum height=.5cm,fill=#1
 ,
 car on road/.style args=at pos #1 with dist #2 and color #3decorate,decoration=markings,
 mark=at position #1 with path (-2pt,#2) coordinate (aux1) 
 (2pt,#2) coordinate (aux2);
 pgftransformreset
 path let p1=($(aux2)-(aux1)$),n1=90+atan2(y1,x1) in
 ($(aux2)!0.5!(aux1)$) node[car=#3,rotate=n1];

begindocument
defroadpath(5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1)
foreach n in 0,5,...,355

 begintikzpicture
 fill[green!60!black] ([xshift=1mm,yshift=-1mm]1,0) rectangle ([xshift=-1mm,yshift=1mm]4,-3);
 path ([xshift=1mm,yshift=-1mm]1,0) -- ([xshift=-1mm,yshift=1mm]4,-3) node[midway,fill=green!40!black,circle,inner sep=.3cm] (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above right=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below right=.5cm] at (a) ;
 draw[double distance=3mm,double=gray] roadpath;
 draw[white,densely dashed] roadpath;
 pgfmathsetmacrofactorn/360
 path[car on road=at pos factor with dist 1mm and color red] roadpath;
 path[car on road=at pos 1-factor with dist -1mm and color blue] roadpath;
 pgfmathsetmacrofactormod(n/360+0.5,1)
 path[car on road=at pos factor with dist 1mm and color cyan] roadpath;
 path[car on road=at pos 1-factor with dist -1mm and color orange] roadpath;
 endtikzpicture

enddocument

share|improve this answer

answered 3 hours ago

marmot

71.6k476152

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  +1 for the wrong side of the road :-D
  – egreg
  2 hours ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  @egreg Of course, in Italy they drive on the right side. And since in the UK they drive on the opposite side, and since the opposite of right is wrong, there is only one possible conclusion ;-)
  – marmot
  2 hours ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  chat.stackexchange.com/transcript/message/30630373#30630373
  – egreg
  2 hours ago
  

  
  
  
  

add a comment | 

up vote
4
down vote

up vote
4
down vote

Just for fun: a simple way to put the car at an arbitrary position of the road path. To make @DavidCarlisle happy, cars drive on the wrong side of the road.

documentclass[border=5pt,tikz]standalone
usetikzlibrarycalc,decorations.markings
tikzset
 car/.style=
 scale=.5,minimum width=.1cm,minimum height=.5cm,fill=#1
 ,
 car on road/.style args=at pos #1 with dist #2 and color #3decorate,decoration=markings,
 mark=at position #1 with path (-2pt,#2) coordinate (aux1) 
 (2pt,#2) coordinate (aux2);
 pgftransformreset
 path let p1=($(aux2)-(aux1)$),n1=90+atan2(y1,x1) in
 ($(aux2)!0.5!(aux1)$) node[car=#3,rotate=n1];

begindocument
defroadpath(5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1)
foreach n in 0,5,...,355

 begintikzpicture
 fill[green!60!black] ([xshift=1mm,yshift=-1mm]1,0) rectangle ([xshift=-1mm,yshift=1mm]4,-3);
 path ([xshift=1mm,yshift=-1mm]1,0) -- ([xshift=-1mm,yshift=1mm]4,-3) node[midway,fill=green!40!black,circle,inner sep=.3cm] (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above right=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below right=.5cm] at (a) ;
 draw[double distance=3mm,double=gray] roadpath;
 draw[white,densely dashed] roadpath;
 pgfmathsetmacrofactorn/360
 path[car on road=at pos factor with dist 1mm and color red] roadpath;
 path[car on road=at pos 1-factor with dist -1mm and color blue] roadpath;
 pgfmathsetmacrofactormod(n/360+0.5,1)
 path[car on road=at pos factor with dist 1mm and color cyan] roadpath;
 path[car on road=at pos 1-factor with dist -1mm and color orange] roadpath;
 endtikzpicture

enddocument

share|improve this answer

answered 3 hours ago

marmot

71.6k476152

Just for fun: a simple way to put the car at an arbitrary position of the road path. To make @DavidCarlisle happy, cars drive on the wrong side of the road.

documentclass[border=5pt,tikz]standalone
usetikzlibrarycalc,decorations.markings
tikzset
 car/.style=
 scale=.5,minimum width=.1cm,minimum height=.5cm,fill=#1
 ,
 car on road/.style args=at pos #1 with dist #2 and color #3decorate,decoration=markings,
 mark=at position #1 with path (-2pt,#2) coordinate (aux1) 
 (2pt,#2) coordinate (aux2);
 pgftransformreset
 path let p1=($(aux2)-(aux1)$),n1=90+atan2(y1,x1) in
 ($(aux2)!0.5!(aux1)$) node[car=#3,rotate=n1];

begindocument
defroadpath(5,0) -- (0,0) arc(-90:-360:1) --+ (0,-5) arc(0:-270:1) --+ (5,0) arc(90:-180:1) --+ (0,5) arc(180:-90:1)
foreach n in 0,5,...,355

 begintikzpicture
 fill[green!60!black] ([xshift=1mm,yshift=-1mm]1,0) rectangle ([xshift=-1mm,yshift=1mm]4,-3);
 path ([xshift=1mm,yshift=-1mm]1,0) -- ([xshift=-1mm,yshift=1mm]4,-3) node[midway,fill=green!40!black,circle,inner sep=.3cm] (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,above right=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below left=.5cm] at (a) ;
 node[fill=green!40!black,circle,inner sep=.1cm,below right=.5cm] at (a) ;
 draw[double distance=3mm,double=gray] roadpath;
 draw[white,densely dashed] roadpath;
 pgfmathsetmacrofactorn/360
 path[car on road=at pos factor with dist 1mm and color red] roadpath;
 path[car on road=at pos 1-factor with dist -1mm and color blue] roadpath;
 pgfmathsetmacrofactormod(n/360+0.5,1)
 path[car on road=at pos factor with dist 1mm and color cyan] roadpath;
 path[car on road=at pos 1-factor with dist -1mm and color orange] roadpath;
 endtikzpicture

enddocument

share|improve this answer

answered 3 hours ago

marmot

71.6k476152

share|improve this answer

share|improve this answer

answered 3 hours ago

marmot

71.6k476152

answered 3 hours ago

marmot

71.6k476152

answered 3 hours ago

marmot

71.6k476152

71.6k476152

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  +1 for the wrong side of the road :-D
  – egreg
  2 hours ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  @egreg Of course, in Italy they drive on the right side. And since in the UK they drive on the opposite side, and since the opposite of right is wrong, there is only one possible conclusion ;-)
  – marmot
  2 hours ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  chat.stackexchange.com/transcript/message/30630373#30630373
  – egreg
  2 hours ago
  

  
  
  
  

add a comment | 

• 
  
  
  

  
  1
  

  
  
  
  
  
  

  
  +1 for the wrong side of the road :-D
  – egreg
  2 hours ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  @egreg Of course, in Italy they drive on the right side. And since in the UK they drive on the opposite side, and since the opposite of right is wrong, there is only one possible conclusion ;-)
  – marmot
  2 hours ago
  

  
  
  
  


• 
  
  
  

  
  

  
  
  
  
  
  

  
  chat.stackexchange.com/transcript/message/30630373#30630373
  – egreg
  2 hours ago
  

  
  
  
  

1

1

+1 for the wrong side of the road :-D
– egreg
2 hours ago

+1 for the wrong side of the road :-D
– egreg
2 hours ago

@egreg Of course, in Italy they drive on the right side. And since in the UK they drive on the opposite side, and since the opposite of right is wrong, there is only one possible conclusion ;-)
– marmot
2 hours ago

@egreg Of course, in Italy they drive on the right side. And since in the UK they drive on the opposite side, and since the opposite of right is wrong, there is only one possible conclusion ;-)
– marmot
2 hours ago

chat.stackexchange.com/transcript/message/30630373#30630373
– egreg
2 hours ago

chat.stackexchange.com/transcript/message/30630373#30630373
– egreg
2 hours ago

add a comment | 

 

draft saved

draft discarded

 

draft saved

draft discarded

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

Name Email

StackExchange.ready(
function ()
StackExchange.openid.initPostLogin('.new-post-login', 'https%3a%2f%2ftex.stackexchange.com%2fquestions%2f458370%2fmaking-motorway-with-tikz%23new-answer', 'question_page');

);

Post as a guest

Name Email

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

Name Email

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

Name Email

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

Name Email

Name Email

Name

Email

Name Email

Name

Email