diff --git a/farbendemo.fs b/farbendemo.fs
new file mode 100644
index 0000000..64be153
--- /dev/null
+++ b/farbendemo.fs
@@ -0,0 +1,11 @@
+: farbendemo'' <fc> !" ====" ;
+: farbendemo'
+	7 0 +do
+		i postpone literal postpone <bc>
+		7 0 +do
+			i postpone literal postpone farbendemo''
+		loop
+		postpone <br>
+	loop
+; immediate
+: farbendemo   farbendemo' </bc> </fc> ;
diff --git a/presentation.p.fs b/presentation.p.fs
index 8d85023..743cc91 100644
--- a/presentation.p.fs
+++ b/presentation.p.fs
@@ -170,7 +170,7 @@
 	s" Erweiterbarkeit" <part>
 <np>
 	<h> !" Zeit für Makros!!" </h>
-	<p> s" presentation.p.fs" 29 39 <source> </p>
+	<p> s" farbendemo.fs" 0 100 <source> </p>
 	<p> farbendemo </p>
 <np>
 	<h> !" Beliebige Wörter können Inhalte erzeugen!!" </h>