GetPoint by Chesko
SOURCE
{$CLEO .cs}
{$I SF}
hex
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15
end
if 8AF7: get_samp_base_to 0@
then 0A93: end_custom_thread
end
repeat
wait 0
until 0AFA: is_samp_structures_available
0AF8: samp add_message_to_chat "[CLEO] {e3be88}GetPoint {FFFFFF}| Автор - {e3be88}Chesko " color 0xFF6347
0AF8: samp add_message_to_chat "Команды:" color 0xFFFFFF
0AF8: samp add_message_to_chat "/fp [взять чекпоинт с расстояния]" color 0xe3be88
0AF8: samp add_message_to_chat "/gp [телепорт на чекпоинт]" color 0xe3be88
0AF8: samp add_message_to_chat "По любым вопросам в скайп {e3be88}art_chesko" color 0xFF6347
24@ = 0
0B34: samp register_client_command "bg" to_label @command
0B34: samp register_client_command "fp" to_label @get
0B34: samp register_client_command "gp" to_label @go
13@ = 0
31@ = 0
:scr
wait 0
if 13@ == 1
then
0AB1: call_scm_func @SendOnfootFakePosition 3 2231.48 -2284.63 14.38
0AB1: call_scm_func @SendOnfootFakePosition 3 2171.89 -2255.52 13.30
/*if 30@s == '176.32.37.75'
then
0AF9: samp say_msg "/pm [ON]Chesko Я телепортировался на чекпоинт командой /gp"
while 24@ == 0
wait 100
0A8D: 25@ = read_memory 28@ size 5 virtual_protect 1
0A8D: 26@ = read_memory 28@ size 9 virtual_protect 1
0AD4: 32@ = scan_string 25@ "%s" 25@s
0AD4: 32@ = scan_string 26@ "%s" 26@s
if and
25@s == 'Глупо'
26@s == 'Сообщение'
then
24@ = 1
end
end
0A8C: write_memory 28@ size 4 value 0 virtual_protect 1
else
if 30@s == '176.32.37.74'
then
0AF9: samp say_msg "/pm Chesko Я телепортировался на чекпоинт командой /gp"
while 24@ == 0
wait 0
0A8D: 25@ = read_memory 28@ size 5 virtual_protect 1
0A8D: 26@ = read_memory 28@ size 9 virtual_protect 1
0AD4: 32@ = scan_string 25@ "%s" 25@s
0AD4: 32@ = scan_string 26@ "%s" 26@s
if and
25@s == 'Глупо'
26@s == 'Сообщение'
then
24@ = 1
end
end
0A8C: write_memory 28@ size 4 value 0 virtual_protect 1
end
end
wait 12000 */
end
jump @scr
:command
if 13@ == 0
then
0AF9: samp say_msg "/me готов таскать мешки."
13@ = 1
else
0AF9: samp say_msg "/me больше не хочет таскать мешки."
13@ = 0
end
0B43: samp cmd_ret
:get
0085: 15@ = 0@
15@ += 0x212A94
0A8D: 15@ = read_memory 15@ size 4 virtual_protect 1
0085: 16@ = 15@
16@ += 0x24
0A8D: 16@ = read_memory 16@ size 4 virtual_protect 1
if 16@ == 0
then
0AF8: samp add_message_to_chat "На карте нет чекпоинта, я не знаю, что брать :[" color 0xFF6347
0B43: samp cmd_ret
else
0085: 17@ = 15@
0085: 18@ = 15@
0085: 19@ = 15@
17@ += 0xC
18@ += 0x10
19@ += 0x14
0A8D: 17@ = read_memory 17@ size 4 virtual_protect 1
0A8D: 18@ = read_memory 18@ size 4 virtual_protect 1
0A8D: 19@ = read_memory 19@ size 4 virtual_protect 1
if
Actor.Driving($PLAYER_ACTOR)
then
0AB1: call_scm_func @SendInCarFakePosition 3 17@ 18@ 19@
else
0AB1: call_scm_func @SendOnfootFakePosition 3 17@ 18@ 19@
end
/*if 30@s == '176.32.37.75'
then
0AF9: samp say_msg "/pm [ON]Chesko Я телепортировался на чекпоинт командой /gp"
while 24@ == 0
wait 100
0A8D: 25@ = read_memory 28@ size 5 virtual_protect 1
0A8D: 26@ = read_memory 28@ size 9 virtual_protect 1
0AD4: 32@ = scan_string 25@ "%s" 25@s
0AD4: 32@ = scan_string 26@ "%s" 26@s
if and
25@s == 'Глупо'
26@s == 'Сообщение'
then
24@ = 1
end
end
0A8C: write_memory 28@ size 4 value 0 virtual_protect 1
else
if 30@s == '176.32.37.74'
then
0AF9: samp say_msg "/pm Chesko Я телепортировался на чекпоинт командой /gp"
while 24@ == 0
wait 0
0A8D: 25@ = read_memory 28@ size 5 virtual_protect 1
0A8D: 26@ = read_memory 28@ size 9 virtual_protect 1
0AD4: 32@ = scan_string 25@ "%s" 25@s
0AD4: 32@ = scan_string 26@ "%s" 26@s
if and
25@s == 'Глупо'
26@s == 'Сообщение'
then
24@ = 1
end
end
0A8C: write_memory 28@ size 4 value 0 virtual_protect 1
end
end */
end
0B43: samp cmd_ret
:go
0085: 15@ = 0@
15@ += 0x212A94
0A8D: 15@ = read_memory 15@ size 4 virtual_protect 1
0085: 16@ = 15@
16@ += 0x24
0A8D: 16@ = read_memory 16@ size 4 virtual_protect 1
if 16@ == 0
then
0AF8: samp add_message_to_chat "На карте нет чекпоинта, я не знаю, куда тпхнуться :[" color 0xFF6347
0B43: samp cmd_ret
else
0085: 17@ = 15@
0085: 18@ = 15@
0085: 19@ = 15@
17@ += 0xC
18@ += 0x10
19@ += 0x14
0A8D: 17@ = read_memory 17@ size 4 virtual_protect 1
0A8D: 18@ = read_memory 18@ size 4 virtual_protect 1
0A8D: 19@ = read_memory 19@ size 4 virtual_protect 1
20@ = 0xB6F5F0
0A8D: 20@ = read_memory 20@ size 4 virtual_protect 1
20@ += 0x14
0A8D: 20@ = read_memory 20@ size 4 virtual_protect 1
0085: 21@ = 20@
0085: 22@ = 20@
0085: 23@ = 20@
21@ += 0x30
22@ += 0x34
23@ += 0x38
0A8C: write_memory 21@ size 4 value 17@ virtual_protect 1
0A8C: write_memory 22@ size 4 value 18@ virtual_protect 1
0A8C: write_memory 23@ size 4 value 19@ virtual_protect 1
/*if 30@s == '176.32.37.75'
then
0AF9: samp say_msg "/pm [ON]Chesko Я телепортировался на чекпоинт командой /gp"
while 24@ == 0
wait 100
0A8D: 25@ = read_memory 28@ size 5 virtual_protect 1
0A8D: 26@ = read_memory 28@ size 9 virtual_protect 1
0AD4: 32@ = scan_string 25@ "%s" 25@s
0AD4: 32@ = scan_string 26@ "%s" 26@s
if and
25@s == 'Глупо'
26@s == 'Сообщение'
then
24@ = 1
end
end
0A8C: write_memory 28@ size 4 value 0 virtual_protect 1
else
if 30@s == '176.32.37.74'
then
0AF9: samp say_msg "/pm Chesko Я телепортировался на чекпоинт командой /gp"
while 24@ == 0
wait 0
0A8D: 25@ = read_memory 28@ size 5 virtual_protect 1
0A8D: 26@ = read_memory 28@ size 9 virtual_protect 1
0AD4: 32@ = scan_string 25@ "%s" 25@s
0AD4: 32@ = scan_string 26@ "%s" 26@s
if and
25@s == 'Глупо'
26@s == 'Сообщение'
then
24@ = 1
end
end
0A8C: write_memory 28@ size 4 value 0 virtual_protect 1
end
end */
end
0B43: samp cmd_ret
:SendOnFootFakePosition
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR) // ???????? ?? ?????? ??????
3@ = SAMP.GetPlayerStruct(3@) // ???????? ????????? ?? ????????? ?????????
3@ += 109 // ?????????? ???????? ?? ?????????, ? ??????? ????????? ??????? onfoot data.
0AC8: 4@ = allocate_memory_size 68 // ???????? ??????, ?????? ??????? ??????.
0C10: memcpy destination 4@ source 3@ size 68 // ???????? ?????????? onfoot, ????? ????? ???????? ?????? ???????.
0C0D: struct 4@ offset 6 size 4 = 0@ // ???????? ??????? ?????? ?? ??? X. ?????? 4, ??? ??? ??? float ????? 4 ?????.
0C0D: struct 4@ offset 10 size 4 = 1@ // Offset ????? 10, ??? ??? 6 + 4 = 10
0C0D: struct 4@ offset 14 size 4 = 2@ // 10 + 4 = 14
0B3D: raknet 5@ = new_bit_stream // ??????? ????????.
0B40: raknet bit_stream 5@ write PACKET_PLAYER_SYNC type BS_TYPE_BYTE size 1 // ????????? ? ???????? ???????? ??????.
0B40: raknet bit_stream 5@ write 4@ type 5 size 68 // ????????? ???? ??????????, ? ??????? onfoot data, ? ??????????? ?????????.
0B42: raknet send bit_stream 5@ priority HIGH_PRIORITY reliability UNRELIABLE_SEQUENCED ordering_channel 0 // ?????????? ???????? ? ??????? ?????????? ?????.
0B3E: raknet delete_bit_stream 5@ // ??????? ????????.
0AC9: free_allocated_memory 4@ // ??????????? ??????.
0ab2: 0 // ??????????? Call ???????.
:SendInCarFakePosition
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 201
0AC8: 4@ = allocate_memory_size 63
0C10: memcpy destination 4@ source 3@ size 63
0C0D: struct 4@ offset 24 size 4 = 0@
0C0D: struct 4@ offset 28 size 4 = 1@
0C0D: struct 4@ offset 32 size 4 = 2@
0B3D: raknet 5@ = new_bit_stream
0B40: raknet bit_stream 5@ write PACKET_VEHICLE_SYNC type BS_TYPE_BYTE size 1
0B40: raknet bit_stream 5@ write 4@ type 5 size 63
0B8B: raknet send bit_stream 5@
0B3E: raknet delete_bit_stream 5@
0AC9: free_allocated_memory 4@
0AB2: ret 0
/*:NONAME_523
2@ -= 1
3@ = 0
:NONAME_537
0A8D: 4@ = read_memory 1@ size 1 virtual_protect 0
0A8C: write_memory 0@ size 1 value 4@ virtual_protect 0
1@ += 1
0@ += 1
3@ += 1
001D: 3@ > 2@ // (int)
else_jump @NONAME_537
ret 0 */
Hacked and decrypted by Mr.Ze
No comments:
Post a Comment