Something

TARD = {}
AceLibrary("AceGUI-2.0"):embed(TARD)

local texcoordsTemplate = {
    TexCoord = {
        minX = 0, maxX = 0.625,
        minY = 0, maxY = 0.6875,
    },
}

local config = {
    type = "frame",
    name = "AceGUITestFrame",
    parent = UIParent,
    width = 300,
    height = 200,
    anchors = {
        center = true,
    },
    backdrop = {
		bgFile = "Interface/DialogFrame/UI-DialogBox-Background",
		edgeFile = "Interface/DialogFrame/UI-DialogBox-Border",
		tile = true, tileSize = 32, edgeSize = 32,
		insets = {
			left = 12, 	right = 12, 
			top = 12, bottom = 12
		},
	},
    OnMouseDown = function()this:StartMoving()end,
    OnMouseUp = "OnMouseUp",
    enableMouse = true,
    movable = true,
    elements = {
        text = {
            type = "fontstring",
            layer = "OVERLAY",
            text = "Original Text",
            anchors = {
                center = {relTo="$parentheader"},
            } ,
            OnLoad = function() this:SetText("Neat!")end, --This is pimp
            
        },
        header = {
            type = "texture",
            layer = "ARTWORK",
            file = "Interface/DialogFrame/UI-DialogBox-Header",
            anchors = {
                center = {relPoint = "top", y = -5}
            },
            height = 33,
            width = 133,
            TexCoord = {
                minX = .23828,  maxX = .7578124,
                minY = 0.04687, maxY = .5625,
            },
        },
        closebutton = {
            type = "button",
            size = {100,28},
            anchors = {
                bottomright = { xOffset = -15, yOffset = 15 }
            },
            text = CLOSE,
            Clicks = "LeftButtonUp",
            OnClick = "CloseDialog",
            NormalTexture = {
                file = "Interface/Buttons/UI-Panel-Button-Up",
                template = texcoordsTemplate,
                setAllPoints = true,
            },
            PushedTexture = {
                file = "Interface/Buttons/UI-Panel-Button-Down",
                template = texcoordsTemplate,
                setAllPoints = true,
            },
            HighlightTexture = {
                file = "Interface/Buttons/UI-Panel-Button-Highlight",
                template = texcoordsTemplate,
                setAllPoints = true,
                BlendMode = "ADD",
            }
        },
    }
}

function TARD:OnMouseUp()
    self.gui:StopMovingOrSizing()
end

function TARD:CloseDialog()
    self.gui:Hide()
end

function TARD:CreateAndShowGUI()
    self.gui = self.gui or self:CreateGUI(config)
    self.gui:Show()
end