commit 3c3b610b86136a5b7eceab6ae693a1e1a61a13cd
Author: rubin <rubinserhiy@gmail.com>
Date:   Sat Feb 18 20:13:37 2023 +0300

    initial commit

diff --git a/drugs-mats.lua b/drugs-mats.lua
new file mode 100755
index 0000000..ef50906
--- /dev/null
+++ b/drugs-mats.lua
@@ -0,0 +1,465 @@
+script_name('Drugs-Mats')
+script_author("Serhiy_Rubin")
+local sampev, vkeys, inicfg = require 'lib.samp.events', require 'lib.vkeys', require 'inicfg'
+local check_inventory, drugs_timer, not_drugs_timer, renderText, d = 1, 0, false, {}, {}
+
+local sleep = 0
+local check_get_mats = true
+local check_boostinfo = 0
+local bonus_drugs = 1
+
+function main()
+	if not isSampLoaded() or not isSampfuncsLoaded() then return end
+	while not isSampAvailable() do wait(100) end
+
+	local result, PlayerId = sampGetPlayerIdByCharHandle(PLAYER_PED)
+	my_name = sampGetPlayerNickname(PlayerId)
+	local ip, port = sampGetCurrentServerAddress(  )
+	inikeys = string.format('%s %s-%s', my_name, ip:gsub('%.', '-'), port)
+	posX, posY = convertGameScreenCoordsToWindowScreenCoords(88.081993103027, 322.58331298828)
+	ini = inicfg.load({
+		render = {
+			font = 'Segoe UI',
+			size = 10,
+			flag = 13,
+			align = 2,
+			x = posX,
+			y = posY,
+			height = 4
+		},
+		global = {
+			cmd = 'us',
+			key = 'VK_U'
+		},
+		[inikeys] = {
+			hp = 160,
+			hp_one_gram = 10,
+			max_use_gram = 15,
+			seconds = 60,
+			run = true,
+			drugs = 0,
+			mats = 0,
+			server_cmd = 'usedrugs',
+			inventory = true,
+			boostinfo = true
+		},
+		lines = {
+			one = '{1a9614}drugs !a!n{dedede}mats !m',
+			two = '{e81526}cooldown !s!n{dedede}mats !m'
+		}
+	})
+	inicfg.save(ini)
+	font = renderCreateFont(ini.render.font, ini.render.size, ini.render.flag)
+	text_to_table()
+	while true do
+	wait(0)
+		GetMats()
+		doDialog()
+		if ini[inikeys].run and not sampIsScoreboardOpen() and sampIsChatVisible() and not isKeyDown(116) and not isKeyDown(121) then
+			second_timer = os.difftime(os.time(), drugs_timer)
+			render_table = ( (second_timer <= ini[inikeys].seconds * bonus_drugs and second_timer > 0) and renderText[4] or renderText[3] )
+			local Y, Height = ini.render.y, (renderGetFontDrawHeight(font) - (renderGetFontDrawHeight(font) / ini.render.height)  )
+			for i = 1, #render_table do
+				if render_table[i] ~= nil then
+					string_gsub = render_table[i]:gsub("!a", ini[inikeys].drugs)
+					string_gsub = string_gsub:gsub("!s", tostring(math.ceil(ini[inikeys].seconds * bonus_drugs - second_timer)))
+					string_gsub = string_gsub:gsub("!m", tostring(ini[inikeys].mats))
+					if ini.render.align == 1 then X = ini.render.x end
+					if ini.render.align == 2 then X = ini.render.x - (renderGetFontDrawTextLength(font, string_gsub) / 2) end
+					if ini.render.align == 3 then X = ini.render.x - renderGetFontDrawTextLength(font, string_gsub) end
+					renderFontDrawText(font, string_gsub, X, Y, 0xFFFFFFFF)
+					Y = Y + Height
+				end
+			end
+
+			if isKeyJustPressed(vkeys[ini.global.key]) and not sampIsDialogActive() and not sampIsChatInputActive() and not sampIsCursorActive() then
+				local text = string.format("math.ceil(((%d + 1) - %d) / %d)", ini[inikeys].hp, getCharHealth(playerPed), ini[inikeys].hp_one_gram)
+				sampAddChatMessage(text,-1)
+				local gramm = math.ceil(((ini[inikeys].hp + 1) - getCharHealth(playerPed)) / ini[inikeys].hp_one_gram)
+				local text = string.format("if %s > %s then %s = %s end", gramm, ini[inikeys].max_use_gram, gramm, ini[inikeys].max_use_gram)
+				sampAddChatMessage(text,-1)
+				if gramm > ini[inikeys].max_use_gram then gramm = ini[inikeys].max_use_gram end
+				local text = string.format("if %s <= %s and %s > 0 then gramm = 1 end", second_timer, math.floor(ini[inikeys].seconds * bonus_drugs), gramm, second_timer)
+				sampAddChatMessage(text,-1)
+				if second_timer <= math.floor(ini[inikeys].seconds * bonus_drugs) and second_timer > 0 then gramm = 1 end
+				sampSendChat(string.format('/%s %d', ini[inikeys].server_cmd, gramm))
+				sampAddChatMessage(gramm,-1)
+
+			end
+
+			if pos then
+				sampSetCursorMode(3)
+				curX, curY = getCursorPos()
+				ini.render.x = curX
+				ini.render.y = curY
+				if isKeyJustPressed(1) then
+					sampSetCursorMode(0)
+					pos = false
+					inicfg.save(ini)
+				end
+			end
+		end
+	end
+end
+
+function text_to_table()
+	renderText[3] = {}
+	renderText[4] = {}
+	for str in string.gmatch(ini.lines.one:gsub("!n", "\n"), '[^\n]+') do
+		renderText[3][#renderText[3] + 1] = str
+	end
+	for str in string.gmatch(ini.lines.two:gsub("!n", "\n"), '[^\n]+') do
+		renderText[4][#renderText[4] + 1] = str
+	end
+end
+
+function ShowDialog(int, dtext, dinput, string_or_number, ini1, ini2)
+	d[1], d[2], d[3], d[4], d[5], d[6] = int, dtext, dinput, string_or_number, ini1, ini2
+	if int == 1 then
+		dialogLine, dialogTextToList = {}, {}
+		dialogLine[#dialogLine + 1] = '{59fc30} > Настройки для аккаунта\t{FFFFFF}'..my_name
+			dialogLine[#dialogLine + 1] = ' Скрипт\t'..(ini[inikeys].run and "{59fc30}ON" or "{ff0000}OFF")
+			dialogLine[#dialogLine + 1] = ' Проверка инвентаря [SRP/ERP]\t'..(ini[inikeys].inventory and "{59fc30}ON" or "{ff0000}OFF")
+			dialogLine[#dialogLine + 1] = ' Проверка /boostinfo [SRP]\t'..(ini[inikeys].boostinfo and "{59fc30}ON" or "{ff0000}OFF")
+			if ini[inikeys].run then
+				dialogLine[#dialogLine + 1] = ' Сменить позицию\t'
+			end
+			dialogLine[#dialogLine + 1] = ' Серверная команда принять нарко\t'..ini[inikeys].server_cmd
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите команду которая используется для принятия наркотиков на вашем сервере!"
+			dialogLine[#dialogLine + 1] = ' Секунд до следующего принятия нарко\t'..ini[inikeys].seconds
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите через сколько можно принять наркотик на вашем сервере!"
+			dialogLine[#dialogLine + 1] = ' Максимальное HP\t'..ini[inikeys].hp
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите ваше максимальное HP!"
+			dialogLine[#dialogLine + 1] = ' Максимум грамм можно использовать\t'..ini[inikeys].max_use_gram
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите сколько максимум грамм наркотиков можно использовать за раз!"
+			dialogLine[#dialogLine + 1] = ' HP дает 1 грамм наркотиков\t'..ini[inikeys].hp_one_gram
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите сколько HP дает 1 грамм наркотиков!"
+		dialogLine[#dialogLine + 1] = '{59fc30} > Общие настройки\t'
+			dialogLine[#dialogLine + 1] = ' Кнопка для использвания нарко\t'..ini.global.key:gsub("VK_", '')
+			dialogLine[#dialogLine + 1] = ' Сокращенная команда\t'..ini.global.cmd
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите сокращенную команду для принятия наркотиков!"
+			dialogLine[#dialogLine + 1] = ' Текст когда таймер стоит\t'..ini.lines.one
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите текст таймера когда он отключен.\n\tМожно использовать замены и цвета HEX\n\t  {036d80}!n{FFFFFF} - переход на новую строку\n\t  {036d80}!a{FFFFFF} - заменится на остаток наркотиков\n\t  {036d80}!m{FFFFFF} - заменится на остаток материалов"
+			dialogLine[#dialogLine + 1] = ' Текст когда идёт таймер\t'..ini.lines.two
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите текст таймера когда он работает.\n\tМожно использовать замены и цвета HEX\n\t  {036d80}!n{FFFFFF} - переход на новую строку\n\t  {036d80}!a{FFFFFF} - заменится на остаток наркотиков\n\t  {036d80}!s{FFFFFF} - заменится на остаток секунд\n\t  {036d80}!m{FFFFFF} - заменится на остаток материалов"
+			dialogLine[#dialogLine + 1] = ' Шрифт\t'..ini.render.font
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите название шрифта"
+			dialogLine[#dialogLine + 1] = ' Размер\t'..ini.render.size
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите размер шрифта"
+			dialogLine[#dialogLine + 1] = ' Стиль\t'..ini.render.flag
+				dialogTextToList[#dialogLine] = "{FFFFFF}Устанавливайте стиль путем сложения.\n\nТекст без особенностей = 0\nЖирный текст = 1\nНаклонность(Курсив) = 2\nОбводка текста = 4\nТень текста = 8\nПодчеркнутый текст = 16\nЗачеркнутый текст = 32\n\nСтандарт: 13"
+			dialogLine[#dialogLine + 1] = ' Выравнивание\t'..( ini.render.align == 1 and "От левого края" or ( ini.render.align == 2 and "По середине" or ( ini.render.align == 3 and " От правого края" or '' ) ) )
+			dialogLine[#dialogLine + 1] = ' Отступ новой строки\t'..ini.render.height
+				dialogTextToList[#dialogLine] = "{FFFFFF}Введите число от 2 до 10."
+			dialogLine[#dialogLine + 1] = '{59fc30}Контакты автора\t'
+		local text = ""
+		for k,v in pairs(dialogLine) do
+			text = text..v.."\n"
+		end
+		sampShowDialog(0, 'Drugs-Mats: Настройки', text, "Выбрать", "Закрыть", 4)
+	end
+	if int == 2 then
+		d[7] = true
+		sampShowDialog(0, "Drugs-Mats: Изменение настроек", dtext, "Выбрать", "Назад", 1)
+	end
+	if int == 3 then
+		sampShowDialog(0, "Drugs-Mats: Контакты автора", "{FFFFFF}Выбери что скопировать\t\nНик на Samp-Rp\tSerhiy_Rubin\nСтраничка {4c75a3}VK{FFFFFF}\tvk.com/id353828351\nГруппа {4c75a3}VK{FFFFFF} с модами\tvk.com/club161589495\n{10bef2}Skype{FFFFFF}\tserhiyrubin\n{7289da}Discord{FFFFFF}\tSerhiy_Rubin#3391", "Копировать", "Назад", 5)
+	end
+end
+
+function doDialog()
+	local caption = sampGetDialogCaption()
+	if caption == 'Drugs-Mats: Настройки' then
+		local result, button, list, input = sampHasDialogRespond(0)
+		if result and button == 1 then
+			if dialogLine ~= nil and dialogLine[list + 1] ~= nil then
+				local str = dialogLine[list + 1]
+				if str:find('Скрипт') then
+					ini[inikeys].run = not ini[inikeys].run
+					inicfg.save(ini)
+					ShowDialog(1)
+				end
+				if str:find('Сменить позицию') then
+					lua_thread.create(function()
+						wait(200)
+						pos = true
+					end)
+				end
+				if str:find('Проверка инвентаря') then
+					ini[inikeys].inventory = not ini[inikeys].inventory
+					inicfg.save(ini)
+					ShowDialog(1)
+				end
+				if str:find('Серверная команда принять нарко') then
+					ShowDialog(2, dialogTextToList[list + 1], ini[inikeys].server_cmd, true, inikeys, 'server_cmd')
+				end
+				if str:find('boostinfo') then
+					ini[inikeys].boostinfo = not ini[inikeys].boostinfo
+					inicfg.save(ini)
+					ShowDialog(1)
+				end
+				if str:find('Секунд до следующего принятия нарко') then
+					ShowDialog(2, dialogTextToList[list + 1], ini[inikeys].seconds, false, inikeys, 'seconds')
+				end
+				if str:find('Максимальное HP') then
+					ShowDialog(2, dialogTextToList[list + 1], ini[inikeys].hp, false, inikeys, 'hp')
+				end
+				if str:find('Максимум грамм можно использовать') then
+					ShowDialog(2, dialogTextToList[list + 1], ini[inikeys].max_use_gram, false, inikeys, 'max_use_gram')
+				end
+				if str:find('HP дает 1 грамм наркотиков') then
+					ShowDialog(2, dialogTextToList[list + 1], ini[inikeys].hp_one_gram, false, inikeys, 'hp_one_gram')
+				end
+				if str:find('Сокращенная команда') then
+					ShowDialog(2, dialogTextToList[list + 1], ini.global.cmd, true, 'global', 'cmd')
+				end
+				if str:find('Текст когда таймер стоит') then
+					ShowDialog(2, dialogTextToList[list + 1], ini.lines.one, true, 'lines', 'one')
+				end
+				if str:find('Текст когда идёт таймер') then
+					ShowDialog(2, dialogTextToList[list + 1], ini.lines.two, true, 'lines', 'two')
+				end
+				if str:find('Шрифт') then
+					ShowDialog(2, dialogTextToList[list + 1], ini.render.font, true, 'render', 'font')
+				end
+				if str:find('Размер') then
+					ShowDialog(2, dialogTextToList[list + 1], ini.render.size, true, 'render', 'size')
+				end
+				if str:find('Стиль') then
+					ShowDialog(2, dialogTextToList[list + 1], ini.render.flag, true, 'render', 'flag')
+				end
+				if str:find('Выравнивание') then
+					ini.render.align = ( ini.render.align == 1 and 2 or ( ini.render.align == 2 and 3 or ( ini.render.align == 3 and 1 or 2 ) ) )
+					inicfg.save(ini)
+					ShowDialog(1)
+				end
+				if str:find('Отступ новой строки') then
+					ShowDialog(2, dialogTextToList[list + 1], ini.render.height, false, 'render', 'height')
+				end
+				if str:find('Контакты автора') then
+					ShowDialog(3)
+				end
+				if str:find('Кнопка для использвания нарко') then
+					lua_thread.create(function()
+						wait(150)
+						local keys = ""
+						repeat
+							wait(0)
+							for k, v in pairs(vkeys) do
+								if not sampIsDialogActive() then
+									sampShowDialog(0, "Смена клавиши", "{FFFFFF}Нажмите на любую клавишу\nОна будет использоваться для использования наркотика", "Выбрать", "Закрыть", 0)
+								end
+								if wasKeyPressed(v) and k ~= "VK_ESCAPE" and k ~= "VK_RETURN" and k ~= "VK_SPACE" then
+									keys = k
+								end
+							end
+						until keys ~= ""
+						ini.global.key = keys
+						inicfg.save(ini)
+						ShowDialog(1)
+					end)
+				end
+			end
+		end
+	end
+	if caption == "Drugs-Mats: Изменение настроек" then
+		if d[7] then
+			d[7] = false
+			sampSetCurrentDialogEditboxText(ini[d[5]][d[6]])
+		end
+		local result, button, list, input = sampHasDialogRespond(0)
+		if result then
+			if button == 1 then
+				local gou = ( d[4] and (#input > 0 and true or false) or (input:find("^%d+$") and true or false))
+				if gou then
+					d[3] = (d[4] and tostring(input) or tonumber(input))
+					ini[d[5]][d[6]] = d[3]
+					inicfg.save(ini)
+					if d[5]:find('render') then
+						renderReleaseFont(font)
+						font = renderCreateFont(ini.render.font, ini.render.size, ini.render.flag)
+					end
+					if d[5]:find('lines') then
+						text_to_table()
+					end
+					ShowDialog(1)
+				else
+					ShowDialog(d[1], d[2], d[3], d[4], d[5], d[6])
+				end
+			else
+				ShowDialog(1)
+			end
+		end
+	end
+	if caption == "Drugs-Mats: Контакты автора" then
+		local result, button, list, input = sampHasDialogRespond(0)
+		if result then
+			if button == 1 then
+				if list == 0 then setClipboardText("Serhiy_Rubin") end
+				if list == 1 then setClipboardText("https://vk.com/id353828351") end
+				if list == 2 then setClipboardText("https://vk.com/club161589495") end
+				if list == 3 then setClipboardText("serhiyrubin") end
+				if list == 4 then setClipboardText("Serhiy_Rubin#3391") end
+				ShowDialog(3)
+			else
+				ShowDialog(1)
+			end
+		end
+	end
+end
+
+function sampev.onServerMessage(color, message)
+    if check_boostinfo == 2 and color == -1 and message:find("Действует до") then
+		return false
+	end
+    if check_boostinfo == 2 and color == -1 and message:find("Бонусы отключены") then
+		check_boostinfo = 0
+		return false
+	end
+	if (message == " (( Здоровье не пополняется чаще, чем раз в минуту ))" or message == ' (( Здоровье можно пополнить не чаще, чем раз в минуту ))') then not_drugs_timer = true end
+	if string.find(message, my_name) then
+		if string.find(message, "употребил%(а%) наркотик") then
+			if not not_drugs_timer then drugs_timer = os.time() else not_drugs_timer = false end
+		end
+		if string.find(message, "оружие из материалов") then
+			check_get_mats = true
+		end
+	end
+	if message:find('выбросил') and (message:find('аркотики') or message:find('атериалы')) and string.find(message, my_name) then
+		check_get_mats = true
+	end
+	if message:find('Вы взяли несколько комплектов') then
+		check_get_mats = true
+	end
+	if message:find('Вы ограбили дом! Наворованный металл можно сдать около порта.') then
+		check_get_mats = true
+	end
+	if message:find('У вас (%d+)/500 материалов с собой') then
+		ini[inikeys].mats = message:match('У вас (%d+)/500 материалов с собой')
+		inicfg.save(ini)
+	end
+	if string.find(message, " %(%( Остаток: (%d+) грамм %)%)") then
+		if not not_drugs_timer then drugs_timer = os.time() else not_drugs_timer = false end
+		ini[inikeys].drugs = string.match(message, " %(%( Остаток: (%d+) грамм %)%)")
+		inicfg.save(ini)
+	end
+	if string.find(message, '%(%( Остаток: (%d+) материалов %)%)') then
+		ini[inikeys].mats = message:match('%(%( Остаток: (%d+) материалов %)%)')
+		inicfg.save(ini)
+	end
+	if message:find('Вы купили %d+ грамм наркотиков за %d+ вирт %(У вас есть (%d+) грамм%)') then
+		ini[inikeys].drugs = message:match('Вы купили %d+ грамм наркотиков за %d+ вирт %(У вас есть (%d+) грамм%)')
+		inicfg.save(ini)
+	end
+	if message:find('Вы купили (%d+) грамм наркотиков за %d+ вирт у .+') then
+		local s1 = message:match('Вы купили (%d+) грамм наркотиков за %d+ вирт у .+')
+		ini[inikeys].drugs = tonumber(s1) + ini[inikeys].drugs
+		inicfg.save(ini)
+	end
+end
+
+function sampev.onSendChat(message) sleep = os.clock() * 1000 end
+function sampev.onSendCommand(cmd)
+	local command, params = string.match(cmd:lower(), "^%/([^ ]*)(.*)")
+	if command == ini.global.cmd:lower() or string.find(command, ini[inikeys].server_cmd) then
+		if string.find(params, "menu") then
+			ShowDialog(1)
+			return false
+		end
+		if #params == 0 then
+			local gramm = math.ceil(((ini[inikeys].hp + 1) - getCharHealth(playerPed)) / ini[inikeys].hp_one_gram)
+			if gramm > ini[inikeys].max_use_gram then gramm = ini[inikeys].max_use_gram end
+			second_timer = os.difftime(os.time(), drugs_timer)
+			if second_timer <= ini[inikeys].seconds and second_timer > 0 then gramm = 1 end
+			return {string.format('/%s %d', ini[inikeys].server_cmd, gramm)}
+		end
+		if command == ini.global.cmd:lower() then
+			cmd = cmd:lower():gsub(ini.global.cmd:lower(), ini[inikeys].server_cmd)
+			return { cmd }
+		end
+	end
+	sleep = os.clock() * 1000
+end
+
+function sampev.onShowDialog(dialogId, style, title, button1, button2, text)
+	if title:find('Информация') or title:find('Карманы') then
+		local nark, mats = false, false
+		local arr = split(text, "\n")
+		for i = 1, #arr do
+			if arr[i]:find('Наркотики\t(%d+)') then
+				ini[inikeys].drugs = arr[i]:match('Наркотики\t(%d+)')
+				nark = true
+			end
+			if arr[i]:find('Материалы\t(%d+)') then
+				ini[inikeys].mats = arr[i]:match('Материалы\t(%d+)')
+				mats = true
+			end
+		end
+		if not nark then ini[inikeys].drugs = 0 end
+		if not mats then ini[inikeys].mats = 0 end
+		inicfg.save(ini)
+
+		if check_inventory == 2 or (check_inventory_time ~= nil and os.time() - check_inventory_time < 5) then
+			check_inventory = 0
+			check_inventory_time = os.time()
+			sampSendDialogResponse(dialogId, 0, 0, "")
+			return false
+		end
+	end
+    if dialogId == 22 and title == "Бонусы" then
+		local arr = split(text, "\n")
+		for i = 1, #arr do
+			if arr[i]:find('Таймер на Нарко	(.+)') then
+				bonus_drugs = tonumber(arr[i]:match('Таймер на Нарко	(.+)'))
+				break
+			end
+		end
+		if check_boostinfo == 2 then
+			check_boostinfo = 0
+		  	return false
+		end
+	end
+end
+
+function GetMats()
+	if not check_get_mats then return end
+
+	check_get_mats = false
+	repeat
+		wait(0)
+	until os.clock() * 1000 - sleep > 1200 and sampGetPlayerScore(select(2, sampGetPlayerIdByCharHandle(PLAYER_PED))) >= 1 and not sampIsDialogActive() and not sampIsChatInputActive()
+
+	local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED)
+	if ini[inikeys].inventory then
+		check_inventory = 2
+		repeat
+			wait(0)
+			if os.clock() * 1000 - sleep > 1200 and sampGetPlayerScore(id) >= 1 and not sampIsDialogActive() and not sampIsChatInputActive() then
+				sampSendChat('/inventory')
+				sleep = os.clock() * 1000
+			end
+		until check_inventory ~= 2
+	end
+
+	if ini[inikeys].boostinfo and check_boostinfo_status == nil then
+		check_boostinfo_status = os.time()
+		check_boostinfo = 2
+		repeat
+			wait(0)
+			if os.clock() * 1000 - sleep > 1200 and sampGetPlayerScore(id) >= 1 and not sampIsDialogActive() and not sampIsChatInputActive() then
+				sampSendChat('/boostinfo')
+				sleep = os.clock() * 1000
+			end
+		until check_boostinfo ~= 2
+	end
+end
+
+function split(str, delim, plain)
+    local tokens, pos, plain = {}, 1, not (plain == false) --[[ delimiter is plain text by default ]]
+    repeat
+        local npos, epos = string.find(str, delim, pos, plain)
+        table.insert(tokens, string.sub(str, pos, npos and npos - 1))
+        pos = epos and epos + 1
+    until not pos
+    return tokens
+end