Крашит скрипт

goosik · 18 Янв 2024

Почему крашит скрипт? Хочу чтоб по нажатию радио каждые 31 секунду в /vr отправлялись сообщения

171 СТРОКА В СКРИПТЕ

КоDick:

local vk = require "vkeys"
local imgui = require "mimgui"
local encoding = require 'encoding'
encoding.default = 'CP1251'
local u8 = encoding.UTF8
local ffi = require 'ffi'
local new = imgui.new
local radioStatus = false
local ui_meta = {
    __index = function(self, v)
        if v == "switch" then
            local switch = function()
                if self.process and self.process:status() ~= "dead" then
                    return false
                end
                self.timer = os.clock()
                self.state = not self.state

                self.process = lua_thread.create(function()
                    local bringFloatTo = function(from, to, start_time, duration)
                        local timer = os.clock() - start_time
                        if timer >= 0.00 and timer <= duration then
                            local count = timer / (duration / 100)
                            return count * ((to - from) / 100)
                        end
                        return (timer > duration) and to or from
                    end

                    while true do wait(0)
                        local a = bringFloatTo(0.00, 1.00, self.timer, self.duration)
                        self.alpha = self.state and a or 1.00 - a
                        if a == 1.00 then break end
                    end
                end)
                return true
            end
            return switch
        end
 
        if v == "alpha" then
            return self.state and 1.00 or 0.00
        end
    end
}

local menu = { state = false, duration = 0.5 }
setmetatable(menu, ui_meta)

function main()
    repeat wait(0) until isSampAvailable()
 
    sampRegisterChatCommand("media", menu.switch)
end

local main_frame = imgui.OnFrame(
    function() return menu.alpha > 0.00 end,
    function(self)
        self.HideCursor = not menu.state
        imgui.PushStyleVarFloat(imgui.StyleVar.Alpha, menu.alpha)
        imgui.SetNextWindowPos(imgui.ImVec2(700,500), imgui.Cond.FirstUseEver, imgui.ImVec2(0.5, 0.5))
        imgui.SetNextWindowSize(imgui.ImVec2(1000, 650), imgui.Cond.Always)
        imgui.Begin("1", _, imgui.WindowFlags.NoTitleBar + imgui.WindowFlags.NoCollapse + imgui.WindowFlags.NoResize)
        imgui.BeginChild('1241', imgui.ImVec2(985, 630), true)






        if imgui.CollapsingHeader(u8'Редактирование объявлений (ПРО)') then
            if imgui.CollapsingHeader(u8'[1] Форма редактирования объявления') then
                imgui.TextWrapped(u8'При покупке: Куплю [Сокращение] "[Название предмета]". Бюджет: [Бюджет в "Млн"] [Если бюджет не указан в объявлении, пишем "Свободный"]')
                imgui.TextWrapped(u8'Пример: Куплю р/с "Камень". Бюдежт: 20 тыс/шт')
                imgui.TextWrapped(u8'Пример: Куплю а/с "Прототип". Бюджет: свободный')
                imgui.TextWrapped('')
                imgui.TextWrapped(u8'При продаже: Продам [Сокращение] "[Название предмета]". Цена: [Цена в "Млн"] [Если цена не указана в объявлении, пишем "Договорной"]')
                imgui.TextWrapped(u8'Пример: Продам а/с "Прототип". Цена: договорная')
                imgui.TextWrapped(u8'Пример: Продам р/с "Камень". Цена: договорная')
                imgui.Separator()
            end
            if imgui.CollapsingHeader(u8'[2] Основные сокращения') then
                imgui.TextWrapped(u8'Т/С - Транспортное средство')
                imgui.TextWrapped(u8'А/М - Автомобиль')
                imgui.TextWrapped(u8'М/Ц - Мотоцикл')
                imgui.TextWrapped(u8'В/Т - Воздушный транспорт')
                imgui.TextWrapped(u8'М/С - Морское судно')
                imgui.TextWrapped(u8'В/С - Велосипед')
                imgui.TextWrapped(u8'Р/И - Рабочий инструмент (удочка, супер-грабли, кирка и пр.)')
                imgui.TextWrapped(u8'А/С - Аксессуар')
                imgui.TextWrapped(u8'Р/С - Ресурс (металл, дерево, точильные камни и пр.)')
                imgui.TextWrapped(u8'Б/З - Бизнес')
                imgui.TextWrapped(u8'П/И - Плюшевая игрушка')
                imgui.TextWrapped(u8'И/Л - Иллюстрация')
                imgui.TextWrapped(u8'Г/Т - Грузовой транспорт (ДФТ, фуры, продуктовозки и пр.)')
                imgui.TextWrapped(u8'О/П - Одежда Пошива (Си-джей, геральт и пр.)')
                imgui.TextWrapped(u8'К/К - Карнавальный костюм')
                imgui.TextWrapped(u8'Т/Ф - Телефон')
                imgui.Separator()
            end
            if imgui.CollapsingHeader(u8'[3] Негосударственные организации') then
                imgui.TextWrapped(u8'Якудза - Японский ресторан «Якудза»')
                imgui.TextWrapped(u8'Русская мафия - ЧОП «Русский Медведь»')
                imgui.TextWrapped(u8'ЛКН - Гольф-клуб «ЛКН»')
                imgui.TextWrapped(u8'Варлок - Бар «Молли»')
                imgui.TextWrapped(u8'Ацтек - БК «Ацтек»')
                imgui.TextWrapped(u8'Вагос - Агентство «Маленькие шалости»')
                imgui.TextWrapped(u8'Грув - ФК «Грув»')
                imgui.TextWrapped(u8'Рифа – БК «Рифа»')
                imgui.TextWrapped(u8'Ночные волки - Тату-салон «Ночные волки»')
                imgui.TextWrapped(u8'Баллас - ФК «Баллас»')
                imgui.TextWrapped(u8'')
                imgui.TextWrapped(u8'Например: инвайт в рифу на 7 ранг')
                imgui.TextWrapped(u8'Правильный вид: Проходит набор в БК "Рифа" на 7 майку, ждем на районе!')
                imgui.Separator()
            end




        end
        if imgui.CollapsingHeader(u8'Провередние эфиров (ППЭ)') then
            if imgui.CollapsingHeader(u8'[1] Собеседование в СМИ СФ [Забейте собеседование!]') then
                if imgui.Button(u8'Начать собеседование', imgui.ImVec2(150,20)) then
                    lua_thread.create(function()
                        sampSendChat('/news •°•°•°•° Музыкальная заставка Mass Media •°•°•°•°•')
                        wait(7000)
                        sampSendChat('/news Приветствую всех, друзья! В эфире лучшая радиостанция штата г.Сан-Фиерро!')
                        wait(7000)
                        sampSendChat('/news Спешу сообщить, что наша станция открывает целый список вакантных мест.')
                        wait(7000)
                        sampSendChat('/news Будем рады креативным, талантливым, амбициозным и коммуникабельным людям,')
                        wait(7000)
                        sampSendChat('/news Способным вывести лучшую радиостанцию штата на новый уровень!')
                        wait(7000)
                        sampSendChat('/news Смотрели фильм «Девушка с татуировкой дракона» ? Может читали книгу?')
                        wait(7000)
                        sampSendChat('/news Помните какое актёр Дэниела Крэйга провёл расследование?')
                        wait(7000)
                        sampSendChat('/news А что если я скажу, что этот же опыт в сфере журналистики..')
                        wait(7000)
                        sampSendChat('/news ..можно получить именно в нашей Радиостанции?')
                        wait(7000)
                        sampSendChat('/news Ну как? Заинтересованы получением бесценного опыта и навыков?')
                        wait(7000)
                        sampSendChat('/news Если нет, и часть Вас слишком алчна, то и для неё есть умиротворение.')
                        wait(7000)
                        sampSendChat('/news И это, друзья, возможность карьерного роста и космические зарплаты!')
                        wait(7000)
                        sampSendChat('/news Ну что, я убедил вас, что работу лучше искать на нашем радио?')
                        wait(7000)
                        sampSendChat('/news Тогда вы должны прибыть в нашу Радиостанцию прямо сейчас')
                        wait(7000)
                        sampSendChat('/news От Вас требуется: Полный пакет документов, а так же не иметь проблем с законом!')
                        wait(7000)
                        sampSendChat('/news До скорых встреч, уважаемые жители Штата!')
                        wait(7000)
                        sampSendChat('/news •°•°•°•°• Музыкальная заставка Mass Media •°•°•°•°•')
                        imgui.Separator()
                    end)
                end
            end




        end
        if imgui.CollapsingHeader(u8'Реклама организации (Пиар)') then
            if imgui.RadioButtonBool(u8'Начать пиар организации',radioStatus) then
                while true do
                    wait(-1)
                    sampSendChat('/vr СМИ СФ ждет Вас и Ваших объявлений!')
                    wait(31000)
                end
                radioStatus = not radioStatus
            end
            imgui.Separator()
        end


        imgui.EndChild()
        imgui.End()
        imgui.PopStyleVar()
    end
)

Поиск

Поиск

Крашит скрипт

goosik

Участник

Похожие темы