Commit c58b969e authored by rswindell's avatar rswindell
Browse files

Replace literal Ctrl-A chars with \x01 to make this file easier to edit.

parent 63335552
......@@ -26,12 +26,12 @@ async
# Display main Prompt
compare_ars exempt T
if_true
print "n\r\nbhTime Used: [c@TUSED@b] "
print "\x01n\r\n\x01b\x01hTime Used: [\x01c@TUSED@\x01b] "
else
print "n\r\nbhTime Left: [c@TLEFT@b] "
print "\x01n\r\n\x01b\x01hTime Left: [\x01c@TLEFT@\x01b] "
end_if
print "bh(c?b=cHelpb)\r\nMain Menu m: n"
print "\x01b\x01h(\x01c?\x01b=\x01cHelp\x01b)\r\nMain Menu \x01m: \x01n"
# Get key (with / extended commands allowed)
compare_user_misc UM_COLDKEYS
......@@ -178,10 +178,10 @@ cmdkey Y
end_cmd
# fall through
print "\r\nchUnrecognized command."
print "\r\n\x01c\x01hUnrecognized command."
compare_ars expert
if_true
print " Hit 'i?nch' for a menu."
print " Hit '\x01i?\x01n\x01c\x01h' for a menu."
end_if
crlf
end_cmd
......@@ -203,12 +203,12 @@ if_false
async
compare_ars exempt T
if_true
print "n\r\nbhTime Used: [c@TUSED@b] "
print "\x01n\r\n\x01b\x01hTime Used: [\x01c@TUSED@\x01b] "
else
print "n\r\nbhTime Left: [c@TLEFT@b] "
print "\x01n\r\n\x01b\x01hTime Left: [\x01c@TLEFT@\x01b] "
end_if
print "bh(c?b=cHelpb)\r\nEmail Menu m: n"
print "\x01b\x01h(\x01c?\x01b=\x01cHelp\x01b)\r\nEmail Menu \x01m: \x01n"
# Get key (with / extended commands allowed)
compare_user_misc UM_COLDKEYS
......@@ -251,7 +251,7 @@ cmdkey ?
end_cmd
cmdkey E
print "_\r\nbhE-mail (User name or number): w"
print "\x01_\r\n\x01b\x01hE-mail (User name or number): \x01w"
getname 40
compare_str ""
if_true
......@@ -311,10 +311,10 @@ cmdkey /G
end_cmd
# fall through
print "\r\nchUnrecognized command."
print "\r\n\x01c\x01hUnrecognized command."
compare_ars expert
if_true
print " Hit 'i?nch' for a menu."
print " Hit '\x01i?\x01n\x01c\x01h' for a menu."
end_if
crlf
end_cmd
......@@ -329,7 +329,7 @@ if_false
menu maincfg
end_if
async
print "\r\nyhConfig: n"
print "\r\n\x01y\x01hConfig: \x01n"
getcmd ?QNPIS\r
logkey
......@@ -380,15 +380,15 @@ node_action node_xfer
async
# Display main Prompt
print "n\r\nbh[@LIB@ @DIR@]\r\n"
print "\x01n\r\n\x01b\x01h[@LIB@ @DIR@]\r\n"
compare_ars exempt T
if_true
print "bhTime Used: [c@TUSED@b] "
print "\x01b\x01hTime Used: [\x01c@TUSED@\x01b] "
else
print "bhTime Left: [c@TLEFT@b] "
print "\x01b\x01hTime Left: [\x01c@TLEFT@\x01b] "
end_if
print "bh(c?b=cHelpb)\r\nFile Menu m: n"
print "\x01b\x01h(\x01c?\x01b=\x01cHelp\x01b)\r\nFile Menu \x01m: \x01n"
# Get key (with / extended commands allowed)
compare_user_misc UM_COLDKEYS
......@@ -486,7 +486,7 @@ cmdkey C
end_cmd
cmdkey D
print "\r\nchDownload File(s)\r\n"
print "\r\n\x01c\x01hDownload File(s)\r\n"
file_download_batch
if_true
end_cmd
......@@ -502,7 +502,7 @@ cmdkey /D
end_cmd
cmdkey F
print "\r\nchFind Text in File Descriptions (no wildcards)\r\n"
print "\r\n\x01c\x01hFind Text in File Descriptions (no wildcards)\r\n"
file_find_text
end_cmd
......@@ -523,7 +523,7 @@ cmdkey J
end_cmd
cmdkey L
print "\r\nchList Files\r\n"
print "\r\n\x01c\x01hList Files\r\n"
getfilespec
if_true
file_list
......@@ -544,7 +544,7 @@ cmdkey M
end_cmd
cmdkey N
print "\r\nchNew File Scan\r\n"
print "\r\n\x01c\x01hNew File Scan\r\n"
file_new_scan
end_cmd
......@@ -569,7 +569,7 @@ cmdkey /G
end_cmd
cmdkey S
print "\r\nchSearch for Filename(s)\r\n"
print "\r\n\x01c\x01hSearch for Filename(s)\r\n"
file_find_name
end_cmd
......@@ -582,7 +582,7 @@ cmdkey /A
end_cmd
cmdkey U
print "\r\nchUpload File\r\n"
print "\r\n\x01c\x01hUpload File\r\n"
chkfile "%zmenu/upload.*"
if_true
menu upload
......@@ -595,7 +595,7 @@ cmdkey /U
end_cmd
cmdkey V
print "\r\nchView File(s)\r\n"
print "\r\n\x01c\x01hView File(s)\r\n"
getfilespec
if_true
file_view
......@@ -611,23 +611,23 @@ cmdkey Y
end_cmd
cmdkey Z
print "\r\nchUpload File to Sysop\r\n"
print "\r\n\x01c\x01hUpload File to Sysop\r\n"
file_upload_sysop
end_cmd
cmdkey #
print "\r\nncEnter the number of the directory to change to.\r\n"
print "\r\n\x01n\x01cEnter the number of the directory to change to.\r\n"
end_cmd
cmdkey /#
print "\r\nncEnter the number of the library to change to.\r\n"
print "\r\n\x01n\x01cEnter the number of the library to change to.\r\n"
end_cmd
# fall through
print "\r\nchUnrecognized command."
print "\r\n\x01c\x01hUnrecognized command."
compare_ars expert
if_true
print " Hit 'i?nch' for a menu."
print " Hit '\x01i?\x01n\x01c\x01h' for a menu."
end_if
crlf
end_cmd
......@@ -652,15 +652,15 @@ node_action node_main
async
# Display main Prompt
print "n\r\nbh[@GRP@ @SUB@]\r\n"
print "\x01n\r\n\x01b\x01h[@GRP@ @SUB@]\r\n"
compare_ars exempt T
if_true
print "bhTime Used: [c@TUSED@b] "
print "\x01b\x01hTime Used: [\x01c@TUSED@\x01b] "
else
print "bhTime Left: [c@TLEFT@b] "
print "\x01b\x01hTime Left: [\x01c@TLEFT@\x01b] "
end_if
print "bh(c?b=cHelpb)\r\nMessage Menu m: n"
print "\x01b\x01h(\x01c?\x01b=\x01cHelp\x01b)\r\nMessage Menu \x01m: \x01n"
# Get key (with / extended commands allowed)
compare_user_misc UM_COLDKEYS
......@@ -774,7 +774,7 @@ cmdkey F
end_cmd
cmdkey S
print "\r\nchSearch for Text in Messages\r\n"
print "\r\n\x01c\x01hSearch for Text in Messages\r\n"
msg_find_text
end_cmd
......@@ -799,7 +799,7 @@ cmdkey /G
end_cmd
cmdkey E
print "_\r\nbhE-mail (User name or number): w"
print "\x01_\r\n\x01b\x01hE-mail (User name or number): \x01w"
getname 40
compare_str ""
if_true
......@@ -825,18 +825,18 @@ cmdkey Z
end_cmd
cmdkey #
print "\r\nncEnter the number of the sub-board to change to.\r\n"
print "\r\n\x01n\x01cEnter the number of the sub-board to change to.\r\n"
end_cmd
cmdkey /#
print "\r\nncEnter the number of the message group to change to.\r\n"
print "\r\n\x01n\x01cEnter the number of the message group to change to.\r\n"
end_cmd
# fall through
print "\r\nchUnrecognized command."
print "\r\n\x01c\x01hUnrecognized command."
compare_ars expert
if_true
print " Hit 'i?nch' for a menu."
print " Hit '\x01i?\x01n\x01c\x01h' for a menu."
end_if
crlf
end_cmd
......@@ -846,7 +846,7 @@ end_cmd
:sysop
cmd_home
menu sysmain
print "n\r\nchSelect an option (or Q to quit): n"
print "\x01n\r\n\x01c\x01hSelect an option (or Q to quit): \x01n"
getstrupr 40
cmdstr "Q"
......@@ -868,7 +868,7 @@ if_false
menu maininfo
end_if
async
print "\r\nyhInfo: n"
print "\r\n\x01y\x01hInfo: \x01n"
getcmd ?QISVY\r
logkey
......
......@@ -11,7 +11,7 @@
!include sbbsdefs.inc
# Give a bogus DOS error so they think they're in real DOS
print "nSpecified COMMAND search directory bad\r\n\r\n"
print "\x01nSpecified COMMAND search directory bad\r\n\r\n"
print "Microsoft(R) MS-DOS(R) Version 5.00\r\n"
print " (C)Copyright Microsoft Corp 1981-1991.\r\n"
......@@ -25,7 +25,7 @@ async
inc_main_cmds
call display_prompt
print ">n"
print ">\x01n"
getstr 128
log "%s, "
......@@ -64,7 +64,7 @@ end_cmd
:display_prompt
pause_reset
print "n\r\nC:\\"
print "\x01n\r\nC:\\"
return
......@@ -313,7 +313,7 @@ return
cmd_home
call display_prompt
print "FILES>n"
print "FILES>\x01n"
getstr 128
log "%s, "
......@@ -520,7 +520,7 @@ inc_main_cmds
call display_prompt
print "MAIL>n"
print "MAIL>\x01n"
getstr 128
log "%s, "
......@@ -563,7 +563,7 @@ cmdstr "config"
end_cmd
cmdstr "send"
print "_\r\nbhE-mail (User name or number): w"
print "\x01_\r\n\x01b\x01hE-mail (User name or number): \x01w"
getname 40
compare_str ""
if_true
......@@ -577,7 +577,7 @@ cmdstr "send"
end_cmd
cmdstr "sendfile"
print "_\r\nbhE-mail (User name or number): w"
print "\x01_\r\n\x01b\x01hE-mail (User name or number): \x01w"
getname 40
compare_str ""
if_true
......@@ -660,7 +660,7 @@ if_false
menu maincfg
end_if
async
print "\r\nyhConfig: n"
print "\r\n\x01y\x01hConfig: \x01n"
getcmd ?QNPIS\r
logkey
......
......@@ -19,7 +19,7 @@ async
menu simple/main
menu simple/prompt
print "n"
print "\x01n"
getstrupr 10
crlf
......@@ -49,7 +49,7 @@ cmdstr S
async
menu simple/sendmsg
menu simple/prompt
print "n"
print "\x01n"
getstrupr 10
crlf
pause_reset
......@@ -94,7 +94,7 @@ cmdstr R
async
menu simple/readmsg
menu simple/prompt
print "n"
print "\x01n"
getstrupr 10
crlf
pause_reset
......@@ -132,28 +132,28 @@ cmdstr R
# Read all new messages
cmdstr N
print "lbhScanning for new messages...\r\n"
print "\x01l\x01b\x01hScanning for new messages...\r\n"
msg_new_scan_all
end_cmd
cmdstr NEW
print "lbhScanning for new messages...\r\n"
print "\x01l\x01b\x01hScanning for new messages...\r\n"
msg_new_scan_all
end_cmd
# Read all new messages TO: YOU
cmdstr Y
print "lbhScanning for your messages...\r\n"
print "\x01l\x01b\x01hScanning for your messages...\r\n"
msg_your_scan_all
end_cmd
cmdstr YOU
print "lbhScanning for your messages...\r\n"
print "\x01l\x01b\x01hScanning for your messages...\r\n"
msg_your_scan_all
end_cmd
cmdstr YOUR
print "lbhScanning for your messages...\r\n"
print "\x01l\x01b\x01hScanning for your messages...\r\n"
msg_your_scan_all
end_cmd
......@@ -208,7 +208,7 @@ cmdstr F
async
menu simple/filelist
menu simple/prompt
print "n"
print "\x01n"
getstrupr 10
crlf
pause_reset
......@@ -223,7 +223,7 @@ cmdstr F
end_cmd
cmdstr N
print "\r\nbhUse c@NEWFILETIME@b for new file scan "
print "\r\n\x01b\x01hUse \x01c@NEWFILETIME@\x01b for new file scan "
yes_no "date/time"
if_false
file_ptrs_cfg
......@@ -235,12 +235,12 @@ cmdstr F
end_cmd
cmdstr F
print "\r\nchFind Text in File Descriptions (no wildcards)\r\n"
print "\r\n\x01c\x01hFind Text in File Descriptions (no wildcards)\r\n"
file_find_text_all
end_cmd
cmdstr S
print "\r\nchSearch for Filename(s)\r\n"
print "\r\n\x01c\x01hSearch for Filename(s)\r\n"
file_find_name_all
end_cmd
......@@ -309,7 +309,7 @@ if_false
return
:sendmail
print "\r\nbhSend E-mail to (User name or number): n"
print "\r\n\x01b\x01hSend E-mail to (User name or number): \x01n"
getname 40
compare_str ""
if_true
......@@ -357,7 +357,7 @@ return
menu maincfg
async
print "\r\nyhCommand: n"
print "\r\n\x01y\x01hCommand: \x01n"
getstrupr 10
logkey
......
......@@ -13,9 +13,9 @@ compare_ars expert
if_false
clear_abort
menu wildcat/main
print "\r\nwhCommand >>? n"
print "\r\n\x01w\x01hCommand >>? \x01n"
else
print "\r\nyh@GRP@ @SUB@, wMAIN MENUy: ? n"
print "\r\n\x01y\x01h@GRP@ @SUB@, \x01wMAIN MENU\x01y: ? \x01n"
end_if
node_action node_main
......@@ -37,7 +37,7 @@ cmdkey M
goto message
end_cmd
cmdkey U
print "\r\nchList Users\r\n"
print "\r\n\x01c\x01hList Users\r\n"
mnemonics "\r\n~Logons Today, ~Sub-board, or ~All: "
getcmd LSA\r
cmdkey L
......@@ -126,11 +126,11 @@ cmdkey A
end_cmd
cmdkey V
print "\r\nyhUsername search string: w"
print "\r\n\x01y\x01hUsername search string: \x01w"
getname 25
finduser
if_true
print "yhVerified: w"
print "\x01y\x01hVerified: \x01w"
printstr
crlf
end_if
......@@ -172,9 +172,9 @@ compare_ars expert
if_false
clear_abort
menu wildcat/file
print "\r\nwhCommand >>? n"
print "\r\n\x01w\x01hCommand >>? \x01n"
else
print "\r\nyh@LIB@ @DIR@, wFILE MENUy: ? n"
print "\r\n\x01y\x01h@LIB@ @DIR@, \x01wFILE MENU\x01y: ? \x01n"
end_if
# Update node status
......@@ -212,7 +212,7 @@ cmdkey L
end_cmd
cmdkey D
print "\r\nchDownload File(s)\r\n"
print "\r\n\x01c\x01hDownload File(s)\r\n"
file_download_batch
if_true
end_cmd
......@@ -224,7 +224,7 @@ cmdkey D
end_cmd
cmdkey U
print "\r\nchUpload File\r\n"
print "\r\n\x01c\x01hUpload File\r\n"
chkfile "../text/menu/upload.*"
if_true
menu upload
......@@ -233,7 +233,7 @@ cmdkey U
end_cmd
cmdkey N
print "\r\nbhUse c@NEWFILETIME@b for new file scan date/time "
print "\r\n\x01b\x01hUse \x01c@NEWFILETIME@\x01b for new file scan date/time "
yes_no ""
if_false
file_ptrs_cfg
......@@ -245,7 +245,7 @@ cmdkey N
end_cmd
cmdkey V
print "\r\nchView File(s)\r\n"
print "\r\n\x01c\x01hView File(s)\r\n"
getfilespec
if_true
file_view
......@@ -258,7 +258,7 @@ cmdkey M
end_cmd
cmdkey S
print "\r\nchSearch for Filename(s)\r\n"
print "\r\n\x01c\x01hSearch for Filename(s)\r\n"
file_find_name
end_cmd
......@@ -281,7 +281,7 @@ cmdkey P
end_cmd
cmdkey I
print "\r\nchList Extended File Information\r\n"
print "\r\n\x01c\x01hList Extended File Information\r\n"
getfilespec
if_true
file_list_extended
......@@ -322,9 +322,9 @@ compare_ars expert
if_false
clear_abort
menu wildcat/msg
print "\r\nwhCommand >>? n"
print "\r\n\x01w\x01hCommand >>? \x01n"
else
print "\r\nyh@GRP@ @SUB@, wMESSAGE MENUy: ? n"
print "\r\n\x01y\x01h@GRP@ @SUB@, \x01wMESSAGE MENU\x01y: ? \x01n"
end_if
# Update node status
......@@ -346,9 +346,9 @@ cmdkey Q
cmdkey R
cmd_home
print "n\r\nyhReading Messages: [\1wA\1y]ll messages, [wNy]ew messages, [wSy]earch, "
print "[wUy]nread personal,\r\n"
print "[wJy]oin, or [wENTERy] to quit? "
print "\x01n\r\n\x01y\x01hReading Messages: [\1wA\1y]ll messages, [\x01wN\x01y]ew messages, [\x01wS\x01y]earch, "
print "[\x01wU\x01y]nread personal,\r\n"
print "[\x01wJ\x01y]oin, or [\x01wENTER\x01y] to quit? "
getstr 5
logkey
......@@ -392,12 +392,12 @@ cmdkey F
end_cmd
cmdkey S
print "\r\nchSearch for Text in Messages\r\n"
print "\r\n\x01c\x01hSearch for Text in Messages\r\n"
msg_find_text
end_cmd
cmdkey C
print "\r\nchCheck for Messages Posted to You\r\n"
print "\r\n\x01c\x01hCheck for Messages Posted to You\r\n"
msg_your_scan
end_cmd
......@@ -408,7 +408,7 @@ cmdkey U
menu maincfg
end_if
async
print "\r\nyhConfig: n"
print "\r\n\x01y\x01hConfig: \x01n"
getcmd ?QNPIS
logkey
......@@ -493,9 +493,9 @@ compare_ars expert
if_false
clear_abort
menu wildcat/sysop
print "\r\nwhCommand >>? n"
print "\r\n\x01w\x01hCommand >>? \x01n"
else
print "\r\nyh@GRP@ @SUB@, wSYSOP MENUy: ? n"
print "\r\n\x01y\x01h@GRP@ @SUB@, \x01wSYSOP MENU\x01y: ? \x01n"
end_if
# Update node status
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment