CLEO NOSOURCE INCLUDE SF Thread dialog wait 2000 cmd dialog dialog Whi

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
{$CLEO}
{$NOSOURCE}
{$INCLUDE SF}
Thread "dialog"
wait 2000
cmd "dialog" @dialog
While True
wait 0
end
:dialog
0AC8: 0@ = allocate_memory_size 64 // Выделяем память под список элементов(кол-во текста должно быть не больше 64 символов(пробелы и переходы на новую строку тоже равны 1 символу))
0ad3: format_stirng 0@ = "Reconnect%cDelay%cHelp" 0xA 0xA // Создаем список, 0xA - означает переход на новую строку, а %c указывается в самой строке
0B3B: samp show_dialog id 17 caption "{4BEC13}Reconnect" text 0@ button_1 "Open" button_2 "Close" style DIALOG_STYLE_LIST
0AC9: free_allocated_memory 0@ // Освобождаем память, больше не нужна.
if 0B3C: samp is_dialog_responded id 17 button 1@ list_item 2@ input_text 0
then
if 1@ == 1
then
if 2@ == 0
then
0AC8: 3@ = allocate_memory_size 256
0AD3: 3@ = format "{FFFFFF}Вы действительно хотите перезайти в игру?%c{D2691E}* {FFFFFF}Время перезахода - {9ACD32}15 (s)" 0xA
0B3B: samp show_dialog id 10 caption "Reconnect" text 3@ button_1 "Да" button_2 "Нет" style DIALOG_STYLE_MSGBOX
0AC9: free_allocated_memory 3@
end
end
end
SAMP.CmdRet()