diff --git a/app/Main.hs b/app/Main.hs
index 2b702b9..ddfc3bd 100644
--- a/app/Main.hs
+++ b/app/Main.hs
@@ -201,7 +201,13 @@ app AppData{..} request respond = mkAnswer >>= (respond . toResponse)
             Exact (_,match) -> lookupName match ril100map
               & maybe None Exact
             Fuzzy (_,match) -> Fuzzy (ril100BaseUrl <> "/" <> match)
-    helptext = Plaintext "no help yet"
+    helptext = Plaintext $ "\
+      \ril100 → Name: " <> ril100BaseUrl <> "/RM\n\
+      \Name → ril100: " <> ril100BaseUrl <> "/Mannheim\n\n\
+      \Leitpunkt → Name: " <> leitpunktBaseUrl <> "/MA\n\
+      \Name → Leitpunkt: " <> leitpunktBaseUrl <> "/Mannheim\n\n\
+      \Am selben Bahnsteig gegenüber:\n\
+      \  " <> ril100BaseUrl <> "/RM/gleis"
     host = head (BS.split (fromIntegral (ord '.')) rawHost)
       where rawHost = case lookup "x-forwarded-host" $ requestHeaders request of
               Nothing   -> fromMaybe "" $ requestHeaderHost request