Помощь в изменении скриптов

FYP

Известный
Автор темы
Администратор
1,763
5,890
Здесь вы можете попросить других пользователей внести какие-то небольшие изменения в скрипт, например, изменить активацию.
Для вопросов по программированию и разработке на форуме есть отдельная категория Разработка.

Рекомендации:
  1. Не просите о редактировании .asi, .sf, .luac, .dll, .exe и прочих файлов, не поддающихся простой декомпиляции. Скрипты формата .ahk (AutoHotKey), .lua (Lua/MoonLoader) и .cs (CLEO) легко поддаются изменению.
  2. Сообщения по типу "спасибо, помог" по правилам форума считаются флудом и скорее всего будут удалены. Если вам помогли, вы можете нажать кнопку Мне нравится под ответом - это даст понять, что ответ верный.
  3. За злонамеренное распространение вредоносного ПО - перманентный бан. Имейте это в виду.
Удаление копирайтов является нарушением авторских прав, если автор не дал на это своего разрешения. Правила BlastHack запрещают нарушать авторские права, поэтому если вам нужно их убрать - обращайтесь к автору.
 
Последнее редактирование:

976h

Активный
195
54
Хелпаните чтоб удаляла все но кроме той id которой укажу
Код:
script_name('HideCars')
script_author('xSpiridon')

local s = require 'lib.samp.events'
local BitStreamIO = require 'lib.samp.events.bitstream_io'

local toggle = false
local targetVehicleId = nil

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(2000) end

    sampRegisterChatCommand('hidecars', hidecars)
    wait(-1)
end

function s.onVehicleStreamIn(vehicleId, player)
    if toggle and vehicleId ~= targetVehicleId then
        return false
    end
end

function hidecars(params)
    toggle = not toggle

    if toggle then
        local vehicleId = tonumber(params)
        if not vehicleId then
            sampAddChatMessage('[hide] {FFFFFF}Не верный ID.', 0xFF3F33)
            toggle = false
            return
        end

        targetVehicleId = vehicleId
        sampAddChatMessage('[hide] {FFFFFF}Activated. Выбран ' .. vehicleId .. ' транспорт.', 0xFF3F33)

        local cars = getAllVehicles()
        for i = 1, #cars do
            local res, id = sampGetVehicleIdByCarHandle(cars[i])
            if res and id ~= vehicleId then
                hideCar(id)
            end
        end
    else
        sampAddChatMessage('[hide] {FFFFFF}Deactivated.', 0xFF3F33)
    end
end

function hideCar(id)
    local w = BitStreamIO.bs_write
    local bs = raknetNewBitStream()
    w.int16(bs, id)
    raknetEmulRpcReceiveBitStream(165, bs)
end
 

BakiHanma1

Участник
57
7
Код:
script_name('HideCars')
script_author('xSpiridon')

local s = require 'lib.samp.events'
local BitStreamIO = require 'lib.samp.events.bitstream_io'

local toggle = false
local targetVehicleId = nil

function main()
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(2000) end

    sampRegisterChatCommand('hidecars', hidecars)
    wait(-1)
end

function s.onVehicleStreamIn(vehicleId, player)
    if toggle and vehicleId ~= targetVehicleId then
        return false
    end
end

function hidecars(params)
    toggle = not toggle

    if toggle then
        local vehicleId = tonumber(params)
        if not vehicleId then
            sampAddChatMessage('[hide] {FFFFFF}Не верный ID.', 0xFF3F33)
            toggle = false
            return
        end

        targetVehicleId = vehicleId
        sampAddChatMessage('[hide] {FFFFFF}Activated. Выбран ' .. vehicleId .. ' транспорт.', 0xFF3F33)

        local cars = getAllVehicles()
        for i = 1, #cars do
            local res, id = sampGetVehicleIdByCarHandle(cars[i])
            if res and id ~= vehicleId then
                hideCar(id)
            end
        end
    else
        sampAddChatMessage('[hide] {FFFFFF}Deactivated.', 0xFF3F33)
    end
end

function hideCar(id)
    local w = BitStreamIO.bs_write
    local bs = raknetNewBitStream()
    w.int16(bs, id)
    raknetEmulRpcReceiveBitStream(165, bs)
end
И как юзать
 

KOCMOCTAP

Новичок
3
0
помогите довести до ума,чтобы при вводе команды /aim01 id выдавало блокировку
 

Вложения

  • 1.lua
    947 байт · Просмотры: 2

etma123123

Новичок
5
0
помогите пожалуйста, как сделать из поворота лица
Код:
setCameraPositionUnfixed(-0.3,  math.rad(getCharHeading(PLAYER_PED) - 210))
на поворот самого тела и соотвествено за ним камеру
 
D

deleted-user-222200

Гость
помогите пожалуйста, как сделать из поворота лица
Код:
setCameraPositionUnfixed(-0.3,  math.rad(getCharHeading(PLAYER_PED) - 210))
на поворот самого тела и соотвествено за ним камеру

test:
function main()
    while not isSampAvailable() do wait(100) end
    while true do wait(0)
        setCameraBehindPlayer()
    end
end
 

A.Sweet.

Новичок
10
0
В робо тулс не появляется окно репорта при взятии /ot помогите фиксануть
 

Вложения

  • Robo_Tools (1).lua
    1.2 MB · Просмотры: 1

w99zzl1

Участник
77
7
Измените пожалуйста, чтобы чат НЕ открывался на T
 

Вложения

  • InputHelper.lua
    4 KB · Просмотры: 3

A.Sweet.

Новичок
10
0
Как убрать лимит на function main? после добавления ещё строк выдает ошибку с лимитом
Help pls
 

Вложения

  • Screenshot_124.png
    Screenshot_124.png
    12.4 KB · Просмотры: 8

chromiusj

Kommando-Leiteinheit Bioresonanztechnik-Replika
Модератор
5,500
3,828
Как убрать лимит на function main? после добавления ещё строк выдает ошибку с лимитом
Help pls
Использовать массивы
Вот тебе пример(тут не используется ничего самповского,сам адаптируешь)
Lua:
local servers = {
    '111.111.111.111';
    '111.123.111.111';
    '111.111.255.111';
    '111.211.111.111';
    '123.123.123.123'}
local myServIp = '123.123.123.123'
for k,v in ipairs(servers) do
    if v ~= myServIp then
        print('вам сюда нельзя')
     else
        print('здравствуйте')
    end
end
1705786988700.png
 
  • Нравится
Реакции: A.Sweet.

A.Sweet.

Новичок
10
0
Использовать массивы
Вот тебе пример(тут не используется ничего самповского,сам адаптируешь)
Lua:
local servers = {
    '111.111.111.111';
    '111.123.111.111';
    '111.111.255.111';
    '111.211.111.111';
    '123.123.123.123'}
local myServIp = '123.123.123.123'
for k,v in ipairs(servers) do
    if v ~= myServIp then
        print('вам сюда нельзя')
     else
        print('здравствуйте')
    end
end
Посмотреть вложение 229540
Тоесть после строки function main это вставлять? и код той или иной фишки в массивы?
Можешь подрубить?

function:
function main()
        
    if not isSampLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    
    ip, port = sampGetCurrentServerAddress()

    local server, port = sampGetCurrentServerAddress();
    while server ~= "45.136.204.30" do wait(15); -- aspire
    --while server ~= "46.174.55.45" do wait(15); -- swag
        sampAddChatMessage("TOOLS ASPIRE DOES NOT WORK ON THIS SERVER, ONLY ON ASPIRE: 45.136.204.30:7777", -1);
        sampAddChatMessage("SCRIPT DEVELOPER: A.Sweet, LAST - FAKE", -1);
    end

    local lastver = update():getLastVersion()
    sampAddChatMessage('Скрипт загружен, версия: '..lastver, -1)
    if thisScript().version ~= lastver then
        sampAddChatMessage('Вышло обновление скрипта ('..thisScript().version..' -> '..lastver..'). Скрипт обновляется!', -1)
        update():download()
    end
    if toast_ok then
        toast.Show(u8'Скрипт загружен!', toast.TYPE.INFO, 5)
        --[[
            toast.Show(string text, int type, int duration)

            text - текст уведомления
            type - тип уведомления:
                toast.TYPE.INFO
                toast.TYPE.OK
                toast.TYPE.ERROR
                toast.TYPE.WARN
                toast.TYPE.DEBUG
                *от типа уведомления зависит цвет и текст
            duration - длительность в секундах
        ]]
    else
        sampAddChatMessage('Скрипт загружен! (кстати, у тебя не установлен mimtoasts.lua)', -1)
    end


    --cfg.main.zapusk4 = cfg.main.zapusk4 + 1   
    --if cfg.main.zapusk4 == 1 then
    --ChangeLogWindow.v = true
    --end


        

    fontForRender = renderCreateFont(cfg.Settings.font, cfg.Settings.size, cfg.Settings.style, FCR_BOLD + FCR_BORDER)
    leave = renderCreateFont(cfg.main.QuitFontChecker, cfg.main.leaveSize, cfg.main.leaveStyle, FCR_BOLD + FCR_BORDER)
    connect = renderCreateFont(cfg.main.ConnectFontChecker, cfg.main.connectSize, cfg.main.connectStyle, FCR_BOLD + FCR_BORDER)
    --admincheck = renderCreateFont(cfg.main.ConnectFontChecker, cfg.main.connectSize, cfg.main.connectStyle, FCR_BOLD + FCR_BORDER)
    reg = renderCreateFont(cfg.main.RegFontChecker, cfg.main.regSize, cfg.main.regStyle, FCR_BOLD + FCR_BORDER)
    fonts = {
    playersChecker = renderCreateFont(cfg.main.fontchecker, cfg.main.sizechecker, cfg.main.stylechecker, FCR_BOLD + FCR_SHADOW),
}