timedsupertext conversion

projects/_standalone/ktxt2/src/ktxt2/conversions/FountainToHollywoo.kiss

@@ -68,4 +68,14 @@
                         "\n"))))
 
 (doWithCharacters "Add" "<position key> <facing>")
-(doWithCharacters "Remove" "")
+(doWithCharacters "Remove" "")
+
+(registerConversion
+    (new ktxt2.StreamConversion "Timed super text" "fountain" "hollywoo"
+        ->stream (stream.startsWith "SUPER:")
+        ->stream {
+            (stream.dropString "SUPER:")
+            (stream.dropWhitespace)
+            (let [text (stream.expect "super text" ->(stream.takeLine))]
+                "TIMEDSUPERTEXT ##\"${text}\"## ##\"${text}\"##")
+        }))