procedure Init; //Вызывается при включении скриптаbegin???????????end;procedure Free; //Вызывается при выключении скриптаbegin????????????end;