home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / Dloads / SYSOP / MODS1.ZIP / CSR003B.MOD < prev    next >
Text File  |  1994-11-16  |  9KB  |  191 lines
  1. 9Caesar #1 @10342 7[1εmperor7]
  2. Sat Nov 12 08:23:59 1994
  3. 0R 34 11/15 16:44 WWIVnet 4241->8213
  4. 0R 34 11/14 06:13 WWIVnet 4001->4241
  5. 0R 34 11/13 08:35 WWIVnet 4000->4001
  6. 0R 34 11/13 21:34 WWIVnet ->4000
  7. 0R 34 11/13 10:05 WWIVnet 4001->4000
  8. 0R 34 11/12 14:25 WWIVnet 2001->4001
  9. 0R 34 11/13 05:47 WWIVnet ->2001
  10. 0R 34 11/12 15:19 WWIVnet ->12001
  11. 0R 34 11/12 08:26 WWIVnet ->10342
  12. 7─[1Msg Status9:7] 2Like....reply!
  13. 7──═══════════════════════════════════════════════════════════════════════════──
  14.  
  15. ┌────────────────────────────────────────────────────────────────────────────┐
  16. │ Mod Name: CSR003B.MOD           Mod Author: Caesar  Date: 08/20/94         │
  17. │ Difficulty: █▒▒▒▒▒▒ -  Fairly Easy, nothing too complex.                   │
  18. │ WWIV Version: v4.23                                                        │
  19. │ Files Modified: SYSOPF.C                                                   │
  20. │ Description: Modifies the way the Netlisting works.  Cosmetic Modification │
  21. │ Upgrade Note: Fixed Extra Line When Printing WITH Regions.                 │
  22. └────────────────────────────────────────────────────────────────────────────┘
  23. ╔════════════════════════════════════════════════════════════════════════════╗
  24. ║   This mod is copyright 1993, 1994 by Ray Van Dolson aka Caesar, and is    ║
  25. ║   freeware.  Permission is granted to distribute and post this mod on BBS  ║
  26. ║   systems and online services, provided no alterations are made (removal   ║
  27. ║   of message headers/taglines allowed).  This mod may contain some parts   ║
  28. ║   of WWIV source code, which is copyright 1988-1994 by Wayne Bell and      ║
  29. ║   licensed only to registered users of WWIV.  Use of WWIV source without   ║
  30. ║   registration constitutes a license violation and could lead to legal     ║
  31. ║   prosecution and certain doom.                                            ║
  32. ║                                                                            ║
  33. ║  Shareware distributors and CD-ROM publishers may not distribute this mod  ║
  34. ║without express written permission of the Author or WWIV Software Services. ║
  35. ╚════════════════════════════════════════════════════════════════════════════╝
  36.  
  37. Extended Description:
  38. This mod will modify the Net Listing function to display something like this:
  39.  
  40. 2Region0: 2Northern California
  41.  
  42. 7┌────────────────────────────────────────────────────────────────────────────┐
  43. 7│4 Node   Phone         BBS Name                                 Hop  Next Gr 7│
  44. 7├────────────────────────────────────────────────────────────────────────────┤
  45. 7│910023  916-343-1954  1:119/62 =    = 10301                      5 12001 10  7│
  46. 7│9103002^ 9916-891-0312                                             3 12001 10  7│
  47. 7│910301  916-343-1954  Outland                                    4 12001 10  7│
  48. 7│910302  916-342-9239  Nibbling the Ivories                       3 12001 10  7│
  49. 7│910303  916-891-3546  The Phantasm Brigade HQ                    4 12001 10  7│
  50. 7│910305  916-836-1548  Nowhere                                    3 12001 10  7│
  51. 7│910307  916-898-9469  Dead Cat Alley                             2 12001 10  7│
  52. 7│910308  916-899-2609  InsANIty BBS                               4 12001 10  7│
  53. 7│910310  916-644-1478  El Dorado Computer Group BBS               5 12001 10  7│
  54. 7│910311  916-788-9720  New Order BBS                              5 12001 10  7│
  55. 7│910330  916-222-8911  Maestro BBS [ASV]                          2 12001 10  7│
  56. 7│910331  916-243-5708  Das' Tube BBS!                             2 12001 10  7│
  57. 7│910332  916-222-0320  The Firehouse BBS                          3 12001 10  7│
  58. 7│910333  916-275-5708  The Electronic Maelstrom BBS               3 12001 10  7│
  59. 7│910340  916-788-0807  Thunderdome BBS                            5 12001 10  7│
  60. 7│910341  916-741-2156  The Beta Board                             5 12001 10  7│
  61. 7│910342  916-877-3266  Roman Matrix                               0 10342 10  7│
  62. 7│910343  916-223-3041  The Ground Zero BBS                        3 12001 10  7│
  63. 7└────────────────────────────────────────────────────────────────────────────┘
  64.  
  65. 1Systems Listed 0: 219
  66.  
  67. Upgrade Notes:
  68.  
  69. When Print With Regions was selected, the mod would print out an extra line of
  70. code- wasn't a real biggy, but didn't look very nice.  This release checks 
  71. only prints that line at the correct time.  Thanks to Scott Schroeder, 1@12040
  72. for pointing out the bug.
  73.  
  74. Legend:
  75. ───────
  76. +  : Add This Line
  77. !  : Change This Line
  78. =  : Existing Line (Search For This)
  79. -  : Remove this Line
  80.  
  81. ──═>Step 1<═───────────────────────────────────────────────────────────────────
  82.  
  83. Back up your source code!
  84.  
  85. ──═>Step 2<═───────────────────────────────────────────────────────────────────
  86. Load up SYSOPF.C in and make the following changes/additions/whatever:     
  87.  
  88. Search for this bit of code...
  89.  
  90. =void print_net_listing(unsigned int tp)
  91. ={
  92. !  int done=0, w, i, i1, gn=0, onxi, odci, abort, matched, f, useregion;
  93. /* Add the w  ^^^*/
  94. =  net_system_list_rec csne;
  95. =  unsigned short slist;
  96. =  unsigned char cmdbit=0, substr[81], onx[20], acstr[4], phstr[13], *mmk;
  97. =  unsigned char cmd, ch, s[161], s1[101], s2[101], s3[101], s4[101], bbstype;
  98. =  unsigned long l;
  99.  
  100.  
  101. ..down a bit further...
  102.  
  103. =    nl(); outstr(get_string(1300));
  104. =    useregion=yn(); 
  105. +       if (useregion) {
  106. +         w=0;
  107. +      } else {
  108. +       if (!useregion)
  109. +         w=1;
  110. +      }
  111. =    sprintf(s,"%sBBSDATA.NET",net_data);
  112. =    f=sh_open1(s,O_RDONLY | O_BINARY);
  113. =    if (f < 0) {
  114. =      npr("%s%s!",get_string(1301),s); nl();
  115.  
  116. ..even further along...
  117.  
  118. =      if (matched) {
  119. =        slist++;
  120. =        if ((!useregion) && (slist==1)) {
  121. +     npr("7┌%s┐\r\n",charstr(76,'─'));
  122. -         //pla(get_string(1777),&abort);
  123. /* WATCH FOR LINE WRAP! */
  124. +     npr("7│4 Node   Phone         BBS Name                                 Hop  Next Gr 7│\r\n");
  125. -         // pla(get_string(1303),&abort);
  126. +     npr("7├%s┤\r\n",charstr(76,'─'));
  127. -          //pla(get_string(1304),&abort);
  128. =        } else {
  129. =          if ((useregion) && (strncmp(s,csne.phone,3)!=0)) {
  130. =            strcpy(s,csne.phone);
  131. =            describe_area_code(atoi(csne.phone),s3);
  132. +       if (w==0) { 
  133. +       nl();
  134. +       w=w+1;
  135. +      } else {
  136. +       npr("7└%s┘\r\n",charstr(76,'─'));
  137. +       w=w+1; 
  138. +     }
  139. =            sprintf(s4,"\r\n%s%s\r\n",get_string(1305),s3);
  140. =            pla(s4,&abort);
  141. +       npr("7┌%s┐\r\n",charstr(76,'─'));
  142. -       //pla(get_string(1777),&abort);
  143. /* WATCH FOR LINE WRAP! */
  144. +     npr("7│4 Node   Phone         BBS Name                                 Hop  Next Gr 7│\r\n");
  145. +       npr("7├%s┤\r\n",charstr(76,'─'));
  146. =            //pla(get_string(1304),&abort);
  147. =          }
  148. =        }
  149. =        if (cmdbit!=NET_SEARCH_NOCONNECT)
  150. !     sprintf(s3,"7│9%5u2%c9 %12s  1%-41s 9%3d %5d %2d 7│",
  151. =              csne.sysnum,bbstype,csne.phone,csne.name,
  152. =              csne.numhops,csne.forsys,csne.group);
  153. =        else
  154. =          sprintf(s3,"7│9%5u2%c9 %12s  1%-41s9%s%2d 7│",
  155. =              csne.sysnum,bbstype,csne.phone,csne.name,get_string(1307),csne.group);
  156. =        pla(s3, &abort);
  157. =      }
  158. =    }
  159. =    f=sh_close(f);
  160. =    if ((!abort) && (slist)) {
  161. -     // nl();
  162. +       npr("7└%s┘\r\n",charstr(76,'─'));
  163. -       //pla(get_string(1775),&abort);
  164. +        nl();
  165. =      npr("%s%d\r\n",get_string(1306),slist);
  166. =    }
  167. =    pausescr();
  168. =  }
  169. =  if (tp)
  170. =    thisuser.sysstatus=l;
  171. =}
  172.  
  173. ──═>Step 3<═───────────────────────────────────────────────────────────────────
  174. Save SYSOPF.C, exit your editor, and type MAKE.  Start up your BBS, proceed to
  175. the main menu, type //NET, and try your new net list look out!  Then quit back
  176. to the main menu, hit 'E' and mail me.  It's not so much a mod than it is an
  177. attempt to spruce up WWIV a little bit.
  178.  
  179. ───────────────────────────────────────────────────────────────────────────────
  180.  
  181. If you *actually* have problems with this mod (heheheeh), please E-Mail me
  182. at any of the addresses below.  In fact, E-Mail me if you use this mod at all.
  183. Come to think of it...E-MAIL ME IF YOU EVEN SEE THIS MOD! *grin*
  184.  
  185.              FEARnet    1@9655                 IceNet    1@9655
  186.              CRYSTALnet 1@4001                 PlaNET    1@9653
  187.              NorCalNet  1@104                  FISHnet   1@9655
  188.              FURnet     1@3                    USAnet    1@9655
  189.              WWIVnet    1@10342                GLOBALnet 1@9600
  190.              NIFTYnet   1@9651
  191.