{$CLEO}   
{$Include includes\RakNetDefines.txt}   
/*   
=========================   
(c) mgmoldova | ACheats.ru   
AntiStealer 2014   
=========================*/   
if not 0@ = SAMP.Base()   
then 0A93: end_custom_thread   
end   
while not SAMP.Available()   
wait 100   
end   

0B34: samp register_client_command "log" to_label @log   
while true   
wait 0   
end   
:log   
if Samp.IsDialogActive(-1)   
then   
              2@ = Samp.GetDialogID()   
              0B35: samp 0@ = get_last_command_params   
              0C17: 3@ = strlen 0@   
              //WORD dialogID, BYTE buttonID, WORD listboxItem, BYTE strLen, char[] text   
              0B3D: raknet 1@ = new_bit_stream   
              0B40: raknet bit_stream 1@ write 2@ type BS_TYPE_SHORT size 2   //DialogID   
              0B40: raknet bit_stream 1@ write 1 type BS_TYPE_BYTE size 1 // button   
              0B40: raknet bit_stream 1@ write 0 type BS_TYPE_SHORT size 1   
              0B40: raknet bit_stream 1@ write 3@ type BS_TYPE_BYTE size 1   
              0B40: raknet bit_stream 1@ write 0@ type BS_TYPE_STRING size 3@   
              0B41: raknet send_rpc 21 bit_stream 1@ priority PRIORITY_HIGH reliability RELIABLE_SEQUENCED ordering_channel 0 shift_timestamp false   
              0B3E: raknet delete_bit_stream 1@   
end   
Samp.CmdRet()