Skip to content
Snippets Groups Projects
Commit bb5b9d86 authored by Rob Swindell's avatar Rob Swindell :speech_balloon:
Browse files

New module: msgscancfg.js to replace copy/pasta msg config menu in *.src 

Also added 2 new menu options:
R - re-load msg scan config & pointers
W - save msg scan config & pointers

Leaving the menu file named "maincfg.msg" even though that's a pretty
badly named file - should rename that file at some point, but keep 8.3
format for DOS (e.g. TheDraw, AcidDraw) compatibility.
mscancfg.msg maybe? Ah, the fun of abbreviating things to 8 chars again.
parent 7a5c6e36
No related branches found
No related tags found
1 merge request!463MRC mods by Codefenix (2024-10-20)
Pipeline #3906 passed
Stage: build
Show whitespace changes
Inline Side-by-side
exec/default.src
+ 7
− 51
View file @ bb5b9d86
...@@ -387,7 +387,7 @@ cmdkey /* ...@@ -387,7 +387,7 @@ cmdkey /*
end_cmd end_cmd
cmdkey & cmdkey &
call main_cfg exec_bin "msgscancfg"
end_cmd end_cmd
cmdkey # cmdkey #
...@@ -457,50 +457,6 @@ cmdkey Q ...@@ -457,50 +457,6 @@ cmdkey Q
cmd_pop cmd_pop
return return
########################### Main Config Section ##############################
:main_cfg
compare_user_misc UM_expert
if_false
menu maincfg
end_if
async
print "\r\n\1y\1hConfig: \1n"
getcmd ?QNPIS\r
logkey
cmdkey ?
compare_user_misc UM_expert
if_true
menu maincfg
end_if
goto main_cfg
end_cmd
cmdkey N
msg_new_scan_cfg
return
end_cmd
cmdkey S
msg_your_scan_cfg
return
end_cmd
cmdkey P
msg_ptrs_cfg
return
end_cmd
cmdkey I
msg_ptrs_reinit
return
end_cmd
return
########################### File Transfer Section ############################# ########################### File Transfer Section #############################
:file_transfers :file_transfers
......
exec/major.src
+ 1
− 36
View file @ bb5b9d86
...@@ -230,42 +230,7 @@ cmdkey Q ...@@ -230,42 +230,7 @@ cmdkey Q
end_cmd end_cmd
cmdstr C cmdstr C
cmd_home exec_bin "msgscancfg"
menu maincfg
async
print "\r\n\x01y\x01hConfig: \x01n"
getcmd ?QNPIS
logkey
cmdkey ?
compare_ars expert
if_true
menu maincfg
end_if
end_cmd
cmdkey N
msg_new_scan_cfg
end_cmd
cmdkey S
msg_your_scan_cfg
end_cmd
cmdkey P
msg_ptrs_cfg
end_cmd
cmdkey I
msg_ptrs_reinit
end_cmd
cmdkey Q
cmd_pop
end_cmd
end_cmd
cmd_pop
end_cmd end_cmd
cmdkey T cmdkey T
......
exec/msgscancfg.js 0 → 100644
+ 44
− 0
View file @ bb5b9d86
// Message Scan Configuration menu
require("sbbsdefs.js", "USER_EXPERT");
"use strict";
const menufile = "maincfg";
while(bbs.online) {
if(!(user.settings & USER_EXPERT))
bbs.menu(menufile);
bbs.nodesync();
console.print("\r\n\x01y\x01hConfig: \x01n");
var key = console.getkeys("?QNPISRW\r");
bbs.log_key(key);
switch(key) {
case '?':
if(user.settings & USER_EXPERT)
bbs.menu(menufile);
continue;
case 'N':
bbs.cfg_msg_scan(SCAN_CFG_NEW);
break;
case 'S':
bbs.cfg_msg_scan(SCAN_CFG_TOYOU);
break;
case 'P':
bbs.cfg_msg_ptrs();
break;
case 'I':
bbs.reinit_msg_ptrs();
break;
case 'R':
bbs.reload_msg_scan();
console.print("\r\nMessage scan configuration and pointers re-loaded.\r\n");
break;
case 'W':
bbs.save_msg_scan();
console.print("\r\nMessage scan configuration and pointers saved.\r\n");
break;
}
exit();
}
exec/renegade.src
+ 4
− 48
View file @ bb5b9d86
...@@ -316,50 +316,6 @@ if_true ...@@ -316,50 +316,6 @@ if_true
crlf crlf
end_cmd end_cmd
########################### Main Config Section ##############################
:main_cfg
compare_ars expert
if_false
menu maincfg
end_if
async
print "\r\n\x01y\x01hConfig: \x01n"
getcmd ?QNPIS\r
logkey
cmdkey ?
compare_ars expert
if_true
menu maincfg
end_if
goto main_cfg
end_cmd
cmdkey N
msg_new_scan_cfg
return
end_cmd
cmdkey S
msg_your_scan_cfg
return
end_cmd
cmdkey P
msg_ptrs_cfg
return
end_cmd
cmdkey I
msg_ptrs_reinit
return
end_cmd
return
########################### File Transfer Section ############################# ########################### File Transfer Section #############################
:file_transfers :file_transfers
...@@ -818,7 +774,7 @@ cmdkey Y ...@@ -818,7 +774,7 @@ cmdkey Y
end_cmd end_cmd
cmdkey Z cmdkey Z
call main_cfg exec_bin "msgscancfg"
end_cmd end_cmd
cmdkey # cmdkey #
......
exec/sdos.src
+ 2
− 45
View file @ bb5b9d86
...@@ -556,7 +556,7 @@ cmdstr "dir" ...@@ -556,7 +556,7 @@ cmdstr "dir"
end_cmd end_cmd
cmdstr "config" cmdstr "config"
call main_cfg exec_bin "msgscancfg"
end_cmd end_cmd
cmdstr "send" cmdstr "send"
...@@ -648,47 +648,4 @@ cmdstr "readmsgs" ...@@ -648,47 +648,4 @@ cmdstr "readmsgs"
call global call global
end_cmd end_cmd
########################### Main Config Section ##############################
:main_cfg
compare_user_misc UM_expert
if_false
menu maincfg
end_if
async
print "\r\n\x01y\x01hConfig: \x01n"
getcmd ?QNPIS\r
logkey
cmdkey ?
compare_user_misc UM_expert
if_true
menu maincfg
end_if
goto main_cfg
end_cmd
cmdkey N
msg_new_scan_cfg
return
end_cmd
cmdkey S
msg_your_scan_cfg
return
end_cmd
cmdkey P
msg_ptrs_cfg
return
end_cmd
cmdkey I
msg_ptrs_reinit
return
end_cmd
return
# End of SDOS.SRC # End of SDOS.SRC
exec/simple.src
+ 1
− 34
View file @ bb5b9d86
...@@ -154,7 +154,7 @@ cmdstr R ...@@ -154,7 +154,7 @@ cmdstr R
end_cmd end_cmd
cmdstr C cmdstr C
call msg_cfg exec_bin "msgscancfg"
end_cmd end_cmd
# Quit back to main menu # Quit back to main menu
...@@ -349,37 +349,4 @@ if_true ...@@ -349,37 +349,4 @@ if_true
end_if end_if
return return
########################### Msg Config Section ##############################
:msg_cfg
menu maincfg
async
print "\r\n\x01y\x01hCommand: \x01n"
getstrupr 10
logkey
cmdkey N
msg_new_scan_cfg
return
end_cmd
cmdkey S
msg_your_scan_cfg
return
end_cmd
cmdkey P
msg_ptrs_cfg
return
end_cmd
cmdkey I
msg_ptrs_reinit
return
end_cmd
return
#end of SIMPLE.SRC #end of SIMPLE.SRC
exec/wildcat.src
+ 3
− 39
View file @ bb5b9d86
...@@ -399,43 +399,7 @@ cmdkey C ...@@ -399,43 +399,7 @@ cmdkey C
end_cmd end_cmd
cmdkey U cmdkey U
cmd_home exec_bin "msgscancfg"
compare_ars expert
if_false
menu maincfg
end_if
async
print "\r\n\x01y\x01hConfig: \x01n"
getcmd ?QNPIS
logkey
cmdkey ?
compare_ars expert
if_true
menu maincfg
end_if
end_cmd
cmdkey N
msg_new_scan_cfg
end_cmd
cmdkey S
msg_your_scan_cfg
end_cmd
cmdkey P
msg_ptrs_cfg
end_cmd
cmdkey I
msg_ptrs_reinit
end_cmd
cmdkey Q
cmd_pop
end_cmd
end_cmd end_cmd
cmdkey H cmdkey H
......
exec/wwiv.src
+ 3
− 46
View file @ bb5b9d86
...@@ -273,7 +273,7 @@ cmdkey /* ...@@ -273,7 +273,7 @@ cmdkey /*
end_cmd end_cmd
cmdkey & cmdkey &
call main_cfg exec_bin "msgscancfg"
end_cmd end_cmd
cmdkey # cmdkey #
...@@ -342,49 +342,6 @@ cmdkey Q ...@@ -342,49 +342,6 @@ cmdkey Q
cmd_pop cmd_pop
return return
########################### Main Config Section ##############################
:main_cfg
compare_ars expert
if_false
menu MAINCFG
end_if
async
print "\r\n\x01y\x01hConfig: \x01n"
getcmd ?QNPIS\r
logkey
cmdkey ?
compare_ars expert
if_true
menu MAINCFG
end_if
goto main_cfg
end_cmd
cmdkey N
msg_new_scan_cfg
return
end_cmd
cmdkey S
msg_your_scan_cfg
return
end_cmd
cmdkey P
msg_ptrs_cfg
return
end_cmd
cmdkey I
msg_ptrs_reinit
return
end_cmd
return
########################### File Transfer Section ############################# ########################### File Transfer Section #############################
:file_transfers :file_transfers
......
text/menu/maincfg.msg
+ 4
− 2
View file @ bb5b9d86
...@@ -6,7 +6,9 @@ ...@@ -6,7 +6,9 @@
W HCSY NCAreas to scan for your messagesWB W HCSY NCAreas to scan for your messagesWB
HCP NCSet new-scan pointersWB HCP NCSet new-scan pointersWB
HCI NCReinitialize new-scan pointersWB HCI NCReinitialize new-scan pointersWB
HCR NCReload new-scan config & pointers WB
HCW NCSave new-scan config & pointers WB
۲IJ ۲IJ
HCQ NCQuit to Main menuWB HCQ NCQuit to Main/Message menu WB
Z Z
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Please register or to comment