diff --git a/balken.lisp b/balken.lisp
index 3806807..5691476 100644
--- a/balken.lisp
+++ b/balken.lisp
@@ -11,6 +11,7 @@
 (defparameter slope-x-offset (/ (- edge-width background-width) 2))
 
 (defparameter font-size 5.8)
+(defparameter s-font-size 8.5)
 (defparameter text-width 19.75)
 
 (defparameter edge-color "#ad0000")
@@ -18,10 +19,13 @@
 (defparameter slope-color "#860000")
 
 (defun make-stacken-text ()
-  (labels ((make-span (text spacing)
-             (xmls:make-node :name "tspan" :attrs `(("style" ,(format nil "letter-spacing:~A" spacing)))
+  (labels ((make-span (text spacing &optional font-size)
+             (xmls:make-node :name "tspan" :attrs `(("style" ,(if font-size
+                                                                  (format nil "font-size:~Dpx;letter-spacing:~A"
+                                                                          font-size spacing)
+                                                                  (format nil "letter-spacing:~A" spacing))))
                              :child text)))
-    (let ((subspans (list (make-span "S" "-0.01em")
+    (let ((subspans (list (make-span "s" "-0.01em" s-font-size)
                           (make-span "t" "-0.05em")
                           (make-span "a" "-0.05em")
                           (make-span "cken" 0))))
diff --git a/stacken.svg b/stacken.svg
index 8477fcf..41549e3 100644
--- a/stacken.svg
+++ b/stacken.svg
@@ -1 +1 @@
-<svg xmlns="http://www.w3.org/2000/svg" viewbox="0 0 24 10" width="24" height="10"><style>@font-face{font-family:&quot;rtxbsc&quot;;src:url(data:application/font-woff;charset=utf-8;base64,d09GMgABAAAAAASYAA0AAAAACOAAAARBAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP0ZGVE0cGh4GVgCCZBEICoZIhSMLFgABNgIkAygEIAWDSAc2Gz4HAB6FccNdWltiiKNgMnj64+GftX73zezOFzGgEQrNLalHD4VDwxtNxJuZhCK+P4+nvWTOn/gzZCS7DmB653ZQ1/kAseb/5/9yh9vvA92YaPf8hJbNFR0WlS1aRgn2orH8sNO2QZoFJAFIiFm7klLyYNcsO/jorq57KgR82PCfBXxMrF4KwMekTgYIlKMRSIRUiZBDgogr8V2eZCW5H8Dq2hdv2QdJ4bMUVKD+uPnBhQBmaUiZgpuMuEsOAUhpq90KmH6GQDtxA4BixRLMU6WhELOUqy+EghChWDW2N8whLwNFREYAIkFCKCz8dqRy8iCjCIpLhE+IQgkoBfVAMdEGYhAAyAEgEemxuqV6Pb10vbXkqDilISJ4DtR17ApjAYLS2LWOFk1qZKL0LWtMU1KSOIevU/ybBO8WEiQLkYBGUHr0JsUH1n7NGSRI5STJ0pxVbPnEylETQk7p49sUfwRg1SFDBKVbD7oAuwIJbqXKUbFKQyASiQgeTlEFdlxNIBSqARWnVhFUyHHVHE7YsK1wdKVx9cXrSclC4+Ltq4EsnU+ya5yd4HVH7l1JEWWTCN5aFwLNYa9TfJedFF+zDWy5gQSrJidFw10eNy0O6o6CfNGmc9E33qFfKdJAULrxJsXfDewad+GZFXvWTBdTM0ddRk3ov+Fxo91JVKrcqReY48+RVT3Dx36K8gvixcnWNTjQfo7KXJP+Oq0BTlt33uUe9wHnATiZviTJyaO6k88tndVTZBRKHxeXP41XaTlHJ9jVX8tbLNeqFheaBKtG6BEeJlfs1gpWyA8ZVMSdg1pU0Ntg7VfKIuvdZfg9Hbn38oyKl65rgi0dDP+fY+nNiOUZiEl+WDy8d5by4W/k4EAcfo5Vslk0/Kc3mHfGeM7shftCnaQlBzUO4BOYDHZKyTz6p52Fi9tVxLTWa2lywGBBIp7CKnHaXpUxiF5/R/0Qk5GAhZCwwjUuPdGYjiCo8fRm7Q3e8S6q95800hI6/wLiTXfbl2IlldUXH1jpv6XEiidaa0/SG72j7HCONm5vGOnpmKH/wTZv7ZyU5iX22Ub5s/BnXBdnnL0tq1k6TJsY6AGAQMr9z4kGuQpe36RR+vWqqiNZEP/jLlAsAUE8LzDZY078FYRdOloRoxt4RXKQid2AklCP5SgWgkbsDhEejeqNBAlCoB8AVDoIBKCGERZCZhCSEJOEVA8rhZzMEyGv3M/tmSzqiIlcCXqAIIRyvZCEGCmkBskTcspdE/KaPWwuUx5543HVqVeqWhWGIxt28llhhIoTBV5RT+toY5dvxYTGRQEs0aBFgXocsGRZS0E9B2A0rkKlGlWCP8u1AIZwWw390TrFuBgO65AMj3E209rrwIE1Zw0c2JXO4JtdaEldMZdxsLFjPJhVNdBxcLB2tn64m2Fbs51w/Fyz+EcJoVrYwUG7FDFz8SAhwsSIlyIVAAAA) format(&quot;woff2&quot;)}</style><polygon fill="#ad0000" stroke="none" points="0,0 24,0 24,1 0,1"/><polygon fill="#ad0000" stroke="none" points="0,9 24,9 24,10 0,10"/><polygon fill="#ad0000" stroke="none" points="1,2 23,2 23,8 1,8"/><text x="12.0" y="7.2"><tspan style="font:5.8px rtxbsc;fill:white;text-anchor: middle"><tspan style="letter-spacing:-0.01em">S</tspan><tspan style="letter-spacing:-0.05em">t</tspan><tspan style="letter-spacing:-0.05em">a</tspan><tspan style="letter-spacing:0">cken</tspan></tspan></text><polygon fill="#860000" stroke="none" points="0,1 24,1 23,2 1,2"/><polygon fill="#860000" stroke="none" points="1,8 23,8 24,9 0,9"/></svg>
\ No newline at end of file
+<svg xmlns="http://www.w3.org/2000/svg" viewbox="0 0 24 10" width="24" height="10"><style>@font-face{font-family:&quot;rtxbsc&quot;;src:url(data:application/font-woff;charset=utf-8;base64,d09GMgABAAAAAASYAA0AAAAACOAAAARBAAEAAAAAAAAAAAAAAAAAAAAAAAAAAAAAP0ZGVE0cGh4GVgCCZBEICoZIhSMLFgABNgIkAygEIAWDSAc2Gz4HAB6FccNdWltiiKNgMnj64+GftX73zezOFzGgEQrNLalHD4VDwxtNxJuZhCK+P4+nvWTOn/gzZCS7DmB653ZQ1/kAseb/5/9yh9vvA92YaPf8hJbNFR0WlS1aRgn2orH8sNO2QZoFJAFIiFm7klLyYNcsO/jorq57KgR82PCfBXxMrF4KwMekTgYIlKMRSIRUiZBDgogr8V2eZCW5H8Dq2hdv2QdJ4bMUVKD+uPnBhQBmaUiZgpuMuEsOAUhpq90KmH6GQDtxA4BixRLMU6WhELOUqy+EghChWDW2N8whLwNFREYAIkFCKCz8dqRy8iCjCIpLhE+IQgkoBfVAMdEGYhAAyAEgEemxuqV6Pb10vbXkqDilISJ4DtR17ApjAYLS2LWOFk1qZKL0LWtMU1KSOIevU/ybBO8WEiQLkYBGUHr0JsUH1n7NGSRI5STJ0pxVbPnEylETQk7p49sUfwRg1SFDBKVbD7oAuwIJbqXKUbFKQyASiQgeTlEFdlxNIBSqARWnVhFUyHHVHE7YsK1wdKVx9cXrSclC4+Ltq4EsnU+ya5yd4HVH7l1JEWWTCN5aFwLNYa9TfJedFF+zDWy5gQSrJidFw10eNy0O6o6CfNGmc9E33qFfKdJAULrxJsXfDewad+GZFXvWTBdTM0ddRk3ov+Fxo91JVKrcqReY48+RVT3Dx36K8gvixcnWNTjQfo7KXJP+Oq0BTlt33uUe9wHnATiZviTJyaO6k88tndVTZBRKHxeXP41XaTlHJ9jVX8tbLNeqFheaBKtG6BEeJlfs1gpWyA8ZVMSdg1pU0Ntg7VfKIuvdZfg9Hbn38oyKl65rgi0dDP+fY+nNiOUZiEl+WDy8d5by4W/k4EAcfo5Vslk0/Kc3mHfGeM7shftCnaQlBzUO4BOYDHZKyTz6p52Fi9tVxLTWa2lywGBBIp7CKnHaXpUxiF5/R/0Qk5GAhZCwwjUuPdGYjiCo8fRm7Q3e8S6q95800hI6/wLiTXfbl2IlldUXH1jpv6XEiidaa0/SG72j7HCONm5vGOnpmKH/wTZv7ZyU5iX22Ub5s/BnXBdnnL0tq1k6TJsY6AGAQMr9z4kGuQpe36RR+vWqqiNZEP/jLlAsAUE8LzDZY078FYRdOloRoxt4RXKQid2AklCP5SgWgkbsDhEejeqNBAlCoB8AVDoIBKCGERZCZhCSEJOEVA8rhZzMEyGv3M/tmSzqiIlcCXqAIIRyvZCEGCmkBskTcspdE/KaPWwuUx5543HVqVeqWhWGIxt28llhhIoTBV5RT+toY5dvxYTGRQEs0aBFgXocsGRZS0E9B2A0rkKlGlWCP8u1AIZwWw390TrFuBgO65AMj3E209rrwIE1Zw0c2JXO4JtdaEldMZdxsLFjPJhVNdBxcLB2tn64m2Fbs51w/Fyz+EcJoVrYwUG7FDFz8SAhwsSIlyIVAAAA) format(&quot;woff2&quot;)}</style><polygon fill="#ad0000" stroke="none" points="0,0 24,0 24,1 0,1"/><polygon fill="#ad0000" stroke="none" points="0,9 24,9 24,10 0,10"/><polygon fill="#ad0000" stroke="none" points="1,2 23,2 23,8 1,8"/><text x="12.0" y="7.2"><tspan style="font:5.8px rtxbsc;fill:white;text-anchor: middle"><tspan style="font-size:8.5px;letter-spacing:-0.01em">s</tspan><tspan style="letter-spacing:-0.05em">t</tspan><tspan style="letter-spacing:-0.05em">a</tspan><tspan style="letter-spacing:0">cken</tspan></tspan></text><polygon fill="#860000" stroke="none" points="0,1 24,1 23,2 1,2"/><polygon fill="#860000" stroke="none" points="1,8 23,8 24,9 0,9"/></svg>