Bay Networks 5390 Administering page 377

#
# Do hangup from Annex port. This disconnects the Annex port.
#
alias "Exit"
keyin "4" 3,v@ annex-address
{
<hangup
}
#
# This section defines the actual menu.
#
menu |Generic Menu Header|
init_cli 3,v@ annex-address
keyin "menu" 3,v@ annex-address
cmd_list 1,2,3,4
{
#
# The "^[[2J" is a control sequence of VT100-type term commands
# CTRL-[ followed by "[2J"
# CTRL-[ followed by "[5;27H" (go to line 5, space over 27 spaces)
# CTRL-[ followed by "[9;15H" (go to line 9, space over 15 spaces)
#
^[[2J
^[[5;27HGeneric Menu Header
^[[9;15H1) Connect to System1
^[[11;15H2) Connect to System2
^[[13;15H3) Who?
^[[15;15H4) Exit
^[[17;15H^[[1mEnter Number: ^[[m
}
The last entry creates the display for the menu and includes the above aliases in the menu's cmd_list.
This entry also includes an init_cli keyword, which causes the menu to be initialized each time the
port or the virtual CLI is reset. This places the user into the menu without communicating with the
CLI.
The menu includes ANSI terminal control codes to set up the menu display:
Generic Menu Header
1) Connect to System1
2) Connect to System2
3) Who?
4) Exit
Enter Number:
893-741-B
(clear the terminal screen)
Configuring Hosts and Servers
A14-21