#   tbbs1.3					(c) 1996 runge@boerde.de 
#----------------------------------------------------------------------------
# definitionfile for sript-menu (from sysop)
# this script is running with the command "smenu" and "none ansi-graphic".
#============================================================================
# remarks:
# - Great or small chars are equal!
# - Menu-screens and scripts are _always_ with small chars (in the filename). 
# - Lines with "#" at the beginning of the line are remarks!
#============================================================================


# following functions are valid:
#
# controlling:
# cls				clear screen
# setxy xpos ypos               set cursor to position xpos,ypos
# show	screen                  view ANSI-graphic (in ./scr)			
# getch                         read char in buffer
# marke:			set label "marke:" 
# goto marke			junp to label "marke"
# exec menue			run menu-script "menue" 
# QUIT				questionary for logoff-bbs...
#
# ready-Fido-menues ("FMenu"):
# FIDO_MSG			FMenue: message-borads (mail+news)
# FIDO_EMAIL			FMenue: email
# FIDO_ISYS			FMenue: info-systems 
# FIDO_MULTIUSR			FMenue: multiuser
# FIDO_MISCSRV			FMenue: misc services 
# FIDO_NEWS nr			read news-area 'nr' with lynx (area "nr") 
#                               (nr = 1..5), see "./etc/sigs+areas/list.areas" 
#
# services:
# FILE_SYS			Filearea
# usr_setup			setup-menu
# usr_stat			user-status
# usr_limit			review of user-limits
# usr_level			review of user-levels
# usr_user			command "user"
# sys_port			command "who" (portinfo)
# sys_lynx			run lynx (http://....)
# sys_irc			run IRC
# sys_news			command "news" 
# sys_sub			command subscribe; subscibe newsgroups
# sys_wmenu			run and set "WMenue"
# sys_fmenu			run and set "FMenue"
# sys_geonet			go to "Geonet"-command-mode
# sys_info			comamnd "info"
# sys_qwk			QWK/SOUP-menu (offline-reader)
# sys_account			make a new valid Account (Befehl Postfach)
# sys_chat			Chat 
# sys_moan			MOAN/Meckern (mail to sysop)
# sys_games			games-menue
# sys_calls			caller-list
# sys_sysinfo			system-info-screen
# sys_language			switch a user-language
# sys_talk 			unix-talk
#---------------------------------------------------------------------------

m:
 cls
 show main.ans
 setxy 3 24
 prompt Your Selection?  
 getch
#if A usr_setup
#if A file_sys
#if A exec stat.mnu
#if A exec limit.mnu
#if A exec level.mnu
#if A usr_user
if . exec who.mnu
#if A sys_irc
#if A sys_lynx
#if A sys_news
#if A sys_sub
#if A sys_wmenu
#if A sys_fmenu
#if A sys_geonet
#if A sys_info
#if A sys_qwk
#if A sys_account
#if A sys_chat
#if A sys_moan
#if A sys_games
#if A sys_calls
#if A sys_sysinfo
#if A sys_talk
#if A sys_language
#if A sys_survey
if K fido_news 6

 if B FIDO_MSG
 if I FIDO_ISYS
 if M FIDO_MULTIUSR
 if F FILE_SYS
 if Z FIDO_MISCSRV
 if Q quit

goto m
