Вопросы по Lua скриптингу

Общая тема для вопросов по разработке скриптов на языке программирования Lua, в частности под MoonLoader.
  • Задавая вопрос, убедитесь, что его нет в списке частых вопросов и что на него ещё не отвечали (воспользуйтесь поиском).
  • Поищите ответ в теме посвященной разработке Lua скриптов в MoonLoader
  • Отвечая, убедитесь, что ваш ответ корректен.
  • Старайтесь как можно точнее выразить мысль, а если проблема связана с кодом, то обязательно прикрепите его к сообщению, используя блок [code=lua]здесь мог бы быть ваш код[/code].
  • Если вопрос связан с MoonLoader-ом первым делом желательно поискать решение на wiki.

Частые вопросы

Как научиться писать скрипты? С чего начать?
Информация - Гайд - Всё о Lua скриптинге для MoonLoader(https://blast.hk/threads/22707/)
Как вывести текст на русском? Вместо русского текста у меня какие-то каракули.
Изменить кодировку файла скрипта на Windows-1251. В Atom: комбинация клавиш Ctrl+Shift+U, в Notepad++: меню Кодировки -> Кодировки -> Кириллица -> Windows-1251.
Как получить транспорт, в котором сидит игрок?
Lua:
local veh = storeCarCharIsInNoSave(PLAYER_PED)
Как получить свой id или id другого игрока?
Lua:
local _, id = sampGetPlayerIdByCharHandle(PLAYER_PED) -- получить свой ид
local _, id = sampGetPlayerIdByCharHandle(ped) -- получить ид другого игрока. ped - это хендл персонажа
Как проверить, что строка содержит какой-то текст?
Lua:
if string.find(str, 'текст', 1, true) then
-- строка str содержит "текст"
end
Как эмулировать нажатие игровой клавиши?
Lua:
local game_keys = require 'game.keys' -- где-нибудь в начале скрипта вне функции main

setGameKeyState(game_keys.player.FIREWEAPON, -1) -- будет сэмулировано нажатие клавиши атаки
Все иды клавиш находятся в файле moonloader/lib/game/keys.lua.
Подробнее о функции setGameKeyState здесь: lua - setgamekeystate | BlastHack — DEV_WIKI(https://www.blast.hk/wiki/lua:setgamekeystate)
Как получить id другого игрока, в которого целюсь я?
Lua:
local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
  local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
  if result then -- проверить, прошло ли получение ида успешно
    -- здесь любые действия с полученным идом игрока
  end
end
Как зарегистрировать команду чата SAMP?
Lua:
-- До бесконечного цикла/задержки
sampRegisterChatCommand("mycommand", function (param)
     -- param будет содержать весь текст введенный после команды, чтобы разделить его на аргументы используйте string.match()
    sampAddChatMessage("MyCMD", -1)
end)
Крашит игру при вызове sampSendChat. Как это исправить?
Это происходит из-за бага в SAMPFUNCS, когда производится попытка отправки пакета определенными функциями изнутри события исходящих RPC и пакетов. Исправления для этого бага нет, но есть способ не провоцировать его. Вызов sampSendChat изнутри обработчика исходящих RPC/пакетов нужно обернуть в скриптовый поток с нулевой задержкой:
Lua:
function onSendRpc(id)
  -- крашит:
  -- sampSendChat('Send RPC: ' .. id)

  -- норм:
  lua_thread.create(function()
    wait(0)
    sampSendChat('Send RPC: ' .. id)
  end)
end
 
Последнее редактирование:

Jason2222

Известный
180
3
Lua:
Marker marker = addSpriteBlipForCoord(float atX, float atY, float atZ, int type)
Нашел это, но снова проблемы с int type
 

imring

Ride the Lightning
Всефорумный модератор
2,355
2,518
Lua:
function givec(param)
    local number, id = string.match(param, '(%d+) (%d+)')
    if number ~= nil and id ~= nil then
        if number == 'number1' then
            local nick = 'Nick_Name1'
            nid = sampGetPlayerIdByNickname(nick)
            sampSendChat(string.format("/c %d %d", nid, id))
        elseif number == 'number2' then
            local nick = 'Nick_Name2'
            nid = sampGetPlayerIdByNickname(nick)
            sampSendChat(string.format("/c %d %d", nid, id))
        else
            sampAddChatMessage("[ {800000}HitMan {ffffff}]: Поручить контракт - [ {800000}/givec {ffffff}]", -1)
        end
    end
end

не умею объяснять но короче
нужно чтобы в файле были написаны какие-то номера, например
1 = Nick_Name
2 = Nick_Name2
вводишь /givec 1 и из файла он берёт Nick_Name
вводишь /givec 2 и из файла он берёт Nick_Name2 и т.д
Lua:
--[[ Ini file

[nicks]
1=Nick_Name
2=Test_Name

]]

inicfg = require 'inicfg'

file = inicfg.load(nil, 'file.ini')
local nick = file.nicks[1]
 
  • Нравится
Реакции: штейн

штейн

Известный
Проверенный
1,001
687
Lua:
--[[ Ini file

[nicks]
1=Nick_Name
2=Test_Name

]]

inicfg = require 'inicfg'

file = inicfg.load(nil, 'file.ini')
local nick = file.nicks[1]

нет, это я умею, нужно именно через .json, а .json уже залить на любой файлообменник чтобы читать его, ну типа ты понял

что-то типа этого, но тут не совсем то что мне нужно

Lua:
function update()
local data = inicfg.load(nil, 'moonloader\\config\\hitman.ini')
    if data.options.autoupd == true then
        local fpath = os.getenv('TEMP') .. '\\updhitman2.json'
        downloadUrlToFile('https://www.dl.dropboxusercontent.com/s/6e4vquope2lebpn/updhitman2.json?dl=0', fpath, function(id, status, p1, p2)
            if status == dlstatus.STATUS_ENDDOWNLOADDATA then
                local f = io.open(fpath, 'r')
                if f then
                    local info = decodeJson(f:read('*a'))
                    updatelink = info.updateurl
                    if info and info.latest then
                        version = tonumber(info.latest)
                        if version > tonumber(thisScript().version) then
                            lua_thread.create(goupdate)
                        else
                            update = false
                        end
                    end
                end
            end
        end)
    else
    update = false
    end
end
 
Последнее редактирование:

imring

Ride the Lightning
Всефорумный модератор
2,355
2,518
нет, это я умею, нужно именно через .json, а .json уже залить на любой файлообменник чтобы читать его, ну типа ты понял
Lua:
json = [[
{
    "nicks":
    {
        1:"Nick_Name",
        2:"Test_Name"
    }
}
]]

file = decodeJson(json)
local nick = file.nicks[1]
 
  • Нравится
Реакции: штейн

Dark_Knight

Me, me and me.
Друг
4,065
2,079
Есть либа для работы с json'ом. Фип даже пример делал. Ищи тему Библиотеки.
 

ШPEK

Известный
1,476
525
это команда создана. создавай другую команду.
создал другую, сам скрипт тэг пишет, но то что флудит - это мешает.
Вот весь код
Lua:
require 'lib.moonloader'
hurt = [[[Диагноз]Универсальное лечение
[Диагноз]Голова
[Диагноз]Живот
[Диагноз]Рука, нога, спина
[Болезнь]Операция
[Болезнь]Укол
[Прочее]Выдать мед.карту]]
commands = [[Lalt + 1 = спрашивает что болит у игрока
Lalt + 2 + ПКМ (навод на игрока) = выводит диалоговое окно со списком болезней, затем выдаёт лекарство
Lalt + 3 + ПКМ (навод на игрока) = сделать укол игроку
Lalt + 4 + ПКМ (навод на игрока) = сделать операцию игроку
/luahelp = инструкция]]
tag = "Т.О | "
function main()
while not isSampAvailable() do wait(100) end
wait(1)
sampAddChatMessage("Автор - Gioachini Rossini (DRP Sapphire)", 0x00FFFF)
sampAddChatMessage("Инструкция по использованию - {00FF00}/luahelp", 0x00FFFF)
local _ ,id = sampGetPlayerIdByCharHandle(PLAYER_PED)
local name = sampGetPlayerNickname(id)
local nam, surnam = name:match("(.*)_(.*)")
local nick = nam.." "..surnam
sampRegisterChatCommand("luahelp", help)
while true do
    wait(0)
    sampRegisterChatCommand('k', function(text)
        sampSendChat('/k '..(#text > 0 and '['..tag..'] '..text or ''))
    end)
    if isKeyJustPressed(VK_1) and isKeyJustPressed(VK_LMENU) then
        sampSendChat("Здравствуйте! Я ваш лечащий врач "..nick)
        wait(1500)
        sampSendChat("Чем Я могу вам помочь?")
    end
     local result, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
    if result then
    resultt, id1 = sampGetPlayerIdByCharHandle(ped)
    local name1 = sampGetPlayerNickname(id1)
         if resultt and isKeyJustPressed(VK_2) and isKeyJustPressed(VK_LMENU) then
              local color = sampGetPlayerColor(id1)
             if color == -1426107740 then
             cena = 10
            else
            cena = 150
            end
            sampShowDialog(5, "{66FFFF}Выберите что болит у {00FF00}"..name1.."{FFFFFF}[{00FF00}"..id1.."{FFFFFF}]", hurt, "{00FF00}Продолжить", "{FF0000}Отмена", 2)
        end
    end
    local res, but, list, str = sampHasDialogRespond(5)
    if res then
         if but == 1 and list == 0 then
             sampSendChat("/do Сумка на плече.")
             wait(3000)
             sampSendChat("/me открыв сумку, взял оттуда лекарство")
             wait(3000)
             sampSendChat("/todo Применяйте лекарство по инструкции *передавая лекарство")
             wait(3000)
             sampSendChat("/heal "..id1.." "..cena) end
        if but == 1 and list == 1 then
            sampSendChat("/do Сумка на плече.")
            wait(3000)
            sampSendChat("/me открыл сумку, взял оттуда таблетки аспирина")
            wait(3000)
            sampSendChat("/todo Выпейте таблетку аспирина, воды можете взять в питевом кулере *передавая коробку с аспирином")
            wait(3000)
            sampSendChat("/heal "..id1.." "..cena) end
        if but == 1 and list == 2 then
             sampSendChat("/do Сумка на плече.")
            wait(3000)
            sampSendChat("/me открыл сумку, взял оттуда таблетки лактофильтрума")
            wait(3000)
            sampSendChat("/todo Выпейте таблетку лактофильтрума, воды можете взять в питевом кулере *передавая коробку с аспирином")
            wait(3000)
            sampSendChat("/heal "..id1.." "..cena) end
        if but == 1 and list == 3 then
            sampSendChat("/do Сумка на плече.")
            wait(3000)
            sampSendChat("/me открыл сумку, взял оттуда тюбик троксевазина")
            wait(3000)
            sampSendChat("/todo Намажьте троксевазин на больное место *передавая коробку с аспирином")
            wait(3000)
            sampSendChat("/heal "..id1.." "..cena) end
        if but == 1 and list == 4 then
             sampSendChat("/me взял перчатки и маску со стола и надел маску и перчатки")
             wait(3000)
             sampSendChat("/do Маска для наркоза висит на подставке.")
             wait(3000)
             sampSendChat("/me взяв маску для наркоза в правую руку, надел её на лицо пациента")
             wait(3000)
             sampSendChat("/me включил подачу наркоза")
             wait(3000)
             sampSendChat("/do Наркоз действует.")
             wait(3000)
             sampSendChat("/me взяв скальпель в руку, аккуратным движением сделал надрез")
             wait(3000)
             sampSendChat("/me начал процесс операции ")
             wait(3000)
             sampSendChat("/me взяв медицинскую нитку и иголку, начал зашивать рану")
             wait(3000)
             sampSendChat("/do Операция проведена.")
             wait(3000)
             sampSendChat("/me привёл пациента в сознание")
             wait(3000)
             sampSendChat("Процесс операции окончен, всё прошло успешно.") end
        if but == 1 and list == 5 then
            sampSendChat("/do На столе пакет с новыми перчатками и баночка спирта.")
            wait(3000)
            sampSendChat("/me взяв баночку спирта, немного пролил спирт на руки, растёр руки")
            wait(3000)
            sampSendChat("/me взяв пакет с перчатками, открыл их, натянул на руки")
            wait(3000)
              sampSendChat("/do На столе лежат: шприцы, ампулы и лекарства.")
             wait(3000)
             sampSendChat("/me взял шприц и ампулу со стола")
             wait(3000)
             sampSendChat("/me проткнул ампулу шприцом и наполняет шприц лекарством")
             wait(3000)
             sampSendChat("/do Шприц наполнен лекарством из ампулы.")
             wait(3000)
             sampSendChat("/me левой рукой потер кожу на правой руке пациента")
             wait(3000)
             sampSendChat("/me поднес шприц к руке и воткнул иглу в вену")
             wait(3000)
             sampSendChat("/inject "..id1)
             wait(3000)
             sampSendChat("/me убрал шприц и выбросил его в урну") end
        if but == 1 and list == 6 then
             sampSendChat("Здравствуйте, сейчас я проведу медицинский осмотр.")
             wait(3000)
             sampSendChat("Хорошо, будьте добры встать к стене.")
             wait(100)
             sampAddChatMessage("Как человек встанет к стене, нажмите alt + 5", -1)
                if isKeyJustPressed(VK_LMENU) and isKeyJustPressed(VK_5) then
                    sampSendChat("/do На столе лежат тонкие перчатки.")
                    wait(3000)
                    sampSendChat("/me взял тонкие перчатки со стола")
                    wait(3000)
                    sampSendChat("/me надел перчатки на руки")
                    wait(3000)
                    sampSendChat("/do Перчатки на руках.")
                    wait(3000)
                    sampSendChat("/me приступил к медицинскому осмотру")
                    wait(3000)
                    sampSendChat("/me провел голову на наличие вшей")
                    wait(3000)
                    sampSendChat("/me прощупал живот и половой орган человека")
                    sampAddChatMessage("Нажмите alt + 5 как подойдёте к столу", -1)
                         if isKeyJustPressed(VK_LMENU) and isKeyJustPressed(VK_5) then
                            sampSendChat("/do Медицинская карта лежит на столе.")
                            wait(3000)
                            sampSendChat("/me взял медицинскую карту со стола")
                            wait(3000)
                            sampSendChat("/do На столе лежит ручка.")
                            wait(3000)
                            sampSendChat("/me взял ручку со стола")
                            wait(3000)
                            sampSendChat("/me поставил галочку на против строки 'Здоров'")
                            wait(3000)
                            sampSendChat("/me поставил подпись в граффе 'Подпись врача'")
                            wait(3000)
                            sampSendChat("/me положив ручку на стол, взял со стола печать 'Hospital Las-Venturas'")
                            wait(3000)
                            sampSendChat("/me поставив печать 'Hospital Las-Venturas'")
                            wait(3000)
                            sampSendChat("/me передал медицинскую карту пациенту")
                            wait(3000)
                            sampSendChat("/medcard "..id1) end
                            end
                            end
                    end
                end
            end

function help()
sampShowDialog(4, "{66FF66}Help", commands, "Закрыть", _, 0)
end
 

imring

Ride the Lightning
Всефорумный модератор
2,355
2,518
соре с телефона сидел даже не вчитался че ты написал, спасибо

но есть один вопрос, как мне юзать это через download чето там ( не помню точно ибо с телефона )
io.open
создал другую, сам скрипт тэг пишет, но то что флудит - это мешает.
Вот весь код
Lua:
require 'lib.moonloader'
hurt = [[[Диагноз]Универсальное лечение
[Диагноз]Голова
[Диагноз]Живот
[Диагноз]Рука, нога, спина
[Болезнь]Операция
[Болезнь]Укол
[Прочее]Выдать мед.карту]]
commands = [[Lalt + 1 = спрашивает что болит у игрока
Lalt + 2 + ПКМ (навод на игрока) = выводит диалоговое окно со списком болезней, затем выдаёт лекарство
Lalt + 3 + ПКМ (навод на игрока) = сделать укол игроку
Lalt + 4 + ПКМ (навод на игрока) = сделать операцию игроку
/luahelp = инструкция]]
tag = "Т.О | "
function main()
while not isSampAvailable() do wait(100) end
wait(1)
sampAddChatMessage("Автор - Gioachini Rossini (DRP Sapphire)", 0x00FFFF)
sampAddChatMessage("Инструкция по использованию - {00FF00}/luahelp", 0x00FFFF)
local _ ,id = sampGetPlayerIdByCharHandle(PLAYER_PED)
local name = sampGetPlayerNickname(id)
local nam, surnam = name:match("(.*)_(.*)")
local nick = nam.." "..surnam
sampRegisterChatCommand("luahelp", help)
while true do
    wait(0)
    sampRegisterChatCommand('k', function(text)
        sampSendChat('/k '..(#text > 0 and '['..tag..'] '..text or ''))
    end)
    if isKeyJustPressed(VK_1) and isKeyJustPressed(VK_LMENU) then
        sampSendChat("Здравствуйте! Я ваш лечащий врач "..nick)
        wait(1500)
        sampSendChat("Чем Я могу вам помочь?")
    end
     local result, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
    if result then
    resultt, id1 = sampGetPlayerIdByCharHandle(ped)
    local name1 = sampGetPlayerNickname(id1)
         if resultt and isKeyJustPressed(VK_2) and isKeyJustPressed(VK_LMENU) then
              local color = sampGetPlayerColor(id1)
             if color == -1426107740 then
             cena = 10
            else
            cena = 150
            end
            sampShowDialog(5, "{66FFFF}Выберите что болит у {00FF00}"..name1.."{FFFFFF}[{00FF00}"..id1.."{FFFFFF}]", hurt, "{00FF00}Продолжить", "{FF0000}Отмена", 2)
        end
    end
    local res, but, list, str = sampHasDialogRespond(5)
    if res then
         if but == 1 and list == 0 then
             sampSendChat("/do Сумка на плече.")
             wait(3000)
             sampSendChat("/me открыв сумку, взял оттуда лекарство")
             wait(3000)
             sampSendChat("/todo Применяйте лекарство по инструкции *передавая лекарство")
             wait(3000)
             sampSendChat("/heal "..id1.." "..cena) end
        if but == 1 and list == 1 then
            sampSendChat("/do Сумка на плече.")
            wait(3000)
            sampSendChat("/me открыл сумку, взял оттуда таблетки аспирина")
            wait(3000)
            sampSendChat("/todo Выпейте таблетку аспирина, воды можете взять в питевом кулере *передавая коробку с аспирином")
            wait(3000)
            sampSendChat("/heal "..id1.." "..cena) end
        if but == 1 and list == 2 then
             sampSendChat("/do Сумка на плече.")
            wait(3000)
            sampSendChat("/me открыл сумку, взял оттуда таблетки лактофильтрума")
            wait(3000)
            sampSendChat("/todo Выпейте таблетку лактофильтрума, воды можете взять в питевом кулере *передавая коробку с аспирином")
            wait(3000)
            sampSendChat("/heal "..id1.." "..cena) end
        if but == 1 and list == 3 then
            sampSendChat("/do Сумка на плече.")
            wait(3000)
            sampSendChat("/me открыл сумку, взял оттуда тюбик троксевазина")
            wait(3000)
            sampSendChat("/todo Намажьте троксевазин на больное место *передавая коробку с аспирином")
            wait(3000)
            sampSendChat("/heal "..id1.." "..cena) end
        if but == 1 and list == 4 then
             sampSendChat("/me взял перчатки и маску со стола и надел маску и перчатки")
             wait(3000)
             sampSendChat("/do Маска для наркоза висит на подставке.")
             wait(3000)
             sampSendChat("/me взяв маску для наркоза в правую руку, надел её на лицо пациента")
             wait(3000)
             sampSendChat("/me включил подачу наркоза")
             wait(3000)
             sampSendChat("/do Наркоз действует.")
             wait(3000)
             sampSendChat("/me взяв скальпель в руку, аккуратным движением сделал надрез")
             wait(3000)
             sampSendChat("/me начал процесс операции ")
             wait(3000)
             sampSendChat("/me взяв медицинскую нитку и иголку, начал зашивать рану")
             wait(3000)
             sampSendChat("/do Операция проведена.")
             wait(3000)
             sampSendChat("/me привёл пациента в сознание")
             wait(3000)
             sampSendChat("Процесс операции окончен, всё прошло успешно.") end
        if but == 1 and list == 5 then
            sampSendChat("/do На столе пакет с новыми перчатками и баночка спирта.")
            wait(3000)
            sampSendChat("/me взяв баночку спирта, немного пролил спирт на руки, растёр руки")
            wait(3000)
            sampSendChat("/me взяв пакет с перчатками, открыл их, натянул на руки")
            wait(3000)
              sampSendChat("/do На столе лежат: шприцы, ампулы и лекарства.")
             wait(3000)
             sampSendChat("/me взял шприц и ампулу со стола")
             wait(3000)
             sampSendChat("/me проткнул ампулу шприцом и наполняет шприц лекарством")
             wait(3000)
             sampSendChat("/do Шприц наполнен лекарством из ампулы.")
             wait(3000)
             sampSendChat("/me левой рукой потер кожу на правой руке пациента")
             wait(3000)
             sampSendChat("/me поднес шприц к руке и воткнул иглу в вену")
             wait(3000)
             sampSendChat("/inject "..id1)
             wait(3000)
             sampSendChat("/me убрал шприц и выбросил его в урну") end
        if but == 1 and list == 6 then
             sampSendChat("Здравствуйте, сейчас я проведу медицинский осмотр.")
             wait(3000)
             sampSendChat("Хорошо, будьте добры встать к стене.")
             wait(100)
             sampAddChatMessage("Как человек встанет к стене, нажмите alt + 5", -1)
                if isKeyJustPressed(VK_LMENU) and isKeyJustPressed(VK_5) then
                    sampSendChat("/do На столе лежат тонкие перчатки.")
                    wait(3000)
                    sampSendChat("/me взял тонкие перчатки со стола")
                    wait(3000)
                    sampSendChat("/me надел перчатки на руки")
                    wait(3000)
                    sampSendChat("/do Перчатки на руках.")
                    wait(3000)
                    sampSendChat("/me приступил к медицинскому осмотру")
                    wait(3000)
                    sampSendChat("/me провел голову на наличие вшей")
                    wait(3000)
                    sampSendChat("/me прощупал живот и половой орган человека")
                    sampAddChatMessage("Нажмите alt + 5 как подойдёте к столу", -1)
                         if isKeyJustPressed(VK_LMENU) and isKeyJustPressed(VK_5) then
                            sampSendChat("/do Медицинская карта лежит на столе.")
                            wait(3000)
                            sampSendChat("/me взял медицинскую карту со стола")
                            wait(3000)
                            sampSendChat("/do На столе лежит ручка.")
                            wait(3000)
                            sampSendChat("/me взял ручку со стола")
                            wait(3000)
                            sampSendChat("/me поставил галочку на против строки 'Здоров'")
                            wait(3000)
                            sampSendChat("/me поставил подпись в граффе 'Подпись врача'")
                            wait(3000)
                            sampSendChat("/me положив ручку на стол, взял со стола печать 'Hospital Las-Venturas'")
                            wait(3000)
                            sampSendChat("/me поставив печать 'Hospital Las-Venturas'")
                            wait(3000)
                            sampSendChat("/me передал медицинскую карту пациенту")
                            wait(3000)
                            sampSendChat("/medcard "..id1) end
                            end
                            end
                    end
                end
            end

function help()
sampShowDialog(4, "{66FF66}Help", commands, "Закрыть", _, 0)
end
создавай команду вне беск. цикла.
 

Jason2222

Известный
180
3
Можете сказать что в коде не так?

Lua:
require "lib.moonloader"
require "lib.sampfuncs"
require "memory"
samp = require 'samp.events'


function main()
    while not isSampAvailable() do wait(0) end
    while sampGetCurrentServerName() == 'SA-MP' do wait(0) end
    local ip = sampGetCurrentServerAddress()
   sampRegisterChatCommand('/hf', hf)
   sampRegisterChatCommand('/dhf', dhf)
   wait(-1)
    end

function get_pickup_model(id, handle)
  local stPickup = sampGetPickupPoolPtr()
  local handle = id * 20
  local result = handle + 61444
  local result = result + stPickup
  local modelid = readMemory(result, 4, true)
  return modelid
 end


function hf()
local pickup = sampGetPickupHandleBySampId(id)
    if get_pickup_model(id, pickup) == 1273 then
        local pX, pY, pZ = getPickupCoordinates(pickup)
            local pPX, pPY, pPZ = getCharCoordinates(playerPed)
            local distance = getDistanceBetweenCoords2d(pPX, pPY, pX, pY)
            if distance <= 300.0 then
            sampAddChatMessage('ACCEPTED', 0xFFFFFF)
            marker = addSpriteBlipForCoord(pX, pY, pZ, 41)
            else
            sampAddChatMessage('DENIED', 0xFFFFFF)
        end
    end
end

function dhf()
    removeBlip(marker)
end