.key an/a

if <an> eq info
  echo "0: floor without axes"
  echo "1: floor with axes"
  echo "2: wooden floor"
  echo "3: filled chess floor"
  echo "4: filled star floor"
  echo "5: hill"
  echo "6: hexagonal floor"
  echo "7: filled round floor"
  echo "8: filled round floor with rose"
  echo "9: mini floor (1qm)"
  echo "10:great chess floor (to use with shadows)"
  echo "11:giant chess floor (to slow down the program)"
  echo "12:simple floor (quick)"
  quit
endif


cd o/basic

if <an> eq 0
  copy karoboden_ohne_axn Karoboden
  echo "floor without axes"
endif
if <an> eq 1
  copy karoboden_mit_axn Karoboden
  echo "floor with axes"
endif
if <an> eq 2
  copy karoboden_Planken Karoboden
  echo "wooden floor"
endif
if <an> eq 3
  copy karoboden_schach Karoboden
  echo "filled chess floor"
endif
if <an> eq 4
  copy karoboden_Stern Karoboden
  echo "filled star floor"
endif
if <an> eq 5
  copy karoboden_Hgel Karoboden
  echo "hill"
endif
if <an> eq 6
  copy karoboden_6eck Karoboden
  echo "hexagonal floor"
endif
if <an> eq 7
  copy karoboden_Rund_gefllt Karoboden
  echo "filled round floor"
endif
if <an> eq 8
  copy karoboden_Rund_Rose Karoboden
  echo "filled round floor with rose"
endif
if <an> eq 9
  copy karoboden_Mini Karoboden
  echo "mini floor (1qm)"
endif
if <an> eq 10
  copy karoboden_gross Karoboden
  echo "great chess floor (to use with shadows)"
endif
if <an> eq 11
  copy Karoboden_fein Karoboden
  echo "giant chess floor (to slow down the program)"
endif
if <an> eq 12
  copy Karoboden_einfach Karoboden
  echo "simple floor (to speed up the program)"
endif
cd //
