Category : BBS Programs+Doors
Archive : TONSMOD.ZIP
Filename : MTBSLIST.MOD
Output of file : MTBSLIST.MOD contained in archive : TONSMOD.ZIP
|
| MTB's Version of the Subs List Mod (MTBSLIST.MOD)
| A Vaporware Enterprises Mutation mod
| Midnight Tree Bandit
----+-----------------------------------------------------------
| 9/27/92
This mod is by no stretch original. The basis of it comes from a subs list
mod by Lanzecki (in ModNet 5). I have updated it for WWIV 4.21a and added in
Shadowspawn's NETSUBS.MOD, which shows the network name with the sub instead
of just
noted on the IceNET mods dicsussion sub that this type of subs list can make
trouble for the Move command while scanning a sub. More specifically, if you
list the subs before moving the message (by hitting "?" when it asks which sub
to move to), it will move the current message number in that LAST sub in the
list to the specified destination. JAFO posted a fix for this which is
included here (in streamilined form). I hadn't planned on releasing this but
I have been getting a few requests for it so I figured it was time to release
it.
What this mod does is show a list of subs with network name, sub name, number
of messages in the sub, and number of messages unread in the sub. The format
looks something like this (with colors):
1 -
As mentioned before, parts of this are from Shadowspawn's NETSUBS.MOD, though
I can't exctly be sure which parts, so the least I can do is give him credit.
This is, of course, only for WWIV 4.21a. With some tweaking, you can get it
to work for 4.21-.
Step 0 -- BACK UP YOUR SOURCE!!!
I. In BBS.C, remove or comment out 'void sublist(void)' and replace it with
this one (note that, for the benefit of those capturing this from remote,
I have replaced all WWIV color code (
void sublist(void)
{
int i,abort;
char s[80],s1[80];
char sdf[120];
int sam,tally;
abort=0;
nl();
pla("Subs available: ",&abort);
nl();
i=0;
while ((i
strcpy(s,usub[i].keys);
s[2]=0;
if (s[1]==0)
s[1]=32;
if (usub[i].subnum<32) {
if ((1L << (usub[i].subnum)) & thisuser.qscn)
strcat(s," - ");
else
strcat(s," ");
} else {
#if MAX_SUBS>32
if ((1L << (usub[i].subnum-32)) & thisuser.qscn2)
strcat(s," - ");
else
strcat(s," ");
#else
strcat(s," ");
#endif
}
if (net_sysnum) {
if (subboards[usub[i].subnum].type) {
set_net_num(subboards[usub[i].subnum].name[40]);
if (subboards[usub[i].subnum].anony & anony_val_net) {
sprintf(s1,"^C0[^C%i%-8.8s^C0]",net_num+1,net_name);
strcat(s,s1);
} else {
sprintf(s1,"^C0<^C%i%-8.8s^C0>",net_num+1,net_name);
strcat(s,s1);
}
} else {
set_net_num(0);
strcat(s,"^C0(^C5Local^C0) ");
}
}
sprintf(s1,"%s^C7 %s^C0",s,subboards[usub[i].subnum].name);
iscan(i);
sam=1;
if (usub[i].subnum<32) {
while ((sam<=nummsgs)
&& (msgs[sam].qscan<=thisuser.qscnptr[usub[i].subnum]))
++sam;
#if MAX_SUBS>32
} else {
while ((sam<=nummsgs)
&& (msgs[sam].qscan<=thisuser.qscnptr2[usub[i].subnum-32]))
++sam;
#endif
}
sam=sam-1;
tally=nummsgs-sam;
sprintf(sdf,"%-65.65s ^C3- %-3d msgs | %-3d new",s1,nummsgs,tally);
pla(sdf,&abort);
i++;
}
if (i==0)
pla("None.",&abort);
nl();
}
II. (Jafo's step) In MSGBASE1.C, find 'void scan()', then search for
"case 'M':", then go down a few lines, and make these changes:
prt(2,"Move to which sub? ");
ss1=mmkey(0);
! if (ss1[0]=='?') { /* add the { */
sublist();
+ iscan(cursub);
+ }
III. That's it. Recompile and go.
DISCLAIMER: Works for me, and the Move command works just fine. My system's
not as wierd as Elric's, so if it works on my system, it should work on you.
I take no responsibility of any bending, folding, or mutilation of your
messages bases resulting from this mod.
Help? I can be found at these fine establishments:
WWIVLink: #1 @18411 (The Many Titled Board)
IceNET: #1 @8411 ( " " " " )
WWIVNet: #4 @8408 (The Otherboard)
GEnieMail: tree.bandit
Very nice! Thank you for this wonderful archive. I wonder why I found it only now. Long live the BBS file archives!
This is so awesome! 😀 I’d be cool if you could download an entire archive of this at once, though.
But one thing that puzzles me is the “mtswslnkmcjklsdlsbdmMICROSOFT” string. There is an article about it here. It is definitely worth a read: http://www.os2museum.com/wp/mtswslnk/