Снегопат

var msgWnd = null
function createTextWindow(textWnd){msgWnd = textWnd}

function macrosПроверка()
{
   // Будем отлавливать создание текстового окна
   events.connect(Designer, "createTextWindow", SelfScript.Self);
   // Очищаем окно сообщений
   stdcommands.Frntend.ClearMessageWindow.send()
   // Закрываем его
   stdcommands.Frntend.CloseMessageWindow.send()
   // Запускаем синтакс-контроль
   stdcommands.Frntend.SyntaxCheck.send()
   // Отпишемся от события
   events.disconnect(Designer, "createTextWindow", SelfScript.Self);
   // Прочитаем, что там в окне сообщений
   var msgText
   if(msgWnd)
   {
      msgText = msgWnd.text
      MessageBox(msgText)
   }   
   // Очищаем окно сообщений
   stdcommands.Frntend.ClearMessageWindow.send()
}