home *** CD-ROM | disk | FTP | other *** search
/ The Arcade BBS / arcadebbs.zip / arcadebbs / bbstools / MODS / ALLMODS.ZIP / CALV01-D.ZIP / CALV01-D.MOD next >
Encoding:
Text File  |  1995-06-11  |  6.2 KB  |  127 lines
  1. Calvin #1 @4350
  2. Fri Jun 09 04:32:43 1995
  3. ┌────────────────────────────────────────────────────────────────────────────┐
  4. │ Mod Name      : CALV01-C.MOD           Mod Author: CALVIN 1@8262  TerraNET │
  5. │ Difficulty    : █▒▒▒▒▒▒▒▒▒                                1@4350  WWIVNet  │
  6. │ WWIV Version  : 4.24, 4.23, 4.22                          1@2001  ASSnet   │
  7. │ Mod Date      : 06/07/95                                  1@18262 WWIVLink │
  8. │ Files Affected: MSGBASE1.C                                1@8262  IceNET   │
  9. │ Description   : The 'Z' Zap mod (Remove subs from         1@10000 WaveCom  │
  10. │                 Q-Scan on the fly)                                         │
  11. └────────────────────────────────────────────────────────────────────────────┘
  12. ╔════════════════════════════════════════════════════════════════════════════╗
  13. ║   This mod is copyright 1995 by Michael Lerch, aka Calvin, and is          ║
  14. ║   distributed as freeware.  Permission is granted to distribute and post   ║
  15. ║   this mod on BBS systems and online services, provided no alterations are ║
  16. ║   made (removal of message headers/taglines allowed). This mod may contain ║
  17. ║   some parts of WWIV source code, which is copyright 1988-1995 by Wayne    ║
  18. ║   Bell and licensed only to registered users of WWIV.  Use of WWIV source  ║
  19. ║   without registration constitutes a license violation and could lead to   ║
  20. ║   legal prosecution and certain doom.                                      ║
  21. ║                                                                            ║
  22. ║   Shareware distributors and CD-ROM publishers may not distribute this mod ║
  23. ║   without express written permission of the Author or WWIV Software        ║
  24. ║   Services.                                                                ║
  25. ╚════════════════════════════════════════════════════════════════════════════╝
  26.  
  27. ══[ Description ]═════════════════════════════════════════════════════════════
  28.  
  29. There was a fantastic mod I ran into on another BBS a couple years ago.
  30. While you were reading a sub you could type "B" and remove the sub from
  31. your N-Scan.  The only thing is, I type "B" a lot when I want to read
  32. the sub later; always answering "Remove from your N-Scan" was a pain in
  33. the rump.  Here is my solution:  give the function its own unique key
  34. instead of tying it to another event.  Also, provide help for users that
  35. are not "experts".
  36.  
  37. Version C - Menus are not included...got a lot of feedback on the mod
  38.         and most all said, "Hey, those menus are a waste of bandwidth!"
  39.         So make your own!  Also changed help message slightly.  This mod
  40.         used to be called CALVIN01.MOD
  41.  
  42. Version D - Made sure the mod was 4.24 compatible (I've been doing it
  43.         since v.4.22).  I also corrected some alignment problems.
  44.  
  45. ══[ Legend ]══════════════════════════════════════════════════════════════════
  46.  
  47.   =  Existing line - Do not change
  48.   +  Add this line
  49.  
  50. ══[ Step 1 ]══════════════════════════════════════════════════════════════════
  51.  
  52. Back up your source code.  I use the "incremental backup" procedure,
  53. which utilizes the archive bit in the file attributes.  If you want
  54. info, read the PKZip docs or E-mail me.
  55.  
  56. ══[ Step 2 ]══════════════════════════════════════════════════════════════════
  57.  
  58. Load up MSGBASE1.C and add the following case:
  59.  
  60. ALSO NOTE:  if you see a line that doesn't begin with a + or =, that
  61.             means the line has wrapped...beware!
  62.  
  63. =               case 'B':
  64. =                 if (*nextsub!=0) {
  65. =                   *nextsub=1;
  66. =                   done=1;
  67. =                   quit=1;
  68. =                 }
  69. =                 break;
  70. + /*This case added for CALV01-C.MOD */
  71. +               case 'Z':
  72. +                 if (*nextsub!=0) {
  73. +                   prt(5,"Zap this sub from your N-Scan?  ");
  74. +                   if ((sysstatus_expert & thisuser.sysstatus)==0){
  75. +                     npr("7Answering yes removes this sub from your\r\n");
  76. +                     npr("7configured Q-Scan.  To read the sub, you will have to either enter the\r\n");
  77. +                     npr("7(D)efaults section and add it back into your Q-Scan, or you will have to\r\n");
  78. +                     npr("7manually advance to it when you want to read it.\r\n");
  79. +                     npr("7Enter 6Y3 or 6N0:  ");
  80. +                   }
  81. +                   if (yn()){
  82. +                     qsc_q[usub[cursub].subnum/32] ^= (1L<<(usub[cursub].subnum%32));
  83. +                     *nextsub=1;
  84. +                     done=1;
  85. +                     quit=1;
  86. +                   }
  87. +                 }
  88. +                 break;
  89. + /*The above case added for CALV01-C.MOD */
  90. =               case 'T':
  91. =                 optype=1;
  92. =                 break;
  93.  
  94. ══[ Step 3 ]══════════════════════════════════════════════════════════════════
  95.  
  96. Compile.  Also, you're going to want to let your users know that 'Z'
  97. exists, so you should add the command to your menus.  The menus you need
  98. to mess with are MENU1.ANS and .MSG.  I don't have .RIP turned on on my
  99. system so I don't know what that entails.
  100.  
  101. ══[ Disclaimer ]══════════════════════════════════════════════════════════════
  102.  
  103. I'm not responsible for anything that goes wrong when you install this
  104. mod.  This is the same code that's on my system, though.
  105.  
  106. ══[ Background ]══════════════════════════════════════════════════════════════
  107.  
  108. The 'B' Bypass mod has been finely written by thousands of modders, and
  109. I was specifically inspired by PYRO008.MOD, who is evidently some kind
  110. of Pyromaniac Headbanger and can be reached at 1 @19960 WWIVnet (old
  111. number system), 1 @9994 IceNet, and 1 @1 TestNet.  PYRO008.MOD was for
  112. v.4.22.  My users really like this mod; I bet yours will, too.  I've
  113. been revising it for every version of WWIV since 4.22.
  114.  
  115. ══[ Wrap-Up ]═════════════════════════════════════════════════════════════════
  116.  
  117. If you use this mod, send me your favorite joke.
  118.  
  119. CALVIN 1@8262 TerraNET   1@18262 WWIVLink
  120.        1@4350 WWIVNet    1@8262  IceNET
  121.  
  122. Special thanks to JAFO who runs a fine network (TerraNET), writes great
  123. utilities, and whose mods I use as a template because I believe there's
  124. no finer.
  125.  
  126. Blarty-Toot BBS - More MSG per character for your BBS dollar
  127.