{{\def\dash{\raise2.1pt\hbox{\rule{5pt}{0.3pt}}\hspace{1pt}}\begin{tabbing}
{\textbf{function}}\ liste\ =\ nachbarn(\ mittelpunkt\ )\\
{\textit{\%NACHBARN\ Gibt\ für\ einen\ beliebigen\ Zellenindex\ eine\ Liste\ der\ Indizes\ der\ direkten}}\\
{\textit{\%Nachbarzellen\ zurück}}\\
{\textit{\%\ \ \ Die\ zurückgegebene\ Liste\ enth�?lt\ $\ast$immer$\ast$\ sechs\ Indizes,\ auch\ wenn\ diese}}\\
{\textit{\%\ \ \ außerhalb\ des\ Gitters\ liegen.\ Ob\ ein\ Index\ gültig\ ist,\ muss\ separat}}\\
{\textit{\%\ \ \ geprüft\ werden.Die\ Reihenfolge\ ist\ vom\ oberen\ Nachbarn\ beginnend\ im}}\\
{\textit{\%\ \ \ Uhrzeigersinn.}}\\
\\
{\textbf{global}}\ DX;\\
\\
liste\ =\ {[}\ mittelpunkt+2$\ast$DX,\ ...\\
\ \ \ \ \ \ \ \ \ \ mittelpunkt+DX+1+mod(idivide(mittelpunkt,uint32(DX)),2),\ ...\\
\ \ \ \ \ \ \ \ \ \ mittelpunkt\dash{}DX+1+mod(idivide(mittelpunkt,uint32(DX)),2),\ ...\\
\ \ \ \ \ \ \ \ \ \ mittelpunkt\dash{}2$\ast$DX,\ ...\\
\ \ \ \ \ \ \ \ \ \ mittelpunkt\dash{}DX\dash{}2+mod(idivide(mittelpunkt,uint32(DX)),2),\ ...\\
\ \ \ \ \ \ \ \ \ \ mittelpunkt+DX\dash{}2+mod(idivide(mittelpunkt,uint32(DX)),2)\ {]};\\
\\
{\textbf{end}}\\

\end{tabbing}}}
