Луа скрипт

[abnomegd]

Версия SA-MP

1. 0.3.7 (R1)

Можете написать скрипт пожалуйста .Функционал: Навестись на игрока и нажать какую либо клавишу(на ваше усмотрение) чтобы показывало ему паспорт.

 

[dinky]

script_name('My Ahk') -- название скрипта
script_author('ERNESTO') -- автор скрипта
script_description('Hotkey') -- описание скрипта
require "lib.moonloader" -- подключение библиотеки
local sampev = require 'lib.samp.events'
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local ped = nil
local targetValid = false
local RESULT_EBANIY = false
local targetId = nil
local targetName = 'Blatnoy_Ueban'

local keys = require "vkeys"
local imgui = require 'imgui'
local rkeys = require 'rkeys'
imgui.HotKey = require('imgui_addons').HotKey

function main()
   while not isSampAvailable() do wait(100) end
   while not sampIsLocalPlayerSpawned() do wait(200) end
   while true do
        wait(0)
        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
        if valid and doesCharExist(ped) then   
           targetValid = true
           RESULT_EBANIY, targetId = sampGetPlayerIdByCharHandle(ped)
           targetName = sampGetPlayerNickname(targetId)
        end
            if RESULT_EBANIY and not isCharInAnyCar(PLAYER_PED) and not sampIsDialogActive() and not sampIsChatInputActive() then
                if isKeyJustPressed(VK_E) then
                   sampSendChat('/pass '.. targetName )
                end
            end
     end
end

 

[abnomegd]

script_name('My Ahk') -- название скрипта
script_author('ERNESTO') -- автор скрипта
script_description('Hotkey') -- описание скрипта
require "lib.moonloader" -- подключение библиотеки
local sampev = require 'lib.samp.events'
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local ped = nil
local targetValid = false
local RESULT_EBANIY = false
local targetId = nil
local targetName = 'Blatnoy_Ueban'

local keys = require "vkeys"
local imgui = require 'imgui'
local rkeys = require 'rkeys'
imgui.HotKey = require('imgui_addons').HotKey

function main()
   while not isSampAvailable() do wait(100) end
   while not sampIsLocalPlayerSpawned() do wait(200) end
   while true do
        wait(0)
        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
        if valid and doesCharExist(ped) then  
           targetValid = true
           RESULT_EBANIY, targetId = sampGetPlayerIdByCharHandle(ped)
           targetName = sampGetPlayerNickname(targetId)
        end
            if RESULT_EBANIY and not isCharInAnyCar(PLAYER_PED) and not sampIsDialogActive() and not sampIsChatInputActive() then
                if isKeyJustPressed(VK_E) then
                   sampSendChat('/pass '.. targetName )
                end
            end
     end
end

если сработает спс

script_name('My Ahk') -- название скрипта
script_author('ERNESTO') -- автор скрипта
script_description('Hotkey') -- описание скрипта
require "lib.moonloader" -- подключение библиотеки
local sampev = require 'lib.samp.events'
local encoding = require 'encoding'
encoding.default = 'CP1251'
u8 = encoding.UTF8

local ped = nil
local targetValid = false
local RESULT_EBANIY = false
local targetId = nil
local targetName = 'Blatnoy_Ueban'

local keys = require "vkeys"
local imgui = require 'imgui'
local rkeys = require 'rkeys'
imgui.HotKey = require('imgui_addons').HotKey

function main()
   while not isSampAvailable() do wait(100) end
   while not sampIsLocalPlayerSpawned() do wait(200) end
   while true do
        wait(0)
        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
        if valid and doesCharExist(ped) then  
           targetValid = true
           RESULT_EBANIY, targetId = sampGetPlayerIdByCharHandle(ped)
           targetName = sampGetPlayerNickname(targetId)
        end
            if RESULT_EBANIY and not isCharInAnyCar(PLAYER_PED) and not sampIsDialogActive() and not sampIsChatInputActive() then
                if isKeyJustPressed(VK_E) then
                   sampSendChat('/pass '.. targetName )
                end
            end
     end
end

Игрок слишком далеко

если сработает спс

Игрок слишком далеко

пофиксил проблему надо было выставить не targername, a targetid

 

[#SameLine]

Что за берд в коде? зачем лишние подключения, зачем imgui?

script_name('My Ahk') -- название скрипта
script_author('ERNESTO') -- автор скрипта
script_description('Hotkey') -- описание скрипта
require 'lib.moonloader'
local sampev = require "samp.events"

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    repeat wait(100) until isSampAvailable()
 
    while true do
        wait(0)
     
        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
        if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
            if isKeyJustPressed(VK_P) then
                local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
                if result then -- проверить, прошло ли получение ида успешно
                    sampSendChat("/pass "..id) -- команда следом ид полученный
                end
            end
        end
    end

2 подкл, и всё, main и цикл, зачем остальное.

 

[dinky]

Что за берд в коде? зачем лишние подключения, зачем imgui?

script_name('My Ahk') -- название скрипта
script_author('ERNESTO') -- автор скрипта
script_description('Hotkey') -- описание скрипта
require 'lib.moonloader'
local sampev = require "samp.events"

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    repeat wait(100) until isSampAvailable()

    while true do
        wait(0)
   
        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
        if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
            if isKeyJustPressed(VK_P) then
                local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
                if result then -- проверить, прошло ли получение ида успешно
                    sampSendChat("/pass "..id) -- команда следом ид полученный
                end
            end
        end
    end

2 подкл, и всё, main и цикл, зачем остальное.

долбаеб ,если не шаришь, то нахуй пишешь, он вторую тему создал, в 1 он просил починить его скрипт, я починил и кинул его пофикшенный скрипт, со всем чем было у него с имуги и тд, но тема удалилась, он создал новую и я просто скинул то что кидал под 1, герой я твою клаву сломал, не пиши больше ничего умник, я там все оставил чтобы могло помочь ему, чтобы ник получить и тд

 

[#SameLine]

долбаеб ,если не шаришь, то нахуй пишешь, он вторую тему создал, в 1 он просил починить его скрипт, я починил и кинул его пофикшенный скрипт, со всем чем было у него с имуги и тд, но тема удалилась, он создал новую и я просто скинул то что кидал под 1, герой я твою клаву сломал, не пиши больше ничего умник, я там все оставил чтобы могло помочь ему, чтобы ник получить и тд

Нечего не понял но очень интересно, чем писать бред лучше написать коротко, не подрубая imgui, сам заходил тестил работает, дак нахера засорять код, ради бога, делай что хочешь..

 

[abnomegd]

Что за берд в коде? зачем лишние подключения, зачем imgui?

script_name('My Ahk') -- название скрипта
script_author('ERNESTO') -- автор скрипта
script_description('Hotkey') -- описание скрипта
require 'lib.moonloader'
local sampev = require "samp.events"

function main()
    if not isSampfuncsLoaded() or not isSampLoaded() then return end
    repeat wait(100) until isSampAvailable()

    while true do
        wait(0)
    
        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE) -- получить хендл персонажа, в которого целится игрок
        if valid and doesCharExist(ped) then -- если цель есть и персонаж существует
            if isKeyJustPressed(VK_P) then
                local result, id = sampGetPlayerIdByCharHandle(ped) -- получить samp-ид игрока по хендлу персонажа
                if result then -- проверить, прошло ли получение ида успешно
                    sampSendChat("/pass "..id) -- команда следом ид полученный
                end
            end
        end
    end

2 подкл, и всё, main и цикл, зачем остальное.

твой код нерабочий ну тоесть скрипт неработает

 

[VRush]

require 'moonloader'




function main()
    while not isSampAvailable() do wait(0) end
    
    while true do
        wait(0)
        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
        if valid and doesCharExist(ped) then
            local result, id = sampGetPlayerIdByCharHandle(ped)
            if result and wasKeyPressed(82) then
                sampSendChat('/showpass '..id..'')
            end
        end
    end
end

 

[abnomegd]

require 'moonloader'




function main()
    while not isSampAvailable() do wait(0) end
   
    while true do
        wait(0)
        local valid, ped = getCharPlayerIsTargeting(PLAYER_HANDLE)
        if valid and doesCharExist(ped) then
            local result, id = sampGetPlayerIdByCharHandle(ped)
            if result and wasKeyPressed(82) then
                sampSendChat('/showpass '..id..'')
            end
        end
    end
end

зачем пропустил 4 строки?

 

[kizn]

зачем пропустил 4 строки?

Почему предложение не с большой буквы?

 

[abnomegd]

Почему предложение не с большой буквы?

потому что мне так удобнее)

 

[VRush]

зачем пропустил 4 строки?

по заготовке делал своей, там были либы имгуи и т.д, удалил их

 

[abnomegd]

по заготовке делал своей, там были либы имгуи и т.д, удалил их

ясно