anchor.diff:                                   (bot-halt))))))))
            :name "IRC-WATCHER")))
   
  -(defun bot-start ()
  +(defun bot-load-conf (bot config)
  +  (let ((irc-conf (jget :irc config))
  +        (tg-conf (jget :tg config)))
  +    (setf (bot-irc-name bot) (jget :username irc-conf))
  +    (setf (bot-irc-channel bot) (jget :channel irc-conf))
  +    (setf (bot-tg-bot-id bot) (jget :bot-id tg-conf))
  +    (setf (bot-tg-bot-authstr bot) (jget :bot-token tg-conf))
  +    (setf (bot-tg-chat-id bot) (jget :chat-id tg-conf))
  +    t))
  +
  +(defun bot-start (config)
     (let ((bot (make-bot)))
  +    (bot-load-conf bot config)
       (irc-reconnect bot)
       (logging "Creat TG LOOP")
       (setf (bot-thread-tg-loop bot)
  
positive.code:   (tryto (sb-thread:terminate-thread (bot-thread-irc-watcher bot)))
    (tryto (irc-shutdown bot)))
  
  
  
negative.code: 
  ;;;; -----------------------------------------
  
  (defun tg-request (bot method-name &optional parameters)
    (let ((http-method (if parameters :post :get)))
      (flexi-streams:octets-to-string
       (http-request
  