home *** CD-ROM | disk | FTP | other *** search
/ APDL Public Domain 1 / APDL_PD1A.iso / comms / m_z / riscbbs / !RiscBBS / Menus / Main < prev    next >
Encoding:
Text File  |  1992-02-24  |  1.7 KB  |  76 lines
  1. {
  2.  report `Main menu`
  3.  
  4.  defopt W= `Welcome` 10 ``
  5.    show <RiscBBS$Dir>.BBS.Welcome
  6.  endopt
  7.  
  8.  defopt G= `Goodbye` 0 ``
  9.    pushmenu
  10.    menu Logoff
  11.  endopt
  12.  
  13.  defopt B= `Bulletin` 10 ``
  14.    show <RiscBBS$Dir>.BBS.Bulletin
  15.  endopt
  16.  
  17.  defopt A= `About BBS` 10 ``
  18.    menu AboutBBS
  19.  endopt
  20.  
  21.  defopt  Q= `Questionnaire/enquete` 10 ``
  22.    menu Questions
  23.  endopt
  24.  
  25.  defopt L= `Latest News` 10 ``
  26.    show <RiscBBS$Dir>.BBS.LatestNews
  27.  endopt
  28.  
  29.  defopt Y= `Yell` 10 ``
  30.    show <RiscBBS$Dir>.BBS.YellSysop
  31.  endopt
  32.  
  33.  defopt S= `System Info` 10 ``
  34.    show <RiscBBS$Dir>.BBS.SystemInfo
  35.  endopt
  36.  
  37.  defopt O= `Online Leisure` 10 ``
  38.    menu Leisure
  39.  endopt
  40.  
  41.  defopt P= `Personalia` 10 ``
  42.    menu Personal
  43.  endopt
  44.  
  45.  defopt T= `Utilities` 10 ``
  46.    menu Utils
  47.  endopt
  48.  
  49.  defopt U= `Userlist/search` 10 ``
  50.    u_list
  51.  endopt
  52.  
  53.  defopt M= `Message Base` 10 ``
  54.    base M Msgbase.Main
  55.  endopt
  56.  
  57.  defopt F= `File Base` 10 ``
  58.    base F Filebase.Main
  59.  endopt
  60.  
  61.  attr 0 7 
  62. }
  63. {bold attr 4 3}  -- Arcland Main Menu --  {attr 0 2}  {_time} / {_online}  {attr 4 3 cll}  System load: {fg 6 _tasks fg 3} tasks      {fg 1 ifkey S send SYSOP endif attr 0 7}
  64.  
  65.      [{fg 1}M{fg 7}]essage base                       [{fg 1}F{fg 7}]ile base
  66.  
  67.      [{fg 1}W{fg 7}]elcome screen                     [{fg 1}B{fg 7}]ulletin board
  68.      [{fg 1}A{fg 7}]bout RiscBBS & Arcland            [{fg 1}P{fg 7}]ersonal accounts
  69.      [{fg 1}L{fg 7}]atest news in Arcland             [{fg 1}Y{fg 7}]ell at Sysop
  70.  
  71.      [{fg 1}O{fg 7}]nline animations & games          [{fg 1}Q{fg 7}]uestionnaire / enquete
  72.      [{fg 1}S{fg 7}]ystem info                        [{fg 1}T{fg 7}]ools / utilities
  73.  
  74.      [{fg 1}U{fg 7}]serlist / search                  [{fg 1}G{fg 7}]oodbye (Logoff)
  75.  
  76.  {show <RiscBBS$Dir>.BBS.Select eof}