[CLEO] AutoPresser[STAGE RP]

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
{$CLEO}
{$INCLUDE SF}
0000:
0662: "by legend2360"
0662: "BlastHack - cheating is art"
while not SAMP.Available()
wait 400
end
reg_cmd "ap" @cmd
0@ = -1
0BE3: raknet setup_incoming_rpc_hook @hook
0BDE: pause_thread 0
:cmd
0@ *= -1
0AD1: printf "%d" 1500 0@
cmdret
:hook
if 0@ == true
then
0BE5: raknet 1@ = get_hook_param PARAM_PACKETID
if 1@ == 0x69 // ScrTextDrawSetString
then
3@ = 0xFFFF
0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
0BF3: raknet 2@ = bit_stream 1@ get_data_ptr
2@ += 0x4
if 0C25: strncmp string1 2@ string2 "Press Y" size 0x7
then
3@ = 64
else
if 0C25: strncmp string1 2@ string2 "Press N" size 0x7
then
3@ = 128
end
end
if 3@ <> 0xffff
then 0ab1: call @send_key 1 3@
end
end
/* if 1@ == 0x86 // ScrShowTextDraw
then
0BE5: raknet 1@ = get_hook_param PARAM_BITSTREAM
0BF3: raknet 2@ = bit_stream 1@ get_data_ptr
2@ += 0x43
if 0C25: strncmp string1 2@ string2 "Press Y" size 0x7
then
0B56: set_game_key 11 state 0x80
else
if 0C25: strncmp string1 2@ string2 "Press N" size 0x7
then
0B56: set_game_key 10 state 0x80
end
end
end */
end
0BE0: raknet hook_ret true
:send_key
0ac8: alloc 1@ 68
2@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
0BBA: samp store_player 2@ onfoot_data 1@
0C0D: struct 1@ offset 36 size 1 = 0@
0BC0: samp send_onfoot_data 1@
0ac9: free 1@
0ab2: ret 0