\documentclass{standalone} \usepackage{luamplib} \begin{document} \mplibtextextlabel{enable} \mplibshowlog{enable} \begin{mplibcode} beginfig(1); randomseed := 3612.11746; numeric w, h, n; w = 377; h = 80; n = 500; draw (origin--right) scaled w; draw (origin--right) scaled w shifted (0,+h/2) withcolor 3/4; draw (origin--right) scaled w shifted (0,-h/2) withcolor 3/4; numeric y; y = 0; path walk; walk = (0, y) for x=w/n step w/n until w: hide(y := y + 4 normaldeviate) -- (x, y) endfor; path bridge; bridge = point 0 of walk for i=1 upto n: -- point i of walk + (0, i/n * -y) endfor; draw walk withcolor 7/8; % so you can see how it works undraw bridge withpen pencircle scaled 3/4; draw bridge withcolor 3/4 blue; endfig; \end{mplibcode} \end{document}