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

k1sher

Известный
201
4
Подскажите пожалуйста где ошибка?(
Код:
{$CLEO .cs}
{$INCLUDE SF}
0000:
   
repeat
wait 400
until 0AFA: is_samp_structures_available

alloc 5@ 256
0C11: memset destination 5@ value 0 size 256

chatmsg "ыв." 0xffffff
0BE3: raknet setup_incoming_rpc_hook @cmsg

while true
    wait 0
end

:cmsg
0BE5: raknet 6@ = get_hook_param PARAM_BITSTREAM
0BE5: raknet 7@ = get_hook_param PARAM_PACKETID
if
7@ == RPC_ScrClientMessage
then
    0BE7: raknet 9@ = bit_stream_read 6@ type BS_TYPE_INT
    0BE7: raknet 10@ = bit_stream_read 6@ type BS_TYPE_INT
    0C11: memset destination 5@ value 0 size 256
    0BE8: raknet bit_stream 6@ read_array 5@ size 10@
    0C0F: array 5@ element 10@ = 0x00
    if
    0C18: 8@ = strstr string1 5@ string2 "ыва."
    then
        say "ыва"
        say "ывач"
    end                                                  
end
0BE0: raknet hook_ret true
 

itsLegend

Фонд борьбы за жуков 🐞
Администратор
2,696
1,463
Тесть на локальном сервере или там, где нет анти-чита.
 

k1sher

Известный
201
4
Код:
{$CLEO .cs}
{$INCLUDE SF}
0000:
  
repeat
wait 400
until 0AFA: is_samp_structures_available

alloc 5@ 256
0C11: memset destination 5@ value 0 size 256

chatmsg "ыв." 0xffffff
0BE3: raknet setup_incoming_rpc_hook @cmsg

while true
    wait 0
end

:cmsg
0BE5: raknet 6@ = get_hook_param PARAM_BITSTREAM
0BE5: raknet 7@ = get_hook_param PARAM_PACKETID
if
7@ == RPC_ScrClientMessage
then
    0BE7: raknet 9@ = bit_stream_read 6@ type BS_TYPE_INT
    0BE7: raknet 10@ = bit_stream_read 6@ type BS_TYPE_INT
    0C11: memset destination 5@ value 0 size 256
    0BE8: raknet bit_stream 6@ read_array 5@ size 10@
    0C0F: array 5@ element 10@ = 0x00
    if
    chatmsg "ыва."
    then
        say "ыва"
        say "ывач"
    end                                                 
end
0BE0: raknet hook_ret true
Нет? Не так?
 

BlackKnigga

Известный
BH Team
922
445
Код:
{$CLEO .cs}
{$INCLUDE SF}
0000:
 
repeat
wait 400
until 0AFA: is_samp_structures_available

alloc 5@ 256
0C11: memset destination 5@ value 0 size 256

chatmsg "ыв." 0xffffff
0BE3: raknet setup_incoming_rpc_hook @cmsg

while true
    wait 0
end

:cmsg
0BE5: raknet 6@ = get_hook_param PARAM_BITSTREAM
0BE5: raknet 7@ = get_hook_param PARAM_PACKETID
if
7@ == RPC_ScrClientMessage
then
    0BE7: raknet 9@ = bit_stream_read 6@ type BS_TYPE_INT
    0BE7: raknet 10@ = bit_stream_read 6@ type BS_TYPE_INT
    0C11: memset destination 5@ value 0 size 256
    0BE8: raknet bit_stream 6@ read_array 5@ size 10@
    0C0F: array 5@ element 10@ = 0x00
    if
    chatmsg "ыва."
    then
        say "ыва"
        say "ывач"
    end                                                
end
0BE0: raknet hook_ret true
Нет? Не так?
CLEO:
{$CLEO .cs}
{$INCLUDE SF}
0000:
  
repeat
wait 400
until 0AFA: is_samp_structures_available

alloc 5@ 256
0C11: memset destination 5@ value 0 size 256

chatmsg "ыв." 0xffffff
0BE3: raknet setup_incoming_rpc_hook @cmsg

while true
    wait 0
end

:cmsg
0BE5: raknet 6@ = get_hook_param PARAM_BITSTREAM
0BE5: raknet 7@ = get_hook_param PARAM_PACKETID
if
7@ == RPC_ScrClientMessage
then
    0BE7: raknet 9@ = bit_stream_read 6@ type BS_TYPE_INT
    0BE7: raknet 10@ = bit_stream_read 6@ type BS_TYPE_INT
    0C11: memset destination 5@ value 0 size 256
    0BE8: raknet bit_stream 6@ read_array 5@ size 10@
    0C0F: array 5@ element 10@ = 0x00
    if
    0C18: 8@ = strstr string1 5@ string2 "ыва."
    then
        chatmsg "ыва" -1
        chatmsg "ывач" -1
    end                                                 
end
0BE0: raknet hook_ret true
 

k1sher

Известный
201
4
с chatmsg работает. только мне нужно чтоб в чат писалось(чтоб все видели)
 
Последнее редактирование: