Ищю fast su

W1ll04eison

Участник
Автор темы
328
19
Скиньте пожалуйста ссылку на fast su, что бы прописал /su id, *жмёшь "enter" * и у тебя вылазит окно имгуи / диалоговое окно и там выберешь статью по которой выдать розыск
 
Решение
/su [id]
1623962351031.png

Lua:
local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local window = imgui.ImBool(false)

local reasons = {
    {'Нассал на мента', '1.1'},
    {'Подкинул подкинутые наркотики', '1.2'},
    {'Убил свинью в маинкрафте', '1.3'},
}

local selected = 1
local id = 0

function main()
    while not isSampAvailable() do wait(200) end
    sampRegisterChatCommand('su', function(arg)
        id = tonumber(arg)
        window.v = true
    end)
    imgui.Process = false
    window.v = false  --show window
    while true do
        wait(0)
        imgui.Process = window.v
    end
end

function imgui.OnDrawFrame()
    if window.v then...

chapo

🫡 В армии с 17.10.2023. В ЛС НЕ ОТВЕЧАЮ
Друг
8,777
11,224
/su [id]
1623962351031.png

Lua:
local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local window = imgui.ImBool(false)

local reasons = {
    {'Нассал на мента', '1.1'},
    {'Подкинул подкинутые наркотики', '1.2'},
    {'Убил свинью в маинкрафте', '1.3'},
}

local selected = 1
local id = 0

function main()
    while not isSampAvailable() do wait(200) end
    sampRegisterChatCommand('su', function(arg)
        id = tonumber(arg)
        window.v = true
    end)
    imgui.Process = false
    window.v = false  --show window
    while true do
        wait(0)
        imgui.Process = window.v
    end
end

function imgui.OnDrawFrame()
    if window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(350.0, 250.0), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(250.0, 150.0), imgui.Cond.FirstUseEver)
        imgui.Begin(u8'Выдача розыска игроку '..sampGetPlayerNickname(id), window)

        for i = 1, #reasons do
            if imgui.Selectable(u8(reasons[i][1]), selected == i) then
                selected = i
                sampSendChat('/su '..id..' '..reasons[i][2])
                window.v = false
            end
        end

        imgui.End()
    end
end
 

W1ll04eison

Участник
Автор темы
328
19
/su [id]
Посмотреть вложение 101460
Lua:
local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local window = imgui.ImBool(false)

local reasons = {
    {'Нассал на мента', '1.1'},
    {'Подкинул подкинутые наркотики', '1.2'},
    {'Убил свинью в маинкрафте', '1.3'},
}

local selected = 1
local id = 0

function main()
    while not isSampAvailable() do wait(200) end
    sampRegisterChatCommand('su', function(arg)
        id = tonumber(arg)
        window.v = true
    end)
    imgui.Process = false
    window.v = false  --show window
    while true do
        wait(0)
        imgui.Process = window.v
    end
end

function imgui.OnDrawFrame()
    if window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(350.0, 250.0), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(250.0, 150.0), imgui.Cond.FirstUseEver)
        imgui.Begin(u8'Выдача розыска игроку '..sampGetPlayerNickname(id), window)

        for i = 1, #reasons do
            if imgui.Selectable(u8(reasons[i][1]), selected == i) then
                selected = i
                sampSendChat('/su '..id..' '..reasons[i][2])
                window.v = false
            end
        end

        imgui.End()
    end
end
А какая переменная отвечает за кол-во звёзд?
 

chapo

🫡 В армии с 17.10.2023. В ЛС НЕ ОТВЕЧАЮ
Друг
8,777
11,224
/su (id) (звезды) (причина)
1623963712596.png

Lua:
local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local window = imgui.ImBool(false)

local reasons = {
    {'Нассал на мента', 1, '1.1'},
    {'Подкинул подкинутые наркотики', 2, '1.2'},
    {'Убил свинью в маинкрафте', 3, '1.3'},
}

local selected = 1
local id = 0

function main()
    while not isSampAvailable() do wait(200) end
    sampRegisterChatCommand('su', function(arg)
        id = tonumber(arg)
        window.v = true
    end)
    imgui.Process = false
    window.v = false  --show window
    while true do
        wait(0)
        imgui.Process = window.v
    end
end

function imgui.OnDrawFrame()
    if window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(350.0, 250.0), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(250.0, 150.0), imgui.Cond.FirstUseEver)
        imgui.Begin(u8'Выдача розыска игроку '..sampGetPlayerNickname(id), window)

        for i = 1, #reasons do
            if imgui.Selectable(u8(reasons[i][1]..' ('..reasons[i][2]..')'), selected == i) then
                selected = i
                sampSendChat('/su '..id..' '..reasons[i][2]..' '..reasons[i][3])
                window.v = false
            end
        end

        imgui.End()
    end
end
 

ARMOR

kjor32 is legend
Модератор
4,852
6,083
Посмотреть вложение 101463
Lua:
local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local window = imgui.ImBool(false)

local reasons = {
    {'Нассал на мента', 1, '1.1'},
    {'Подкинул подкинутые наркотики', 2, '1.2'},
    {'Убил свинью в маинкрафте', 3, '1.3'},
}

local selected = 1
local id = 0

function main()
    while not isSampAvailable() do wait(200) end
    sampRegisterChatCommand('su', function(arg)
        id = tonumber(arg)
        window.v = true
    end)
    imgui.Process = false
    window.v = false  --show window
    while true do
        wait(0)
        imgui.Process = window.v
    end
end

function imgui.OnDrawFrame()
    if window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(350.0, 250.0), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(250.0, 150.0), imgui.Cond.FirstUseEver)
        imgui.Begin(u8'Выдача розыска игроку '..sampGetPlayerNickname(id), window)

        for i = 1, #reasons do
            if imgui.Selectable(u8(reasons[i][1]..' ('..reasons[i][2]..')'), selected == i) then
                selected = i
                sampSendChat('/su '..id..' '..reasons[i][2]..' '..reasons[i][3])
                window.v = false
            end
        end

        imgui.End()
    end
end
Как по мне за 3 надо сразу казнить!
 
  • Ха-ха
Реакции: chapo

Dezmondli

Активный
405
78
/su [id]
Посмотреть вложение 101460
Lua:
local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local window = imgui.ImBool(false)

local reasons = {
    {'Нассал на мента', '1.1'},
    {'Подкинул подкинутые наркотики', '1.2'},
    {'Убил свинью в маинкрафте', '1.3'},
}

local selected = 1
local id = 0

function main()
    while not isSampAvailable() do wait(200) end
    sampRegisterChatCommand('su', function(arg)
        id = tonumber(arg)
        window.v = true
    end)
    imgui.Process = false
    window.v = false  --show window
    while true do
        wait(0)
        imgui.Process = window.v
    end
end

function imgui.OnDrawFrame()
    if window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(350.0, 250.0), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(250.0, 150.0), imgui.Cond.FirstUseEver)
        imgui.Begin(u8'Выдача розыска игроку '..sampGetPlayerNickname(id), window)

        for i = 1, #reasons do
            if imgui.Selectable(u8(reasons[i][1]), selected == i) then
                selected = i
                sampSendChat('/su '..id..' '..reasons[i][2])
                window.v = false
            end
        end

        imgui.End()
    end
end
4 добавь, выбил Леона
 

W1ll04eison

Участник
Автор темы
328
19
Посмотреть вложение 101463
Lua:
local imgui = require('imgui')
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local window = imgui.ImBool(false)

local reasons = {
    {'Нассал на мента', 1, '1.1'},
    {'Подкинул подкинутые наркотики', 2, '1.2'},
    {'Убил свинью в маинкрафте', 3, '1.3'},
}

local selected = 1
local id = 0

function main()
    while not isSampAvailable() do wait(200) end
    sampRegisterChatCommand('su', function(arg)
        id = tonumber(arg)
        window.v = true
    end)
    imgui.Process = false
    window.v = false  --show window
    while true do
        wait(0)
        imgui.Process = window.v
    end
end

function imgui.OnDrawFrame()
    if window.v then
        imgui.SetNextWindowPos(imgui.ImVec2(350.0, 250.0), imgui.Cond.FirstUseEver)
        imgui.SetNextWindowSize(imgui.ImVec2(250.0, 150.0), imgui.Cond.FirstUseEver)
        imgui.Begin(u8'Выдача розыска игроку '..sampGetPlayerNickname(id), window)

        for i = 1, #reasons do
            if imgui.Selectable(u8(reasons[i][1]..' ('..reasons[i][2]..')'), selected == i) then
                selected = i
                sampSendChat('/su '..id..' '..reasons[i][2]..' '..reasons[i][3])
                window.v = false
            end
        end

        imgui.End()
    end
end
Подскажи, как сделать что бы статьи можно было добовлять / удалять на кнопку и они cохронялись или в ini или в txt
 
Последнее редактирование:

chapo

🫡 В армии с 17.10.2023. В ЛС НЕ ОТВЕЧАЮ
Друг
8,777
11,224

Похожие темы

  1. Ответы
    16
    Просмотры
    5K