Name: Anonymous 2015-07-04 0:57
(DE TOH
(N)
(BEWEGE 'LINKS
'RECHTS
'MITTE N))
(DE BEWEGE
(VON NACH STIFT N)
(COND((ZEROP N)
T)
(T(BEWEGE VON STIFT NACH
(SUB1 N))
(PRINT(LIST 'LEGE
'SCHEIBE
'VON VON
'NACH NACH))
(BEWEGE STIFT NACH VON
(SUB1 N)))))
(LEGE SCHEIBE VON LINKS NACH RECHTS)
(LEGE SCHEIBE VON LINKS NACH MITTE)
(LEGE SCHEIBE VON RECHTS NACH MITTE)
(LEGE SCHEIBE VON LINKS NACH RECHTS)
(LEGE SCHEIBE VON MITTE NACH LINKS)
(LEGE SCHEIBE VON MITTE NACH RECHTS)
(LEGE SCHEIBE VON LINKS NACH RECHTS)