Автоматическое выполнение скрипта при появлении txt файла

#AutoIt3Wrapper_au3check_parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
 #AutoIt3Wrapper_au3check_parameters=-d -w 1 -w 2 -w 3 -w 4 -w 5 -w 6
#include <GuiConstantsEx.au3>
#include <GuiConstants.au3>
#include <GUIComboBox.au3>
#include <GuiConstantsEx.au3>
#include <WindowsConstants.au3>
#include <IE.au3>
#include <String.au3>
#Include <Array.au3>
#include <pdf_au3_haru.au3>
#include <Date.au3>
#include <file.au3>


$god = '2015'
$a = FileReadToArray('Новый текстовый документ.txt')
;~ For $line = 0 To UBound($a) -1
;~     MsgBox(0, 'Строка ' & $line, $a[$line])
;~ Next

_1titul()


Local $nachCombo, $stor_svetCombo
Local $mmssgg,$marginx,$marginy
global $raion1,$raion2,$raion3,$raion4,$raion5,$raion6,$raion7,$raion8,$raion9,$raion10,$raion11,$raion12,$raion13,$raion14,$raion15,$raion16,$raion17,$raion18,$raion19,$raion20,$raion21,$raion22,$raion23,$raion24,$raion25,$raion26,$raion27,$raion28,$raion29,$raion30,$raion31,$raion32,$raion33,$raion34,$raion35,$raion36,$raion37,$raion38,$raion39,$raion40,$raion41,$raion42,$raion43,$raion44,$raion45,$raion46,$raion47,$raion48,$raion49,$raion50,$raion51,$raion52,$raion53,$raion54,$raion55,$raion56,$raion57,$raion58,$raion59,$raion60,$raion61,$raion62,$raion63,$raion64,$raion65,$raion66,$raion67,$raion68,$raion69,$raion70,$raion71,$raion72,$raion73
global $nachindex, $nomer_raiona
global $aindex, $index, $ur_pov, $shifr
Global $hpp, $print
 Local $stadia_prCombo, $b_Enter
   Global $stadia_prindex
   Global $stadia_pr0, $stadia_pr1, $stadia_pr2, $god





func _1titul() ; печать титульного листа
Global $pdf, $page, $docname, $txt_font, $def_font
;~ $docname = 'Титульный лист - '&GUICtrlRead($shifr)
$docname = 'Титульный лист - '&$a[4]
$pdf = AU3_HPDF_New() ; Создаем новый PDF-документ

$page = AU3_HPDF_AddPage() ; Добавляем новую страницу
AU3_HPDF_Page_SetSize($page, $HPDF_PAGE_SIZE_A4, $HPDF_PAGE_PORTRAIT) ; Устанавливаем размер страницы А4, ориентация - портретная
$doc_height = AU3_HPDF_Page_GetHeight($page) ; Получаем высоту страницы
$doc_width = AU3_HPDF_Page_GetWidth($page); Получаем ширину страницы


AU3_HPDF_Page_SetLineWidth($page, 0.5) ; Устанавливаем толщину линий прямоугольника
AU3_HPDF_Page_SetRGBStroke($page, 0, 0, 0) ; Устанавливаем цвет линий прямоугольника (красный, по умолчанию - черный)

AU3_HPDF_Page_Rectangle($page, 56.692, 14.173, $doc_width-70.865, $doc_height-28.346) ; Рисуем прямоугольник-рамку
AU3_HPDF_Page_Stroke($page) ; Заканчиваем рисование фигур


;шрифт на работе
$txt_font = AU3_HPDF_GetFileFont('times.ttf', $CP1251); Загружаем шрифт из файла
$def_font = AU3_HPDF_GetFileFont('times.ttf', $CP1251); Загружаем шрифт из файла



$page_title = $a[0]
AU3_HPDF_Page_SetFontAndSize($page, $def_font, 25) ; Устанавливаем размер шрифта
$tw = AU3_HPDF_Page_TextWidth($page, $page_title) ; Получаем длину строки текста
AU3_HPDF_Page_BeginText($page) ; Начинаем вывод текста
AU3_HPDF_Page_TextOut($page, ($doc_width -14.17 - 56.69 - $tw) / 2  + 56.69, $doc_height - 20, $page_title) ; Выводим текст по центру сверху
AU3_HPDF_Page_EndText($page) ; Заканчиваем вывод текста


$page_title = $a[1]
AU3_HPDF_Page_SetFontAndSize($page, $def_font, 18) ; Устанавливаем размер шрифта
$tw2 = AU3_HPDF_Page_TextWidth($page, $page_title) ; Получаем длину строки текста
AU3_HPDF_Page_BeginText($page) ; Начинаем вывод текста
AU3_HPDF_Page_TextOut($page, ($doc_width -14.17 - 56.69 - $tw) / 2  + 56.69, $doc_height - 70, $page_title) ; Выводим текст по центру сверху
AU3_HPDF_Page_EndText($page) ; Заканчиваем вывод текста


$page_title = $a[2]
AU3_HPDF_Page_SetFontAndSize($page, $def_font, 18) ; Устанавливаем размер шрифта
$tw = AU3_HPDF_Page_TextWidth($page, $page_title) ; Получаем длину строки текста
AU3_HPDF_Page_BeginText($page) ; Начинаем вывод текста
AU3_HPDF_Page_TextOut($page, ($doc_width -14.17 - 56.69 - $tw) / 2  + 56.69, $doc_height - 100, $page_title) ; Выводим текст по центру сверху
AU3_HPDF_Page_EndText($page) ; Заканчиваем вывод текста

$page_title = 'Расчет'
AU3_HPDF_Page_SetFontAndSize($page, $def_font, 18) ; Устанавливаем размер шрифта
$tw = AU3_HPDF_Page_TextWidth($page, $page_title) ; Получаем длину строки текста
AU3_HPDF_Page_BeginText($page) ; Начинаем вывод текста
AU3_HPDF_Page_TextOut($page, ($doc_width -14.17 - 56.69 - $tw) / 2  + 56.69, $doc_height - 130, $page_title) ; Выводим текст по центру сверху
AU3_HPDF_Page_EndText($page) ; Заканчиваем вывод текста



$page_title = 'Стадия проекта - ' & $a[3]
AU3_HPDF_Page_SetFontAndSize($page, $def_font, 18) ; Устанавливаем размер шрифта
$tw = AU3_HPDF_Page_TextWidth($page, $page_title) ; Получаем длину строки текста
AU3_HPDF_Page_BeginText($page) ; Начинаем вывод текста
AU3_HPDF_Page_TextOut($page, ($doc_width -14.17 - 56.69 - $tw) / 2  + 56.69, $doc_height - 550, $page_title) ; Выводим текст по центру сверху
AU3_HPDF_Page_EndText($page) ; Заканчиваем вывод текста


$page_title = 'Шифр проекта - ' & $a[4]
AU3_HPDF_Page_SetFontAndSize($page, $def_font, 18) ; Устанавливаем размер шрифта
$tw = AU3_HPDF_Page_TextWidth($page, $page_title) ; Получаем длину строки текста
AU3_HPDF_Page_BeginText($page) ; Начинаем вывод текста
AU3_HPDF_Page_TextOut($page, ($doc_width -14.17 - 56.69 - $tw) / 2  + 56.69, $doc_height - 580, $page_title) ; Выводим текст по центру сверху
AU3_HPDF_Page_EndText($page) ; Заканчиваем вывод текста


$page_title = '2015 г.'
AU3_HPDF_Page_SetFontAndSize($page, $def_font, 18) ; Устанавливаем размер шрифта
$tw = AU3_HPDF_Page_TextWidth($page, $page_title) ; Получаем длину строки текста
AU3_HPDF_Page_BeginText($page) ; Начинаем вывод текста
AU3_HPDF_Page_TextOut($page, ($doc_width -14.17 - 56.69 - $tw) / 2  + 56.69, 70, $page_title) ; Выводим текст по центру сверху
AU3_HPDF_Page_EndText($page) ; Заканчиваем вывод текста

AU3_HPDF_SaveToFile($docname) ; Сохранение PDF-документа, расширение может добавляться автоматически
AU3_HPDF_Free() ; Освобождение ресурсов

EndFunc