{$CLEO .cs}

//-------------MAIN---------------
thread 'DMG'  
    not SAMP.Available
else_jump @DMG_46  
wait 100  
jump @DMG_26  
0AF8: samp add_message_to_chat "[Damage]: {FFFFFF}Àâòîð {FF4444}{FFFFFF}. Ñïåöèàëüíî äëÿ {44FF44}" color 4474111   
0B34: samp register_client_command "dmg" to_label @DMG_982  
wait 0  
call @DMG_1088 0 7@  
0470: 8@ = actor $PLAYER_ACTOR current_weapon  
if and
   31@ == 1  
   7@ == 1  
   8@ >= 16  
    not 8@ > 42  
0AD2: 9@ = player $PLAYER_CHAR targeted_actor //IF and SET  
else_jump @DMG_975  
Actor.StorePos(9@, 13@, 14@, 15@)
SAMP.Convert3DCoordsToScreen(13@, 14@, 15@, 20@, 21@)
0B5F: convert_window_screen_coords 20@ 21@ to_game_screen_coords 20@ 21@  
0509: 15@ = distance_between_XY 339.1 179.1 and_XY 20@ 21@  
if  
    not 15@ >= 30.0  
else_jump @DMG_975  
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55  
alloc 4@ 68  
0C10: memcpy destination 4@ source 3@ size 68  
0C0D: struct 4@ offset 36 size 1 = 0  
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 212, BS_TYPE_BYTE, 1)
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.Send(5@, 1, 7, 0)
RakNet.DeleteBitStream(5@)
free 4@  
wait 40  
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 55  
alloc 4@ 68  
0C10: memcpy destination 4@ source 3@ size 68  
0C0D: struct 4@ offset 4 size 2 = 4  
0C0D: struct 4@ offset 36 size 1 = 8@  
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 212, BS_TYPE_BYTE, 1)
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 68)
RakNet.Send(5@, 1, 7, 0)
RakNet.DeleteBitStream(5@)
free 4@  
3@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
3@ = SAMP.GetPlayerStruct(3@)
3@ += 24  
alloc 4@ 31  
0C10: memcpy destination 4@ source 3@ size 31  
0C0D: struct 4@ offset 13 size 4 = 13@  
0C0D: struct 4@ offset 17 size 4 = 14@  
0C0D: struct 4@ offset 21 size 4 = 15@  
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 218, BS_TYPE_BYTE, 1)
RakNet.Write(5@, 4@, BS_TYPE_ARRAY, 31)
RakNet.LiteSend(5@)
RakNet.DeleteBitStream(5@)
free 4@  
4@ = SAMP.GetSAMPPlayerIDByActorHandle(9@)
Actor.StorePos($PLAYER_ACTOR, 13@, 14@, 15@)
0470: 19@ = actor $PLAYER_ACTOR current_weapon  
041A: 18@ = actor $PLAYER_ACTOR weapon 19@ ammo  
18@ -= 1  
Actor.SetWeaponAmmo($PLAYER_ACTOR, 19@, 18@)
alloc 5@ 39  
0C0D: struct 5@ offset 0 size 1 = 1  
0C0D: struct 5@ offset 1 size 2 = 4@  
0C0D: struct 5@ offset 3 size 4 = 10@  
0C0D: struct 5@ offset 7 size 4 = 11@  
0C0D: struct 5@ offset 11 size 4 = 12@  
0C0D: struct 5@ offset 15 size 4 = 13@  
0C0D: struct 5@ offset 19 size 4 = 14@  
0C0D: struct 5@ offset 23 size 4 = 15@  
0C0D: struct 5@ offset 27 size 4 = 0.025  
0C0D: struct 5@ offset 31 size 4 = 0.025  
0C0D: struct 5@ offset 35 size 4 = 0.05  
6@ = RakNet.NewBitStream()
RakNet.Write(6@, 224, BS_TYPE_BYTE, 1)
RakNet.Write(6@, 5@, BS_TYPE_ARRAY, 39)
RakNet.LiteSend(6@)
RakNet.DeleteBitStream(6@)
free 6@  
5@ = RakNet.NewBitStream()
RakNet.Write(5@, 0, BS_TYPE_BOOL, 1)
RakNet.Write(5@, 4@, BS_TYPE_SHORT, 2)
RakNet.Write(5@, 1.0, BS_TYPE_FLOAT, 4)
RakNet.Write(5@, 8@, BS_TYPE_INT, 4)
RakNet.Write(5@, 2, BS_TYPE_INT, 4)
RakNet.LiteRPC(115, 5@)
RakNet.DeleteBitStream(5@)
jump @DMG_154  
0B12: 31@ = 31@ XOR 1  
if  
   31@ == 1  
else_jump @DMG_1051  
0AF8: samp add_message_to_chat "[Damage]: {44FF44}Enable" color 4474111   
jump @DMG_1086  
0AF8: samp add_message_to_chat "[Damage]: {FF4444}Disable" color 4474111   
SAMP.CmdRet
0A96: 9@ = actor $PLAYER_ACTOR struct  
0A8E: 8@ = 9@ + 1816 // int  
0A8D: 8@ = read_memory 8@ size 1 virtual_protect 0  
8@ *= 28  
0A8E: 7@ = 9@ + 1440 // int  
005A: 7@ += 8@ // (int)  
7@ += 4  
0A8D: 7@ = read_memory 7@ size 4 virtual_protect 0  
ret 1 7@