# simple menu example by -oblivious-
# there's more than one way to do things, here's one way.
# this may be broken,it's 2am right now. it's just supposed to point out a way of
# doing a menu with cmdkeys

# you can look for more menu commands in baja.doc, assign them their own cmdkeys
!Include sbbsdefs.inc
!Include nodedefs.inc
!Include userdefs.inc


:top

NODE_STATUS NODE_INUSE

:MAIN
# The CMD_HOME function marks the beginning of a command/menu loop
Cmd_home


node_action node_main
inc_main_Cmds
sync


cls
# sbbs/text/menu/yourmenudir   'main' is main.asc, main.ans
MENU "//yourmenudir//main"


# \r\n are carriage return/line feed this is your prompt
print "\r\n Enter command:"


Getkeye

# Write command to log file
logkey_comma
#PrintKey



Cmdkey F
file_select_area
GoTo file_SECTION
End_Cmd


Cmdkey N
cls
setStr "1"
mail_send_feedback
End_Cmd


Cmdkey /G
file_download_batch
logoff_fast
End_Cmd

cmdkey a
print "another command"
pause
end_cmd


cmdkey b
print "another command"
pause
end_cmd

cmdkey c
print "another command"
pause
end_cmd


cmdkey q
goto end
end_cmd

# fall through
GoTo top

:end
