- 72
- 4
- Версия SA-MP
-
- Любая
Ку,
Делал скрипт а непонятно откуда ошибка на 117 строке хотя все хорошо же :|
Сам код(фулл)
Делал скрипт а непонятно откуда ошибка на 117 строке хотя все хорошо же :|
Ошибка:
[error] [MVD Helper Mobile.lua] ./MVD Helper Mobile.lua:117: unexpected symbol near ')'Сам код(фулл)
Тут:
local imgui = require 'mimgui'
local encoding = require 'encoding'
local ffi = require 'ffi'
encoding.default = 'CP1251'
local u8 = encoding.UTF8
local WinState = imgui.new.bool(false)
local radioInt = imgui.new.int(1)
local inputField = imgui.new.char[256]()
local text = imgui.new.char[64]()
local active = imgui.new.bool()
local myorg = imgui.new.char(255)
local otherorg = imgui.new.char(255)
local zk = imgui.new.bool()
local uval = imgui.new.char(64)
local shit = imgui.new.char(256)
imgui.OnFrame(function() return WinState[0] end, function(player)
imgui.SetNextWindowPos(imgui.ImVec2(500, 500), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
imgui.SetNextWindowSize(imgui.ImVec2(245, 280), imgui.Cond.FirstUseEver)
imgui.Begin(u8'MVD Helper - Mobile', WinState)
if imgui.BeginTabBar('Tabs') then
if imgui.BeginTabItem(u8'Основные Функции') then -- задаём название первой вкладки
-- далее идёт содержимое вкладки
imgui.InputText(u8'От кого?/d', myorg, 255)
mydeporg = u8:decode(ffi.string(myorg))
imgui.InputText(u8'Кому?/d', otherorg, 255)
otherdeporg = u8:decode(ffi.string(otherorg))
imgui.Checkbox(u8'Закрытый Канал', zk)
if imgui.Button(u8'Отправить Вызов') then
if zk[0] then
sampSendChat("/d [".. mydeporg .."] z.k [".. otherdeporg .."] На связь!")
else
sampSendChat("/d [".. mydeporg .."] to [".. otherdeporg .."] На связь!")
end
end
-- конец содержимого вкладки
imgui.EndTabItem()
end
if imgui.BeginTabItem(u8'Уголовный Кодекс') then -- задаём название второй вкладки, 160 Ширина 35 высота
-- далее идёт содержимое вкладки
imgui.Text(u8"Статья 1.1 Преступлением признается виновно совершенное общественно опасное деяние (противоправное, осознанное, волевое, действие или бездействие, нарушающее или создавшее реальную угрозу нарушения общественных отношений, охраняемых Уголовным законодательством), запрещенное настоящим Кодексом под угрозой наказания.")
imgui.Text(u8"Статья 1.2 Не является преступлением действие (бездействие), хотя формально и содержащее признаки преступления, но в силу малозначительности не представляющее общественной опасности.")
imgui.Text(u8"Статья 1.3 Совокупностью преступлений признается совершение двух или более преступлений. При совокупности преступлений лицо несет уголовную ответственность за каждое совершенное преступление по соответствующей статье настоящего Кодекса.")
imgui.Text(u8"Статья 1.4 Покушением на преступление признаются умышленные действия (бездействие) лица, непосредственно направленные на совершение преступления, если при этом преступление не было доведено до конца по не зависящим от этого лица обстоятельствам. Уголовная ответственность за покушение наступает по статье настоящего Кодекса, предусматривающей ответственность за оконченное преступление, со ссылкой на настоящую статью, но не может превышать половины предельного наказания за оконченное преступление.")
imgui.Text("-------------------------------------")
imgui.Text(u8"Статья 2.1 Соучастием в преступлении признается умышленное совместное участие двух или более лиц в совершении умышленного преступления.")
imgui.Text(u8"Статья 2.2 Соучастниками преступления наряду с исполнителем признаются организатор, подстрекатель и пособник.")
imgui.Text(u8"Статья 2.3 Соучастники преступления вне зависимости от вида соучастия несут ответственность в равном объёме.")
imgui.Text(u8"Статья 2.4 Преступление признается совершенным группой лиц, если в его совершении совместно участвовали два или более исполнителя.")
imgui.Text(u8"Статья 2.5 Совершение преступления группой лиц влечет более строгое наказание.")
imgui.Text("-------------------------------------")
imgui.Text(u8"Статья 3.1 Не является преступлением причинение вреда посягающему лицу в состоянии необходимой обороны, при защите личности и прав обороняющегося или других лиц, если это посягательство было сопряжено с насилием, опасным для жизни обороняющегося или другого лица, либо с непосредственной угрозой применения такого насилия.")
imgui.Text(u8"Статья 3.2 При причинении вреда в состоянии необходимой обороны не должны быть нарушены пределы необходимой обороны (умышленные действия, явно не соответствующие характеру и опасности посягательства).")
imgui.Text(u8"Статья 3.3 Не является преступлением причинение вреда лицу, совершившему преступление, при его задержании для доставления органам власти, если иными средствами задержать такое лицо не представлялось возможным и при этом не было допущено превышения необходимых для этого мер (когда лицу без необходимости причиняется явно чрезмерный, не вызываемый обстановкой вред).")
imgui.Text(u8"Статья 3.4 Не является преступлением причинение вреда в состоянии крайней необходимости, то есть для устранения опасности, непосредственно угрожающей личности и правам данного лица или иных лиц, если эта опасность не могла быть устранена иными средствами и при этом не было допущено превышения пределов крайней необходимости (явно не соответствующего характеру и степени угрожавшей опасности и обстоятельствам).")
imgui.Text(u8"Статья 3.5 Не является преступлением причинение вреда при обоснованном риске для достижения общественно полезной цели, если указанная цель не могла быть достигнута не связанными с риском действиями (бездействием). Риск не признается обоснованным, если он заведомо был сопряжен с угрозой для жизни многих людей.")
imgui.Text(u8"Статья 3.6 Не является преступлением причинение вреда охраняемым интересам лицом, действующим во исполнение обязательных для него приказа или распоряжения. Уголовную ответственность за причинение такого вреда несет лицо, отдавшее незаконные приказ или распоряжение. (Лицо, совершившее преступление во исполнение заведомо незаконных приказа или распоряжения, несет уголовную ответственность на общих основаниях. Неисполнение заведомо незаконных приказа или распоряжения исключает уголовную ответственность).")
imgui.Text("-------------------------------------")
imgui.Text(u8"Статья 4.1 Лицу, признанному виновным в совершении преступления, назначается справедливое наказание в пределах, предусмотренных соответствующей статьей настоящего Кодекса, и с учетом положений настоящего Кодекса.")
imgui.Text(u8"Статья 4.2 При назначении наказания учитываются характер и степень общественной опасности преступления и личность виновного, в том числе обстоятельства, смягчающие и отягчающие наказание.")
imgui.Text(u8"Статья 4.5 Время содержания лица под стражей до судебного разбирательства учитывается при вынесении приговора.")
imgui.Text(u8"Статья 4.6 Штрафы, предусмотренные статьями настоящего Кодекса, применяются исключительно в судебном порядке либо прокуратурой.")
imgui.Text(u8"Статья 4.8 Ответственность обозначается приоритетом розыска. Каждый уровень приоритета розыска фактически приравнивается к 50.000$ залога.")
imgui.Text(u8"Статья 4.9 В случае совершения лицом особо тяжкого преступления, срок лишения свободы может превышать установленный настоящим Законом вплоть до пожизненного лишения свободы.")
imgui.Text(u8"Статья 4.10 Перечень особо тяжких преступлений: 6.2, 7.1, 12.1 - 12.4, 12.7.1, 14.1 - 14.4, 16.2, 17.1 настоящего Кодекса.")
imgui.Text("-------------------------------------")
imgui.Text(u8"Статья 5.1 Лицо, впервые совершившее преступление, предусмотренное статьями: приоритет розыска не выше 2, может быть освобождено от уголовной ответственности, если оно примирилось с потерпевшим и загладило причиненный потерпевшему вред.")
imgui.Text(u8"Статья 5.2 Лицо, впервые совершившее преступление может быть освобождено судом или прокуратурой от уголовной ответственности с назначением штрафа.")
imgui.Text(u8"Статья 5.3 Лицо освобождается от уголовной ответственности, если со дня совершения преступления прошло 20 дней.")
imgui.Text(u8"Статья 5.4 К лицам, совершившим преступления, предусмотренные главой 14, статьями 6.2, 6.3, 6.5, 8.2, 11.7, 12.1 - 12.5, 16.2, 17.1 настоящего Кодекса, сроки давности не применяются.")
imgui.Text(u8"Статья 5.5.1 Срок запрета исчисляется с момента отбытия наказания.")
imgui.Text(u8"Статья 5.6 Лицо, добровольно сдавшее предметы, указанные в статьях 12.8, 12.9, 13.1, 13.2 настоящего Кодекса, освобождается от уголовной ответственности по соответствующей статье. Не может признаваться добровольной сдачей предметов их изъятие при задержании лица, а также при производстве любых оперативных и/или следственных действий.")
imgui.Text(u8"Статья 5.7 Найденные наркотические вещества и семена в ходе обыска сотрудниками гос. структуры в количестве до 2 грамм включительно, изымаются без привлечения к уголовной ответственности.")
imgui.Text("-------------------------------------")
imgui.Text(u8"Статья 6.1.* Умышленное нанесение телесных повреждений Приоритет розыска 3.")
imgui.Text(u8"Статья 6.2**. Убийство, то есть умышленное причинение смерти другому человеку Приоритет розыска 6.")
imgui.Text(u8"Статья 6.3. Причинение тяжкого вреда здоровью по неосторожности Приоритет розыска 1.")
imgui.Text(u8"Статья 6.4*. Причинение смерти по неосторожности Приоритет розыска 3.")
imgui.Text(u8"Статья 6.5*. Угроза расправой (прямая или косвенная) гражданскому, а равно их близким Приоритет розыска 3")
imgui.Text(u8"Статья 6.6.* Умышленное причинение тяжкого вреда здоровью Приоритет розыска 5")
imgui.Text(u8"Статья 6.7.* Оставление в опасности. Заведомое оставление без помощи лица, находящегося в опасном для жизни или здоровья состоянии.Наказывается штрафом до 10.000$. Приоритет розыска 1.")
imgui.Text("-------------------------------------")
imgui.Text(u8"Статья 7.1*. Похищение человека Приоритет розыска 6.")
imgui.Text(u8"Статья 7.2*. Клевета, содержащаяся в публичном выступлении, средствах массовой информации либо с использованием своего служебного положения Приоритет розыска 4")
imgui.Text(u8"Статья 7.3*. Клевета, соединенная с обвинением лица в совершении преступления. Приоритет розыска 2")
imgui.Text(u8"Статья 7.4*. Нарушение против личности, деловой репутации и оскорбления сотрудниками представительства Средств Массовой информации, равно нарушение законодательства об журналистской деятельности Приоритет розыска 4.")
imgui.Text("-------------------------------------")
-- конец содержимого вкладки
imgui.EndTabItem()
end
if imgui.BeginTabItem(u8'Для 9+') then
imgui.InputText('Test', shit, 256)
local pid = tonumber(ffi.string(shit))
if sampIsPlayerConnected(pid) then
imgui.Text(u8'Найден игрок: '..sampGetPlayerNickname(pid))
if imgui.Button(u8'Действие 1') then
sampAddChatMessage('Действие 1 выполняется, ид жертвы '..pid,-1)
end
imgui.SameLine()
if imgui.Button(u8'Действие 2') then
sampAddChatMessage('Действие 2 выполняется, ид жертвы '..pid,-1)
end
imgui.SameLine()
if imgui.Button(u8'Действие 3') then
sampAddChatMessage('Действие 3 выполняется, ид жертвы '..pid,-1)
end
else
imgui.Text(u8'Игрок не найден')
end
imgui.EndTabBar()
end
imgui.End()
end)
-- КОМАНДЫ --
function main()
sampRegisterChatCommand('MVD', function() WinState[0] = not WinState[0] end)
wait(-1)
end
-- ДЛЯ ТЕМ --
imgui.OnInitialize(function()
imgui.GetIO().IniFilename = nil;
white_style()
end)
-- ТЕМА, НЕ ИЗМЕНЯТЬ! --
function white_style()
imgui.SwitchContext()
imgui.GetStyle().WindowRounding = 7.0
imgui.GetStyle().ChildRounding = 7.0
imgui.GetStyle().FrameRounding = 10.0
imgui.GetStyle().FramePadding = imgui.ImVec2(5, 3)
imgui.GetStyle().WindowPadding = imgui.ImVec2(8, 8)
imgui.GetStyle().ButtonTextAlign = imgui.ImVec2(0.5, 0.5)
imgui.GetStyle().GrabMinSize = 7
imgui.GetStyle().GrabRounding = 15
imgui.GetStyle().Colors[imgui.Col.Text] = imgui.ImVec4(1.00, 1.00, 1.00, 1.00)
imgui.GetStyle().Colors[imgui.Col.TextDisabled] = imgui.ImVec4(1.00, 1.00, 1.00, 0.20)
imgui.GetStyle().Colors[imgui.Col.WindowBg] = imgui.ImVec4(0.07, 0.07, 0.09, 1.00)
imgui.GetStyle().Colors[imgui.Col.PopupBg] = imgui.ImVec4(0.90, 0.90, 0.90, 1.00)
imgui.GetStyle().Colors[imgui.Col.Border] = imgui.ImVec4(0.00, 0.00, 0.00, 0.00)
imgui.GetStyle().Colors[imgui.Col.SliderGrab] = imgui.ImVec4(0.90, 0.90, 0.90, 1.00)
imgui.GetStyle().Colors[imgui.Col.SliderGrabActive] = imgui.ImVec4(0.70, 0.70, 0.70, 1.00)
imgui.GetStyle().Colors[imgui.Col.BorderShadow] = imgui.ImVec4(0.00, 0.00, 0.00, 0.00)
imgui.GetStyle().Colors[imgui.Col.ScrollbarBg] = imgui.ImVec4(0.60, 0.60, 0.60, 0.90)
imgui.GetStyle().Colors[imgui.Col.ScrollbarGrab] = imgui.ImVec4(0.90, 0.90, 0.90, 1.00)
imgui.GetStyle().Colors[imgui.Col.ScrollbarGrabHovered] = imgui.ImVec4(0.80, 0.80, 0.80, 1.00)
imgui.GetStyle().Colors[imgui.Col.ScrollbarGrabActive] = imgui.ImVec4(0.70, 0.70, 0.70, 1.00)
imgui.GetStyle().Colors[imgui.Col.FrameBg] = imgui.ImVec4(0.20, 0.20, 0.20, 1.00)
imgui.GetStyle().Colors[imgui.Col.FrameBgHovered] = imgui.ImVec4(0.20, 0.20, 0.20, 0.80)
imgui.GetStyle().Colors[imgui.Col.FrameBgActive] = imgui.ImVec4(0.20, 0.20, 0.20, 0.60)
imgui.GetStyle().Colors[imgui.Col.CheckMark] = imgui.ImVec4(1.00, 1.00, 1.00, 1.00)
imgui.GetStyle().Colors[imgui.Col.Button] = imgui.ImVec4(0.20, 0.20, 0.20, 1.00)
imgui.GetStyle().Colors[imgui.Col.ButtonHovered] = imgui.ImVec4(0.15, 0.15, 0.15, 1.00)
imgui.GetStyle().Colors[imgui.Col.ButtonActive] = imgui.ImVec4(0.10, 0.10, 0.10, 1.00)
imgui.GetStyle().Colors[imgui.Col.TextSelectedBg] = imgui.ImVec4(0.80, 0.80, 0.80, 0.80)
imgui.GetStyle().Colors[imgui.Col.Tab] = imgui.ImVec4(0.47, 0.77, 0.83, 0.14)
imgui.GetStyle().Colors[imgui.Col.TabHovered] = imgui.ImVec4(0.92, 0.18, 0.29, 0.86)
imgui.GetStyle().Colors[imgui.Col.TabActive] = imgui.ImVec4(0.92, 0.18, 0.29, 0.70)
local but_orig = imgui.Button
imgui.Button = function(...)
imgui.PushStyleColor(imgui.Col.Text, imgui.ImVec4(0.07, 0.07, 0.09, 1.00))
imgui.PushStyleColor(imgui.Col.Button, imgui.ImVec4(0.90, 0.90, 0.90, 1.00))
imgui.PushStyleColor(imgui.Col.ButtonHovered, imgui.ImVec4(0.80, 0.80, 0.80, 1.00))
imgui.PushStyleColor(imgui.Col.ButtonActive, imgui.ImVec4(0.70, 0.70, 0.70, 1.00))
local result = but_orig(...)
imgui.PopStyleColor(4)
return result
end
end
