diff --git a/Addon/Code/Options.lua b/Addon/Code/Options.lua
index 380e313..2319706 100644
--- a/Addon/Code/Options.lua
+++ b/Addon/Code/Options.lua
@@ -110,6 +110,10 @@ local function InitSpeeches()
         addon.SpeechFrame:UpdateSettings()
     end)
 
+    CreateButton('Zobrazit testovaci zpravu', "Zobrazit", function()
+        addon.API.AddSpeechMessage("Test", "Text message")
+    end)
+
 end
 
 local function InitOthers()
diff --git a/Addon/Code/Speech.lua b/Addon/Code/Speech.lua
index befbaa6..dd432e0 100755
--- a/Addon/Code/Speech.lua
+++ b/Addon/Code/Speech.lua
@@ -73,6 +73,7 @@ local function AddMessage(sender, message)
         RemoveMessage(MessageFrame)
     end)
 end
+addon.API.AddSpeechMessage = AddMessage
 
 local function ShowSpeechTranslation(sender, message)
     local text = CzechQuestsAddon:GetData("speech", message)
diff --git a/Addon/Code/SpeechFrame.lua b/Addon/Code/SpeechFrame.lua
index 432bcd0..7bd4888 100755
--- a/Addon/Code/SpeechFrame.lua
+++ b/Addon/Code/SpeechFrame.lua
@@ -28,6 +28,7 @@ function SpeechFrame:UpdateSettings()
     self:SetWidth(CzechQuestsAddon_Store.config.SPEECH_FRAME_WIDTH)
 
     -- Set position
+    self:ClearAllPoints()
     self:SetPoint(
             "BOTTOMLEFT", UIParent, "BOTTOMLEFT",
             CzechQuestsAddon_Store.config.SPEECH_FRAME_POSITION_X,