Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
Main
Synchronet
Commits
c58b969e
Commit
c58b969e
authored
Apr 23, 2020
by
rswindell
Browse files
Replace literal Ctrl-A chars with \x01 to make this file easier to edit.
parent
63335552
Changes
4
Hide whitespace changes
Inline
Side-by-side
Showing
4 changed files
with
85 additions
and
85 deletions
+85
-85
exec/renegade.src
exec/renegade.src
+40
-40
exec/sdos.src
exec/sdos.src
+8
-8
exec/simple.src
exec/simple.src
+14
-14
exec/wildcat.src
exec/wildcat.src
+23
-23
No files found.
exec/renegade.src
View file @
c58b969e
...
...
@@ -26,12 +26,12 @@ async
# Display main Prompt
compare_ars exempt T
if_true
print "
n\r\n
b
hTime Used: [
c@TUSED@
b] "
print "
\x01
n\r\n
\x01b\x01
hTime Used: [
\x01
c@TUSED@
\x01
b] "
else
print "
n\r\n
b
hTime Left: [
c@TLEFT@
b] "
print "
\x01
n\r\n
\x01b\x01
hTime Left: [
\x01
c@TLEFT@
\x01
b] "
end_if
print "
bh(c?b=
cHelp
b)\r\nMain Menu
m:
n"
print "
\x01b\x01h(\x01c?\x01b=\x01
cHelp
\x01
b)\r\nMain Menu
\x01m: \x01
n"
# Get key (with / extended commands allowed)
compare_user_misc UM_COLDKEYS
...
...
@@ -178,10 +178,10 @@ cmdkey Y
end_cmd
# fall through
print "\r\n
c
hUnrecognized command."
print "\r\n
\x01c\x01
hUnrecognized command."
compare_ars expert
if_true
print " Hit '
i?nc
h' for a menu."
print " Hit '
\x01i?\x01n\x01c\x01
h' for a menu."
end_if
crlf
end_cmd
...
...
@@ -203,12 +203,12 @@ if_false
async
compare_ars exempt T
if_true
print "
n\r\n
b
hTime Used: [
c@TUSED@
b] "
print "
\x01
n\r\n
\x01b\x01
hTime Used: [
\x01
c@TUSED@
\x01
b] "
else
print "
n\r\n
b
hTime Left: [
c@TLEFT@
b] "
print "
\x01
n\r\n
\x01b\x01
hTime Left: [
\x01
c@TLEFT@
\x01
b] "
end_if
print "
bh(c?b=
cHelp
b)\r\nEmail Menu
m:
n"
print "
\x01b\x01h(\x01c?\x01b=\x01
cHelp
\x01
b)\r\nEmail Menu
\x01m: \x01
n"
# Get key (with / extended commands allowed)
compare_user_misc UM_COLDKEYS
...
...
@@ -251,7 +251,7 @@ cmdkey ?
end_cmd
cmdkey E
print "
_\r\n
b
hE-mail (User name or number):
w"
print "
\x01
_\r\n
\x01b\x01
hE-mail (User name or number):
\x01
w"
getname 40
compare_str ""
if_true
...
...
@@ -311,10 +311,10 @@ cmdkey /G
end_cmd
# fall through
print "\r\n
c
hUnrecognized command."
print "\r\n
\x01c\x01
hUnrecognized command."
compare_ars expert
if_true
print " Hit '
i?nc
h' for a menu."
print " Hit '
\x01i?\x01n\x01c\x01
h' for a menu."
end_if
crlf
end_cmd
...
...
@@ -329,7 +329,7 @@ if_false
menu maincfg
end_if
async
print "\r\n
y
hConfig:
n"
print "\r\n
\x01y\x01
hConfig:
\x01
n"
getcmd ?QNPIS\r
logkey
...
...
@@ -380,15 +380,15 @@ node_action node_xfer
async
# Display main Prompt
print "
n\r\n
b
h[@LIB@ @DIR@]\r\n"
print "
\x01
n\r\n
\x01b\x01
h[@LIB@ @DIR@]\r\n"
compare_ars exempt T
if_true
print "
b
hTime Used: [
c@TUSED@
b] "
print "
\x01b\x01
hTime Used: [
\x01
c@TUSED@
\x01
b] "
else
print "
b
hTime Left: [
c@TLEFT@
b] "
print "
\x01b\x01
hTime Left: [
\x01
c@TLEFT@
\x01
b] "
end_if
print "
bh(c?b=
cHelp
b)\r\nFile Menu
m:
n"
print "
\x01b\x01h(\x01c?\x01b=\x01
cHelp
\x01
b)\r\nFile Menu
\x01m: \x01
n"
# Get key (with / extended commands allowed)
compare_user_misc UM_COLDKEYS
...
...
@@ -486,7 +486,7 @@ cmdkey C
end_cmd
cmdkey D
print "\r\n
c
hDownload File(s)\r\n"
print "\r\n
\x01c\x01
hDownload File(s)\r\n"
file_download_batch
if_true
end_cmd
...
...
@@ -502,7 +502,7 @@ cmdkey /D
end_cmd
cmdkey F
print "\r\n
c
hFind Text in File Descriptions (no wildcards)\r\n"
print "\r\n
\x01c\x01
hFind 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\n
c
hList Files\r\n"
print "\r\n
\x01c\x01
hList Files\r\n"
getfilespec
if_true
file_list
...
...
@@ -544,7 +544,7 @@ cmdkey M
end_cmd
cmdkey N
print "\r\n
c
hNew File Scan\r\n"
print "\r\n
\x01c\x01
hNew File Scan\r\n"
file_new_scan
end_cmd
...
...
@@ -569,7 +569,7 @@ cmdkey /G
end_cmd
cmdkey S
print "\r\n
c
hSearch for Filename(s)\r\n"
print "\r\n
\x01c\x01
hSearch for Filename(s)\r\n"
file_find_name
end_cmd
...
...
@@ -582,7 +582,7 @@ cmdkey /A
end_cmd
cmdkey U
print "\r\n
c
hUpload File\r\n"
print "\r\n
\x01c\x01
hUpload File\r\n"
chkfile "%zmenu/upload.*"
if_true
menu upload
...
...
@@ -595,7 +595,7 @@ cmdkey /U
end_cmd
cmdkey V
print "\r\n
c
hView File(s)\r\n"
print "\r\n
\x01c\x01
hView File(s)\r\n"
getfilespec
if_true
file_view
...
...
@@ -611,23 +611,23 @@ cmdkey Y
end_cmd
cmdkey Z
print "\r\n
c
hUpload File to Sysop\r\n"
print "\r\n
\x01c\x01
hUpload File to Sysop\r\n"
file_upload_sysop
end_cmd
cmdkey #
print "\r\n
n
cEnter the number of the directory to change to.\r\n"
print "\r\n
\x01n\x01
cEnter the number of the directory to change to.\r\n"
end_cmd
cmdkey /#
print "\r\n
n
cEnter the number of the library to change to.\r\n"
print "\r\n
\x01n\x01
cEnter the number of the library to change to.\r\n"
end_cmd
# fall through
print "\r\n
c
hUnrecognized command."
print "\r\n
\x01c\x01
hUnrecognized command."
compare_ars expert
if_true
print " Hit '
i?nc
h' for a menu."
print " Hit '
\x01i?\x01n\x01c\x01
h' for a menu."
end_if
crlf
end_cmd
...
...
@@ -652,15 +652,15 @@ node_action node_main
async
# Display main Prompt
print "
n\r\n
b
h[@GRP@ @SUB@]\r\n"
print "
\x01
n\r\n
\x01b\x01
h[@GRP@ @SUB@]\r\n"
compare_ars exempt T
if_true
print "
b
hTime Used: [
c@TUSED@
b] "
print "
\x01b\x01
hTime Used: [
\x01
c@TUSED@
\x01
b] "
else
print "
b
hTime Left: [
c@TLEFT@
b] "
print "
\x01b\x01
hTime Left: [
\x01
c@TLEFT@
\x01
b] "
end_if
print "
bh(c?b=
cHelp
b)\r\nMessage Menu
m:
n"
print "
\x01b\x01h(\x01c?\x01b=\x01
cHelp
\x01
b)\r\nMessage Menu
\x01m: \x01
n"
# Get key (with / extended commands allowed)
compare_user_misc UM_COLDKEYS
...
...
@@ -774,7 +774,7 @@ cmdkey F
end_cmd
cmdkey S
print "\r\n
c
hSearch for Text in Messages\r\n"
print "\r\n
\x01c\x01
hSearch for Text in Messages\r\n"
msg_find_text
end_cmd
...
...
@@ -799,7 +799,7 @@ cmdkey /G
end_cmd
cmdkey E
print "
_\r\n
b
hE-mail (User name or number):
w"
print "
\x01
_\r\n
\x01b\x01
hE-mail (User name or number):
\x01
w"
getname 40
compare_str ""
if_true
...
...
@@ -825,18 +825,18 @@ cmdkey Z
end_cmd
cmdkey #
print "\r\n
n
cEnter the number of the sub-board to change to.\r\n"
print "\r\n
\x01n\x01
cEnter the number of the sub-board to change to.\r\n"
end_cmd
cmdkey /#
print "\r\n
n
cEnter the number of the message group to change to.\r\n"
print "\r\n
\x01n\x01
cEnter the number of the message group to change to.\r\n"
end_cmd
# fall through
print "\r\n
c
hUnrecognized command."
print "\r\n
\x01c\x01
hUnrecognized command."
compare_ars expert
if_true
print " Hit '
i?nc
h' for a menu."
print " Hit '
\x01i?\x01n\x01c\x01
h' for a menu."
end_if
crlf
end_cmd
...
...
@@ -846,7 +846,7 @@ end_cmd
:sysop
cmd_home
menu sysmain
print "
n\r\n
c
hSelect an option (or Q to quit):
n"
print "
\x01
n\r\n
\x01c\x01
hSelect an option (or Q to quit):
\x01
n"
getstrupr 40
cmdstr "Q"
...
...
@@ -868,7 +868,7 @@ if_false
menu maininfo
end_if
async
print "\r\n
y
hInfo:
n"
print "\r\n
\x01y\x01
hInfo:
\x01
n"
getcmd ?QISVY\r
logkey
...
...
exec/sdos.src
View file @
c58b969e
...
...
@@ -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 "
\x01
nSpecified 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 ">
\x01
n"
getstr 128
log "%s, "
...
...
@@ -64,7 +64,7 @@ end_cmd
:display_prompt
pause_reset
print "
n\r\nC:\\"
print "
\x01
n\r\nC:\\"
return
...
...
@@ -313,7 +313,7 @@ return
cmd_home
call display_prompt
print "FILES>
n"
print "FILES>
\x01
n"
getstr 128
log "%s, "
...
...
@@ -520,7 +520,7 @@ inc_main_cmds
call display_prompt
print "MAIL>
n"
print "MAIL>
\x01
n"
getstr 128
log "%s, "
...
...
@@ -563,7 +563,7 @@ cmdstr "config"
end_cmd
cmdstr "send"
print "
_\r\n
b
hE-mail (User name or number):
w"
print "
\x01
_\r\n
\x01b\x01
hE-mail (User name or number):
\x01
w"
getname 40
compare_str ""
if_true
...
...
@@ -577,7 +577,7 @@ cmdstr "send"
end_cmd
cmdstr "sendfile"
print "
_\r\n
b
hE-mail (User name or number):
w"
print "
\x01
_\r\n
\x01b\x01
hE-mail (User name or number):
\x01
w"
getname 40
compare_str ""
if_true
...
...
@@ -660,7 +660,7 @@ if_false
menu maincfg
end_if
async
print "\r\n
y
hConfig:
n"
print "\r\n
\x01y\x01
hConfig:
\x01
n"
getcmd ?QNPIS\r
logkey
...
...
exec/simple.src
View file @
c58b969e
...
...
@@ -19,7 +19,7 @@ async
menu simple/main
menu simple/prompt
print "
n"
print "
\x01
n"
getstrupr 10
crlf
...
...
@@ -49,7 +49,7 @@ cmdstr S
async
menu simple/sendmsg
menu simple/prompt
print "
n"
print "
\x01
n"
getstrupr 10
crlf
pause_reset
...
...
@@ -94,7 +94,7 @@ cmdstr R
async
menu simple/readmsg
menu simple/prompt
print "
n"
print "
\x01
n"
getstrupr 10
crlf
pause_reset
...
...
@@ -132,28 +132,28 @@ cmdstr R
# Read all new messages
cmdstr N
print "
lb
hScanning for new messages...\r\n"
print "
\x01l\x01b\x01
hScanning for new messages...\r\n"
msg_new_scan_all
end_cmd
cmdstr NEW
print "
lb
hScanning for new messages...\r\n"
print "
\x01l\x01b\x01
hScanning for new messages...\r\n"
msg_new_scan_all
end_cmd
# Read all new messages TO: YOU
cmdstr Y
print "
lb
hScanning for your messages...\r\n"
print "
\x01l\x01b\x01
hScanning for your messages...\r\n"
msg_your_scan_all
end_cmd
cmdstr YOU
print "
lb
hScanning for your messages...\r\n"
print "
\x01l\x01b\x01
hScanning for your messages...\r\n"
msg_your_scan_all
end_cmd
cmdstr YOUR
print "
lb
hScanning for your messages...\r\n"
print "
\x01l\x01b\x01
hScanning 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 "
\x01
n"
getstrupr 10
crlf
pause_reset
...
...
@@ -223,7 +223,7 @@ cmdstr F
end_cmd
cmdstr N
print "\r\n
b
hUse
c@NEWFILETIME@
b for new file scan "
print "\r\n
\x01b\x01
hUse
\x01
c@NEWFILETIME@
\x01
b 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\n
c
hFind Text in File Descriptions (no wildcards)\r\n"
print "\r\n
\x01c\x01
hFind Text in File Descriptions (no wildcards)\r\n"
file_find_text_all
end_cmd
cmdstr S
print "\r\n
c
hSearch for Filename(s)\r\n"
print "\r\n
\x01c\x01
hSearch for Filename(s)\r\n"
file_find_name_all
end_cmd
...
...
@@ -309,7 +309,7 @@ if_false
return
:sendmail
print "\r\n
b
hSend E-mail to (User name or number):
n"
print "\r\n
\x01b\x01
hSend E-mail to (User name or number):
\x01
n"
getname 40
compare_str ""
if_true
...
...
@@ -357,7 +357,7 @@ return
menu maincfg
async
print "\r\n
y
hCommand:
n"
print "\r\n
\x01y\x01
hCommand:
\x01
n"
getstrupr 10
logkey
...
...
exec/wildcat.src
View file @
c58b969e
...
...
@@ -13,9 +13,9 @@ compare_ars expert
if_false
clear_abort
menu wildcat/main
print "\r\n
w
hCommand >>?
n"
print "\r\n
\x01w\x01
hCommand >>?
\x01
n"
else
print "\r\n
y
h@GRP@ @SUB@,
wMAIN MENU
y: ?
n"
print "\r\n
\x01y\x01
h@GRP@ @SUB@,
\x01
wMAIN MENU
\x01
y: ?
\x01
n"
end_if
node_action node_main
...
...
@@ -37,7 +37,7 @@ cmdkey M
goto message
end_cmd
cmdkey U
print "\r\n
c
hList Users\r\n"
print "\r\n
\x01c\x01
hList 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\n
y
hUsername search string:
w"
print "\r\n
\x01y\x01
hUsername search string:
\x01
w"
getname 25
finduser
if_true
print "
y
hVerified:
w"
print "
\x01y\x01
hVerified:
\x01
w"
printstr
crlf
end_if
...
...
@@ -172,9 +172,9 @@ compare_ars expert
if_false
clear_abort
menu wildcat/file
print "\r\n
w
hCommand >>?
n"
print "\r\n
\x01w\x01
hCommand >>?
\x01
n"
else
print "\r\n
y
h@LIB@ @DIR@,
wFILE MENU
y: ?
n"
print "\r\n
\x01y\x01
h@LIB@ @DIR@,
\x01
wFILE MENU
\x01
y: ?
\x01
n"
end_if
# Update node status
...
...
@@ -212,7 +212,7 @@ cmdkey L
end_cmd
cmdkey D
print "\r\n
c
hDownload File(s)\r\n"
print "\r\n
\x01c\x01
hDownload File(s)\r\n"
file_download_batch
if_true
end_cmd
...
...
@@ -224,7 +224,7 @@ cmdkey D
end_cmd
cmdkey U
print "\r\n
c
hUpload File\r\n"
print "\r\n
\x01c\x01
hUpload File\r\n"
chkfile "../text/menu/upload.*"
if_true
menu upload
...
...
@@ -233,7 +233,7 @@ cmdkey U
end_cmd
cmdkey N
print "\r\n
b
hUse
c@NEWFILETIME@
b for new file scan date/time "
print "\r\n
\x01b\x01
hUse
\x01
c@NEWFILETIME@
\x01
b 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\n
c
hView File(s)\r\n"
print "\r\n
\x01c\x01
hView File(s)\r\n"
getfilespec
if_true
file_view
...
...
@@ -258,7 +258,7 @@ cmdkey M
end_cmd
cmdkey S
print "\r\n
c
hSearch for Filename(s)\r\n"
print "\r\n
\x01c\x01
hSearch for Filename(s)\r\n"
file_find_name
end_cmd
...
...
@@ -281,7 +281,7 @@ cmdkey P
end_cmd
cmdkey I
print "\r\n
c
hList Extended File Information\r\n"
print "\r\n
\x01c\x01
hList 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\n
w
hCommand >>?
n"
print "\r\n
\x01w\x01
hCommand >>?
\x01
n"
else
print "\r\n
y
h@GRP@ @SUB@,
wMESSAGE MENU
y: ?
n"
print "\r\n
\x01y\x01
h@GRP@ @SUB@,
\x01
wMESSAGE MENU
\x01
y: ?
\x01
n"
end_if
# Update node status
...
...
@@ -346,9 +346,9 @@ cmdkey Q
cmdkey R
cmd_home
print "
n\r\n
y
hReading Messages: [\1wA\1y]ll messages, [
wN
y]ew messages, [
wS
y]earch, "
print "[
wU
y]nread personal,\r\n"
print "[
wJ
y]oin, or [
wENTER
y] to quit? "
print "
\x01
n\r\n
\x01y\x01
hReading Messages: [\1wA\1y]ll messages, [
\x01wN\x01
y]ew messages, [
\x01wS\x01
y]earch, "
print "[
\x01wU\x01
y]nread personal,\r\n"
print "[
\x01wJ\x01
y]oin, or [
\x01
wENTER
\x01
y] to quit? "
getstr 5
logkey
...
...
@@ -392,12 +392,12 @@ cmdkey F
end_cmd
cmdkey S
print "\r\n
c
hSearch for Text in Messages\r\n"
print "\r\n
\x01c\x01
hSearch for Text in Messages\r\n"
msg_find_text
end_cmd
cmdkey C
print "\r\n
c
hCheck for Messages Posted to You\r\n"
print "\r\n
\x01c\x01
hCheck 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\n
y
hConfig:
n"
print "\r\n
\x01y\x01
hConfig:
\x01
n"
getcmd ?QNPIS
logkey
...
...
@@ -493,9 +493,9 @@ compare_ars expert
if_false
clear_abort
menu wildcat/sysop
print "\r\n
w
hCommand >>?
n"
print "\r\n
\x01w\x01
hCommand >>?
\x01
n"
else
print "\r\n
y
h@GRP@ @SUB@,
wSYSOP MENU
y: ?
n"
print "\r\n
\x01y\x01
h@GRP@ @SUB@,
\x01
wSYSOP MENU
\x01
y: ?
\x01
n"
end_if
# Update node status
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment