examples/16menu.qsps

# 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-х пунктов
-