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

FYP

FYP

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

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

976h

Активный
205
58
BakiHanma1 написал(а):
Хелпаните чтоб удаляла все но кроме той 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
 
B

BakiHanma1

Участник
57
7
976h написал(а):
Код: 
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
Нажмите для раскрытия...
И как юзать
 
K

KOCMOCTAP

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

Вложения

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

etma123123

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

deleted-user-222200

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

lua - setcamerabehindplayer | BlastHack — DEV_WIKI

lua function функция setcamerabehindplayer setCameraBehindPlayer Аналог опкода 0373. setCameraBehindPlayer() Описание Устанавливает камеру позади игрока Аргументы Отсутствует. Возвращаемые значения
www.blast.hk www.blast.hk

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

A.Sweet.

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

Вложения

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

w99zzl1

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

Вложения

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

A.Sweet.

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

Вложения

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

chromiusj

Известный
Модератор
5,659
3,961
A.Sweet. написал(а):
Как убрать лимит на 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.

A.Sweet.

Новичок
10
0
ChromiusJ написал(а):
Использовать массивы
Вот тебе пример(тут не используется ничего самповского,сам адаптируешь)
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),
}
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. Carlos777
    Исходник Гайд Изменяем скомпилированные луа-скрипты
      • Нравится
    Ответы
    4
    Просмотры
    5K
    Lua
    MrCreepTon
    MrCreepTon
  2. chapo
    • Закрыта
    • Вопрос
      Помогите дауну в изменении цлео скриптов
      • Нравится
    Ответы
    1
    Просмотры
    935
    Помощь
    enrique newskii
    E
  3. samperskiy
    • Решено
    Помощь в изменении скриптов
      • Bug
    Ответы
    4
    Просмотры
    998
    Помощь
    YarikVL
    YarikVL
  4. Use[R]
    Заказ Фикс клео снегопада
    Ответы
    0
    Просмотры
    617
    Работа и услуги
    Use[R]
    Use[R]
  5. Lumonton
    • Вопрос
    Помощь в изменении скриптов
    Ответы
    16
    Просмотры
    1K
    Помощь
    BakiHanma1
    B
Сверху Снизу