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

LaRossa

LaRossa

Потрачен
429
117
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Kristyan написал(а):
Ребята, ну пж помогите... Уже прошло неделя и с тех пор не нашел ответа. Вот здесь мне нужно отделять "[" от ника чтобы он не считался как часть к %s . Может кто шарет в C++ сможет помочь мне? Попробовал и так %s%[^[] , тоже не работает.... Это функция из с++ "sscanf" и с синтаксисом не знаком = туплю сильно.

CLEO: 
    if
             0C18: 18@ = strstr string1 5@ string2 "Dispatch:"
          then
           0AA5: call 0x8220AD num_params 4 pop 4 26@v 25@ "Dispatch: %s[%d] has commited a crime:" 5@
                if
                0C14: strcmp string1 1@ string2 25@
                then
Нажмите для раскрытия...
Дай полный код
 
Kristyan

Kristyan

Известный
165
16
LaRossa написал(а):
Дай полный код
Нажмите для раскрытия...
CLEO: 
{$CLEO}
0000:

repeat
wait 0
until SAMP.Available()



alloc 16@ 105
alloc 1@ 64
alloc 4@ 25
alloc 5@ 260
alloc 25@ 50




WHILE TRUE
wait 0
for 15@ = 2057 to 2058
    if 0C5D: samp textdraw 15@ is_exists
    then
        0C5A: samp textdraw 15@ get_string_to 16@
        if 0C18: 2@ = strstr string1 16@ string2 "Target:"
        then
        0AA5: call 0x8220AD num_params 6 pop 6 params 4@ 3@v 2@v 1@ "~w~Target: ~r~%[^~]~w~(%d)~n~Distance: ~r~%dm ~w~(%[^)])" 16@
        0B75: samp get_chat_string 99 text_to 5@ prefix_to 0 color_to 0 prefix_color_to 0
          if
             0C18: 18@ = strstr string1 5@ string2 "Dispatch:"
          then
           0AA5: call 0x8220AD num_params 4 pop 4 26@v 25@ "Dispatch: %s[%d] has commited a crime:" 5@
                if
                0C14: strcmp string1 1@ string2 25@
                then      
                 chatmsg  25@ -1
                end
          end
        end
    end
end
end
 
Последнее редактирование:
LaRossa

LaRossa

Потрачен
429
117
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Kristyan написал(а):
CLEO: 
{$CLEO}
0000:

repeat
wait 0
until SAMP.Available()



alloc 16@ 105
alloc 1@ 64
alloc 4@ 25
alloc 5@ 260
alloc 25@ 50




WHILE TRUE
wait 0
for 15@ = 2057 to 2058
    if 0C5D: samp textdraw 15@ is_exists
    then
        0C5A: samp textdraw 15@ get_string_to 16@
        if 0C18: 2@ = strstr string1 16@ string2 "Target:"
        then
        0AA5: call 0x8220AD num_params 6 pop 6 params 4@ 3@v 2@v 1@ "~w~Target: ~r~%[^~]~w~(%d)~n~Distance: ~r~%dm ~w~(%[^)])" 16@
        0B75: samp get_chat_string 99 text_to 5@ prefix_to 0 color_to 0 prefix_color_to 0
          if
             0C18: 18@ = strstr string1 5@ string2 "Dispatch:"
          then
           0AA5: call 0x8220AD num_params 4 pop 4 26@v 25@ "Dispatch: %s[%d] has commited a crime:" 5@
                if
                0C14: strcmp string1 1@ string2 25@
                then      
                 chatmsg  25@ -1
                end
          end
        end
    end
end
end
Нажмите для раскрытия...
CLEO: 
{$CLEO}
0000:
while not Samp.Available()
    wait 0
end
0BE3: raknet setup_incoming_rpc_hook @hook

alloc 16@ 105
alloc 1@ 64
alloc 4@ 25
alloc 5@ 260
alloc 25@ 50


while true
    wait 0
    for 15@ = 2057 to 2058
    if 0C5D: samp textdraw 15@ is_exists
        then
        0C5A: samp textdraw 15@ get_string_to 16@
        if 0C18: 0 = strstr string1 16@ string2 "Target:"
            then
            0AA5: call 0x8220AD num_params 6 pop 6 params 4@ 3@v 2@v 1@ "~w~Target: ~r~%[^~]~w~(%d)~n~Distance: ~r~%dm ~w~(%[^)])" 16@
        end
    end   
end

:hook
0BE5: raknet 0@ = get_hook_param 0
0BE5: raknet 1@ = get_hook_param 1
if 1@ == 93
    then
    0BE7: raknet 2@ = bit_stream_read 0@ type 3
    0BE7: raknet 3@ = bit_stream_read 0@ type 3
    alloc 4@ 257
    0C11: memset destination 4@ value 0 size 257
    0BE8: raknet bit_stream 0@ read_array 4@ size 3@
    if 0C18: 0 = strstr string1 4@ string2 "Dispatch:"
        then
        alloc 10@ 32
        0AA5: call 0x8220AD num_params 4 pop 4 10@ 11@v "Dispatch: %s[%d] has commited a crime:" 4@
        free 10@
        if 003B: 1@ == 11@  // (int)
            then
            msg "%d" -1 11@       
        end
        free 4@
    end                                  
end
0BE0: raknet hook_ret 1
 
Kristyan

Kristyan

Известный
165
16
LaRossa написал(а):
CLEO: 
{$CLEO}
0000:
while not Samp.Available()
    wait 0
end
0BE3: raknet setup_incoming_rpc_hook @hook

alloc 16@ 105
alloc 1@ 64
alloc 4@ 25
alloc 5@ 260
alloc 25@ 50


while true
    wait 0
    for 15@ = 2057 to 2058
    if 0C5D: samp textdraw 15@ is_exists
        then
        0C5A: samp textdraw 15@ get_string_to 16@
        if 0C18: 0 = strstr string1 16@ string2 "Target:"
            then
            0AA5: call 0x8220AD num_params 6 pop 6 params 4@ 3@v 2@v 1@ "~w~Target: ~r~%[^~]~w~(%d)~n~Distance: ~r~%dm ~w~(%[^)])" 16@
        end
    end  
end

:hook
0BE5: raknet 0@ = get_hook_param 0
0BE5: raknet 1@ = get_hook_param 1
if 1@ == 93
    then
    0BE7: raknet 2@ = bit_stream_read 0@ type 3
    0BE7: raknet 3@ = bit_stream_read 0@ type 3
    alloc 4@ 257
    0C11: memset destination 4@ value 0 size 257
    0BE8: raknet bit_stream 0@ read_array 4@ size 3@
    if 0C18: 0 = strstr string1 4@ string2 "Dispatch:"
        then
        alloc 10@ 32
        0AA5: call 0x8220AD num_params 4 pop 4 10@ 11@v "Dispatch: %s[%d] has commited a crime:" 4@
        free 10@
        if 003B: 1@ == 11@  // (int)
            then
            msg "%d" -1 11@      
        end
        free 4@
    end                                 
end
0BE0: raknet hook_ret 1
Нажмите для раскрытия...
вылетает игра после загрузки

Ты вообще понял что мне нужно?
 
Последнее редактирование модератором:
san0

san0

Известный
Друг
411
267
Kristyan написал(а):
Ты вообще понял что мне нужно?
Нажмите для раскрытия...
1) scanf format string - Wikipedia(https://en.wikipedia.org/wiki/Scanf_format_string#Format_string_specifications)
CLEO: 
0C3A: 1@ = string "Dispatch: Example_Nickname[123] has commited a crime: Grand theft auto" pointer
0C2A: 2@ = strchr 1@ char 0x5B
0A8C: write_memory 2@ size 1 value 0x20 virtual_protect 0
   
alloc 2@ 25
0AA5: call 0x8220AD num_params 4 pop 4 3@v 2@ "%*s %24s %3u" 1@
0af8: "\"%s\" with id %u" -1 2@ 3@
free  2@
2) Плохой код: начиная с того, что можно все сделать на хуках, заканчивая тем, что можно обойтись без sscanf (вышеиспользуемым strchr и указателями, например)
3) C регулярными выражениями на луа твой скрипт будет в ~ 15-20 строк. Без головной боли с выделением памяти, удалением символов и т.д.
 
G

grandpafromghetto

НАСТАЯЩИЙ ДАГИСТАНИЦ
Проверенный
335
119
посоветуйте опкодов для написания простенького бота
p.s мне надо просто, чтоб бегал туда-сюда и все
 
K

kawa operand

перерывпятьминут
602
333
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
upload_2018-2-16_15-6-6.png
 
У

Удалённый пользователь 126082

Гость
Как вообще пишут стиллеры? Я не чмо, которое заливает стиллеры и тд, я просто хочу узнать как они кидают данные на сайт.
 
K

kawa operand

перерывпятьминут
602
333
Обратите внимание, пользователь заблокирован на форуме. Не рекомендуется проводить сделки.
Через хук получают введенную хуйню и отправляют на сервак средствами wininet(чаще всего)
InternetOpenA
InternetOpenUrlA

Но для этого надо знать php чтобы банально принять пришедший пароль и логин
 
D

D3ix

Новичок
4
0
Всем привет. Помогите сделать скрипт "Автоответ". К примеру, в департамент пишет: "*Нажал красную кнопку*" или без звёздочек. (два варианата). После этого сообщения, я сразу пишу в чат: "/r Принял." задержка 1200 млс
"/d Передайте мой номер похитителям: "xx-xx-xx" задержка 1200 млс "/r Агенты, строй в гараже."
Если сделаешь такой скрипт, то заплачу аккаунтом :) SRP 09 and 04, 10 уровни есть. Ниже будут скриншоты с примером сообщения в чат => https://imgur.com/a/0IkQg
У меня есть пример старого автоответчика, может пригодиться :)

Код: 
{$CLEO} 
{$INCLUDE SF} 
0000: 
0BE3: raknet setup_incoming_rpc_hook @1 
alloc 9@ 256 
alloc 11@ 20 

while true 
wait 0 
if and 
0C18: 0 = 9@ "SMS:" 
0C18: 0 = 9@ "Привет" 
then 
0AA5: call 0x8220AD num_params 4 pop 4 params 12@v 11@ "SMS: Привет | Отправитель: %s [т.%d]" 9@ 
0AF9: "/sms %d И тебе привет" 12@ 
end 
0C11: memset destination 9@ value 0 size 256 
end 

:1 
0BE5: raknet 5@ = get_hook_param PARAM_BITSTREAM 
0BE5: raknet 6@ = get_hook_param PARAM_PACKETID 
if 
6@ == RPC_ScrClientMessage 
then 
0BE7: raknet 7@ = bit_stream_read 5@ type BS_TYPE_INT 
0BE7: raknet 8@ = bit_stream_read 5@ type BS_TYPE_INT 
0C11: memset destination 9@ value 0 size 256 
0BE8: raknet bit_stream 5@ read_array 9@ size 8@ 
0C0F: array 9@ element 8@ = 0x00 
end 
0BE0: raknet hook_ret true

Заранее спасибо за помощь :)
 
Войдите или зарегистрируйтесь для ответа.

Похожие темы

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