Category : BBS Programs+Doors
Archive   : TONSMOD.ZIP
Filename : COLRFILE.MOD
104/15/90 at 1:37 pm 7<2EST7>
7[2Msg Status7] 6Reply Wanted.
7~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
/*****************************************************************************/
Multi COLOR File Type Listings
By: The Grim Reaper - The Reaper's Domain
(305) 983-8533
300/1200/2400 Baud
WWIVnet @3511
This mod will print different colors for different file types.
This mod will ONLY work for 4.10 or higher!!
/*****************************************************************************/
[ Step #1 ]
Load up XFER.C and find "printinfo(uploadsrec *u, int *abort)" and put this
void right above it..
void pla2(char *s, int *abort)
{
int i,next;
i=0;
checkhangup();
if (hangup)
*abort=1;
checka(abort,&next);
while ((s[i]) && (!(*abort))) {
outchr(s[i++]);
checka(abort,&next);
}
}
[ Step #2 ]
Now go back down to "printinfo(blah blah)" and delete the void and put this
one in it place.
void printinfo(uploadsrec *u, int *abort)
{
char s[85],s1[40],s2[81];
int i,j,fc;
fc=thisuser.sysstatus & sysstatus_funky_colors;
j=0;
strcpy(s,u->filename);
ltoa((((u->numbytes)+1023)/1024),s1,10);
strcat(s1,"k");
#ifdef CHECK_FOR_EXISTANCE
strcpy(s2,directories[udir[curdir].subnum].path);
strcat(s2,u->filename);
if (!exist(s2)) {
strcpy(s1,"Req");
j=1;
}
#endif
if (fc) {
if (strstr(u->filename, ".ZIP"))
ansic(7);
if (strstr(u->filename, ".PAK"))
ansic(2);
if (strstr(u->filename, ".LZH"))
ansic(4);
if (strstr(u->filename, ".ARC"))
ansic(1);
if (strstr(u->filename, ".EXE"))
ansic(6);
if (strstr(u->filename, ".COM"))
ansic(6);
} else
ansic(0);
pla2(s,abort);
if (fc) {
ansic(3);
pla2("³ ",abort);
} else
pla2(": ",abort);
for (i=0; i<5-strlen(s1); i++)
pla2(" ",abort);
if (fc)
if (j==1)
ansic(6);
else
ansic(1);
pla2(s1,abort);
if (fc) {
ansic(3);
pla2(" ³",abort);
} else
pla2(" :",abort);
if (fc)
ansic(2);
pla2(u->description,abort);
nl();
if ((!*abort) && (thisuser.num_extended) && (u->mask & mask_extended))
print_extended(u->filename,abort,thisuser.num_extended,1);
if (!(*abort))
++num_listed;
}
/****************************************************************************/
OK... Thats all... Just Press F2, to save and press F9, to compile!!
If you have any problems or ideas please email me 1@3511, If you like
this mod call my BBS or email about it!!
/***************************************************************************/
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/