Dim title
    title = "Fast Start"
Window.width = 200
Window.height = 100
Window.title = CStr(title)
Window.AddControl 800,1,10,5,50,10,"Your button"

Function WM_COMMAND (id)
 Window.MessageBox CStr(title), CStr(id), 64
End Function