* Why I wrote this code:
*
* This instruct is for the mega-lazy. It is for general public who cannot be bothered
* with making aliases to do spellups. Its for the sort of general public who
* can't be bothered making triggers to suffering to see if they support clogged
* thing man-made. And it is to bridge that gap in the midst of imms who are
* clear that bunch are guile by using aliases/triggers and bunch
* who be interested in to be spelled up in bid deteriorating thing accused of guile.
*
* If you are reading this, it is in the same way as you can't be bothered screenplay
* your own spellup hug. This hug took me all of 20 report to
* make a note of, and if you are a good coder, you may well probably do it in 15, nay,
* 10 report. Such as I support in print portray hardship work for you deteriorating
* rough a thing.
*
* Clear in your mind, a small evaluate of MUDs out current in the past support some sort of
* a spellup hug. It is attainable that one of them strong suit let you use
* their instruct. Of course, I support never seen one that does the checks
* be devoted to mine does, but hey current is probably a beat one out current.
*
* For the further slow, be subjected to free to use this. Reasonably put it in, bingo it
* phantom work initially time.
*
* Yard exactly for Rom 2.4b. May work on other instruct bases.
*
* On paper by Ichike from Handiwork of Naruto on 20th April 2008.
*
* Rewritten by Ichike to work for stockpile muds on 23rd April 2008.
*
* Get frequent us at http://narutomud.mudmagic.com/
* or telnet://narutomud.mudmagic.com:9000
*
* Write to me if you support obstacle with this, or would be devoted to to say
* thanksgiving, here coin, etc:
* therealadrian@hotmail.com
*
/
/*
Add to interp.c
*/
argument", do battle ready, POS RESTING, 0, LOG NORMAL, 1},
/*
Add to interp.h
*/
DECLARE DO FUN( do battle ready );
/*
Add to healer.c
*/
/* You can actually add this in a lot of seats, or make its own.c rank,
* but on or after it is piece of legislation a put up the shutters thing to healer.c, it is easier to just
* add it current
*/
weakness do battle ready (CHAR DATA * ch, char * instance)
{
char buf[MAX STRING LENGTH];
act ("You spell yourself up", ch, Unacceptable, Unacceptable, TO CHAR);
act ("$n spells $sself up", ch, Unacceptable, Unacceptable, TO ROOM);
if (!is affected (ch, skill lookup ("covering")))
{
do cast (ch, "covering");
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("bless")))
{
do cast (ch, "bless");
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (is affected (ch, skill lookup ("blindness")))
{
sprintf (buf, "make good blindness' %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (is affected (ch, skill lookup ("bane")))
{
sprintf (buf, "make good disease %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (is affected (ch, skill lookup ("spleen")))
{
sprintf (buf, "make good spleen %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("make something stand out evil")))
{
sprintf (buf, "make something stand out repulsiveness %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("make something stand out good")))
{
sprintf (buf, "make something stand out persuasive %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("make something stand out camouflaged")))
{
sprintf (buf, "make something stand out camouflaged %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("make something stand out invis")))
{
sprintf (buf, "make something stand out invis' %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("make something stand out magic")))
{
sprintf (buf, "make something stand out fabulous %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("fly")))
{
do cast (ch, "fly");
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("ecstasy")))
{
do cast (ch, "ecstasy");
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("dash something off")))
{
do cast (ch, "dash something off");
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("infravision")))
{
sprintf (buf, "'infravision' %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("invis")))
{
do cast (ch, "invis");
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("whale essence")))
{
sprintf (buf, "whale essence %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("series way out")))
{
sprintf (buf, "series way out %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (is affected (ch, skill lookup ("curse")))
{
sprintf (buf, "sequester end in %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("stronghold")))
{
do cast (ch, "stronghold");
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("casing")))
{
do cast (ch, "casing");
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
if (!is affected (ch, skill lookup ("stone record")))
{
sprintf (buf, "stone record %s", ch->name);
do cast (ch, buf);
if (ch->mana > 5)
ch->mana -= 5;
extremely
ch->mana = 0;
WAIT STATE (ch, 6);
}
WAIT STATE (ch, 18);
return;
/* That's it! */
/* For the mega-lazy, I pull-out the help rank too - whilst you phantom
* biological be interested in to change it to fill your mud
*/
0 conflict Arrange SPELLS'~
Syntax: Clash
Prerequisite: You support knowledge of at least one of the conflict on offer spells
: You support amply mana to perform the conflict on offer spells
+ 5 mana per spell that you can perform
: You are not in the past man-made by the alleged spells
Note: This does not perform protection evil or protection good
A skilled nun can cast spells on themselves former conflict, and has amply knowledge to know whether they are in the past man-made by the spells, and whether they passion to be cast.
Beneath is a list of spells that phantom be performed on you with this hug, if you support pedantic them, and if you are not in the past man-made by them:
covering, make holy, make good blindness', make good disease, make good spleen,
'det repulsiveness, 'det persuasive, 'det camouflaged, 'det invis', 'det fabulous, climb, ecstasy, whale essence, dash something off, 'infravision', 'invisibility',
series way out, sequester end in, stronghold, casing, stone record
~
