{$CLEO .cs}
{$INCLUDE SF}
0000:  
repeat
wait 150
until 0afa:
0B34: samp register_client_command "fban" to_label @fake
chatmsg "[Fake Ban by So5ka]: {FFFFFF}Фейк бан для Advance RP загружен,активация на команду {009000}/fban." 16763955
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
        //0
            if 2@ == 30
            then
            alloc 3@ 1000
            alloc 4@ 1000
            alloc 5@ 1000
            alloc 6@ 1000
            alloc 9@ 1000
            alloc 10@ 1000
            alloc 7@ 5000
            alloc 1@ 128
            chatmsg "Администратор %s забанил игрока %s на %s дней. Причина: %s" color 0xff5030 13@ 11@ 14@ 15@
            wait 0
            chatmsg "Server closed the connection" color 0xb7c7d4
            0ad3: 3@ = format "{FFFFFF}Дата: %s%c" 12@ 10
            0ad3: 10@ = format "{FFFFFF}Имя: %s%c" 11@ 10
            0ad3: 9@ = format "{FFFFFF}Ник администратора: %s%c{FFFFFF}Количество дней: %s%c{FFFFFF}Причина: %s%c%c" 13@ 10 14@ 10 15@ 10 10
            0ad3: 4@ = format "{c6fe88}Если вы не согласны с наказанием,сделайте скриншот (F8)" 10
            0ad3: 5@ = format "%c{c6fe88}и оставьте жалобу на форуме forum.advance-rp.ru" 10
            0ad3: 7@ = format "%s%s%s%s%s" 3@ 10@ 9@ 4@ 5@
            0ad3: 1@ = format "{f45f64}Бан аккаунта" 0x20 0x20 0x20 0x20 0x20 0x20 0x20 0x20
            0B3B: samp show_dialog id 2332 caption 1@ text 7@ button_1 "Закрыть" button_2 "" style 0
            0B86: dialog 0@ set_visible 0
            0B8D: samp set_cursor_mode 0
            free alloc 11@
            free alloc 12@
            free alloc 13@
            free alloc 14@
            free alloc 15@
            free alloc 16@
            free alloc 17@
            free alloc 18@
            free alloc 19@
            free alloc 20@
            free alloc 21@
            free alloc 3@
            free alloc 4@
            free alloc 5@
            free alloc 7@
            22@ = 0
            end
        
            // 1
        if 2@ == 1
        then
            alloc 11@ 128
            0B89: dialog 0@ get_control 1 text_to 11@
            end
        
        //2    
       if 2@ == 2
       then
            alloc 12@ 128
            0B89: dialog 0@ get_control 2 text_to 12@
            end
         
        //3    
       if 2@ == 3
       then
            alloc 13@ 128
            0B89: dialog 0@ get_control 3 text_to 13@
            end
            
        //4    
       if 2@ == 4
       then
            alloc 14@ 128
            0B89: dialog 0@ get_control 4 text_to 14@
            end
            
        //5
       if 2@ == 5
       then
            alloc 15@ 128
            0B89: dialog 0@ get_control 5 text_to 15@
            end
       
       //7
       if 2@ == 6
       then
            alloc 16@ 128
            0B89: dialog 0@ get_control 6 text_to 16@
            end

end
end
end

:fake
0B80: dialog 0@ = create "Настройки"
0B84: dialog 0@ set_pos_XY 300 50 size 400 400
0B91: dialog 0@ add_static id 100 text "Имя" pos_XY 2 10 size 100 20
0B91: dialog 0@ add_static id 100 text "Дата" pos_XY 2 40 size 100 20
0B91: dialog 0@ add_static id 100 text "Ник админа" pos_XY 2 70 size 100 20
0B91: dialog 0@ add_static id 100 text "Кол-во дней" pos_XY 2 100 size 100 20
0B91: dialog 0@ add_static id 100 text "Причина" pos_XY 2 130 size 100 20
0B82: dialog 0@ add_button id 30 text "Далее" pos_XY 150 350 size 100 30
0B88: dialog 0@ add_editbox id 1 text "" pos_XY 150 0 size 200 35
0B88: dialog 0@ add_editbox id 2 text "" pos_XY 150 35 size 200 35
0B88: dialog 0@ add_editbox id 3 text "" pos_XY 150 65 size 200 35
0B88: dialog 0@ add_editbox id 4 text "" pos_XY 150 95 size 200 35
0B88: dialog 0@ add_editbox id 5 text "" pos_XY 150 125 size 200 35

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@