Beep, EncodeBase64, DatesDelta, DecodeBase64, ExitScript, GetCmdLineParameters, GetScriptVer, GetScriptReleaseDate, MsgBox, Protocol, Random, SaveScreenToBMP, SaveScreenToJPG, ScriptIdle, ScriptSleep

procedure Beep;

Выдаёт стандартный звуковой сигнал Windows.

function EncodeBase64(const inStr:string):string;

Шифрование указанной строки по BASE64.

procedure ExitScript(errorlevel :integer);

Выйти из скрипт-машины с кодом завершения.

function DatesDelta(d1, m1, y1, d2, m2, y2 :word) :integer;

Вычислить разницу в днях между двумя датами, указанными в формате "день", "месяц", "год". Первый блок чисел — дата, с которой вычисляют разницу в днях.

function DecodeBase64(const CinLine:string):string;

Дешифрование указанной строки по BASE64.

function GetCmdLineParameters: string;

Функция возвращает параметры, которые были переданы в командной строке MyChat серверу. Например, если строка запуска была такая: "mcserv.exe Parameter1 Parameter2", то функция вернет текстовую строку "Parameter1 Paramater2". Это бывает очень удобно для передачи скрипту параметров прямо из командной строки.

procedure GetScriptVer(var Major, Minor, Release, Build :word);

Процедура возвращает номер текущей версии скрипт-машины. 4 параметра: "Major", "Minor", "Release", "Bulid".

function GetScriptReleaseDate :string;

Функция возвращает дату сборки текущей версии MSL в формате "dd.mm.yyyy".

procedure MsgBox(title, st_msg :string; icon_type :integer);

Показать на экране стандартное диалоговое окно Windows с текстом. Заголовок окна — "title", текст — "msg". Тип значка — "icon_type", может принимать значения от 1 до 4.

1 — ICONWARNING;

2 — ICONSTOP;

3 — ICONINFORMATION;

4 — ICONQUESTION.

procedure Protocol(Msg, FileName :string; DateTimeStamp :boolean);

Сохранить строку "Msg" в конец текстового файла "FileName". Если такого файла нет — создать его. Если "DateTimeStamp" = "True", то поставить в начале строки временной штамп в формате "[dd.mm.yyyy hh:mm:ss]". Эта функция очень удобна для ведения протоколов.

function Random(x:integer):integer;

Получение случайного числа в диапазоне от 0 до x.

procedure SaveScreenToBMP(filename :string);

Сохранить содержимое экрана в BMP файл, указанный в параметре "filename". Если такой файл уже существует — он будет перезаписан.

procedure SaveScreenToJPG(filename:string;quality:integer);

Сохранение копии экрана в JPG файл с заданным качеством.

procedure ScriptIdle;

Пропуск тиков процессора во время выполнения скрипта. Можно вызывать во время "тяжелых" циклов, чтобы не допускать чрезмерной загрузки процессора.

procedure ScriptSleep(sleeptime: integer);

Сделать паузу во время исполнения скрипта. Время указывается в миллисекундах.