Потому что ты не познал конструкции, и не писал больших скриптов. Да и в чужом коде намного проще разобраться, если есть есть исходник с нормальным кодом и табуляцией, и не придётся туда сюда рыскать, куда же происходит jump. В какой то степени даже будешь немного лучше соображать что происходит, например в js или lua скрипте. Можно еще в добавок писать на классах, но это уже вкусовщина, т.к. будет смесь из опкодов и классов.
:1
wait 0
80DF: actor $PLAYER_ACTOR driving
jf @1
0AB5: store_actor $PLAYER_ACTOR closest_vehicle_to 0@ closest_ped_to $NO_USE
not 0@ == -1
jf @1
00AA: store_car 0@ position_to 2@ 3@ 4@
00A0: store_actor $PLAYER_ACTOR position_to 5@ 6@ 7@
050A: 8@ = distance_between_XYZ 2@ 3@ 4@ and_XYZ 5@ 6@ 7@
8@ < 4.0
jf @1
0AF8: samp add_message_to_chat "Игрок находится рядом с т/с" color 0xFFFFFFFF
jump @1Не работает. Из-за 6 строчки если убрать "not" поменять знак и число, то спамит при входе в игру, а если оставить то вообще ничего не происходит.
Странно. В чат действительно должно было спамить, мой косяк, но не при входе в игру. Да и с шестой строкой проблем возникнуть не должно было. Я скомпилировал этот же скрипт у себя, всё работает. Возможно дело в твоём компиляторе и версии сани билдера 🤔
{$CLEO}
0000:
repeat
wait 0
until Samp.Available()
0B34: samp register_client_command "space" to_label @space
1@ = 0
while true
wait 0
if
1@ == 1
then
0B56: set_game_key 14 state 255
1@ = 0
end
end
:space
1@ = 1
Samp.CmdRet()
local encoding = require 'encoding' -- подключаем для корректной отправки русских букв
encoding.default = 'CP1251'
u8 = encoding.UTF8
local sampev = require 'lib.samp.events' -- подключаем для хука отправки ответа на диалог
local effil = require 'effil' -- для ассинхронных запросов
local url = 'URL'
local data = {
['content'] = '', -- текст (меняется через команду, так что можно оставить пустым)
['username'] = 'Sended from .lua script!', -- ник отправителя
['avatar_url'] = 'https://c.tenor.com/Z9mXH7-MlcsAAAAS/sexy-black-man-thirst-trap.gif', -- ссылка на аватарку (можно убрать, будет дефолтная)
['tts'] = false, -- tts - text to speech - читалка сообщений (true/false)
-- так же можно сделать еще много чего, подробнее тут: https://discord.com/developers/docs/resources/webhook
}
function main()
while not isSampAvailable() do wait(0) end
sampRegisterChatCommand('ds.msg', function(arg)
data['username'] = sampGetPlayerNickname(select(2, sampGetPlayerIdByCharHandle(PLAYER_PED))) -- ник отправителя = ник в игре
data['content'] = arg -- делаем что бы текст сообщения был равен тексту который мы ввели после команды
-- отправляем запрос
asyncHttpRequest('POST', url, {headers = {['content-type'] = 'application/json'}, data = u8(encodeJson(data))},
function(response)
print('[WebHook] [OK] отправлено!')
end,
function(err)
print('[WebHook] [ERROR] error: '..err)
end)
end)
wait(-1)
end
-- функция для отправки ассинхронных сообщений
function asyncHttpRequest(method, url, args, resolve, reject)
local request_thread = effil.thread(function (method, url, args)
local requests = require 'requests'
local result, response = pcall(requests.request, method, url, args)
if result then
response.json, response.xml = nil, nil
return true, response
else
return false, response
end
end)(method, url, args)
-- Если запрос без функций обработки ответа и ошибок.
if not resolve then resolve = function() end end
if not reject then reject = function() end end
-- Проверка выполнения потока
lua_thread.create(function()
local runner = request_thread
while true do
local status, err = runner:status()
if not err then
if status == 'completed' then
local result, response = runner:get()
if result then
resolve(response)
else
reject(response)
end
return
elseif status == 'canceled' then
return reject(status)
end
else
return reject(err)
end
wait(0)
end
end)
end{$CLEO}
0000: NOP
repeat
wait 0
until 0AFA:
// host
alloc 0@ 30
0AD3: 0@ = format "discord.com"
// path
alloc 1@ 200
0AD3: 1@ = format "api/webhooks/1015806219421757530/a21OfargEvfX7D2B5irPX0Bf_sAqqQGBV8lrpbciUUB6TFE16_TSwLq0pVA3MD-COfF_"
// data
alloc 2@ 1000
//0AD3: 2@ = format "content=testing message"
0AD3: 2@ = format "content=testing message&username=custom_username"
// response buffer
alloc 3@ 1500
while true
wait 0
if
0ADC: "X"
then
0AB1: call_scm_func @HTTP_POST 5 host 0@ file_path 1@ response_buffer 3@ data 2@ is_https true _ret_is_success 31@
if
31@ == true
then
chatmsg "Respuesta = %s" 0xFFFFFF 3@
else
chatmsg "Fail" -1
end
end
end
{$INCLUDE includes/http_requests.txt}
165
This is done via HOOK. I made a short code example that I didn't check. I hope you understand and the code will work! If you have any questions about how and what works, please contact us.
:main
wait 0
0BE3: raknet setup_incoming_rpc_hook @Hook_STR
4@ == 1
jf @main
4@ = 0
8C29: not 24@ = stristr string1 23@ string2 "Salario"
jf @code
jump @main
:code
say "/caixinha"
jump @main
:Hook_STR
wait 0
0BE5: raknet 6@ = get_hook_param PARAM_PACKETID
if
6@ == RPC_ScrClientMessage
then
0BE5: raknet 5@ = get_hook_param PARAM_BITSTREAM
0BE7: raknet 7@ = bit_stream_read 5@ type BS_TYPE_INT
0BE7: raknet 8@ = bit_stream_read 5@ type BS_TYPE_INT
alloc 23@ 512
4@ = 1
0BE8: raknet bit_stream 5@ read_array 23@ size 8@
0C0F: array 23@ element 8@ = 0x00
end
0BE0: raknet hook_ret true
There's any way to do this, but without Sampfuncs?
{$CLEO .cs}
0000: NOP
REPEAT
WAIT 0
UNTIL 0AFA:
WHILE TRUE
WAIT 0
IF 0C29: $NOT_USED = stristr string1 0@ string2 "Salario"
THEN
0AF9: samp say_msg "/caixinha"
WAIT 5000
END
END
SAMP.CmdRet()0000: NOP
REPEAT
WAIT 0
UNTIL 0AFA:
alloc 0@ 228
WHILE TRUE
WAIT 0
0B75: samp get_chat_string 99 text_to 0@ prefix_to 0 color_to 0 prefix_color_to 0
IF 0C29: $NOT_USED = stristr string1 0@ string2 "Salario"
THEN
0AF9: samp say_msg "/caixinha"
WAIT 5000
END
END
SAMP.CmdRet()
Он же вроде попросил без сампфункса, но тут всё равно используются функции сф
