local requests = require('requests')
local response = requests.get('https://pastebin.com/raw/ypAr7VhC')
local clist = tonumber('0x6F33F6FF')
function main()
repeat wait(0) until isSampAvailable()
print(clist)
sampRegisterChatCommand("chcl", function(params)
if not string.match(params,"%x+") and string.len(params) ~= 6 then return sampAddChatMessage("[Ошибка] {FFFFFF}Используй: {00C8C8}/chcl {hex клиста без # и без 0x только 6 значений}", 0xFF4747) end
color = string.match(params,"(%x+)")
clist = tonumber('0x'..color..'FF')
print(clist)
end)
while true do wait(0)
for b = 0, 1000 do
for k, v in pairs(response) do
if k == 'text' then
if sampIsPlayerConnected(b) then
if string.find(v,sampGetPlayerNickname(b)) then
emul_rpc('onSetPlayerColor', { b, clist })
end
end
end
end
end
end
end
function emul_rpc(hook, parameters)
local bs_io = require 'samp.events.bitstream_io'
local handler = require 'samp.events.handlers'
local extra_types = require 'samp.events.extra_types'
local hooks = {
['onSetPlayerName'] = { 'int16', 'string8', 'bool8', 11 },
['onSetPlayerColor'] = { 'int16', 'int32', 72 },
['onSetPlayerSkin'] = { 'int32', 'int32', 153 },
}
local handler_hook = {
['onInitGame'] = true,
['onCreateObject'] = true,
['onInitMenu'] = true,
['onShowTextDraw'] = true,
['onVehicleStreamIn'] = true,
['onSetObjectMaterial'] = true,
['onSetObjectMaterialText'] = true
}
local extra = {
['PlayerScorePingMap'] = true,
['Int32Array3'] = true
}
local hook_table = hooks[hook]
if hook_table then
local bs = raknetNewBitStream()
if not handler_hook[hook] then
local max = #hook_table - 1
if max > 0 then
for i = 1, max do
local p = hook_table[i]
if extra[p] then extra_types[p]['write'](bs, parameters[i])
else bs_io[p]['write'](bs, parameters[i]) end
end
end
else
if hook == 'onInitGame' then handler.on_init_game_writer(bs, parameters)
elseif hook == 'onCreateObject' then handler.on_create_object_writer(bs, parameters)
elseif hook == 'onInitMenu' then handler.on_init_menu_writer(bs, parameters)
elseif hook == 'onShowTextDraw' then handler.on_show_textdraw_writer(bs, parameters)
elseif hook == 'onVehicleStreamIn' then handler.on_vehicle_stream_in_writer(bs, parameters)
elseif hook == 'onSetObjectMaterial' then handler.on_set_object_material_writer(bs, parameters, 1)
elseif hook == 'onSetObjectMaterialText' then handler.on_set_object_material_writer(bs, parameters, 2) end
end
raknetEmulRpcReceiveBitStream(hook_table[#hook_table], bs)
raknetDeleteBitStream(bs)
end
end