home *** CD-ROM | disk | FTP | other *** search
/ The Arcade BBS / arcadebbs.zip / arcadebbs / bbstools / MODS / EDIT09.ZIP / EDIT09.MOD next >
Encoding:
Text File  |  1995-07-05  |  7.7 KB  |  182 lines
  1. Apollo #1 @11138
  2. Fri Jun 30 01:14:36 1995
  3. ┌──────────────────────────────────────────────────────Filo─Header─(c)────┐
  4. │ Mod Name: Edit09.424    Mod Authors: Editor 149                         │
  5. │ Difficulty: ███▒▒▒▒▒▒▒(2.5/10)       @11138.WWIVNet                     │
  6. │ WWIV Version: v4.24                  @2939 TERRANet, IceNet, SierraLink │
  7. │ Date: 06/26/95                       @2938 CyberNet                     │
  8. │ Files Affected: BBSOVL1.C                                               │
  9. │ Description: Feedback Menu Shows ALL CoSysOps, Framed & Colored.        │
  10. └─────────────────────────────────────────────────────────────────────────┘
  11.  
  12. The FeedBack menu in WWIV only shows the SysOps & Co-SysOps whose user
  13. numbers are 10 or below.  I have CoSysOps with much higher user numbers than
  14. 10, so I started this Mod.  I colorized the FeedBack menu, added a frame
  15. like the rest of WWIV, and added Limited CoSysOps.  I also added the Users
  16. SysOp Note to the FeedBack Menu to describe the Title & Duties of each menu
  17. entry.
  18.  
  19. Copyright Disclaimer:
  20. (c) 1995 Editor a.k.a #149@Retreat of the Gods  (209) 537-2808
  21. This mod is written for use by REGISTERED WWIV SysOps, as they are the only
  22. ones who should have the source code.  SysOps may freely upload this mod to
  23. any BBS or online service provided it is not edited in any way except to
  24. remove messge headers and/or taglines.  Shareware CDROM vendors are prohibited
  25. from distributing this mod without EXPRESS WRITTEN CONSENT from the author &
  26. Wayne Bell, Author of WWIV BBS Software.
  27. Parts of the code shown in this mod are:
  28.                 Copyright (C) 1988-1993 by Wayne Bell.
  29.  
  30. LEGEND:
  31. = old code, Search for this
  32. + new code
  33. - Remove or comment out this line
  34.  
  35. BACKUP your Source
  36.  
  37. Load up: BBSOVL1.C
  38. Find: void feedback(int nuf)
  39. = int i,i1,nu;
  40. = char onek_str[20],ch;
  41. = userrec u;
  42. + char s[100], *ss;                   /* Edit09.424 */
  43. + int fb[100], i2;                    /* Edit09.424 */
  44. =
  45. = irt_name[0]=0;
  46. = grab_quotes(NULL, NULL);
  47. .
  48. .
  49. .
  50. = strcpy(irt,get_stringx(1,14));
  51. = nu=number_userrecs();
  52. = i1=0;
  53. + fb[0]=1;                            /* Edit09.424 */
  54. =
  55. -/*for (i=2; (i<10) && (i<nu); i++) {
  56. -   read_user(i,&u);
  57. -   if (((u.sl==255) || (syscfg.sl[u.sl].ability & ability_cosysop)) &&
  58. -      ((u.inact & inact_deleted)==0)) {
  59. -     i1++;
  60. -   }
  61. - }
  62. -
  63. - if (!i1) {
  64. -   i=1;
  65. - } else {
  66. -   onek_str[0]=0;                    Removed for Edit09.424 */
  67. =   i1=0;
  68. =   nl();
  69. +#ifndef FRAME                         /* Edit09.424 */
  70. +#define FRAME 7                       /* Edit09.424 */
  71. +#endif                                /* Edit09.424 */
  72. +   if(okansi())                      /* Edit09.424 */
  73. +     strcpy(onek_str, "╔╗╚╝═║╦╠╬╣╩");/* Edit09.424 */
  74. +   else                              /* Edit09.424 */
  75. +     strcpy(onek_str, get_string(983));
  76. +                                     /* Edit09.424 */
  77. +   npr("%d%c", FRAME, onek_str[0]); /* Edit09.424 */
  78. +   for(i=0; i<77; i++)               /* Edit09.424 */
  79. +     if(i==5 || i==28)               /* Edit09.424 */
  80. +       npr("%c", onek_str[6]);       /* Edit09.424 */
  81. +     else                            /* Edit09.424 */
  82. +       npr("%c", onek_str[4]);       /* Edit09.424 */
  83. +   npr("%c", onek_str[1]);           /* Edit09.424 */
  84. +   nl();                             /* Edit09.424 */
  85. +   read_user(1, &u);                 /* Edit09.424 */
  86. +   sprintf(s,"%d%c 2%3d %d%c 1%-20.20s %d%c 2%-46.46s %d%c",
  87. +       FRAME, onek_str[5], 1, FRAME, onek_str[5], nam(&u, 1), FRAME,
  88. +       onek_str[5], u.note, FRAME, onek_str[5] );
  89. +                                     /* Edit09.424 */
  90. +   npr("%s", s);                     /* Edit09.424 */
  91. +   nl();                             /* Edit09.424 */
  92. -/* for (i=1;((i<10) && (i<nu));i++) {
  93. -                                     Removed for Edit09.424 */
  94. +   for(i=2; i<=nu; i++) {            /* Edit09.424 */
  95. =     read_user(i,&u);
  96. -/*   if (((u.sl==255) || (syscfg.sl[u.sl].ability & ability_cosysop)) &&
  97. -        ((u.inact & inact_deleted)==0)) {
  98. -                                     Removed for Edit09.424 */
  99. +     if(((u.sl==255) ||
  100. +         (syscfg.sl[u.sl].ability & ability_limited_cosysop)) &&
  101. +         ((u.inact & inact_deleted)==0)) {
  102. +                                     /* Edit09.424 */
  103. +       i1++;                         /* Edit09.424 */
  104. +       fb[i1]=i;                     /* Edit09.424 */
  105. -/*     ansic(2); npr("%d",i);
  106. -       ansic(7); npr(")");
  107. -       ansic(1); npr(" %s",nam(&u,i));
  108. -                                     Removed for Edit09.424 */
  109. +       sprintf(s,                     /* Edit09.424 */
  110. +           "%d%c 2%3d %d%c 1%-20.20s %d%c 2%-46.46s %d%c",
  111. +           FRAME, onek_str[5], i, FRAME, onek_str[5], nam(&u, i), FRAME,
  112. +           onek_str[5], u.note, FRAME, onek_str[5]);
  113. +                                     /* Edit09.424 */
  114. +       npr("%s", s);                 /* Edit09.424 */
  115. =       nl();
  116. -/*     onek_str[i1++]='0'+i;         Removed for Edit09.424 */
  117. =     }
  118. +     if(inkey()==' ')                /* Edit09.424 */
  119. +       i=nu;                         /* Edit09.424 */
  120. =   }
  121. +   i2=i1;                            /* Edit09.424 */
  122. +   npr("%d%c", FRAME, onek_str[2]); /* Edit09.424 */
  123. +   for(i=0; i<77; i++)               /* Edit09.424 */
  124. +     if(i==5 || i==28)               /* Edit09.424 */
  125. +       npr("%c", onek_str[10]);      /* Edit09.424 */
  126. +     else                            /* Edit09.424 */
  127. +       npr("%c", onek_str[4]);       /* Edit09.424 */
  128. +   npr("%c", onek_str[3]);           /* Edit09.424 */
  129. +   nl();                             /* Edit09.424 */
  130. -/* onek_str[i1++]=*str_quit;
  131. -   onek_str[i1]=0;
  132. -   nl();
  133. -   ansic(1); npr("%s (%s): ",get_string(1003), onek_str);
  134. -                                     Removed for Edit09.424 */
  135. +   npr("1%s 5(3#0,3Q5)0: ", get_string(1003));
  136. +                                     /* Edit09.424 */
  137. +   mpl(3);                           /* Edit09.424 */
  138. -/* mpl(1);
  139. -   ch=onek(onek_str);                Removed for Edit09.424 */
  140. +   nu=1;                             /* Edit09.424 */
  141. +   do {                              /* Edit09.424 */
  142. +     input(ss,3);                    /* Edit09.424 */
  143. -/* if (ch==*str_quit)                Removed for Edit09.424 */
  144. +     if(ss[0]==str_quit[0]) {        /* Edit09.424 */
  145. +       nu=0;                         /* Edit09.424 */
  146. =     return;
  147. +     } else {                        /* Edit09.424 */
  148. +       i=atoi(ss);                   /* Edit09.424 */
  149. +       for(i1=0; i1<=i2; i1++)       /* Edit09.424 */
  150. +         if(fb[i1]==i) {             /* Edit09.424 */
  151. +           email(i, 0, 0, 0);        /* Edit09.424 */
  152. +           nu=0;                     /* Edit09.424 */
  153. +         }                           /* Edit09.424 */
  154. +       if(nu!=0) {                   /* Edit09.424 */
  155. +         npr("1%s 5(3#0,3Q5)0: ",
  156. +             get_string(1003));      /* Edit09.424 */
  157. +         mpl(3);                     /* Edit09.424 */
  158. +         nu=1;                       /* Edit09.424 */
  159. +       }                             /* Edit09.424 */
  160. +     }                               /* Edit09.424 */
  161. +   } while((nu>0) && !hangup);       /* Edit09.424 */
  162. =   nl();
  163. -/* i=ch-'0';
  164. - }
  165. - email(i, 0, 0, 0);                  Removed for Edit09.424 */
  166. =}
  167. =
  168. =/****************************************************************************/
  169.  
  170. Goto each SysOp/Co-SysOp/Limited-Co-SysOp account in Uedit, and make their
  171. SysOp's Note ('O' in Uedit) to what you want to see here.  Only the first
  172. 20 characters of the Name, and the first 46 characters of the Note will
  173. show in the menu.
  174.  
  175.  
  176. done.
  177.  
  178. Save, Recompile and run.
  179. As you can see, It's Not so Hard!
  180.  
  181. Editor
  182.