home *** CD-ROM | disk | FTP | other *** search
- Maintech #1 @4203
- Tue Jun 06 23:11:55 1995
- ┌────────────────────────────────────────────────────────────────────────────┐
- │ Mod Name: MT14.mod Mod Author:/\/\ainTech 1@4203 │
- │ Difficulty: .5 on a 1-10 Scale Date: 5/6/95 │
- │ WWIV Version: 4.24 Original credit: Frank Reid │
- │ Description: Improved //QSCAN function; resets qscan pointers as read or │
- │ unread on any one sub or on all of them. │
- └────────────────────────────────────────────────────────────────────────────┘
- ╔════════════════════════════════════════════════════════════════════════════╗
- ║ This mod is copyright 1992, 1995 by D. Thompson, aka Maintech, and is ║
- ║ distributed as freeware. Permission is granted to distribute and post ║
- ║ this mod on BBS systems and online services, provided no alterations ║
- ║ are made (removal of message headers/taglines allowed). This mod may ║
- ║ contain some parts of WWIV source code, which is copyright 1988-1995 by ║
- ║ Wayne Bell and licensed only to registered users of WWIV. Use of WWIV ║
- ║ source without registration constitutes a license violation and could ║
- ║ lead to legal prosecution and certain doom. ║
- ║ ║
- ║ Shareware distributors and CD-ROM publishers may not distribute this mod ║
- ║ without express written permission of the Author or WWIV Software ║
- ║ Services. Distribution should be to Registered WWIV sysops only. ║
- ╚════════════════════════════════════════════════════════════════════════════╝
-
-
- Disclaimer: It works here, it should work there too.
-
- Load up mmenu.c, open void mainmenu, and replace the //QSCAN function with this
- one.
-
-
- if (strcmp(s,"QSCAN")==0) {
- tmp_disable_conf(1);
- nl();
- prt(5,"Mark messages as 3(2R3)5EAD, 3(2U3)5NREAD,0 or 3(2Q3)5uit? ");0
- ch=onek("QUR");
- switch(ch) {
- case 'R':
- nl();
- prt(2,"Reset QScan pointers on ALL subs as 5READ? ");0
- if (yn()) {
- for (i=0; i<max_subs; i++)
- qsc_p[i] = status.qscanptr-1L;
- nl();
- pl(get_string(25));
- nl();
- } else {
- nl();
- qsc_p[usub[cursub].subnum]=status.qscanptr-1L;
- nl();
- npr("2Messages on 3%s 2marked as 1READ.\r\n",0
- subboards[usub[cursub].subnum].name);
- }
- tmp_disable_conf(0);
- break;
- case 'U':
- nl();
- prt(2,"Reset QScan pointers on ALL subs to 5UNREAD? ");0
- if (yn()) {
- for (i=0; i<max_subs; i++)
- qsc_p[i] = 0;
- nl();
- pl(get_string(25));
- nl();
- } else {
- nl();
- qsc_p[usub[cursub].subnum]=0;
- npr("2Messages on 3%s 2marked as 1UNREAD.\r\n",0
- subboards[usub[cursub].subnum].name);
- }
- tmp_disable_conf(0);
- break;
- case 'Q':
- tmp_disable_conf(0);
- break;
- }
- }
-