The arrow in the middle is placed via the arrow pic, alternatively you can use the decorations.markings library.
We can setup tikzcd in a way that places a bullet at each cell.
We will use labels via the quotes library to place the numbers below the bullets. The \mathstrut in the setup makes it so that all those nodes have the same height/depth which will align them better.
The dots key can be used to place dots instead of a normal line.
The dbl key uses the nfold library and the same 1.2ex as the every bullet style to draw two parallel lines.
The mid arrow uses the arrow pic to place an arrow tip halfway along the arrow. Use < to reverse the direction.
Three parallel lines are drawn by a combination of dbl and a normal arrow. (This could be improved but it's the easiest to do.)
If this is needed more and especially for curved paths, we will need another solution (nfold = 3) but we might want to make sure the middle line won't be drawn over the dots in case you want to use different colors for bullets and arrows.
Using between origins with the column and row separator helps align the dots in a properly grid without the labels messing it up.
Code
\documentclass[varwidth]{standalone}
\usepackage{tikz}
\usetikzlibrary{cd, nfold, quotes}
\tikzset{
pics/arrow/.style={/tikz/sloped, /tikz/allow upside down,
code=\pgfarrowdraw{#1}}, pics/arrow/.default=>}
\tikzcdset{
dynkin/.style={
every matrix/.append style={
row sep={2em,between origins}, column sep={2.5em,between origins}},
arrows={dash, thick},
dots/.style={
path only,
/tikz/every to/.append style={
edge node={node[%
commutative diagrams/every label, font=, auto=false, sloped]{$\cdots$}}}},
dbl/.style={
start anchor=center, end anchor=center,
double distance between line centers=+1.2ex, nfold=2},
mid arrow/.default=,
mid arrow/.style={
/tikz/every to/.append style={edge node={
pic[{sloped, allow upside down,</.style={xscale=-1},##1}]
{arrow={Straight Barb[angle'=120]}}}}},
cells={nodes={circle, inner sep=+0pt, minimum size=+1.2ex, draw, fill, thick}},
/tikz/label position=below,
/tikz/every label/.style={
commutative diagrams/every label, shape=rectangle,
execute at begin node=\mathstrut, path only}}}
\tikzcdset{label dynkin/.style 2 args={execute at end picture={
\node[xshift=-.6666em,left,text depth=+0pt]at(\tikzcdmatrixname-#1.west){$#2$};}}}
\begin{document}
\begin{tikzcd}[dynkin, label dynkin={1-1}{A_n, n>0}]
|["1"]| \ar[r] & |["2"]| \ar[r] & |["3"]| \ar[r, dots] & |["n-1"]| \ar[r] & |["n"]|
\end{tikzcd}
\begin{tikzcd}[dynkin, label dynkin={1-1}{B_n, n>1}]
|["1"]| \ar[r] & |["2"]| \ar[r] & |["3"]| \ar[r, dots]
& |["n-1"]| \ar[r, dbl, mid arrow] & |["n"]|
\end{tikzcd}
\begin{tikzcd}[dynkin, label dynkin={1-1}{C_n, n>2}]
|["1"]| \ar[r] & |["2"]| \ar[r] & |["3"]| \ar[r, dots]
& |["n-1"]| \ar[r, dbl, mid arrow=<] & |["n"]|
\end{tikzcd}
\begin{tikzcd}[dynkin, label dynkin={2-1}{D_n, n>3}, row sep=tiny]
& & & & & |["n'" right]| \
|["1"]| \ar[r] & |["2"]| \ar[r] & |["3"]| \ar[r, dots]
& |["n-1"]| \ar[r] & |["n"]| \ar[ur] \ar[dr] \
& & & & & |["n^*" right]|
\end{tikzcd}
\begin{tikzcd}[dynkin, label dynkin={2-1}{E_6}]
& & |["3'" above]| \
|["1"]| \ar[r] & |["2"]| \ar[r] & |["3"]| \ar[r] \ar[u]
& |["4"]| \ar[r] & |["5"]|
\end{tikzcd}
\begin{tikzcd}[dynkin, label dynkin={2-1}{E_7}]
& & |["3'" above]| \
|["1"]| \ar[r] & |["2"]| \ar[r] & |["3"]| \ar[r] \ar[u]
& |["4"]| \ar[r] & |["5"]| \ar[r] & |["6"]|
\end{tikzcd}
\begin{tikzcd}[dynkin, label dynkin={2-1}{E_8}]
& & |["3'" above]| \
|["1"]| \ar[r] & |["2"]| \ar[r] & |["3"]| \ar[r] \ar[u]
& |["4"]| \ar[r] & |["5"]| \ar[r] & |["6"]| \ar[r] & |["7"]|
\end{tikzcd}
\begin{tikzcd}[dynkin, label dynkin={1-1}{F_4}]
|["1"]| \ar[r] & |["2"]| \ar[r, dbl, mid arrow] & |["3"]| \ar[r] & |["4"]|
\end{tikzcd}
\begin{tikzcd}[dynkin, label dynkin={1-1}{G_2}]
|["1"]| \ar[r] \ar[r, dbl, mid arrow] & |["2"]|
\end{tikzcd}
\end{document}
Output

decorations.markingslibrary: Q3161 or a custom pic. – Qrrbrbirlbel Jul 04 '23 at 14:01indefinite edge. As for changing the angle, I can only offer a cheat:\begin{dynkinDiagram}[edge length=1cm,root radius=3pt, labels={1,2,n-1,n},/tikz/yscale=0.5,*/.append style={yscale=2}]D{**.***} \end{dynkinDiagram}. Anyway, these are just some minor remarks. – Jul 06 '23 at 15:40