LUA скрипт [NL][Source] Draggable state panel

Участник
Участник
Статус
Оффлайн
Регистрация
30 Авг 2020
Сообщения
705
Реакции
404
Не знаю зачем, но уже несколько тем, где юзеры форума ищут такую панель.
Во избежание последующих тем, публикую этот трешкод.
1653873074982.png
code_language.lua:
Expand Collapse Copy
local screen_size = EngineClient.GetScreenSize()
local menu = {
    switch = Menu.SwitchColor("Neverlose", "Switch", false, Color.new(1.0, 1.0, 1.0, 1.0)),
    debug_x = Menu.SliderInt('Neverlose', 'x_pos', screen_size.x/2-750, 1, screen_size.x),
    debug_y = Menu.SliderInt('Neverlose', 'y_pos', screen_size.y/2-50, 1, screen_size.y),
}

local verdanar11 = Render.InitFont('Verdana', 11, {'r'})
-- idc ya musulman
local drag_allah = false
local drag_rahmad = false
--#region statepanel
local allahname = Cheat.GetCheatUserName()
local version = "stable"
local image_size = Vector2.new(30, 30)
local url = "https://neverlose.cc/static/avatars/" ..allahname.. ".png"
local bytes = Http.Get(url)
local image_loaded = Render.LoadImage(bytes, image_size)
Cheat.RegisterCallback('draw', function()
    local x_d, y_d = menu.debug_x:GetInt(), menu.debug_y:GetInt()
    local text_size = Render.CalcTextSize("user: " ..allahname, 11,verdanar11)
    local width = 100 + text_size.x
    menu.debug_x:SetVisible(false)
    menu.debug_y:SetVisible(false)
    if not menu.switch:GetBool() then return end
    if Cheat.IsMenuVisible() or  EngineClient.IsConnected() then
        Render.Blur(Vector2.new(x_d,y_d),Vector2.new(x_d + width,y_d + 35))
       Render.Image(image_loaded, Vector2.new(x_d, y_d + 2.5), image_size)
       Render.Text("yougame.biz", Vector2.new(x_d + 34, y_d + 4.5), Color.new(1, 1, 1, 1), 11, verdanar11)
       Render.Text("user: " ..allahname, Vector2.new(x_d + 34, y_d + 16), Color.new(1, 1, 1, 1), 11, verdanar11)
       Render.Text("[" ..version.. "]" , Vector2.new(x_d + 36 + text_size.x, y_d + 16), Color.new(menu.switch:GetColor().r, menu.switch:GetColor().g, menu.switch:GetColor().b, 1), 11, verdanar11)

        local mouse = Cheat.GetMousePos()
        if Cheat.IsKeyDown(1) and Cheat.IsMenuVisible() and drag_rahmad == false then
            if mouse.x >= x_d and mouse.y >= y_d and mouse.x <= x_d + width and mouse.y <= y_d + 18 or drag_allah then
                if not drag_allah then
                    drag_allah = true
                else
                    menu.debug_x:SetInt(mouse.x - math.floor(width / 2))
                    menu.debug_y:SetInt(mouse.y - 8)
                end
            end
        else
            drag_allah = false
        end
    end
end)
--#endregion
 
спасибо
 
Отличные драги бро, мышка к центру не клеится точно же
 
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
код просто пушечка
 
что надо дописать чтоб можно было кастом ник ставить заранее спасибо
 
what needs to be added so that you can set a custom nickname thanks in advance

Код:
Expand Collapse Copy
local screen_size = EngineClient.GetScreenSize()
local menu = {
    switch = Menu.Switch("Neverlose", "Switch", false),
    shit = Menu.TextBox("Neverlose", "Name", 10, Cheat.GetCheatUserName()),
    debug_x = Menu.SliderInt('Neverlose', 'x_pos', screen_size.x/2-750, 1, screen_size.x),
    debug_y = Menu.SliderInt('Neverlose', 'y_pos', screen_size.y/2-50, 1, screen_size.y),
}

local verdanar11 = Render.InitFont('Verdana', 11, {'r'})
-- idc ya muslim
local drag_allah = false
local drag_rahmad = false
--#region statepanel
local allahname = Cheat.GetCheatUserName()
local version = "stable"
local image_size = Vector2.new(30, 30)
local url = "https://neverlose.cc/static/avatars/" ..allahname.. ".png"
local bytes = Http.Get(url)
local image_loaded = Render.LoadImage(bytes, image_size)
Cheat.RegisterCallback('draw', function()
    local x_d, y_d = menu.debug_x:GetInt(), menu.debug_y:GetInt()
    local text_size = Render.CalcTextSize("user: " ..allahname, 11,verdanar11)
    local width = 100 + text_size.x
    local usersname = menu.shit:Get()
    menu.debug_x:SetVisible(false)
    menu.debug_y:SetVisible(false)
    if not menu.switch:GetBool() then return end
    if Cheat.IsMenuVisible() or  EngineClient.IsConnected() then
        Render.Blur(Vector2.new(x_d,y_d),Vector2.new(x_d + width,y_d + 35))
       Render.Image(image_loaded, Vector2.new(x_d, y_d + 2.5), image_size)
       Render.Text("yougame.biz", Vector2.new(x_d + 34, y_d + 4.5), Color.new(1, 1, 1, 1), 11, verdanar11)
       Render.Text("user: " ..usersname.. " [" ..version.. "]", Vector2.new(x_d + 34, y_d + 16), Color.new(1, 1, 1, 1), 11, verdanar11)

        local mouse = Cheat.GetMousePos()
        if Cheat.IsKeyDown(1) and Cheat.IsMenuVisible() and drag_rahmad == false then
            if mouse.x >= x_d and mouse.y >= y_d and mouse.x <= x_d + width and mouse.y <= y_d + 18 or drag_allah then
                if not drag_allah then
                    drag_allah = true
                else
                    menu.debug_x:SetInt(mouse.x - math.floor(width / 2))
                    menu.debug_y:SetInt(mouse.y - 8)
                end
            end
        else
            drag_allah = false
        end
    end
end)
--#endregion
 
Назад
Сверху Снизу