// This file was decompiled using SASCM.ini published by GTAG (http://gtag.gtagaming.com/opcode-database) on 14.6.2013
{$CLEO .cs}

//-------------MAIN---------------
0000: NOP
:Noname_15
not SAMP.Available
jf @Noname_36
wait 400
goto @Noname_15
:Noname_36
0B34: samp register_client_command "fmvd" to_label @Noname_59

while true
wait 0
if 22@ == 1
then
0ab1: call @DialogMove 2 dialogID 0@ keyMoveID 2
0B8D: samp set_cursor_mode 2
if 0B81: dialog 0@ pop_event_to 1@ control_id_to 2@
then
alloc 28@ 256
alloc 27@ 256
Dialog.GetControlText(0@, 2, 28@)
Dialog.GetControlText(0@, 4, 27@)
if
Dialog.CheckBoxIsChecked(0@, 5)
then
30@ = 1
//chatmsg "- %s {222222}(%s)[%s]" 13553358 27@ 28@ 29@
end
if
Dialog.CheckBoxIsChecked(0@, 6)
then
30@ = 2
//chatmsg "- %s {ffffff}(%s)" 13553358 27@ 28@
end
if
Dialog.CheckBoxIsChecked(0@, 7)
then
30@ = 3
//chatmsg "- %s {ccff00}(%s)" 13553358 27@ 28@
end

if 2@ == 20
then
0B86: dialog 0@ set_visible 0
0B8D: samp set_cursor_mode 0
gosub @None_1
end

end
end
end

:Noname_59
SAMP.GetScreenResolution(15@, 16@)
15@ /= 2
16@ /= 2
15@ -= 250
16@ -= 170
Dialog.Create(0@, "{00ccff}ARP Fake MVD")
Dialog.SetRECT(0@, 15@,16@, 500, 300)
Dialog.AddStatic(0@, 1, "Ник преступника:", 10, 15, 145, 20)
Dialog.AddEditBox(0@, 2, "", 10, 55, 145, 40)
Dialog.AddStatic(0@, 3, "Ранг:", 170, 15, 320, 20)
Dialog.AddEditBox(0@, 4, "", 170, 55, 320, 40)
Dialog.AddCheckBox(0@, 5, "Арест", 45, 130, 145, 20)
Dialog.AddCheckBox(0@, 6, "Убийство", 45, 165, 145, 20)
Dialog.AddCheckBox(0@, 7, "Паспорт", 45, 200, 145, 20)
Dialog.AddButton(0@, 20, "x", 495, -26, 20, 20)
22@ = 1

SAMP.CmdRet

:DialogMove
0085: 9@ = 1@
0B85: dialog 0@ get_position_to 1@ 2@ size_to 3@ 4@
if 0ab1: call @TaskDialog 4 1@ 2@ 3@ 9@ ret_offset 7@ 8@
then
repeat
wait 0
0B5E: get_cursor_pos 5@ 6@
0062: 5@ -= 7@
0062: 6@ -= 8@
0B84: dialog 0@ set_pos_XY 5@ 6@ size 3@ 4@
until 8ab0: 9@
0BA1: dialog 0@ set_minimized 0
end
ret 0
:TaskDialog
0085: 6@ = 3@
0085: 4@ = 0@
0085: 5@ = 1@
005A: 4@ += 2@
5@ += 15
0B5E: get_cursor_pos 2@ 3@
if and
0ab0: 6@
002D: 2@ >= 0@
801D: 2@ <= 4@
002D: 3@ >= 1@
801D: 3@ <= 5@
then
0485: return_true
0062: 2@ -= 0@
0062: 3@ -= 1@
else
059A: return_false
2@ = -1
3@ = -1
end
ret 2 2@ 3@

:None_1
wait 10
if 30@ == 1
then
1@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
4@ = SAMP.GetPlayerNickname(1@)
chatmsg "%s включил бортовой компьютер" 14520575 4@
chatmsg "%s вводит данные о задержанном преступнике в раздел МВД [1/2]" 14520575 4@
chatmsg "%s вводит данные о задержанном преступнике в раздел МВД [2/2]" 14520575 4@
chatmsg "Дело закрыто (%s)" 14520575 4@
chatmsg "%s %s передаёт преступника %s в полицейский участок" 14520575 27@ 4@ 28@ // 6:30 25:00
end
if 30@ == 2
then
1@ = SAMP.GetSAMPPlayerIDByActorHandle($PLAYER_ACTOR)
4@ = SAMP.GetPlayerNickname(1@)
chatmsg "[Всем постам] %s %s нейтрализовал преступника %s" 3591423 27@ 4@ 28@
end
if 30@ == 3
then
chatmsg "%s показал свой паспорт" 14520575 28@
0209: 2@ = random_int_in_ranges 3 15
chatmsg "Имя: %s | Возраст: %d | Пол: Мужской | Проживание: Бездомный" -1 28@ 2@
chatmsg " Работа: Безработный | Организация и подразделение: Нет / Нет" -1
0209: 8@ = random_int_in_ranges 1 10
0209: 9@ = random_int_in_ranges 1 10
0209: 10@ = random_int_in_ranges 1 10
0209: 11@ = random_int_in_ranges 1 10
0209: 12@ = random_int_in_ranges 1 10
0209: 13@ = random_int_in_ranges 1 10
0209: 14@ = random_int_in_ranges 1 50
chatmsg " Телефон: %d%d%d%d%d%d | Уровень розыска: 0 | Законополусшность: %d" -1 8@ 9@ 10@ 11@ 12@ 13@ 14@
end
22@ = 0
return