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

FYP

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

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

YarikVL

Известный
Проверенный
4,783
1,807
Добрый вечер, можете пофиксить скрипт? Не работает почему-то, хотел привязку к нику сделать, в итоге он вообще перестал работать. Так же активация по команде, без окошек и прочего
CAB5C9E0-28B8-4A24-AC33-60FE70D87A24.png
У тебя по ссылке ничего нету. Пример нормальной ссылки: https://pastebin.com/raw/P67fVhsA
И ты вставил этот код https://www.blast.hk/threads/52963/post-482157 без последней строки
Вот:
Lua:
require("moonloader")
local requests = require('requests')

function main()
    while not isSampAvailable() do wait(0) end
    local request = requests.get('ТВОЯ НОРМ ССЫЛКА')
    local nick = sampGetPlayerNickname(select(2, sampGetPlayerIdByCharHandle(PLAYER_PED)))
    local function res()
        for n in request.text:gmatch('[^\r\n]+') do
            if nick:find(n) then return true end
        end
        return false
    end
    if not res() then error('не привязан иди покупай') thisScript():unload() end
    sampAddChatMessage('скрипт загружен автор Kisel', -1)
    cmd_loadklad()
end
    
function cmd_loadklad()
    lua_thread.create(function ()
        printStringNow("Loading...", 3000)
        wait(3000)
        createPickup(19198, 22, 1049.3993, -1605.1897, 42.1206) -- ниже лютый говнокод
        createPickup(19198, 22, 1001.7103, -1567.8411, 43.4395)
        createPickup(19198, 22, 1011.0864, -1563.5194, 43.6225)
        createPickup(19198, 22, 1051.7543, -1540.1603, 39.4463)
        createPickup(19198, 22, 1049.4836, -1498.2319, 39.8565)
        createPickup(19198, 22, 1070.2572, -1626.1534, 39.0552)
        createPickup(19198, 22, 972.0224, -1600.2905, 40.7207)
        createPickup(19198, 22, 971.0995, -1552.0247, 42.9974)
        createPickup(19198, 22, 1039.8345, -1562.71, 42.0695)
        createPickup(19198, 22, 994.6571, -1614.222, 46.7892)
        createPickup(19198, 22, 1054.0134, -19605.4868, 39.6835)
        createPickup(19198, 22, 959.8195, -1578.8711, 40.2791)
        createPickup(19198, 22, 1012.8303, -1529.0876, 39.6697)
        createPickup(19198, 22, 1045.7712, -1536.5555, 42.4047)
        createPickup(19198, 22, 999.8335, -1631.9478, 40.7406)
        createPickup(19198, 22, 1033.3955, -1530.1747, 39.5464)
        createPickup(19198, 22, 993.4799, -1576.2223, 40.4328)
        createPickup(19198, 22, 999.6973, -1510.9559, 39.2782)
        createPickup(19198, 22, 1025.7268, -1572.993, 39.5777)
        createPickup(19198, 22, 1009.4612, -1555.9109, 39.9372)
        createPickup(19198, 22, 1020.3666, -1512.7859, 38.9541)
        createPickup(19198, 22, 1022.7631, -1619.8114, 43.4246)
        createPickup(19198, 22, 979.869, -1631.4923, 40.8246)
        createPickup(19198, 22, 1030.3613, -1614.1272, 39.6846)
        createPickup(19198, 22, 1037.7312, -1577.8698, 39.6005)
        createPickup(19198, 22, 988.2701, -1557.767, 40.3047)
        createPickup(19198, 22, 1016.8527, -1588.4268, 39.7132)
        createPickup(19198, 22, 977.0855, -1567.6987, 44.7845)
        createPickup(19198, 22, 967.2654, -1565.2051, 40.1999)
        createPickup(19198, 22, 1007.472, -1643.8732, 40.7879)
        createPickup(19198, 22, 1002.9727, -1572.5625, 43.5269)
        createPickup(19198, 22, 1004.2567, -1595.2853, 40.3417)
        createPickup(19198, 22, 1016.9865, -1497.0132, 39.5996)
        createPickup(19198, 22, 1013.3723, -1627.218, 43.0436)
        createPickup(19198, 22, 991.5828, -1547.6567, 45.9798)
        createPickup(19198, 22, 1046.4805, -1592.951, 39.3737)
        createPickup(19198, 22, 968.2939, -1589.8623, 40.6679)
        createPickup(19198, 22, 1044.4313, -1580.0198, 43.1965)
        createPickup(19198, 22, 1022.3918, -1587.3149, 39.8893)
        createPickup(19198, 22, 1061.009, -1534.9148, 39.5278)
        createPickup(19198, 22, 1037.6663, -1516.1077, 46.3129)
        createPickup(19198, 22, 992.4428, -1539.2546, 42.8834)
        createPickup(19198, 22, 994.1952, -1621.097, 47.7821)
        createPickup(19198, 22, 958.9617, -1558.2646, 39.8422)
        createPickup(19198, 22, 1009.499, -1502.0016, 39.1223)
        createPickup(19198, 22, 974.3287, -1583.839, 40.6148)
        createPickup(19198, 22, 1048.1244, -1583.5793, 42.5421)
        createPickup(19198, 22, 989.3378, -1519.4415, 40.207)
        createPickup(19198, 22, 989.1219, -1519.6274, 40.2131)
        createPickup(19198, 22, 987.3886, -1542.7433, 42.8205)
        createPickup(19198, 22, 1019.8171, -1563.1049, 39.766)
        createPickup(19198, 22, 1051.5787, -1598.4702, 42.4189)
        createPickup(19198, 22, 980.0795, -1614.7781, 40.6973)
        createPickup(19198, 22, 1034.9962, -1519.5455, 46.4201)
        createPickup(19198, 22, 1030.5341, -1582.3368, 39.6308)
        createPickup(19198, 22, 1048.6765, -1599.2252, 42.3318)
        createPickup(19198, 22, 1010.9828, -1570.6777, 42.5269)
        createPickup(19198, 22, 1053.887, -1559.5317, 39.6837)
        createPickup(19198, 22, 1054.7396, -1603.3763, 45.1354)
        createPickup(19198, 22, 1029.0403, -1540.5514, 39.6915)
        createPickup(19198, 22, 1047.7787, -1513.2068, 39.657)
        createPickup(19198, 22, 965.2219, -1559.0643, 43.2043)
        createPickup(19198, 22, 975.4958, -1575.4025, 44.3244)
        createPickup(19198, 22, 974.3191, -1544.8898, 39.2416)
        createPickup(19198, 22, 1020.5318, -1505.8093, 39.3961)
        createPickup(19198, 22, 998.2997, -1586.0221, 40.3877)
        createPickup(19198, 22, 1067.1544, -1630.7605, 39.4139)
        createPickup(19198, 22, 1029.9623, -1621.5646, 39.8431)
        createPickup(19198, 22, 1020.2825, -1610.5986, 39.9632)
        createPickup(19198, 22, 997.355, -1570.2292, 43.6246)
        createPickup(19198, 22, 1031.0071, -1557.3411, 41.945)
        createPickup(19198, 22, 1036.8119, -1565.5103, 42.1302)
        createPickup(19198, 22, 974.6442, -1538.0601, 39.3429)
        createPickup(19198, 22, 1023.79, -1637.885, 40.5848)
        createPickup(19198, 22, 1005.2834, -1516.1671, 39.2386)
        createPickup(19198, 22, 1023.6199, -1535.5889, 39.6703)
        createPickup(19198, 22, 989.6918, -1614.1323, 47.1209)
        createPickup(19198, 22, 1044.0707, -1544.0055, 39.711)
        createPickup(19198, 22, 1047.8672, -1574.8307, 39.4632)
        createPickup(19198, 22, 1005.6345, -1534.3062, 39.9242)
        createPickup(19198, 22, 1010.497, -1577.251, 43.5107)
        createPickup(19198, 22, 1006.2818, -1619.9528, 40.4273)
        createPickup(19198, 22, 1042.5155, -1616.3644, 39.3822)
        createPickup(19198, 22, 1020.3715, -1631.3732, 43.8495)
        createPickup(19198, 22, 952.1982, -1549.4775, 39.7848)
        createPickup(19198, 22, 952.1982, -1549.4775, 39.7848)
        createPickup(19198, 22, 1036.5966, -1588.7078, 39.6906)
        createPickup(19198, 22, 1019.2537, -1602.2709, 39.8841)
        createPickup(19198, 22, 977.8057, -1557.2695, 40.1931)
        createPickup(19198, 22, 1052.4292, -1587.5088, 42.8333)
        createPickup(19198, 22, 1021.7408, -1566.571, 39.7063)
        createPickup(19198, 22, 1043.9594, -1493.9108, 39.8605)
        createPickup(19198, 22, 1049.4409, -1520.0779, 39.6094)
        createPickup(19198, 22, 953.7312, -1570.3145, 39.8308)
        createPickup(19198, 22, 1009.7413, -1608.1587, 40.1897)
        createPickup(19198, 22, 1034.7457, -1600.9363, 39.63)
        createPickup(19198, 22, 1065.8691, -1604.7229, 38.8079)
        createPickup(19198, 22, 1044.4185, -1580.0253, 43.1977)
        createPickup(19198, 22, 988.3647, -1532.0493, 39.9409)
        createPickup(19198, 22, 982.2265, -1525.1765, 40.2088)
        createPickup(19198, 22, 1033.2094, -1641.1611, 40.397)
        createPickup(19198, 22, 981.581, -1625.4614, 40.8144)
        createPickup(19198, 22, 994.9526, -1525.1147, 40.1067)
        createPickup(19198, 22, 1017.5245, -1574.7766, 43.4288)
        createPickup(19198, 22, 1044.879, -1565.6971, 39.5417)
        createPickup(19198, 22, 981.5077, -1583.1827, 43.8755)
        createPickup(19198, 22, 949.9474, -1557.2815, 39.5616)
        createPickup(19198, 22, 1038.2892, -1535.7783, 39.6577)
        createPickup(19198, 22, 983.7878, -1589.709, 44.0063)
        createPickup(19198, 22, 1008.2804, -1637.2924, 40.7829)
        createPickup(19198, 22, 996.7852, -1563.7628, 40.3168)
        createPickup(19198, 22, 1035.8092, -1559.6384, 41.903)
        createPickup(19198, 22, 1008.9299, -1583.6261, 39.7487)
        createPickup(19198, 22, 1028.5438, -1601.4269, 39.7166)
        createPickup(19198, 22, 981.5604, -1599.8075, 40.6023)
        createPickup(19198, 22, 993.0107, -1638.814, 40.812)
        createPickup(19198, 22, 983.9758, -1547.5118, 39.415)
        createPickup(19198, 22, 988.8759, -1619.8175, 47.9138)
        createPickup(19198, 22, 968.787, -1575.1124, 40.4147)
        createPickup(19198, 22, 1051.4075, -1530.9238, 42.663)
        createPickup(19198, 22, 1030.9447, -1492.6658, 40.4035)
        createPickup(19198, 22, 994.6598, -1609.5571, 47.1616)
        sampAddChatMessage("[KLAD HELPER]: Клады загружены!", 11259375)
    end)
end
Если скрипт какой-либо не работает - прикрепляй moonloader.log
 

YarikVL

Известный
Проверенный
4,783
1,807
Сделайте зажимной рабочий piss пожалуйста
Скрипт сейчас по нажатию P работает? Типо анимация запускается? Если да то:
Lua:
require "lib.moonloader"
function main()
    while not isSampAvailable() do wait(0) end
    while true do
        wait(0)
        if wasKeyPressed(VK_P) and not sampIsCursorActive() then
            sampSetSpecialAction(68)
        end
    end
end
При зажатии P будет вечно запускаться скрипт
 
Скрипт сейчас по нажатию P работает? Типо анимация запускается? Если да то:
Lua:
require "lib.moonloader"
function main()
    while not isSampAvailable() do wait(0) end
    while true do
        wait(0)
        if wasKeyPressed(VK_P) and not sampIsCursorActive() then
            sampSetSpecialAction(68)
        end
    end
end
При зажатии P будет вечно запускаться скрипт
Ты не понял, я имел ввиду что бы когда зажимаю клавишу анимка срабатывала, а как отпускаю она выключалась <3
 

keva1337

Новичок
4
1
помогите, надо изменить клавишу открытия капчи с N на END
 

Вложения

  • treningcaptchi.lua
    6.6 KB · Просмотры: 5

YarikVL

Известный
Проверенный
4,783
1,807
помогите, надо изменить клавишу открытия капчи с N на END
Lua:
script_name('TreningCaptchi')
script_author('Flake')

local q = require 'lib.samp.events'
require "lib.moonloader"
local inicfg = require 'inicfg'
local vkeys = require 'vkeys'
local imgui = require 'imgui'
local mem = require 'memory'
local time = nil
local captime = nil
local t = 0
local captcha = ''
local captchaTable = {}

function main()
    repeat wait(0) until isSampAvailable()
    sampRegisterChatCommand("captcha", function() state = not state
        sampAddChatMessage((state and '{24ff86}[TreningCaptchi{24ff86}] {ffffff}Тренировка капчи включена.' or '{24ff86}[TreningCaptchi{24ff86}] {ffffff}Тренировка капчи выключена.'), -1)
    end)
    sampAddChatMessage("{24ff86}[TreningCaptchi{d1b02c}1.1 by flake{24ff86}] {ffffff}Успешно загружен! Команда: /captcha Активация N англ.",-1)

  while true do wait(0)
    if state then
    if wasKeyPressed(VK_END) and not sampIsChatInputActive() and not sampIsDialogActive() then showCaptcha() end
    local result, button, list, input = sampHasDialogRespond(8813)
    if result then
      if button == 1 then
        if input == captcha..'0' then sampAddChatMessage(string.format('{24ff86}[TreningCaptchi{24ff86}] {ffffff}Код верный [%.3f]', os.clock() - captime), -1)
        elseif input ~= captcha..'0' then sampAddChatMessage(string.format('{24ff86}[TreningCaptchi{24ff86}] {ffffff}Неверный код! [%.3f] ('..captcha..'0|'..input..')', os.clock() - captime), -1) end
                end
      removeTextdraws()
            end   
        end
    end
end

function removeTextdraws()
  if t > 0 then
    for i = 1, t do sampTextdrawDelete(i) end
    t = 0
    captcha = ''
    captime = nil
  end
end

function GenerateTextDraw(id, PosX, PosY)
  if id == 0 then
    t = t + 1
    sampTextdrawCreate(t, "LD_SPAC:white", PosX - 5, PosY + 7)
    sampTextdrawSetLetterSizeAndColor(t, 0, 3, 0x80808080)
    sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, PosX+5, 0.000000)
  elseif id == 1 then
    for i = 0, 1 do
        t = t + 1
        if i == 0 then offsetX = 3; offsetBX = 15 else offsetX = -3; offsetBX = -15; end
        sampTextdrawCreate(t, "LD_SPAC:white", PosX - offsetX, PosY)
        sampTextdrawSetLetterSizeAndColor(t, 0, 4.5, 0x80808080)
        sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, PosX-offsetBX, 0.000000)
    end
  elseif id == 2 then
    for i = 0, 1 do
        t = t + 1
        if i == 0 then offsetX = -8; offsetY = 7 offsetBX = 15 else offsetX = 6; offsetY = 25 offsetBX = -15; end
        sampTextdrawCreate(t, "LD_SPAC:white", PosX - offsetX, PosY + offsetY)
        sampTextdrawSetLetterSizeAndColor(t, 0, 0.8, 0x80808080)
        sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, PosX-offsetBX, 0.000000)
    end
  elseif id == 3 then
    for i = 0, 1 do
        t = t + 1
        if i == 0 then size = 0.8; offsetY = 7 else size = 1; offsetY = 25 end
        sampTextdrawCreate(t, "LD_SPAC:white", PosX+10, PosY+offsetY)
        sampTextdrawSetLetterSizeAndColor(t, 0, 1, 0x80808080)
        sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, PosX-15, 0.000000)
    end
  elseif id == 4 then
    for i = 0, 1 do
        t = t + 1
        if i == 0 then size = 1.8; offsetX = -10; offsetY = 0 offsetBX = 10 else size = 2; offsetX = -10; offsetY = 25 offsetBX = 15; end
        sampTextdrawCreate(t, "LD_SPAC:white", PosX - offsetX, PosY + offsetY)
        sampTextdrawSetLetterSizeAndColor(t, 0, size, 0x80808080)
        sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, PosX-offsetBX, 0.000000)
    end
  elseif id == 5 then
    for i = 0, 1 do
        t = t + 1
        if i == 0 then size = 0.8; offsetX = 8; offsetY = 7 offsetBX = -15 else size = 1; offsetX = -10; offsetY = 25 offsetBX = 15; end
        sampTextdrawCreate(t, "LD_SPAC:white", PosX - offsetX, PosY + offsetY)
        sampTextdrawSetLetterSizeAndColor(t, 0, size, 0x80808080)
        sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, PosX-offsetBX, 0.000000)
    end
  elseif id == 6 then
    for i = 0, 1 do
        t = t + 1
        if i == 0 then size = 0.8; offsetX = 7.5; offsetY = 7 offsetBX = -15 else size = 1; offsetX = -10; offsetY = 25 offsetBX = 10; end
        sampTextdrawCreate(t, "LD_SPAC:white", PosX - offsetX, PosY + offsetY)
        sampTextdrawSetLetterSizeAndColor(t, 0, size, 0x80808080)
        sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, PosX-offsetBX, 0.000000)
    end
  elseif id == 7 then
    t = t + 1
    sampTextdrawCreate(t, "LD_SPAC:white", PosX - 13, PosY + 7)
    sampTextdrawSetLetterSizeAndColor(t, 0, 3.75, 0x80808080)
    sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, PosX+5, 0.000000)
  elseif id == 8 then
    for i = 0, 1 do
        t = t + 1
        if i == 0 then size = 0.8; offsetY = 7 else size = 1; offsetY = 25 end
        sampTextdrawCreate(t, "LD_SPAC:white", PosX+10, PosY+offsetY)
        sampTextdrawSetLetterSizeAndColor(t, 0, 1, 0x80808080)
        sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, PosX-10, 0.000000)
    end
  elseif id == 9 then
    for i = 0, 1 do
        t = t + 1
        if i == 0 then size = 0.8; offsetY = 6; offsetBX = 10; else size = 1; offsetY = 25; offsetBX = 15; end
        sampTextdrawCreate(t, "LD_SPAC:white", PosX+10, PosY+offsetY)
        sampTextdrawSetLetterSizeAndColor(t, 0, 1, 0x80808080)
        sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, PosX-offsetBX, 0.000000)
    end
  end
end

function showCaptcha()
    removeTextdraws()
    t = t + 1
    sampTextdrawCreate(t, "LD_SPAC:white", 220, 120)
    sampTextdrawSetLetterSizeAndColor(t, 0, 6.5, 0x80808080)
    sampTextdrawSetBoxColorAndSize(t, 1, 0xFF1A2432, 380, 0.000000)
      
    t = t + 1
    sampTextdrawCreate(t, "LD_SPAC:white", 225, 125)
    sampTextdrawSetLetterSizeAndColor(t, 0, 5.5, 0x80808080)
    sampTextdrawSetBoxColorAndSize(t, 1, 0xFF759DA3, 375, 0.000000)
    nextPos = -30.0;
      
    math.randomseed(os.time())
    for i = 1, 4 do
        a = math.random(0, 9)
        table.insert(captchaTable, a)
        captcha = captcha..a
    end
      
    for i = 0, 4 do
        nextPos = nextPos + 30
        t = t + 1
        sampTextdrawCreate(t, "usebox", 240 + nextPos, 130)
        sampTextdrawSetLetterSizeAndColor(t, 0, 4.5, 0x80808080)
        sampTextdrawSetBoxColorAndSize(t, 1, 0xFF1A2432, 30, 25.000000)
        sampTextdrawSetAlign(t, 2)
        if i < 4 then GenerateTextDraw(captchaTable[i + 1], 240 + nextPos, 130, 3 + i * 2)
        else GenerateTextDraw(0, 240 + nextPos, 130, 3 + i * 10) end
    end
    captchaTable = {}
    sampShowDialog(8813, '{F89168}Тренировка капчи', '{FFFFFF}Введите {C6FB4A}5{FFFFFF} символов, которые\nвидно на {C6FB4A}вашем{FFFFFF} экране.', 'Принять', 'Отмена', 1)
    captime = os.clock()
end
 

.soler.

Участник
51
2
Это вх. Измените пожалуйста активацию на Left Alt+1
 

Вложения

  • SF Integration.lua
    4.2 KB · Просмотры: 5

deadfamq

Участник
108
22
Это вх. Измените пожалуйста активацию на Left Alt+1
держи, активация 1+ left alt, чет не получалось, но, думаю проблемы не возникнет.
Lua:
script_name("Skeletal WallHack")
script_version_number(1)
script_description("thx to Valdan666 and FYP")
script_author("AppleThe & hnnssy")

local ffi = require "ffi"
local getBonePosition = ffi.cast("int (__thiscall*)(void*, float*, int, bool)", 0x5E4280)
require "lib.moonloader"
local mem = require "memory"

--// *** // *** //--
whVisible = "all" -- Мод ВХ по умолчанию. Моды написаны в комментарии ниже
optionsCommand = "dmginfo" -- Моды ВХ: bones - только кости / names - только ники, all - всё сразу
defaultState = false -- Запуск ВХ при старте игры
--// *** // *** //--

function main()
    if not isSampLoaded() or not isCleoLoaded() or not isSampfuncsLoaded() then return end
    while not isSampAvailable() do wait(100) end
    sampRegisterChatCommand(optionsCommand, function(param)
        if param == "bones" then whVisible = param; nameTagOff()
        elseif param == "names" or param == "all" then whVisible = param if not nameTag then nameTagOn() end
        else sampAddChatMessage("Введите корректный режим: {CCCCFF}names{4444FF}/{CCCCFF}bones{4444FF}/{CCCCFF}all", 0xFF4444FF) end
    end)
    while not sampIsLocalPlayerSpawned() do wait(100) end
    if defaultState and not nameTag then nameTagOn() end
    while true do
        wait(0)
        if wasKeyPressed(VK_MENU) and wasKeyPressed(VK_1) then;
            if defaultState then
                defaultState = false;
                nameTagOff();
                while isKeyDown(VK_MENU) and isKeyDown(VK_1) do wait(100) end
            else
                defaultState = true;
                if whVisible ~= "bones" and not nameTag then nameTagOn() end
                while isKeyDown(VK_MENU) and isKeyDown(VK_1) do wait(100) end
            end
        end
        if defaultState and whVisible ~= "names" then
            if not isPauseMenuActive() and not isKeyDown(VK_F8) then
                for i = 0, sampGetMaxPlayerId() do
                if sampIsPlayerConnected(i) then
                    local result, cped = sampGetCharHandleBySampPlayerId(i)
                    local color = sampGetPlayerColor(i)
                    local aa, rr, gg, bb = explode_argb(color)
                    local color = join_argb(255, rr, gg, bb)
                    if result then
                        if doesCharExist(cped) and isCharOnScreen(cped) then
                            local t = {3, 4, 5, 51, 52, 41, 42, 31, 32, 33, 21, 22, 23, 2}
                            for v = 1, #t do
                                pos1X, pos1Y, pos1Z = getBodyPartCoordinates(t[v], cped)
                                pos2X, pos2Y, pos2Z = getBodyPartCoordinates(t[v] + 1, cped)
                                pos1, pos2 = convert3DCoordsToScreen(pos1X, pos1Y, pos1Z)
                                pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
                                renderDrawLine(pos1, pos2, pos3, pos4, 1, color)
                            end
                            for v = 4, 5 do
                                pos2X, pos2Y, pos2Z = getBodyPartCoordinates(v * 10 + 1, cped)
                                pos3, pos4 = convert3DCoordsToScreen(pos2X, pos2Y, pos2Z)
                                renderDrawLine(pos1, pos2, pos3, pos4, 1, color)
                            end
                            local t = {53, 43, 24, 34, 6}
                            for v = 1, #t do
                                posX, posY, posZ = getBodyPartCoordinates(t[v], cped)
                                pos1, pos2 = convert3DCoordsToScreen(posX, posY, posZ)
                            end
                        end
                    end
                end
            end
            else
                nameTagOff()
                while isPauseMenuActive() or isKeyDown(VK_F8) do wait(0) end
                nameTagOn()
            end
        end
    end
end

function getBodyPartCoordinates(id, handle)
  local pedptr = getCharPointer(handle)
  local vec = ffi.new("float[3]")
  getBonePosition(ffi.cast("void*", pedptr), vec, id, true)
  return vec[0], vec[1], vec[2]
end

function nameTagOn()
    local pStSet = sampGetServerSettingsPtr();
    NTdist = mem.getfloat(pStSet + 39)
    NTwalls = mem.getint8(pStSet + 47)
    NTshow = mem.getint8(pStSet + 56)
    mem.setfloat(pStSet + 39, 1488.0)
    mem.setint8(pStSet + 47, 0)
    mem.setint8(pStSet + 56, 1)
    nameTag = true
end

function nameTagOff()
    local pStSet = sampGetServerSettingsPtr();
    mem.setfloat(pStSet + 39, NTdist)
    mem.setint8(pStSet + 47, NTwalls)
    mem.setint8(pStSet + 56, NTshow)
    nameTag = false
end

function join_argb(a, r, g, b)
  local argb = b  -- b
  argb = bit.bor(argb, bit.lshift(g, 8))  -- g
  argb = bit.bor(argb, bit.lshift(r, 16)) -- r
  argb = bit.bor(argb, bit.lshift(a, 24)) -- a
  return argb
end

function explode_argb(argb)
  local a = bit.band(bit.rshift(argb, 24), 0xFF)
  local r = bit.band(bit.rshift(argb, 16), 0xFF)
  local g = bit.band(bit.rshift(argb, 8), 0xFF)
  local b = bit.band(argb, 0xFF)
  return a, r, g, b
end
 

gafa were

Новичок
2
0
помогите, нужно изменить значение клавиши Ф5, табличка не открывается из за того что у меня ф5 на клаве стоит как вкл/выкл подстветки, из за этого в сампе на ф5 не функционирует нормально
 

Sam_Monroe

Известный
58
2
Здравствуйте. Нужна помощь с Клео скриптом, не умею работать с чатлогом.
Есть скрипт на телепорты по командам. А надо, чтобы этими командами запускался автоматический процесс этих телепортов с небольшой задержкой. Первый телепортируется, когда в чате появляется надпись "отнеси металл на склад", а второй просто делает циклично пробежку по координатам и обратно. Остановить скрипты должно быть можно простым шагом в сторону. Мог бы кто помочь?
CLEO:
{$CLEO}
0000: NOP
repeat
wait 0
until 0AFA:
0B34: samp register_client_command "tp1" to_label @Noname_54
0B34: samp register_client_command "tp2" to_label @Noname_62

01B6: set_weather 1
00C0: set_current_time_hours_to 10 minutes_to 0
0BDE: pause_thread 0


:Noname_54
0AB1: call_scm_func @Noname_8937 3 -1864.971924 -1623.192505 21.909252
0BD1: samp send_picked_up_pickup 13
0B43: samp cmd_ret

:Noname_62
0AB1: call_scm_func @Noname_8937 3 612.321838 871.011047 -42.542072              
0BD1: samp send_picked_up_pickup 15
0AB1: call_scm_func @Noname_8937 3 612.892029 870.620605 -42.649788
0BD1: samp send_picked_up_pickup 49
0AB1: call_scm_func @Noname_8937 3 639.400208 819.720337 -42.932686
0BD1: samp send_picked_up_pickup 32
0AB1: call_scm_func @Noname_8937 3 632.552429 857.449158 -42.960938
0BD1: samp send_picked_up_pickup 63
0AB1: call_scm_func @Noname_8937 3 584.081116 925.163574 -42.291046
0BD1: samp send_picked_up_pickup 115
0AB1: call_scm_func @Noname_8937 3 678.325134 823.677002 -38.992092
0BD1: samp send_picked_up_pickup 97
0AB1: call_scm_func @Noname_8937 3 690.125000 844.980896 -39.007717
0BD1: samp send_picked_up_pickup 28
0B43: samp cmd_ret





:Noname_8937
0B2B: samp 3@ = get_player_id_by_actor_handle $PLAYER_ACTOR
0AC8: 4@ = allocate_memory_size 68
0BBA: samp store_player 3@ onfoot_data 4@
0C0D: struct 4@ offset 6 size 4 = 0@
0C0D: struct 4@ offset 10 size 4 = 1@
0C0D: struct 4@ offset 14 size 4 = 2@
0BC0: samp send_onfoot_data 4@
0AC9: free_allocated_memory 4@
0AB2: ret 0
 
Последнее редактирование:

Fistockman

Потрачен
108
12
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
сделайте активацию на 1 клавишу английскую M
 

Вложения

  • AirBrake.lua
    4.4 KB · Просмотры: 3

ProKop4ek

Новичок
16
2
Нужно сделать задержку после взаимодействия с первым окном, и после втрого окна.
Буду очень благодарен.
 

Вложения

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

YarikVL

Известный
Проверенный
4,783
1,807
Нужно сделать задержку после взаимодействия с первым окном, и после втрого окна.
Буду очень благодарен.
Lua:
local sampev = require 'lib.samp.events'

function main()
    while not isSampAvailable() do wait(0) end
    wait(-1)
end

function sampev.onShowDialog(dialogId, style, title, button1, button2, text)
    lua_thread.create(function()
        if dialogId == 49 then
            wait(1000)
            sampSendDialogResponse(49, 1, 9, nil)
        end
        if dialogId == 53 then
            wait(1000)
            sampSendDialogResponse(53, 1, 6, nil)
        end
    end)
end
Вроде должно работать, но еще есть вариант с os.clock()
 
  • Влюблен
Реакции: ProKop4ek

cvqez

Активный
99
25
ники без клистов - черные
цветы клистов с которыми баги и они черные - FFFFFF ; 665E5E
хелпаните а
вот тема самого скрипта - https://www.blast.hk/threads/156800/#post-1191609
 

Вложения

  • KillList.lua
    2.8 KB · Просмотры: 2
Последнее редактирование: