Category : BBS Programs+Doors
Archive   : TONSMOD.ZIP
Filename : ALLCOLOR.MOD
Viper #1 @17001
Wed Feb 12 15:07:52 1992
244/250: TMS1C.MOD Added step six...
Name: The Mad Scientist #2 @9985
Date: Sun Feb 02 12:20:54 1992
From: Chaos! (North Carolina)
Mod Name: TMS1C.MOD
Written By: The Mad Scientist #2 @9985
WWIV Version: WWIV v4.20e
Discription: This mod that lets you use all 256 ansi color combinations
and lets you select them through a menu.
Version: This is revision C. It should fix the problems people have
been having with the unintensified, not blinking
colors and MCI.
Disclaimer: If this mod totaly screws your system, it ain't my fault.
Now, lets get on with the mod...
Step 1: BACK UP YOUR SOURCE
Step 2:
Load BBSUTL.C. find:
void inli(char *s, char *rollover, int maxlen, int crend)
In the top of inli, change the following line:
char s1[255],s2[255],atr[81],xl[81],cl[81],nc,cc,*ss;
Step 3:
Move down to the cases, then block read in this code:
case 11: /* Ctrl - K */
if (cp
done=0;
helpl=36;
i1=ch-'0';
color_list();
ansic(0);
nl();
prt(2,"Foreground? ");
ch=onek("01234567");
nc=ch-'0';
prt(2,"Background? ");
ch=onek("01234567");
nc=nc | ((ch-'0') << 4);
nl();
prt(5,"Intensified? ");
if (yn())
nc |= 0x08;
prt(5,"Blinking? ");
if (yn())
nc |= 0x80;
restorel(cl,atr,xl,&cc);
s[cp++]=5;
s[cp++]=nc;
ansic2(nc);
}
break;
Step 4:
Save BBSUTL.C. Load COM.C.
In void outchr(char c), add the following code:
== if (change_color) {
== change_color = 0;
== if (c >= '0')
== ansic(c - '0');
== return;
++ if (change_color2) {
++ change_color2=0;
++ ansic2(c);
++ return;
++ }
== if (c == 3) {
== change_color = 1;
== return;
== }
++ if (c == 5) {
++ change_color2 = 1;
++ return;
++ }
Step 5:
After the ansic() function, block read in this code:
void ansic2(int n)
{
char c;
c=n;
if (c == curatr)
return;
setc(c);
makeansi((thisuser.sysstatus & sysstatus_color) ? thisuser.colors[0] :
thisuser.bwcolors[0],endofline, 0);
}
Step 6:
Save COM.C. Load VARS.H. Go down to the int and add change_color2:
==int abortext, already_on, ansiptr, arcling, async_irq, base, bchanged,
+=change_color, change_color2, charbufferpointer, chatcall, chatting,
chat_file,
==checkit, configfile, curatr, curdir, curdloads, curldir, curlsub,
Then go down the the extern int. Same change...
==extern int abortext, already_on, ansiptr, arcling, async_irq, base, bchanged,
+=change_color, change_color2, charbufferpointer, chatcall, chatting,
chat_file,
==checkit, configfile, curatr, curdir, curdloads, curldir, curlsub,
Step 7:
6This step by Viper!!!
Load Fcns.h
add void ansic2(int n);
Step 8:
Save the files and compile.
If you have a problem with this mod, email me at 2@9985 and we'll fix it.
2-> -> -> -> -> -> -> -> -> -> -> -> -> -> -> ->
2-> -> -> -> -> -> -> -> -> -> -> ->7\/6iper2<-
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/