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

Bili Djin

Активный
137
67
Как скачивать файлы с пк и отправлять их на ( а собственно куда их можно отправлять? ) ?
 

Bili Djin

Активный
137
67
Как найти ид анимации какого либо игрока?
Пробовал найти анимации через хук, но я не понял или у меня лыжи не едут или я тупой.
Вот код:

CLEO:
0BE5: raknet 6@ = get_hook_param PARAM_PACKETID
if
6@ == 207
then
    0BE5: raknet 0@ = get_hook_param 0
    0BF2: raknet 1@ = bit_stream 0@ get_read_offset
    0BF1: raknet 2@ = bit_stream 0@ get_write_offset
    0BED: raknet bit_stream 0@ set_read_offset 520
 
    0BE7: raknet 3@ = bit_stream_read 0@ type 2
    0AF8: samp add_message_to_chat "Id anim: %d" color 0xFFFFFF 3@
end
0BE0: raknet hook_ret true

Помогите найти ид анимации любого игрока из стрима
 

ollydbg

Известный
163
113
Как найти ид анимации какого либо игрока?
Пробовал найти анимации через хук, но я не понял или у меня лыжи не едут или я тупой.
Вот код:

CLEO:
0BE5: raknet 6@ = get_hook_param PARAM_PACKETID
if
6@ == 207
then
    0BE5: raknet 0@ = get_hook_param 0
    0BF2: raknet 1@ = bit_stream 0@ get_read_offset
    0BF1: raknet 2@ = bit_stream 0@ get_write_offset
    0BED: raknet bit_stream 0@ set_read_offset 520

    0BE7: raknet 3@ = bit_stream_read 0@ type 2
    0AF8: samp add_message_to_chat "Id anim: %d" color 0xFFFFFF 3@
end
0BE0: raknet hook_ret true

Помогите найти ид анимации любого игрока из стрима
I think so, it worked for me in outcomingpacket
CLEO:
0BE4: raknet setup_incoming_packet_hook @hook

:hook
0BE5: raknet 6@ = get_hook_param PARAM_PACKETID
if
6@ == 207
then
    0BE5: raknet 0@ = get_hook_param 0
  0BF3: raknet 1@ = bit_stream 0@ get_data_ptr
  0C0C: 2@ = struct 1@ offset 65 size 2
    0AF8: samp add_message_to_chat "Id anim: %d" color 0xFFFFFF 2@
end
0BE0: raknet hook_ret true
you can use
Lua:
0B57: samp 2@ = player 1@ animation_id
 
Последнее редактирование:
  • Влюблен
Реакции: Bili Djin

FakeSince

Активный
239
54
Короче, нашел клео время от hnnssy, захотел переделать его под каптилку по времени, то есть в .ini файле вписываешь время, а оно в это время каптит, попробовал своими кривыми руками переписать код, в итоге крашит при входе, помогите умные люди :3

CLEO:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
{$USE INI}
{$USE bitwise}

//-------------MAIN---------------
thread "hnnssytm" 
0662: printstring "time" 

:hnnssytm_20
wait 0 
if 
8AE4:   not directory_exists "Cleo\INI" 
else_jump @hnnssytm_59 
0AE5: create_directory "Cleo\INI" // IF and SET 

:hnnssytm_59
if 
0AAB:   file_exists "CLEO\INI\capture.ini" 
else_jump @hnnssytm_442 
0AF2: 12@ = get_float_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Hours" 
0AF2: 13@ = get_float_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Min" 
0AF0: 14@ = get_int_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Sec" 
0AF0: 15@ = get_int_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "MS" 
jump @hnnssytm_789 

:hnnssytm_442
0AF3: write_float 00 to_ini_file "CLEO\INI\capture.ini" section "shadow" key "Hours" 
0AF3: write_float 00 to_ini_file "CLEO\INI\capture.ini" section "shadow" key "Min" 
0AF3: write_float 00 to_ini_file "CLEO\INI\capture.ini" section "shadow" key "Sec" 
0AF3: write_float 00 to_ini_file "CLEO\INI\capture.ini" section "shadow" key "MS" 


:hnnssytm_789
wait 0 
0AF2: 12@ = get_float_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Hours" 
0AF2: 13@ = get_float_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Min" 
0AF0: 14@ = get_int_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Sec" 
0AF0: 15@ = get_int_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "MS"
alloc 1@ 256 
call @hnnssytm_1329 0 3@ 4@ 5@ 6@ 7@ 8@ 9@ 10@ 
if and
0085: 7@ = 12@
0085: 8@ = 13@
0085: 9@ = 14@
0085: 10@ = 15@
else_jump @hnnssytm_20
0AF9: samp say_msg "lol"
free 1@  
jump @hnnssytm_789 
jump @hnnssytm_20 

:hnnssytm_1329
0AA2: 0@ = load_library "kernel32.dll" // IF and SET 
0AA4: 1@ = get_proc_address "GetLocalTime" library 0@ // IF and SET 
alloc 2@ 32 
0AA5: call 1@ num_params 1 pop 0 2@  
0A8D: 3@ = read_memory 2@ size 2 virtual_protect 0 
2@ += 2 
0A8D: 4@ = read_memory 2@ size 2 virtual_protect 0 
2@ += 2 
0A8D: 5@ = read_memory 2@ size 2 virtual_protect 0 
2@ += 2 
0A8D: 6@ = read_memory 2@ size 2 virtual_protect 0 
2@ += 2 
0A8D: 7@ = read_memory 2@ size 2 virtual_protect 0 
2@ += 2 
0A8D: 8@ = read_memory 2@ size 2 virtual_protect 0 
2@ += 2 
0A8D: 9@ = read_memory 2@ size 2 virtual_protect 0 
2@ += 2 
0A8D: 10@ = read_memory 2@ size 2 virtual_protect 0 
2@ -= 30 
ret 8 3@ 4@ 5@ 6@ 7@ 8@ 9@ 10@
 

Bili Djin

Активный
137
67
Короче, нашел клео время от hnnssy, захотел переделать его под каптилку по времени, то есть в .ini файле вписываешь время, а оно в это время каптит, попробовал своими кривыми руками переписать код, в итоге крашит при входе, помогите умные люди :3

CLEO:
// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}
{$USE INI}
{$USE bitwise}

//-------------MAIN---------------
thread "hnnssytm"
0662: printstring "time"

:hnnssytm_20
wait 0
if
8AE4:   not directory_exists "Cleo\INI"
else_jump @hnnssytm_59
0AE5: create_directory "Cleo\INI" // IF and SET

:hnnssytm_59
if
0AAB:   file_exists "CLEO\INI\capture.ini"
else_jump @hnnssytm_442
0AF2: 12@ = get_float_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Hours"
0AF2: 13@ = get_float_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Min"
0AF0: 14@ = get_int_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Sec"
0AF0: 15@ = get_int_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "MS"
jump @hnnssytm_789

:hnnssytm_442
0AF3: write_float 00 to_ini_file "CLEO\INI\capture.ini" section "shadow" key "Hours"
0AF3: write_float 00 to_ini_file "CLEO\INI\capture.ini" section "shadow" key "Min"
0AF3: write_float 00 to_ini_file "CLEO\INI\capture.ini" section "shadow" key "Sec"
0AF3: write_float 00 to_ini_file "CLEO\INI\capture.ini" section "shadow" key "MS"


:hnnssytm_789
wait 0
0AF2: 12@ = get_float_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Hours"
0AF2: 13@ = get_float_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Min"
0AF0: 14@ = get_int_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "Sec"
0AF0: 15@ = get_int_from_ini_file "CLEO\INI\capture.ini" section "shadow" key "MS"
alloc 1@ 256
call @hnnssytm_1329 0 3@ 4@ 5@ 6@ 7@ 8@ 9@ 10@
if and
0085: 7@ = 12@
0085: 8@ = 13@
0085: 9@ = 14@
0085: 10@ = 15@
else_jump @hnnssytm_20
0AF9: samp say_msg "lol"
free 1@ 
jump @hnnssytm_789
jump @hnnssytm_20

:hnnssytm_1329
0AA2: 0@ = load_library "kernel32.dll" // IF and SET
0AA4: 1@ = get_proc_address "GetLocalTime" library 0@ // IF and SET
alloc 2@ 32
0AA5: call 1@ num_params 1 pop 0 2@ 
0A8D: 3@ = read_memory 2@ size 2 virtual_protect 0
2@ += 2
0A8D: 4@ = read_memory 2@ size 2 virtual_protect 0
2@ += 2
0A8D: 5@ = read_memory 2@ size 2 virtual_protect 0
2@ += 2
0A8D: 6@ = read_memory 2@ size 2 virtual_protect 0
2@ += 2
0A8D: 7@ = read_memory 2@ size 2 virtual_protect 0
2@ += 2
0A8D: 8@ = read_memory 2@ size 2 virtual_protect 0
2@ += 2
0A8D: 9@ = read_memory 2@ size 2 virtual_protect 0
2@ += 2
0A8D: 10@ = read_memory 2@ size 2 virtual_protect 0
2@ -= 30
ret 8 3@ 4@ 5@ 6@ 7@ 8@ 9@ 10@
Что значит "а оно в это время каптит"?
 

Bili Djin

Активный
137
67
Ну тоесть когда наступает время, которое я укажу в .INI файле, оно вводит команду /capture
CLEO:
{$CLEO .cs}
{$USE CLEO+}
{$USE INI}

0000: NOP

:Prov_na_igroka
wait 0
samp.Available()
jf @Prov_na_igroka
0AF0: 0@ = get_int_from_ini_file "cleo\Time Capture by Bili Djin.ini" section "Setting" key "Час"
8ADC:   not test_cheat 0@
jf @reset_0
0AF0: 1@ = get_int_from_ini_file "cleo\Time Capture by Bili Djin.ini" section "Setting" key "Минуты"
8ADC:   not test_cheat 1@
jf @reset_1
//0AF0: 2@ = get_int_from_ini_file "cleo\Time Capture by Bili Djin.ini" section "Setting" key "Секунды"
//8ADC:   not test_cheat 2@
//jf @reset_2
0B61:  samp is_local_player_spawned
jf @Prov_na_igroka   
wait 2000
0AF8: samp add_message_to_chat "{73b461}[Time Capture] {FFFFFF}Загружен! {73b461}by Bili Djin" color -1


:cods
wait 100
0AA2: 0@ = load_library "kernel32.dll"
0AA4: 1@ = get_proc_address "GetLocalTime" library 0@
0AC8: 2@ = alloc mem 32
0AA5: call 1@ params 1 pop 0 2@
0085: 3@ = 2@
3@ += 8

0A8D: 8@ = read mem 3@ size 2 vp 0 // wHour
3@ += 2

0A8D: 9@ = read mem 3@ size 2 vp 0 // wMinute
0AF0: 10@ = get_int_from_ini_file "cleo\Time Capture by Bili Djin.ini" section "Setting" key "Час"
003b: 10@ == 8@
jf @cods
0AF0: 11@ = get_int_from_ini_file "cleo\Time Capture by Bili Djin.ini" section "Setting" key "Минуты"
003b: 11@ == 9@
jf @cods
say "/capture"
wait 70000
jump @cods


:reset_0
0AF1: write_int 00 to_ini_file "cleo\Time Capture by Bili Djin.ini" section "Setting" key "Час"
jump @Prov_na_igroka

:reset_1
0AF1: write_int 00 to_ini_file "cleo\Time Capture by Bili Djin.ini" section "Setting" key "Минуты"
jump @Prov_na_igroka

:reset_2
0AF1: write_int 00 to_ini_file "cleo\Time Capture by Bili Djin.ini" section "Setting" key "Секунды"
jump @Prov_na_igroka
 
  • Нравится
Реакции: FakeSince

FakeSince

Активный
239
54
Всем опять же здравствуйте, как сделать чтоб при вводе команды /test оно устанавливало в переменные данные, пробовал вот так, но у меня тупо крашит :(

Код:
0B34: samp register_client_command "test" to_label @86
0B34: samp register_client_command "test2" to_label @87

:86
while true
wait 0    
7@ == 1
jf @86
3@ = -425.5623
4@ = 959.5462
5@ = 12.1494
7@ = 1

:87
while true
wait 0    
7@ == 1
jf @87
3@ = -425.5623
4@ = 959.5462
5@ = 12.1494
7@ = 1
 

Bili Djin

Активный
137
67
CLEO:
0B34: samp register_client_command "test" to_label @86
0B34: samp register_client_command "test2" to_label @87
0BDE: pause_thread 0

:86
wait 0
3@ = -425.5623
4@ = 959.5462
5@ = 12.1494
samp.CmdRet()

:87
wait 0
3@ = -425.5623
4@ = 959.5462
5@ = 12.1494
samp.CmdRet()
 
  • Нравится
Реакции: FakeSince

FakeSince

Активный
239
54
Всем привет, а у меня такой вопрос, можно ли сделать связь игры с телеграмом через клео? Ну тоесть чтоб в игре допустим пишу /tg text и оно в телеграмм канал этот текст кидало?
 

hnnssy

Известный
Друг
2,684
2,744
Можете помочь? Хотя-бы натолкнуть как что это организовать, а то я не очень понимаю в этом всём
почитай про api телеграма и отправку запросов на клео
любой примитивный стиллер - готовый пример запросов, просто вместо ссылки на базу, идёт обращение к апэи
можешь даже в браузере это сделать для теста
https://api.telegram.org/*token*/sendMessage?chat_id=*channel*&text=*text*
 

FakeSince

Активный
239
54
Всем опять привет, я нашел хук координат чекпоинта, как сделать так чтоб мой коордмастер телепортировался на координаты чекпоинта (3@ 4@ 5@) как только увидит этот чекпоинт? Я сам пробовал с активацией по чит-коду, но мой коордмастер телепортируется на нулевые координаты, буду благодарен если кто-то поможет

CLEO:
{$CLEO .cs}
{$INCLUDE SF}

//-------------MAIN---------------
thread 'COORDS'

0000:
wait 0
0BE3: raknet setup_incoming_rpc_hook @in_rpc
0C6A: 26@ = create_custom_thread_at_label @86


:in_rpc
0BE5: raknet 10@ = get_hook_param PARAM_PACKETID
if 10@ == RPC_SCRSETCHECKPOINT
then
0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
0BE7: raknet 3@ = bit_stream_read 1@ type BS_TYPE_FLOAT
0BE7: raknet 4@ = bit_stream_read 1@ type BS_TYPE_FLOAT
0BE7: raknet 5@ = bit_stream_read 1@ type BS_TYPE_FLOAT
0BE7: raknet 33@ = bit_stream_read 1@ type BS_TYPE_FLOAT 
0AF8: samp add_message_to_chat "X:%f Y:%f Z:%f RADIUS: %f" color -1 params 3@ 4@ 5@ 33@
wait 1000
end
0BE0: raknet hook_ret 1 

:86
wait 0    
if or
0ADC: test_cheat "GO"
7@ == 1
jf @414
7@ = 1

:688
wait 0        
Actor.StorePos($PLAYER_ACTOR, 0@, 1@, 2@) 
0509: 11@ = distance_between_XY 3@ 4@ and_XY 0@ 1@
if    
       not 11@ >= 60.0    
jf @192
Actor.PutAt($PLAYER_ACTOR, 3@, 4@, 12@)
jump @342    

:192
0063: 3@ -= 0@ // (float)    
0063: 4@ -= 1@ // (float)    
0604: get_Z_angle_for_point 3@ 4@ store_to 6@
Actor.Angle($PLAYER_ACTOR) = 6@  
Actor.LockInCurrentPosition($PLAYER_ACTOR) = True
if
       Actor.Driving($PLAYER_ACTOR)
jf @273
03C0: 30@ = actor $PLAYER_ACTOR car    
Car.Angle(30@) = 6@
Car.LockInCurrentPosition(30@) = True

:273
04C4: store_coords_to 8@ 9@ 10@ from_actor $PLAYER_ACTOR with_offset 0.0 20.1 0.0
Actor.PutAt($PLAYER_ACTOR, 8@, 9@, -5.1) 
wait 1000

:329
if
0ADC: not test_cheat "NO"
jf @414    

:342
wait 0    
7@ = 0
Actor.StorePos($PLAYER_ACTOR, 0@, 1@, 2@)
02CE: 13@ = ground_z_at 0@ 1@ 999.0
Actor.PutAt($PLAYER_ACTOR, 0@, 1@, 13@)
Actor.LockInCurrentPosition($PLAYER_ACTOR) = False
if    
056E:   car 30@ defined
jf @414          
Car.LockInCurrentPosition(30@) = False
jump @414

:415
0ACD: show_text_highpriority "NO MARKER" time 1500

:414
jump @86
[/cleo]
 
Последнее редактирование: