diff --git a/presentation.fs b/presentation.fs
index f203177..20c3a34 100755
--- a/presentation.fs
+++ b/presentation.fs
@@ -154,6 +154,23 @@ ptype-reset \ ptype-lenl sollte von Anfang an 0 sein
: {/li} ( addr -- addr ) cr ;
: ( addr len -- , xt-{/li} ) ['] {/li} , swap ! ;
+variable enumerationCount ( -- addr )
+: {||} ( addr -- addr )
+ enumerationCount @ 1+ enumerationCount !
+ s" " type enumerationCount @ 0 U.R s" ) " type
+ 5 ptype-lenl !
+ cell+
+;
+: <||> ( -- addr u0 , xt-{||} 0 ) ['] {||} , here 0 , 0 ;
+: {/||} ( addr -- addr ) cr ;
+: ||> ( addr len -- , xt-{/||} ) ['] {/||} , swap ! ;
+
+: {en} ( -- ) ;
+:
+
+
+