Доброе время суток. Решил попробовать освоить диалоги, сделал всё по гайдам. Но почему-то крашит при входе в игру. Подскажите, что не так. Вот код:
Код:
{$CLEO}
const
DIALOG_STYLE_MSGBOX = 0
DIALOG_STYLE_INPUT = 1
DIALOG_STYLE_LIST = 2
DIALOG_STYLE_PASSWORD = 3
end
0000:
0662: "testtest"
while not SAMP.Available()
wait 2000
end
while true
wait 0
if 0ab0: key_down 90
then
while 0ab0: key_down 90
wait 0
if 0ab0: key_down 49
then
0ac8: alloc 0@ size 2024
0ad3: format_stirng 0@ = "{E2C808}1.{FFFFFF} пункт%c{E2C808}2.{FFFFFF} пункт%c{E2C808}3.{FFFFFF} пункт" 0xA 0xA
0B3B: samp show_dialog id 10 caption "{E2C808}Меню" text 0@ button_1 "Далее" button_2 "Отмена" style DIALOG_STYLE_LIST
0ac9: free 0@
break
end
end
while 0ab0: key_down 90
wait 0
end
end
if 0B3C: samp is_dialog_responded id 10 button 1@ list_item 3@ input_text 0
then
if 1@ == 1
then
if 3@ == 0
then
0ac8: alloc 4@ size 64
0ad3: format_stirng 4@ = "{FFFFFF}1. пункт%c2. пункт%c3. пункт" 0xA 0xA
0B3B: samp show_dialog id 20 caption "{E2C808}Меню подпункт 1" text 4@ button_1 "Далее" button_2 "Отмена" style DIALOG_STYLE_LIST
0ac9: free 4@
end
if 3@ == 1
then
0ac8: alloc 5@ size 64
0ad3: format_stirng 5@ = "{FFFFFF}1. пункт%c2. пункт%c3. пункт" 0xA 0xA
0B3B: samp show_dialog id 30 caption "{E2C808}Меню подпункт 2" text 5@ button_1 "Далее" button_2 "Отмена" style DIALOG_STYLE_LIST
0ac9: free 5@
end
end
end