home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Devil's Doorknob BBS Capture (1996-2003)
/
devilsdoorknobbbscapture1996-2003.iso
/
Dloads
/
WWIVMODS
/
PRE412.ZIP
/
ELRIC2.MOD
< prev
next >
Wrap
Text File
|
1990-04-21
|
6KB
|
192 lines
Hello again. This is my whopping second attempt at a mod, with the third one
coming up soon....
I got really tired of people leaving their first name as their real name. I
want the whole thing, so I decided to do a little friendly persuasion.....
What it does is....
1. Ask them firmly but politely for their entire real name.
2. Give you a way to delete their real name, so .......
3. At logon, if they you have nuked thier name, they are forced to re-enter
their name, much like forcing them to re-enter their date of birth.
============================================================================
/** this step is indeed a form step, much like a form letter **/
1. From DOS, in your dir where you keep your source....
PKZIP SOURCE *.c *.h
If you already have a source zip file, then
PKZIP -f source *.c *.h
This way you have a copy of everything before you screw it up with a bad mod.
If you decide to take the mod out, it's as easy as
PKUNZIP -x source
and hit Y to overwrite any files you changed.
/** we now resume our regularly scheduled mod with step 2.... **/
Key
== existing line
++ add this line
-- subtract line
** change line
=============================================================================
Next, in NEWUSER.C
== void input_realname()
== {
== do {
== nl();
-- if (syscfg.sysconfig& sysconfig_no_alias)
-- pl("Enter the city and state you live in.");
-- else
-- {
** pl("Enter your ENTIRE REAL name.");
++ pl("Not just your first name, but the whole thing");
++ pl("(or at least as much as you can fit into 20 chars..)");
-- }
== outstr(":");
== inputl(thisuser.realname,20);
==
== if (thisuser.realname[0]==0) {
== nl();
-- if (syscfg.sysconfig & sysconfig_no_alias)
-- pl("Sorry, you must enter your city and state.");
-- else
++ pl("Sorry, you must enter your entire real name.");
== }
== } while ((thisuser.realname[0]==0) && (!hangup));
== }
==============================================================================
Next, load up SYSOPF.C
First, up in the var declarations, add ch2 to the list of chars.....
== void uedit(int usern, int other)
== {
** char s[81],s1[81],s2[81],ch,ch1,ch2;
== int i,i1,i2,i3,un,done,nu,done1,full,temp_full,tempu;
== userrec u;
Now, I changed things so I could Zap out their real name, and make them
re-enter it, since I probably don't know what it is. Then, every once in a
while, I can go through the list and nuke the real names of people who didn't
bother with their last name the first time......
There is a good reason why I chose to do it this way, because I also will be
sending out the new and improved FROM mod, and it adds zapping their city and
street and zip code......You could easily add on things like their computer
type or something by setting it to some unkown/invalid value (I think,
I haven't bothered to really look into it. The things you don't want to Zap
like this would be things like name/alias, password, and phone number...makes
it hard for them to get back on to change them........)
== case '~':
== u.ass_pts=0;
== write_user(un,&u);
== break;
== case ':':
/* (get rid of whatever was here, and make it match this) */
++ do {
++ nl();
++ pl("Zap info....");
++ pl("1. Realname");
++ pl("2. Birthday");
++ pl("Q. quit");
++ ch2=onek("Q12");
++ switch(ch2) {
++ case '1':u.realname[0]=0;
++ write_user(un,&u);
++ break;
++ case '2':u.year=0;
++ write_user(un,&u);
++ break;
++ }
++ }while ((!hangup) && (ch2!='Q'));
== }
== } while ((!done1) && (!hangup));
== } while ((!done) && (!hangup));
== close_user();
=============================================================================
Ok, now go to BBSUTL.C, and look down near the bottom of void logon
== pl("Please enter the following information:");
== do {
== nl();
== input_age(&thisuser);
== sprintf(s,"%02d/%02d/%02d",(int) thisuser.month,
== (int) thisuser.day,
== (int) thisuser.year);
== nl();
== prompt("Birthdate: ",s,". Correct? ","");
== if (!yn())
== thisuser.year=0;
== } while ((!hangup) && (thisuser.year==0));
== topscreen();
== nl();
== }
==
++ if (thisuser.realname[0]==0){
++ do {
++ nl();
++ pl("I seem to have lost part of your file.....");
++ input_realname();
++ nl();
++ pl("Did you get that entered correctly? (Y/N)");
++ if (!yn())
++ thisuser.realname[0]=0;
++ } while ((!hangup) && (thisuser.realname[0]==0));
++ pl("Thank you for getting that to me");
++ }
==
==
==
== rsm(usernum,&thisuser);
== if (thisuser.waiting) {
== prt(5,"Read your mail now? ");
== if (yn())
== readmail();
== }
Ok, now just compile it, and away you go.
/** hey, it's the form info file **/
As usual, I take no responsibility for hard drive crashes, death in the
family, or end of the world as we know it resulting from this mod.
It's your fault if you didn't back up the files before you made the mod.
It's your fault if you don't back up your ENTIRE hard drive AT LEAST once
a month.
It works on my system with Turbo C 2.0, WWIV 4.1, V20/8088, 640K/640EMS.
If you use this, the only payment I ask is that you send me a note through
WWIVLink to 1@18251 saying you are using it...not too much to ask is it?
The Kingdom of Melnibone(LINK/NET)
812-877-3488 24 Hrs a day
3/12/2400/4800/9600/12,000/14,400 baud HST MNP5
Auto-validation of WWIV sysops on first call
Xmodem, Ymodem, DSZ Zmodem with retry, Ymodem-G
WWIV Link 1@18251
WWIV Net 1@8251