home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Devil's Doorknob BBS Capture (1996-2003)
/
devilsdoorknobbbscapture1996-2003.iso
/
Dloads
/
SYSOP
/
MODS1.ZIP
/
EDIT09.MOD
< prev
next >
Wrap
Text File
|
1995-07-03
|
8KB
|
182 lines
Apollo #1 @11138
Fri Jun 30 01:25:14 1995
┌──────────────────────────────────────────────────────Filo─Header─(c)────┐
│ Mod Name: Edit09.424 Mod Authors: Editor 149 │
│ Difficulty: ███▒▒▒▒▒▒▒(2.5/10) @11138.WWIVNet │
│ WWIV Version: v4.24 @2939 TERRANet, IceNet, SierraLink │
│ Date: 06/26/95 @2938 CyberNet │
│ Files Affected: BBSOVL1.C │
│ Description: Feedback Menu Shows ALL CoSysOps, Framed & Colored. │
└─────────────────────────────────────────────────────────────────────────┘
The FeedBack menu in WWIV only shows the SysOps & Co-SysOps whose user
numbers are 10 or below. I have CoSysOps with much higher user numbers than
10, so I started this Mod. I colorized the FeedBack menu, added a frame
like the rest of WWIV, and added Limited CoSysOps. I also added the Users
SysOp Note to the FeedBack Menu to describe the Title & Duties of each menu
entry.
Copyright Disclaimer:
(c) 1995 Editor a.k.a #149@Retreat of the Gods (209) 537-2808
This mod is written for use by REGISTERED WWIV SysOps, as they are the only
ones who should have the source code. SysOps may freely upload this mod to
any BBS or online service provided it is not edited in any way except to
remove messge headers and/or taglines. Shareware CDROM vendors are prohibited
from distributing this mod without EXPRESS WRITTEN CONSENT from the author &
Wayne Bell, Author of WWIV BBS Software.
Parts of the code shown in this mod are:
Copyright (C) 1988-1993 by Wayne Bell.
LEGEND:
= old code, Search for this
+ new code
- Remove or comment out this line
BACKUP your Source
Load up: BBSOVL1.C
Find: void feedback(int nuf)
= int i,i1,nu;
= char onek_str[20],ch;
= userrec u;
+ char s[100], *ss; /* Edit09.424 */
+ int fb[100], i2; /* Edit09.424 */
=
= irt_name[0]=0;
= grab_quotes(NULL, NULL);
.
.
.
= strcpy(irt,get_stringx(1,14));
= nu=number_userrecs();
= i1=0;
+ fb[0]=1; /* Edit09.424 */
=
-/*for (i=2; (i<10) && (i<nu); i++) {
- read_user(i,&u);
- if (((u.sl==255) || (syscfg.sl[u.sl].ability & ability_cosysop)) &&
- ((u.inact & inact_deleted)==0)) {
- i1++;
- }
- }
-
- if (!i1) {
- i=1;
- } else {
- onek_str[0]=0; Removed for Edit09.424 */
= i1=0;
= nl();
+#ifndef FRAME /* Edit09.424 */
+#define FRAME 7 /* Edit09.424 */
+#endif /* Edit09.424 */
+ if(okansi()) /* Edit09.424 */
+ strcpy(onek_str, "╔╗╚╝═║╦╠╬╣╩");/* Edit09.424 */
+ else /* Edit09.424 */
+ strcpy(onek_str, get_string(983));
+ /* Edit09.424 */
+ npr("%d%c", FRAME, onek_str[0]); /* Edit09.424 */
+ for(i=0; i<77; i++) /* Edit09.424 */
+ if(i==5 || i==28) /* Edit09.424 */
+ npr("%c", onek_str[6]); /* Edit09.424 */
+ else /* Edit09.424 */
+ npr("%c", onek_str[4]); /* Edit09.424 */
+ npr("%c", onek_str[1]); /* Edit09.424 */
+ nl(); /* Edit09.424 */
+ read_user(1, &u); /* Edit09.424 */
+ sprintf(s,"%d%c 2%3d %d%c 1%-20.20s %d%c 2%-46.46s %d%c",
+ FRAME, onek_str[5], 1, FRAME, onek_str[5], nam(&u, 1), FRAME,
+ onek_str[5], u.note, FRAME, onek_str[5] );
+ /* Edit09.424 */
+ npr("%s", s); /* Edit09.424 */
+ nl(); /* Edit09.424 */
-/* for (i=1;((i<10) && (i<nu));i++) {
- Removed for Edit09.424 */
+ for(i=2; i<=nu; i++) { /* Edit09.424 */
= read_user(i,&u);
-/* if (((u.sl==255) || (syscfg.sl[u.sl].ability & ability_cosysop)) &&
- ((u.inact & inact_deleted)==0)) {
- Removed for Edit09.424 */
+ if(((u.sl==255) ||
+ (syscfg.sl[u.sl].ability & ability_limited_cosysop)) &&
+ ((u.inact & inact_deleted)==0)) {
+ /* Edit09.424 */
+ i1++; /* Edit09.424 */
+ fb[i1]=i; /* Edit09.424 */
-/* ansic(2); npr("%d",i);
- ansic(7); npr(")");
- ansic(1); npr(" %s",nam(&u,i));
- Removed for Edit09.424 */
+ sprintf(s, /* Edit09.424 */
+ "%d%c 2%3d %d%c 1%-20.20s %d%c 2%-46.46s %d%c",
+ FRAME, onek_str[5], i, FRAME, onek_str[5], nam(&u, i), FRAME,
+ onek_str[5], u.note, FRAME, onek_str[5]);
+ /* Edit09.424 */
+ npr("%s", s); /* Edit09.424 */
= nl();
-/* onek_str[i1++]='0'+i; Removed for Edit09.424 */
= }
+ if(inkey()==' ') /* Edit09.424 */
+ i=nu; /* Edit09.424 */
= }
+ i2=i1; /* Edit09.424 */
+ npr("%d%c", FRAME, onek_str[2]); /* Edit09.424 */
+ for(i=0; i<77; i++) /* Edit09.424 */
+ if(i==5 || i==28) /* Edit09.424 */
+ npr("%c", onek_str[10]); /* Edit09.424 */
+ else /* Edit09.424 */
+ npr("%c", onek_str[4]); /* Edit09.424 */
+ npr("%c", onek_str[3]); /* Edit09.424 */
+ nl(); /* Edit09.424 */
-/* onek_str[i1++]=*str_quit;
- onek_str[i1]=0;
- nl();
- ansic(1); npr("%s (%s): ",get_string(1003), onek_str);
- Removed for Edit09.424 */
+ npr("1%s 5(3#0,3Q5)0: ", get_string(1003));
+ /* Edit09.424 */
+ mpl(3); /* Edit09.424 */
-/* mpl(1);
- ch=onek(onek_str); Removed for Edit09.424 */
+ nu=1; /* Edit09.424 */
+ do { /* Edit09.424 */
+ input(ss,3); /* Edit09.424 */
-/* if (ch==*str_quit) Removed for Edit09.424 */
+ if(ss[0]==str_quit[0]) { /* Edit09.424 */
+ nu=0; /* Edit09.424 */
= return;
+ } else { /* Edit09.424 */
+ i=atoi(ss); /* Edit09.424 */
+ for(i1=0; i1<=i2; i1++) /* Edit09.424 */
+ if(fb[i1]==i) { /* Edit09.424 */
+ email(i, 0, 0, 0); /* Edit09.424 */
+ nu=0; /* Edit09.424 */
+ } /* Edit09.424 */
+ if(nu!=0) { /* Edit09.424 */
+ npr("1%s 5(3#0,3Q5)0: ",
+ get_string(1003)); /* Edit09.424 */
+ mpl(3); /* Edit09.424 */
+ nu=1; /* Edit09.424 */
+ } /* Edit09.424 */
+ } /* Edit09.424 */
+ } while((nu>0) && !hangup); /* Edit09.424 */
= nl();
-/* i=ch-'0';
- }
- email(i, 0, 0, 0); Removed for Edit09.424 */
=}
=
=/****************************************************************************/
Goto each SysOp/Co-SysOp/Limited-Co-SysOp account in Uedit, and make their
SysOp's Note ('O' in Uedit) to what you want to see here. Only the first
20 characters of the Name, and the first 46 characters of the Note will
show in the menu.
done.
Save, Recompile and run.
As you can see, It's Not so Hard!
Editor