Police-assistant-source.lua

-- Decompiled by imring

script_name("COP")
script_description("/cop - Основная команда.")
script_version("V1.0")
script_author("Liechtenstein")
script_dependencies("SAMPFUNCS, SAMP")

require("lib.moonloader")
local sampev = require("lib.samp.events")
local imgui = require("imgui")
local vkeys = require("vkeys")

local b1 = imgui.ImBool(false)
local b2 = imgui.ImBool(false)
local b3 = imgui.ImBool(false)
local b4 = imgui.ImBool(false)
local b5 = imgui.ImBool(false)

local encoding = require ("encoding")
encoding.default = "CP1251"
u8 = encoding.UTF8

jstart = 1

imgui.SwitchContext()
local style = imgui.GetStyle()
local colors = style.Colors
local clr = imgui.Col
local ImVec4 = imgui.ImVec4

style.Alpha = 1
style.ChildWindowRounding = 3
style.WindowRounding = 3
style.GrabRounding = 1
style.GrabMinSize = 20
style.FrameRounding = 3

colors[clr.Text]                   = ImVec4(0.06, 0.07, 0.08, 1.00)
colors[clr.TextDisabled]           = ImVec4(0.53, 0.53, 0.53, 1.00)
colors[clr.WindowBg]               = ImVec4(1.00, 1.00, 1.00, 1.00)
colors[clr.ChildWindowBg]          = ImVec4(0.00, 0.00, 0.00, 0.00)
colors[clr.PopupBg]                = ImVec4(0.05, 0.05, 0.10, 0.90)
colors[clr.ComboBg]                = ImVec4(0.16, 0.24, 0.22, 0.60)
colors[clr.Border]                 = ImVec4(1.00, 0.00, 0.00, 1.00)
colors[clr.BorderShadow]           = ImVec4(0.00, 0.00, 0.00, 0.00)
colors[clr.FrameBg]                = ImVec4(0.44, 0.80, 0.80, 0.18)
colors[clr.FrameBgHovered]         = ImVec4(0.44, 0.80, 0.80, 0.27)
colors[clr.FrameBgActive]          = ImVec4(0.44, 0.81, 0.86, 0.66)
colors[clr.TitleBg]                = ImVec4(0.14, 0.18, 0.21, 0.73)
colors[clr.TitleBgActive]          = ImVec4(0.02, 0.00, 1.00, 0.77)
colors[clr.TitleBgCollapsed]       = ImVec4(0.00, 0.00, 0.00, 0.54)
colors[clr.MenuBarBg]              = ImVec4(0.00, 0.00, 0.00, 0.20)
colors[clr.ScrollbarBg]            = ImVec4(0.22, 0.29, 0.30, 0.71)
colors[clr.ScrollbarGrab]          = ImVec4(0.03, 0.09, 0.14, 1.00)
colors[clr.ScrollbarGrabHovered]   = ImVec4(0.18, 1.00, 0.00, 0.74)
colors[clr.ScrollbarGrabActive]    = ImVec4(1.00, 0.03, 0.00, 1.00)
colors[clr.CheckMark]              = ImVec4(0.00, 1.00, 1.00, 0.68)
colors[clr.SliderGrab]             = ImVec4(0.00, 1.00, 1.00, 0.36)
colors[clr.SliderGrabActive]       = ImVec4(0.00, 1.00, 1.00, 0.76)
colors[clr.Button]                 = ImVec4(0.29, 0.29, 0.29, 0.46)
colors[clr.ButtonHovered]          = ImVec4(0.50, 0.50, 0.50, 0.43)
colors[clr.ButtonActive]           = ImVec4(0.76, 0.76, 0.76, 0.62)
colors[clr.Header]                 = ImVec4(1.00, 0.00, 0.00, 0.33)
colors[clr.HeaderHovered]          = ImVec4(0.00, 1.00, 1.00, 0.42)
colors[clr.HeaderActive]           = ImVec4(0.00, 1.00, 1.00, 0.54)
colors[clr.Separator]              = ImVec4(0.50, 0.50, 0.50, 1.00)
colors[clr.SeparatorHovered]       = ImVec4(0.60, 0.60, 0.70, 1.00)
colors[clr.SeparatorActive]        = ImVec4(0.70, 0.70, 0.90, 1.00)
colors[clr.ResizeGrip]             = ImVec4(0.00, 1.00, 1.00, 0.54)
colors[clr.ResizeGripHovered]      = ImVec4(0.00, 1.00, 1.00, 0.74)
colors[clr.ResizeGripActive]       = ImVec4(0.00, 1.00, 1.00, 1.00)
colors[clr.CloseButton]            = ImVec4(1.00, 0.00, 0.00, 1.00)
colors[clr.CloseButtonHovered]     = ImVec4(0.84, 0.97, 0.00, 0.47)
colors[clr.CloseButtonActive]      = ImVec4(0.33, 0.00, 0.99, 1.00)
colors[clr.PlotLines]              = ImVec4(1.00, 1.00, 1.00, 1.00)
colors[clr.PlotLinesHovered]       = ImVec4(1.00, 1.00, 1.00, 1.00)
colors[clr.PlotHistogram]          = ImVec4(0.90, 0.70, 0.00, 1.00)
colors[clr.PlotHistogramHovered]   = ImVec4(1.00, 0.60, 0.00, 1.00)
colors[clr.TextSelectedBg]         = ImVec4(0.00, 0.00, 1.00, 0.35)
colors[clr.ModalWindowDarkening]   = ImVec4(0.20, 0.20, 0.20, 035)

function main()
	while not isSampAvailable() do wait(5000) end
	print("Проверка сервера...")
	if sampGetCurrentServerAddress() ~= "176.32.37.62" then
		gameServer = "Pears Project 1"
		srv = 1
	else
		print("Сервер не допущен, работа скрипта завершена")
		sampAddChatMessage("[{506077}COP]{FFFFFF} К сожалению, данный скрипт недоступен для работы на данном сервере.", 0x46D63)
		sampAddChatMessage("[{506077}COP]{FFFFFF} Свяжитесь с разработчиком, если хотите уточнить возможность решения данной проблемы.", 0x46D63)
		thisScript():unload()
	end
	print("Проверка пройдена, сервер: " .. tostring(gameServer))
	if jstart == 1 then
		sampAddChatMessage("{ffffff}* [{FFD700}COP{ffffff}]: {FFD700}Привет! Запустился Police Assistant. Инфо - [/cop].", -1)
		sampAddChatMessage("{ffffff}* [{FFD700}COP{ffffff}]: {FFD700}Разработчик: Liechtenstein. Офф. группа в ВК - [/vk].", -1)
		sampAddChatMessage("{ffffff}* [{FFD700}COP{ffffff}]: {FFD700}Текущая версия: " .. thisScript().version, -1)
	elseif jstart == 2 then
		sampfuncsLog("{ffffff}* [{949055}" .. thisScript().author .. " Cop{ffffff}]: {949055}Текущая версия : " .. thisScript().version)
	end
	sampRegisterChatCommand("upd", updatesc)
	sampRegisterChatCommand("cuf", cuffed)
	sampRegisterChatCommand("shi", shipped)
	sampRegisterChatCommand("iid", nickid)
	sampRegisterChatCommand("get", agetcar)
	sampRegisterChatCommand("tic", ticket)
	sampRegisterChatCommand("obis", frisked)
	sampRegisterChatCommand("in", carin)
	sampRegisterChatCommand("shv", fshv)
	sampRegisterChatCommand("obgun", findgun)
	sampRegisterChatCommand("ares", arrests)
	sampRegisterChatCommand("cop", window)
	sampRegisterChatCommand("pnap", napadenienapo)
	sampRegisterChatCommand("nap", gnapad)
	sampRegisterChatCommand("ppron", pronsc)
	sampRegisterChatCommand("pron", pronik)
	sampRegisterChatCommand("kill", kill)
	sampRegisterChatCommand("nep", nepod)
	sampRegisterChatCommand("dnep", dnepod)
	sampRegisterChatCommand("pugon", pugon)
	sampRegisterChatCommand("ugon", ugon)
	sampRegisterChatCommand("gun", hgun)
	sampRegisterChatCommand("sgun", sellgun)
	sampRegisterChatCommand("bgun", buygun)
	sampRegisterChatCommand("nark", hrannarko)
	sampRegisterChatCommand("snark", sellnarko)
	sampRegisterChatCommand("bnark", buynarko)
	sampRegisterChatCommand("kan", kanibalism)
	sampRegisterChatCommand("fr", frozisk)
	sampRegisterChatCommand("parm", peredarm)
	sampRegisterChatCommand("spy", shpionaj)
	sampRegisterChatCommand("fd", find)
	sampRegisterChatCommand("bn", bank)
	sampRegisterChatCommand("wd", wantedchec)
	sampRegisterChatCommand("mira", fmiranda)
	sampRegisterChatCommand("podm", podmoga)
	sampRegisterChatCommand("pu", persecution)
	sampRegisterChatCommand("zradar", zradar)
	sampRegisterChatCommand("gradar", gradar)
	sampRegisterChatCommand("nap", gnapad)
	sampRegisterChatCommand("version", version)
	sampRegisterChatCommand("udost", udost)
	sampRegisterChatCommand("kp", fkpz)
	sampRegisterChatCommand("cam", kam)
	sampRegisterChatCommand("izoll", izol)
	sampRegisterChatCommand("doks", fdocs)
	sampRegisterChatCommand("med", fheal)
	sampRegisterChatCommand("pcl", fsrozisk)
	sampRegisterChatCommand("reload", reload)
	sampRegisterChatCommand("skinof", fskin)
	sampRegisterChatCommand("gnumcar", numbercars)
	resX, resY = getScreenResolution()
	mira = lua_thread.create_suspended(miranda)
	kp = lua_thread.create_suspended(kpz)
	shv = lua_thread.create_suspended(tshv)
	doks = lua_thread.create_suspended(tdocs)
	med = lua_thread.create_suspended(heal)
	pcl = lua_thread.create_suspended(gopcl)
	skof = lua_thread.create_suspended(goskin)
	while true do
		if enable then
			sampSendChat("/find " .. id)
			wait(2500)
		end
		wait(0)
		if b1.v then imgui.Process = b1.v
		elseif b2.v then imgui.Process = b2.v
		elseif b3.v then imgui.Process = b3.v
		elseif b4.v then imgui.Process = b4.v
		else imgui.Process = b5.v end
	end
end

function imgui.OnDrawFrame()
	if b1.v then
		b2.v = false
		b3.v = false
		b4.v = false
		b5.v = false
		imgui.SetNextWindowSize(imgui.ImVec2(650, 200), imgui.Cond.Always)
		imgui.SetNextWindowPos(imgui.ImVec2(resX / 2, resY / 2), imgui.Cond.Once, imgui.ImVec2(0.5, 0.5))
		imgui.Begin(u8("Главное меню |Police Assistant| Разработчик: Liechtenstein."), b1, img_state, imgui.WindowFlags.NoResize)
		imgui.Text(u8(string.format("Текущая дата: %s", os.date())))
		imgui.Text(u8("========================================================================================="))
		imgui.Text(u8("ACop - Это специальный скрипт для руководящего состава, который облегчит им работу! "))
		imgui.Text(u8("Учтите! Скрипт работает только на {0088ff} • Pears Project [ 1 ] Role Play •!"))
		imgui.Text(u8("========================================================================================="))
		if imgui.Button(u8("Команды")) then b2.v = true end
		imgui.SameLine()
		if imgui.Button(u8("Ссылки и связь")) then b3.v = true end
		imgui.SameLine()
		if imgui.Button(u8("Наказания за нарушение правил /d")) then b4.v = true end
		imgui.SameLine()
		if imgui.Button(u8("Розыск")) then b5.v = true end
		imgui.Text(u8("========================================================================================="))
		imgui.End()
	end
	if b2.v then
		b1.v = false
		b3.v = false
		b4.v = false
		b5.v = false
		imgui.SetNextWindowSize(imgui.ImVec2(600, 600), imgui.Cond.Always)
		imgui.SetNextWindowPos(imgui.ImVec2(resX / 2, resY / 2), imgui.Cond.Once, imgui.ImVec2(0.5, 0.5))
		imgui.Begin(u8("Команды скрипта"), b2, img_state, imgui.WindowFlags.NoResize)
		imgui.Text(u8(string.format("Текущая дата: %s", os.date())))
		imgui.Text(u8("========================================================================================="))
		imgui.Text( u8("Доступные команды скрипта:") )
		imgui.Text( u8("/cop {1E90FF}- Вызов информационного меню.") )
		imgui.Text( u8("/pu [id]{1E90FF}-Активация режима преследования (сокращенная команда /pursuit") )
		imgui.Text( u8("/fd [id]{1E90FF}-Постоянный поиск ") )
		imgui.Text( u8("/cuf [id]{1E90FF} -Отыгровка Наручников.") )
		imgui.Text( u8("/tic [id] [Сумма] [Причина] {1E90FF}- Отыгровка штрафа.") )
		imgui.Text( u8("/asupd {1E90FF}- Обновить(перезагрузить) скрипт.") )
		imgui.Text( u8("/shi [id] {1E90FF}- Выкинуть шипы под колёса") )
		imgui.Text( u8("/get {1E90FF}- Взять авто у поинта /agetcar") )
		imgui.Text( u8("/iid {1E90FF}- Узнать ник по id. agetcar)") )
		imgui.Text( u8("/obis [id]{1E90FF}- Обыскать человека") )
		imgui.Text( u8("/in [id] [id места 1-3] {1E90FF}- Закинуть преступника в машину") )
		imgui.Text( u8("/obgun [id] {1E90FF}- РП обыск на оружие.") )
		imgui.Text( u8("/pu {1E90FF}- Режим преследования преследование.") )
		imgui.Text( u8("/obgun [id] {1E90FF}- РП обыск на оружие.") )
		imgui.Text( u8("/kp [id] {1E90FF}- Открыть камеру.") )
		imgui.Text( u8("/izoll [id] {1E90FF}- Кинуть в карцер.") )
		imgui.Text( u8("/cam [id] {1E90FF}- Пересадить в другую камеру.") )
		imgui.Text( u8("/shv [id] {1E90FF}- Хватить игрока за наручники (рп).") )
		imgui.Text( u8("/podm [id] {1E90FF}- Запросить подмогу в /r (указывыает квадрат).") )
		imgui.Text( u8("/mira {1E90FF}- Зачитать миранду..") )
		imgui.Text( u8("/doks [id] {1E90FF}- Потребовать документы.") )
		imgui.Text( u8("/gradar [№] {1E90FF}- Поставить радар с ограничением 60км/ч.") )
		imgui.Text( u8("/zradar [№] {1E90FF}- Поставить радар с ограничением 90км/ч.") )
		imgui.Text( u8("/version {1e90ff}- Текущая версия скрипта.") )
		imgui.Text( u8("/reload {1E90FF}- Принудительно перезагрузить скрипт.") )
		imgui.Text( u8("/skof {1E90FF}- Переодется.") )
		imgui.Text( u8("/gnumcar [Id] [Сумма] [Номер]{1E90FF}- Выдать номера") )
		imgui.Text(u8("========================================================================================="))
        if imgui.Button(u8("вернуться обратно")) then b1.v = true end
        imgui.End()
	end
	if b3.v then
		b1.v = false
		b2.v = false
		b4.v = false
		b5.v = false
		imgui.SetNextWindowSize(imgui.ImVec2(300, 200), imgui.Cond.Always)
		imgui.SetNextWindowPos(imgui.ImVec2(resX / 2, resY / 2), imgui.Cond.Once, imgui.ImVec2(0.5, 0.5))
		imgui.Begin(u8("Ссылки и связь"), b3, img_state, imgui.WindowFlags.NoResize)
		if imgui.Button(u8("Cсылка на оф. группу разработчика")) then
			os.execute("explorer \"https://vk.com/skripter_liechtenstein\"")
		end
		if imgui.Button(u8("Страничка создателя")) then
			os.execute("explorer \"https://vk.com/alexanderliecht\"")
		end
		if imgui.Button(u8("вернуться обратно")) then b1.v = true end
		imgui.End()
	end
	if b4.v then
        b1.v = false
		b2.v = false
		b3.v = false
        b5.v = false
        imgui.SetNextWindowSize(imgui.ImVec2(700, 700), imgui.Cond.Always)
		imgui.SetNextWindowPos(imgui.ImVec2(resX / 2, resY / 2), imgui.Cond.Once, imgui.ImVec2(0.5, 0.5))
        imgui.Begin(u8("Наказания за нарушения правил /d"), b4, img_state, imgui.WindowFlags.NoResize)
        imgui.Text( u8("1.Оффтоп - Блокирование Рации на 20 минут.") )
        imgui.Text(u8("========================================================================================="))
		imgui.Text( u8("2.Объявления о покупке/продаже имущества - Блокирование Рации на 30 минут.") )
		imgui.Text( u8("3.Оскорбления в сторону сотрудников департамента - Блокирование Рации на 30 минут.") )
		imgui.Text( u8("5.OOC приветствия - Блокирование Рации на 20 минут.") )
		imgui.Text( u8("4.Употребление ненармотивной лексики - Блокирование Рации на 20 минут.") )
		imgui.Text( u8("6.Использовать рации департамента первым должностям в гос.структурах - Блокирование Рации на 30 минут.") )
        imgui.Text(u8("========================================================================================="))
        if imgui.Button(u8("вернуться обратно")) then b1.v = true end
        imgui.End()
    end
    if b5.v then
        b1.v = false
		b2.v = false
		b3.v = false
        b4.v = false
        imgui.SetNextWindowSize(imgui.ImVec2(700, 700), imgui.Cond.Always)
		imgui.SetNextWindowPos(imgui.ImVec2(resX / 2, resY / 2), imgui.Cond.Once, imgui.ImVec2(0.5, 0.5))
        imgui.Begin(u8("Розыск"), b5, img_state, imgui.WindowFlags.NoResize)
        imgui.Text(u8("========================================================================================="))
        imgui.Text( u8("/pnap {FFDEAD} - Выдать розыск за нападение на ПО.") )
		imgui.Text( u8("/nap {FFDEAD} - Выдать розыск за нападение на гражданское лицо.") )
		imgui.Text( u8("/ppron {FFDEAD}- Выдать розыск за проникновение с целью кражи.") )
	    imgui.Text( u8("/pron {FFDEAD} - Выдать розыск за проникновение.") )
		imgui.Text( u8("/kill {FFDEAD}- Выдать розыск за  убийство.") )
		imgui.Text( u8("/nep {FFDEAD}- Выдать розыск за неподчинение.") )
		imgui.Text( u8("/dnep {FFDEAD}- Выдать розыск за отказ предъявить документы.") )
		imgui.Text( u8("/pugon {FFDEAD}- Выдать розыск за попытку угона.") )
		imgui.Text( u8("/ugon {FFDEAD}- Выдать розыск за угон.") )
		imgui.Text( u8("/hgun {FFDEAD}- Выдать розыск за хранение оружия превышающее норму. (4 (не выше 14пт Дигла.).") )
		imgui.Text( u8("/sgun {FFDEAD}- Выдать розыск за продажу оружия.") )
		imgui.Text( u8("/bgun {FFDEAD}- Выдать розыск за покупку оружия.") )
		imgui.Text( u8("/nark {FFDEAD}- Выдать розыск за хранение наркотиков.") )
		imgui.Text( u8("/snark {FFDEAD}- Выдать розыск за продажу наркотиков.") )
		imgui.Text( u8("/bnark {FFDEAD}- Выдать розыск за покупку наркотиков.") )
		imgui.Text( u8("/kan {FFDEAD}- Выдать розыск за канибализм.") )
		imgui.Text( u8("/fr {FFDEAD}- Выдать розыск за нахождении в списке Федерального розыска.") )
		imgui.Text( u8("/parm {FFDEAD}- Выдать розыск по статье 16.9") )
		imgui.Text( u8("/spy {FFDEAD}- Выдать розыск за шпионаж.") )
		imgui.Text( u8("/bn {FFDEAD}- Выдать розыск за ограбление банка") )
        imgui.Text(u8("========================================================================================="))
		if imgui.Button(u8("вернуться обратно")) then b1.v = true end
        imgui.End()
    end
end

function window()
    b1.v = not b1.v
end

function fmiranda()
    mira:run()
end

function fkpz()
    kp:run()
end

function fshv()
    shv:run()
end

function fdocs()
    doks:run()
end

function fheal()
    med:run()
end

function fpcl()
    sampShowDialog(52, "{ffffff} Запрос на снятие розыска.", "{ffffff}Напишите id игрока: ", "{ffffff}Закрыть", "", 1)
end

function fskin()
    skof:run()
end

function numbercars(params)
    lua_thread.create(function()
        local id, sum, numb = params:match("(.+)%s+(.+)%s+(.+)")
        sampSendChat("/do На столе лежал тёмный кейс и в нём лежали номера")
        wait(1500)
        sampSendChat("/me взял кейс ввёл код в окошко и передал его человеку напротив")
        wait(1500)
        sampSendChat("/todo Держите * передавая открытый кейс с номерами.")
        wait(1500)
        sampSendChat("/numbercar " .. id .. " " .. sum .. " " .. numb)
    end)
end

function goskin()
    wait(0)
    sampSendChat("/do На спине была сумка с одеждой.")
    wait(500)
    sampSendChat("/me резким движением рук снимает сумку и растёгивает её..")
    wait(500)
    sampSendChat("/skin")
    wait(500)
    sampSendChat("/color")
    wait(500)
    sampSendChat("/me закрывает сумку и закидывает её на спину.")
    wait(500)
    sampSendChat("/do Закрытая сумка висит на спине.")
end

function heal()
    wait(0)
    sampSendChat("/do На поясе висит небольшая сумочка с медикаментами.")
    wait(500)
    sampSendChat("/me резким движением руки растёгивает сумку..")
    wait(500)
    sampSendChat("/me достаёт бинты, перекись водорода и спирт")
    wait(500)
    sampSendChat("/me открыв спирт и перекись водорода быстро вылил всё на рану..")
    wait(500)
    sampSendChat("/me откинул баночки и вслед открыл упаковку бинтов..")
    wait(500)
    sampSendChat("/me и быстро провел перевязку раны.")
    wait(500)
    sampSendChat("/usemed")
end

function gopcl(params)
    wait(0)
    sampSendChat("/d Прошу вычеркнуть пейджер " .. params .. " по причине: Ошибка.")
    wait(500)
    sampSendChat("/d Прошу вычеркнуть пейджер " .. params .. " по причине: Ошибка.")
end

function tdocs()
    wait(0)
    sampSendChat("/z Вас беспокоит сотрудник правоохранительных органов ")
    wait(1500)
    sampSendChat("/z Предъявите ваши документы удостоверяющие личность...")
    wait(1500)
    sampSendChat("/z В случае неподчинения будут приняты меры")
end

function zradar(params)
    if string.len(params) == 0 then
        sampAddChatMessage("[ Мысли ]: Поставить радар с ограничением в 90 км/ч [/zradar № радара] (доступно с +3 ранга))", 0xC1C1C1)
        return false
    else
        sampSendChat("/radar " .. params .. " 90")
    end
end

function gradar(params)
    lua_thread.create(function()
        id = tonumber(params)
        if params and id ~= nil then
            sampSendChat("/radar " .. id .. " 60")
        else
            sampAddChatMessage("[ Мысли ]: Поставить радар с ограничением в 60 км/ч [/gradar № Радара.](доступно с +3 ранга)", 0xC1C1C1)
        end
    end)
end

function podmoga(params)
    id = tonumber(params)
    if params and id ~= nil then
        nick = sampGetPlayerNickname(id)
        result = sampIsPlayerConnected(id)
        if result then
            sampSendChat("/r Запрашиваю подмогу! по мне открыли огонь! Квадрат " .. kvadrat())
        end
    end
end

function nickid(params)
    id = tonumber(params)
    if params and id ~= nil then
        nick = sampGetPlayerNickname(id)
        result = sampIsPlayerConnected(id)
        if result then
            sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Id Игрока: " .. id .. " {1FAEE9}Ник игрока : " .. nick, -1)
        else
            sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Игрок оффлайн", -1)
        end
    end
end

function miranda()
    wait(0)
    sampSendChat("/z Вас задержал сотрудник правоохранительных органов.")
    wait(1200)
    sampSendChat("/z Вы имеете право хранить молчание.")
    wait(1200)
    sampSendChat("/z Всё, что вы скажете, может и будет использовано против вас в суде.")
    wait(1200)
    sampSendChat("/z Ваш адвокат может присутствовать при допросе.")
    wait(1200)
    sampSendChat("/z Если вы не можете оплатить услуги адвоката, он будет предоставлен вам государством.")
    wait(1200)
    sampSendChat("/z Вам были зачитаны Ваши права. Вы арестованы!")
end

function find(params)
    if enable then enable = false
    else
        id = tonumber(params)
        if params and id ~= nil then
            enable = true
        end
    end
end

function udost(params)
    lua_thread.create(function()
        id = tonumber(params)
        if params and id ~= nil then
            sampSendChat("/do В переднем кармане штанов лежит удостоверение..")
            wait(1000)
            sampSendChat("/me достал удостоверение из кармана")
            wait(1000)
            sampSendChat("/ud " .. id)
            wait(1000)
            sampSendChat("/me спрятал удостоверение в карман.")
        end
    end)
end

function kvadrat()
    local KV = {
        [1] = "А",
        [2] = "Б",
        [3] = "В",
        [4] = "Г",
        [5] = "Д",
        [6] = "Ж",
        [7] = "З",
        [8] = "И",
        [9] = "К",
        [10] = "Л",
        [11] = "М",
        [12] = "Н",
        [13] = "О",
        [14] = "П",
        [15] = "Р",
        [16] = "С",
        [17] = "Т",
        [18] = "У",
        [19] = "Ф",
        [20] = "Х",
        [21] = "Ц",
        [22] = "Ч",
        [23] = "Ш",
        [24] = "Я",
    }
    local X, Y, Z = getCharCoordinates(playerPed)
    X = math.ceil((X + 3000) / 250)
    Y = math.ceil((Y * - 1 + 3000) / 250)
    Y = KV[Y]
    local KVX = (Y.."-"..X)
    return KVX
end

function ticket(params)
    lua_thread.create(function()
        local a, b, c = params:match("(.+)%s+(.+)%s+(.+)")
        sampSendChat("/do Бланк протокола лежит в открытой сумке.")
        wait(1000)
        sampSendChat("/me легким движением руки достал бланк протокола.")
        wait(1000)
        sampSendChat("/me достал ручку из сумки, после чего начал вносить паспортные данные гражданина.")
        wait(1000)
        sampSendChat("/do Бланк заполнен.")
        wait(1000)
        sampSendChat("Оплатите непогашенный штраф в ближайшем банке или банкомате")
        wait(1000)
        sampSendChat("/ticket " .. a .. " " .. b .. " " .. c)
    end)
end

function tshv()
	wait(0)
	sampSendChat("/me Резким движением руки схватил человека за наручники..")
	wait(1000)
	sampSendChat("/me ..и грубо повёл за собой.")
end

function findgun(params)
	lua_thread.create(function()
		id = tonumber(params)
		if params and id ~= nil then
			sampSendChat("/do Открытая сумка на поясе.")
			wait(1000)
			sampSendChat("/me легким движением руки достал ордер и перчатки из сумки.")
			wait(1000)
			sampSendChat("/me предъявил ордер на обыск, затем убрал его в сумку и надел перчатки.")
			wait(1000)
			sampSendChat("/findgun " .. id)
		end
	end)
end

function carin(params)
	lua_thread.create(function()
		local a, b = params:match("(.+)%s+(.+)")
		sampSendChat("/me ухватился за шкирку преступника, затем открыл дверь машины, после чего..")
		wait(1500)
		sampSendChat("/do .. бросил преступника в машину и закрыл дверь.")
		wait(1500)
		sampSendChat("/incar " .. a .. " " .. b)
	end)
end

function cuffed(params)
	lua_thread.create(function()
		id = tonumber(params)
		if params and id ~= nil then
			sampSendChat("/do Наручники на поясе.")
			wait(1500)
			sampSendChat("/me протянул одну руку к наручникам.")
			wait(1500)
			sampSendChat("/cuff " .. id)
		else
			sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1)
		end
	end)
end

function arrests(params)
	lua_thread.create(function()
		id = tonumber(params)
		if params and id ~= nil then
			sampSendChat("/me ухватившись за наручники подозреваемого, прислонил его к стене, затем..")
			wait(1500)
			sampSendChat("/do .. засунул руку в карман, вытащил комплект ключей, подобрал ему необходимый ключ..")
			wait(1500)
			sampSendChat("/do .. воткнул в замочную скважину, потянув на себя решётку, снял наручники с нарушителя..")
			wait(1500)
			sampSendChat("/do .. толкнул нарушителя в камеру, повернул ключ и вытащил ключи и положил ключи в карман.")
			wait(1500)
			sampSendChat("/arrest " .. id)
		else sampAddChatMessage("{ffffff}* [{1FAEE9}Police Assistant{ffffff}]: Вы не ввели параметр !", -1) end
	end)
end

function frisked(params)
	lua_thread.create(function()
		id = tonumber(params)
		if params and id ~= nil then
			sampSendChat("/do Открытая сумка на поясе.")
			wait(800)
			sampSendChat("/me легким движением руки достал ордер и перчатки из сумки.")
			wait(800)
			sampSendChat("/me предъявил ордер на обыск, затем убрал его в сумку и надел перчатки.")
			wait(800)
			sampSendChat("/frisk " .. id)
		else sampAddChatMessage("{ffffff}* [{1FAEE9}Police Assistant{ffffff}]: Вы не ввели параметр !", -1) end
	end)
end

function agetcar()
	sampSendChat("/agetcar")
end

function shipped(params)
	lua_thread.create(function()
		id = tonumber(params)
		if params and id ~= nil then
			sampSendChat("/do Лента с шипами готова.")
			wait(300)
			sampSendChat("/me протянул руку к кнопке и нажал на кнопку.")
			wait(300)
			sampSendChat("/ship " .. id)
		else sampAddChatMessage("{ffffff}* [{1FAEE9}Police Assistant{ffffff}]: Вы не ввели параметр !", -1) end
	end)
end

function wantedchec(params)
	lua_thread.create(function()
		id = tonumber(params)
		if params and id ~= nil then
			sampSendChat("/wanted " .. id)
		else sampAddChatMessage("{ffffff}* [{1FAEE9}Police Assistant{ffffff}]: Вы не ввели параметр!", -1) end
	end)
end

function persecution(params)
	lua_thread.create(function()
		id = tonumber(params)
		if params and id ~= nil then
			sampSendChat("/pursuit " .. id)
		else sampAddChatMessage("{ffffff}* [{1FAEE9}Police Assistant{ffffff}]: Вы не ввели параметр!", -1) end
	end)
end

function sampGetPlayerIdByNickname(nick)
    local _, myid = sampGetPlayerIdByCharHandle(playerPed)
    if tostring(nick) == sampGetPlayerNickname(myid) then return myid end
    for i = 0, 1000 do if sampIsPlayerConnected(i) and sampGetPlayerNickname(i) == tostring(nick) then return i end end
end

function update()
	downloadUrlToFile("https://dl.dropboxusercontent.com/s/i2mfolmqtjnc0l5/Police_assistant.luac?dl=0", "moonloader/Police_assistant.luac")
	sampAddChatMessage("{ffffff}* [{949055}Liechten{ffffff}]: {949055} Скрипт загружен. Версия: " .. thisScript().version .. " Начинаю перезагрузку!", 0xC1C1C1)
	sampAddChatMessage("{ffffff}* [{1FAEE9}Police Assistant{ffffff}]: Перезагрузка будет выполнена немедленно!", 0xC1C1C1)
	thisScript():reload()
end

function reload()
	sampAddChatMessage("{ffffff}* [{1FAEE9}Police Assistant{ffffff}]: Инициализирована перезагрузка скрипта!")
	sampAddChatMessage("{ffffff}* [{1FAEE9}Police Assistant{ffffff}]: Перезагрузка будет выполнена немедленно!")
	thisScript():reload()
end

function kpz()
	sampSendChat("/me нащупав в кармане комплект ключей, вытащил их, воткнул ключ в замочную скважину и повернул её.")
	wait(200)
	sampSendChat("/kpz")
end

function izol(params)
	lua_thread.create(function()
		id = tonumber(params)
		if params and id ~= nil then
			sampSendChat("/todo Ты пойдёшь со мной, вон туда*после чего указал пальцем на карцер.")
			wait(300)
			sampSendChat("/me ухватился за шкирку заключёного.")
			wait(300)
			sampSendChat("/izol " .. id)
		else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
	end)
end

function kam(params)
	lua_thread.create(function()
		id = tonumber(params)
		if params and id ~= nil then
			sampSendChat("/todo Ты пойдёшь со мной, вон туда*после чего указал пальцем на камеру.")
			wait(300)
			sampSendChat("/me ухватился за шкирку заключёного.")
			wait(300)
			sampSendChat("/kam " .. id)
		else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
	end)
end

function bank(params)
	bank = tonumber(params)
	if params and bank ~= nil then
		sampSendChat("/su" .. bank .. "6 Ограбление банка")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function peredarm(params)
	peredarm = tonumber(params)
	if params and peredarm ~= nil then
		sampSendChat("/su" .. peredarm .. "6 16.9")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function shpionaj(params)
	shpionaj = tonumber(params)
	if params and shpionaj ~= nil then
		sampSendChat("/su" .. shpionaj .. "6 Шпионаж 16.5")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function gnapad(params)
	gnapad = tonumber(params)
	if params and gnapad ~= nil then
		sampSendChat("/su" .. gnapad .. "5 Нападение на гражданское лицо.")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function napadenienapo(params)
	napadenienapo = tonumber(params)
	if params and napadenienapo ~= nil then
		sampSendChat("/su " .. napadenienapo .. " 6 Нападение на сотрудника ПО")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function proniksc(params)
	proniksc = tonumber(params)
	if params and proniksc ~= nil then
		sampSendChat("/su " .. proniksc .. " 5 Проникновение с целью кражи 17.2 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function pronik(params)
	pronik = tonumber(params)
	if params and pronik ~= nil then
		sampSendChat("/su " .. pronik .. " 4 Проникновение 17.1 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function kill(params)
	kill = tonumber(params)
	if params and kill ~= nil then
		sampSendChat("/su " .. kill .. " 6 Убийство")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function nepod(params)
	nepod = tonumber(params)
	if params and nepod ~= nil then
		sampSendChat("/su " .. nepod .. " 2 Неподчинение 3.1 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function dnepod(params)
	dnepod = tonumber(params)
	if params and dnepod ~= nil then
		sampSendChat("/su " .. dnepod .. " 2 Не предоставление документов 3.3 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function pugon(params)
	pugon = tonumber(params)
	if params and pugon ~= nil then
		sampSendChat("/su " .. pugon .. " 2 Попытка угона 5.1 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function ugon(params)
	ugon = tonumber(params)
	if params and ugon ~= nil then
		sampSendChat("/su " .. ugon .. " 2 Попытка угона 5.1 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function hgun(params)
	hgun = tonumber(params)
	if params and hgun ~= nil then
		sampSendChat("/su " .. hgun .. " 4 9.1 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function sgun(params)
	sgun = tonumber(params)
	if params and sgun ~= nil then
		sampSendChat("/su " .. sgun .. " 4 Нелегальная продажа оружия 9.2 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function hrannarko(params)
	hrannarko = tonumber(params)
	if params and hrannarko ~= nil then
		sampSendChat("/su " .. hrannarko .. " 3 Хранение наркотический веществ")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function sellnarko(params)
	sellnarko = tonumber(params)
	if params and sellnarko ~= nil then
		sampSendChat("/su " .. sellnarko .. " 5 Продажа Наркотических средств 10.2 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function sellnarko(params)
	buynarko = tonumber(params)
	if params and buynarko ~= nil then
		sampSendChat("/su " .. buynarko .. " 3 Покупка Наркотических средств 10.4 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function kanibalism(params)
	kanibalism = tonumber(params)
	if params and kanibalism ~= nil then
		sampSendChat("/su " .. kanibalism .. " 6 Канибализм 13.1 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

function frozisk(params)
	frozisk = tonumber(params)
	if params and frozisk ~= nil then
		sampSendChat("/su " .. frozisk .. " 6 Федеральный розыск 16.8 УК")
	else sampAddChatMessage("{ffffff}* [{1FAEE9}Police{ffffff}]: Вы не ввели параметр !", -1) end
end

Таблиц мало

БОЛЬШЕ ТАБЛИЦ