home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Devil's Doorknob BBS Capture (1996-2003)
/
devilsdoorknobbbscapture1996-2003.iso
/
Dloads
/
WWIVMODS
/
PRE412.ZIP
/
ROBOT.MOD
< prev
next >
Wrap
Text File
|
1990-08-29
|
5KB
|
265 lines
Gaiden #1 @6207
Fri Aug 24 07:31:55 1990
<=- ROBOT.MOD -=>
a mod for WWIV 4.11+
by
Gaiden #1@6207
Ok sports fans, this was a simple mod to do, but it was HELL to
program. What it does is, when the sysop hits Shift-F4, it looks just like
the sysop is typing to the user! You can make the 'robot sysop' say whatever
you want, just so it will make sense when they type in a reply. It will look
like this:
SysOp's here... (your name there)
Hey! What do you think you're doing? (It will look like the sysop is typing)
(Then it lets the user type whatever they want)
Hmmmmmm...... I'm sorry, but I just can't believe that! (typing speed)
Chat mode over..
Of course, that is in all the normal chat colors... Now on with the mod!
Step 1: <BBSUTL1.C>
a. At the end of the file, put this block of code.
void robot_sysop() /* ROBOT.MOD - begin */
{
char s[81];
nl();
nl();
prt(8,"Gaiden's here..."); /* Change to your name */
nl();
nl();
prt(1,"H");
delay(80);
prt(1,"e");
delay(83);
prt(1,"y");
delay(84);
prt(1,"!");
delay(80);
prt(1," ");
delay(86);
prt(1,"W");
delay(87);
prt(1,"h");
delay(81);
prt(1,"a");
delay(80);
prt(1,"t");
delay(83);
prt(1," ");
delay(60);
prt(1,"d");
delay(81);
prt(1,"o");
delay(60);
prt(1," ");
delay(87);
prt(1,"y");
delay(81);
prt(1,"o");
delay(81);
prt(1,"u");
delay(80);
prt(1," ");
delay(81);
prt(1,"t");
delay(80);
prt(1,"h");
delay(83);
prt(1,"i");
delay(86);
prt(1,"n");
delay(80);
prt(1,"k");
delay(86);
prt(1," ");
delay(87);
prt(1,"y");
delay(81);
prt(1,"o");
delay(80);
prt(1,"u");
delay(83);
prt(1,"'");
delay(60);
prt(1,"r");
delay(81);
prt(1,"e");
delay(60);
prt(1," ");
delay(87);
prt(1,"d");
delay(81);
prt(1,"o");
delay(81);
prt(1,"i");
delay(80);
prt(1,"n");
delay(80);
prt(1,"g");
delay(83);
prt(1,"?");
delay(86);
nl();
delay(100);
nl();
outstr("5"); /* Makes the user's input green */
inputl(s,80);
delay(600);
nl();
delay(85);
nl();
delay(60);
prt(1,"H");
delay(80);
prt(1,"m");
delay(83);
prt(1,"m");
delay(15);
prt(1,"m");
delay(15);
prt(1,"m");
delay(15);
prt(1,"m");
delay(15);
prt(1,"m");
delay(20);
prt(1,".");
delay(80);
prt(1,".");
delay(15);
prt(1,".");
delay(15);
prt(1,".");
delay(15);
prt(1,".");
delay(15);
prt(1,".");
delay(15);
prt(1,".");
delay(200);
prt(1," ");
delay(81);
prt(1,"S");
delay(80);
prt(1,"o");
delay(81);
prt(1,"r");
delay(80);
prt(1,"r");
delay(83);
prt(1,"y");
delay(86);
prt(1,",");
delay(80);
prt(1," ");
delay(86);
prt(1,"b");
delay(87);
prt(1,"u");
delay(81);
prt(1,"t");
delay(80);
prt(1," ");
delay(83);
prt(1,"I");
delay(60);
prt(1," ");
delay(81);
prt(1,"j");
delay(60);
prt(1,"u");
delay(87);
prt(1,"s");
delay(81);
prt(1,"t");
delay(81);
prt(1," ");
delay(80);
prt(1,"c");
delay(80);
prt(1,"a");
delay(83);
prt(1,"n");
delay(86);
prt(1,"'");
delay(80);
prt(1,"t");
delay(83);
prt(1," ");
delay(84);
prt(1,"b");
delay(80);
prt(1,"e");
delay(86);
prt(1,"l");
delay(87);
prt(1,"i");
delay(81);
prt(1,"e");
delay(80);
prt(1,"v");
delay(83);
prt(1,"e");
delay(60);
prt(1," ");
delay(81);
prt(1,"t");
delay(60);
prt(1,"h");
delay(87);
prt(1,"a");
delay(81);
prt(1,"t");
delay(81);
prt(1,"!");
nl();
delay(100);
nl();
prt(7,"Chat mode over..."); /* You must hit enter for it to finish */
} /* ROBOT.MOD - end */
b. All done with BBSUTL.C Compile to OBJ.
Step 2: <CONIO.C>
a. Search for void skey
b. Go down until you find case '88'
c. Put this before it.
case '87': /* Shift-F4 */ /* ROBOT.MOD - begin */
robot_sysop();
return; /* ROBOT.MOD - end */
d. Save and compile to OBJ.
-------------------------------------------------------------------------------
Now, link and you will have the all new BBS.EXE... It will really fool some of
your users! If you type faster or slower than how it shows up, you can change
the delays... I type fairly fast so 85 is about good for me.
-------------------------------------------------------------------------------
Disclaimer: Don't come crying to me if this mod messes up something important
to you... if you don't back up your source and your hard disk often
then you are a fool.
I will help anyone who has problems! Call my board:
The Funny Pages
Modified WWIV 4.11
602/497-1210
3/12/24/4800 baud 8-)
Bimodem
Autocallback Validation
Gaiden,
8/23/90