home *** CD-ROM | disk | FTP | other *** search
/ OS/2 Shareware BBS: 35 Internet / 35-Internet.zip / bx75p3.zip / doc / example_menu < prev    next >
Text File  |  1999-02-23  |  546b  |  14 lines

  1. # Test menu to see how our menu reader works
  2.  
  3. MENU Main Menu
  4.     OPTION "This menu" MENU Main Menu
  5.     OPTION "List Channels" COMMAND LIST
  6.     OPTION "Join Channel" COMMAND JOIN $"Join Channel: "
  7.     OPTION "Leave Channel" COMMAND PART *
  8.     OPTION "Change Name" COMMAND NICK $"New NickName: "
  9.     OPTION "Private Message" COMMAND MSG $"Person to send message to: " $"Text of message: "
  10.     OPTION "Say something" COMMAND SAY $"Say: "
  11.     OPTION "Exit Menu" EXIT
  12.     OPTION "Exit IRC" COMMAND if ( [$"Really quit? "] == [y] ) { QUIT }
  13.     OPTION "Kill Menu" COMMAND set -menu
  14.