- 2
- 0
CLEO:
{$CLEO}
{$INCLUDE SF}
0000:
WHILE NOT SAMP.Available()
0001: 0
END
0BE1: raknet setup_outcoming_rpc_hook @HOOK
0BDE: pause_thread 0
:HOOK
0BE5: raknet 0@ = get_hook_param PARAM_PACKETID
IF 0@ == RPC_GIVETAKEDAMAGE
THEN
0BE5: raknet 0@ = get_hook_param PARAM_BITSTREAM
0BE7: raknet 1@ = bit_stream_read 0@ type 1
IF 1@ == TRUE
THEN
0BE7: raknet 2@ = bit_stream_read 0@ type BS_TYPE_SHORT
0BE7: raknet 4@ = bit_stream_read 0@ type BS_TYPE_FLOAT
0BE7: raknet 5@ = bit_stream_read 0@ type BS_TYPE_SHORT
IF 5@ == 0
THEN
0812: AS_actor $PLAYER_ACTOR perform_animation "HIT_WALK" IFP "PED" framedelta 4.0 loopA 0 lockX 1 lockY 1 lockF 0 time 1
END
END
END
0BE0: raknet hook_ret TRUE