home *** CD-ROM | disk | FTP | other *** search
/ The Devil's Doorknob BBS Capture (1996-2003) / devilsdoorknobbbscapture1996-2003.iso / Dloads / WWIVMODS / MODS412.ZIP / SUBS412.MOD < prev    next >
Text File  |  1990-09-06  |  3KB  |  86 lines
  1. Spotnick #1 @5468
  2. Tue Sep 04 20:30:23 1990
  3.                   ╒═════════════════════════════════════╕
  4.                   │        *-[SUBS412.MOD]-*            │
  5.                   │        By Spotnick 1@5468           │
  6.                   │  SysOp of The Fortress of Shadow    │
  7.                   ╘═════════════════════════════════════╛
  8.  
  9. This is a new way to make color sublist for v4.12 with the Network Validation
  10. mod.This is my second mod,I don't know very much about C but I did it!...
  11. And it works fine here,I don't know if it works for v4.11 with CENSOR.MOD
  12. on.I did it with TC++ and all is working fine.
  13.  
  14.  
  15. STEP 1
  16. ══════════════════════════════════════════════════════════════════════════
  17. Change the Entire Function void sublist in BBS.C
  18. ══════════════════════════════════════════════════════════════════════════
  19.  
  20. void sublist()
  21. {
  22.   int ok,i,abort,a,b;
  23.   char s[80],s1[50];
  24.  
  25.   abort=0;
  26.   outchr(12);
  27.   nl();
  28.   pla("5 Num    2Sub. Type   1Sub Name. ",&abort);
  29.   pla("3______________________________________________________ ",&abort);nl();
  30.   i=0;
  31.   while ((i<32) && (usub[i].subnum!=-1)) {
  32.     if (strcmp(usub[cursub].keys,usub[i].keys))
  33.       strcpy(s1,"Yes");
  34.     else
  35.       strcpy(s1,"No");
  36.     strcpy(s,"3  5");
  37.     strcat(s,usub[i].keys);
  38.     s[8]=0;
  39.     if (s[7]==0)
  40.     s[8]=32;
  41.     if (i<=8)
  42.       strcat(s," ");
  43.     strcat(s," 3  ");
  44.     if (syscfg.systemnumber) {
  45.       if (subboards[usub[i].subnum].type) {
  46.         if (subboards[usub[i].subnum].anony & anony_val_net)
  47.       strcat(s,"3NetworkVal3 1"); /* This is for Network Validation Sub */
  48.       else
  49.       strcat(s,"7Network   3 1"); /* This is for Normal Network Sub */
  50.       } else
  51.       strcat(s,"2Local     3 1"); /* This if for Local Sub */
  52.     }
  53.     strcat(s,subboards[usub[i].subnum].name);
  54.     a=(71-(strlen(s)));
  55.     for (b=0; b<a; b++)
  56.       strcat(s," ");
  57.     strcat(s," 3");
  58.     if (strcmp(s1,"Yes"))
  59.       strcat(s,"");
  60.     pla(s,&abort);
  61.     i++;
  62.   }
  63.   pla("3_______________________________________________________ ",&abort);
  64.  
  65.   if (i==0)
  66.     pla("6None.",&abort);
  67.   nl();
  68. }
  69.  
  70. ════════════════════════════════════════════════════════════════════════════
  71. STEP 2
  72. ════════════════════════════════════════════════════════════════════════════
  73.  
  74.   Press F2 and F9! All is done! Take a break and enjoy it!
  75.  
  76.  
  77.  
  78.                           3-=[1Spotnick3]=-
  79.                            7SysOp 117@15468
  80.  
  81.  
  82.                          The Fortress of Shadow
  83.                              (514) 661-1416
  84.                             WWIVnet Node 5468
  85.                              Montreal,Canada
  86.