home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
The Devil's Doorknob BBS Capture (1996-2003)
/
devilsdoorknobbbscapture1996-2003.iso
/
Dloads
/
WWIVMODS
/
MODSUNKN.ZIP
/
NUKE.DOC
< prev
next >
Wrap
Text File
|
1989-05-24
|
3KB
|
49 lines
/****************************************************************************/
/* Nuke dem bad users */
/* ON-LINE! */
/* By: Falcon */
/* Sysop - Heaven's Edge */
/* Thanks to Master of Servents fot getting me the 'CASE' for SHIFT-F9 */
/* */
/****************************************************************************/
/*==========================================================================*/
This mod will print out a nasty little picture then hangup and delete the
current user on-line. I have found that there have been some users who just
whish to be plain stupid and act like jerks on the system. Instead of
deleting them quietly, when they log on I press Shift-F9 and they get a nice
little picture and I get rid of a real jerk in a satisfying way.
This is real easy to install.
Copy the file 'Nuke.msg' to your gfiles dir.
Load up CONIO.C ans search for "void skey" and in skey search for case 103
right after case 103 and the mod
void skey /* Search */
case 103: /* Ctrl-F10 */ /* Search */
if (chatting==0)
chat1("",0);
else
chatting=0;
break;
case 92: /* Shift-F9 */ /* ADD */
nl(); /* ADD */
printfile("NUKE"); nl(); /* ADD */
prt(6,"YOU ARE NOW BEING DELETED!"); nl(); /* ADD */
prt(6,"HAVE FUN!"); nl(); /* ADD */
hangup=1; /* ADD */
dtr(0); /* ADD */
deluser(usernum); /* ADD */
checkhangup(); /* ADD */
sysoplog("#-#-# User was deleted on-line); /* ADD */
break; /* ADD */
case 93: /* Shift-F10 */
pr_wait(1);
savescreen(&screensave);
Now hit F9 and compile.
If some user acts like a jerk give him the BIRDY!
SHIFT-F9
/*=========================================================================*/