                       :width "100%"
                       :height "100%"}})
 
-           (if-not (or (:content data) (:builder data))
-             [:h1 (:title data)]
-             [:h2 (:title data)]
+           (when-let [title (:title data)]
+             [:h1 title]
+             )
+
+           (when-let [subtitle (:subtitle data)]
+             [:h2 subtitle]
              )
 
            (when-let [builder (:builder data)]
              (builder data owner)
+             )
+
+           (when-let [event (:event data)]
+             [:div {:style {:text-align "center" :margin-top "20pt"}}
+              [:h3 event]
+              [:h3 (:author data)]
+              [:h3 (:company data)]
+              [:h3 (:email data)]
+              [:h3 (:twitter data)]
+              ]
+             )
+
+           (when-let [bullets (:bullets data)]
+             [:ul {:style {:font-size "42pt"}}
+              (for [b bullets]
+                [:li b]
+                )]
              )
 
            #_[:p (:text data)]

             (apply vec content)
             )
           (when-let [code (:code data)]
             [:pre code]
             )
           #_(when (:custom data)
               [:svg {:version "1.1" :width 600 :height 600}


(def default-font "72pt")

(defn fig-put-and-take [data owner]
  [:div
   [:svg {:version "1.1" :width 800 :height 600}

    [:g {:transform "translate(70,65)"
         :onClick (fn [_]
