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

M

Mason_Taylor

Новичок
10
1
QwEEzeR написал(а):
CLEO: 
{$CLEO}
{$INCLUDE SF}
0000:
IF AND
8B8C:  not    samp is_cursor_active
00DF:  actor $PLAYER_ACTOR driving
THEN

if
047A: actor $PLAYER_ACTOR driving_bike
then
03C0: 1@ = actor $PLAYER_ACTOR car
02E3: 2@ = car 1@ speed
if
0031: 2@ >= 13.0
then
00D6: if or
0AB0:   key_pressed 70
0AB0:   key_pressed 13
then
0001: wait 450 ms
if 
80DF: not  actor $PLAYER_ACTOR driving
then
if
0039:  25@ == 1
then
0AF9: samp say_msg "/oldanim 1"
else
0AF9: samp say_msg "/anim 1"
end
0001: wait 200 ms
0C72: set_virtual_key 13 down 1
0001: wait 50 ms
0C72: set_virtual_key 13 down 0
end
end
end
end

if
00DF: actor $PLAYER_ACTOR driving_car
then
03C0: 1@ = actor $PLAYER_ACTOR car
02E3: 2@ = car 1@ speed
if
0031: 2@ >= 15.0
then
00D6: if or
0AB0:   key_pressed 70
0AB0:   key_pressed 13
then
0001: wait 200 ms
if 
not Actor.Driving($PLAYER_ACTOR)
then
if
0039:  25@ == 1
then
0AF9: samp say_msg "/oldanim 1"
else
0AF9: samp say_msg "/anim 1"
end
0001: wait 200 ms
0C72: set_virtual_key 13 down 1
0001: wait 50 ms
0C72: set_virtual_key 13 down 0
end
end
end
end

END
почему крашит? подскажите пожалуйста
Нажмите для раскрытия...
wait 0 не написал
после include sf
 
artie

artie

Участник
70
21
какой id у правого альта, несколько сайтов с ID облазил, там только левый есть
 
  • Эм
Реакции: qdIbp
0x73616D

0x73616D

Активный
140
43
Hi, I'm trying to create requests with the discord API, the main snippet I want to "rewrite" is this (.LUA)
Lua: 
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
I tried to follow the example of this thread, but it doesn't work, what's wrong?
CLEO: 
{$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}
http_requests.txt
 
halfastrc

halfastrc

Участник
41
4
How to get a specific word in the chat and after send a command? For example, when the word "Salario" appear in chat, send this 0AF9: samp say_msg "/caixinha"
 
Bili Djin

Bili Djin

Известный
138
67

artie написал(а):
какой id у правого альта, несколько сайтов с ID облазил, там только левый есть
Нажмите для раскрытия...
165

halfastrc написал(а):
How to get a specific word in the chat and after send a command? For example, when the word "Salario" appear in chat, send this 0AF9: samp say_msg "/caixinha"
Нажмите для раскрытия...
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.

CLEO: 
: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
 
Последнее редактирование:
  • Нравится
Реакции: halfastrc
halfastrc

halfastrc

Участник
41
4
Bili Djin написал(а):


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.

CLEO: 
: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?

Something like this

CLEO: 
{$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()
 
Последнее редактирование:
Bili Djin

Bili Djin

Известный
138
67
halfastrc написал(а):
There's any way to do this, but without Sampfuncs?

Something like this

CLEO: 
{$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()
Нажмите для раскрытия...

I made the script check the last line (99) in the WHILE loop. That is, this means that in the case of a flood or sending 2 messages with zero delay, the script may not see a certain word.
CLEO: 
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()
 
  • Нравится
Реакции: halfastrc
RedBoxWhite

RedBoxWhite

Известный
337
27
Bili Djin написал(а):
I made the script check the last line (99) in the WHILE loop. That is, this means that in the case of a flood or sending 2 messages with zero delay, the script may not see a certain word.
CLEO: 
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()
Нажмите для раскрытия...
Он же вроде попросил без сампфункса, но тут всё равно используются функции сф
 
Bili Djin

Bili Djin

Известный
138
67
Хочу написать скрипт по типу админ чекера, в котором будет ник и телефон. Как сделать так, чтобы эти данные записывались из игры?
У меня из идей есть только говно по типу создать в ini файле куча строк и уже записывать туда данные. Как нибудь адекватно можно сделать?
Ах да, потом те игроки, которые есть в сети будут в диалоге отображаться.
 
Bili Djin

Bili Djin

Известный
138
67
Как отправить ответ в диалог серверу без открытия самого диалога?
Я посмотрел, при отправке сообщения будет RPC_DIALOGRESPONSE. Как отправить сообщение?
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

  1. YarikVL
    [Перезапуск] Интервью с ARMOR
      • Bug
      • Нравится
      • Ха-ха
    Ответы
    25
    Просмотры
    4K
    Общение
    Арсений Пиво
    Арсений Пиво
  2. G
    • Закрыта
    [CLEO] Счётчик убийств/смертей.
      • Нравится
    Ответы
    15
    Просмотры
    21K
    Другое
    Забавный Бандит
    З
  3. iTz_WEEZY
    • Закрыта
    Помогите сделать [Авто Викторина]
    Ответы
    6
    Просмотры
    2K
    Архив
    iTz_WEEZY
    iTz_WEEZY
  4. PanSeek
    Интервью с DarkP1xel
      • Нравится
      • Влюблен
      • Злость
    Ответы
    55
    Просмотры
    11K
    Общение
    nikusyaxxs
    nikusyaxxs
  5. PanSeek
    Интервью с chapo
      • Нравится
      • Клоун
    Ответы
    16
    Просмотры
    4K
    Общение
    Стэнфорд
    Стэнфорд
Сверху Снизу