                                       :Extent {:x 100 :y 100}}}
                               {:id 5
                                 :morph {:Position {:x 0 :y 0} :isDraggable true}
-                                :shape {:Extent {:x 110 :y 40}
+                                :shape {:Extent {:x 220 :y 420}
                                         :BorderColor "rgb(92,77, 11)"
                                         :BorderWidth 2
                                         :Fill "rgb(255,244,194)"}

                             :shape {:Fill "rgb(0,0,255)"
                                     :Extent {:x 42 :y 42}}
                             :submorphs []}
                             {:id 3
                              :morph {:Position {:x 100 :y 100} :isDraggable true}
                              :shape {:Fill "rgb(250, 250, 0)"

                                      {:id 4
                                       :morph {:Preserve true
                                               :MorphClass "Text" 
                                               :Position {:x 10 :y 10}
                                               :TextString "Hallo Welt! Write something!"
                                               :isDraggable true}
                                       :shape {:ShapeClass "Text"
