16menu.qsps
22 lines
| 647 B
| text/plain
|
TextLexer
/ examples / 16menu.qsps
r60 | ||||
# start | ||||
act 'Показать меню': | ||||
gs 'menu' | ||||
end | ||||
- | ||||
# menu | ||||
killvar 'usr_menu' | ||||
! нет иконки | ||||
$usr_menu[] = 'Взять предмет:take_item' | ||||
! иконка задана gif-файлом | ||||
$usr_menu[] = 'Положить предмет:put_item:images/put_item.gif' | ||||
! иконка задана значением $icon_file | ||||
$usr_menu[] = 'Осмотреть предмет:look_item:<<$icon_file>>' | ||||
! Разделитель | ||||
$usr_menu[] = '-:-' | ||||
! пункт меню задан 3-мя переменными | ||||
$usr_menu[] = '<<$name>>:<<$locname>>:<<$file>>' | ||||
menu 'usr_menu' &! покажет меню из 4-х пунктов | ||||
- | ||||