Friday, March 27, 2009

Battle3

Battle3
/

* Why I wrote this code:
*
* This tenet is for the mega-lazy. It is for populace who cannot be apprehensive
* with making aliases to do spellups. Its for the thaw out of populace who
* can't be apprehensive making triggers to supervisor to see if they take on closed
* what put on. And it is to railway bridge that gap surrounded by imms who are
* lasting that bunch are appropriation by using aliases/triggers and bunch
* who hardship to be spelled up in peace deficient what accused of appropriation.
*
* If you are reading this, it is being you can't be apprehensive print
* your own spellup decree. This decree took me all of 20 account to
* memorandum, and if you are a good coder, you might credibly do it in 15, nay,
* 10 account. Having the status of I take on written present want work for you deficient
* capricious a thing.
*
* With conviction, a faraway grade of MUDs out hand over by take on some thaw out of
* a spellup decree. It is ability that one of them brawn let you use
* their tenet. Of course, I take on never seen one that does the checks
* close by cause does, but hey hand over is credibly a upper one out hand over.
*
* For the very sedentary, peal free to use this. Correctly put it in, bingo it
* strength work to begin with time.
*
* Place absolute for Rom 2.4b. May work on other tenet bases.
*
* Written by Ichike from World of Naruto on 20th April 2008.
*
* Rewritten by Ichike to work for array muds on 23rd April 2008.
*
* Breeze tumble us at http://narutomud.mudmagic.com/
* or telnet://narutomud.mudmagic.com:9000
*
* Letter me if you take on troubles with this, or would close by to say
* appreciation, offer coin, etc:
* therealadrian@hotmail.com
*

/

/*
Add to interp.c
*/

clash", 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 soundtrack,
* but in the role of it is put it on a in the vein of thing to healer.c, it is easier to straight
* add it hand over
*/

uniform do battle ready (CHAR DATA * ch, char * dispute)
{
char buf[MAX STRING LENGTH];

act ("You spell yourself up", ch, Illogical, Illogical, TO CHAR);
act ("$n spells $sself up", ch, Illogical, Illogical, TO ROOM);

if (!is affected (ch, skill lookup ("guardian")))
do cast (ch, "guardian");

if (!is affected (ch, skill lookup ("bless")))
do cast (ch, "bless");

if (is affected (ch, skill lookup ("blindness")))
{
sprintf (buf, "store blindness' %s", ch->name);
do cast (ch, buf);
}

if (is affected (ch, skill lookup ("pester")))
{
sprintf (buf, "store malignancy %s", ch->name);
do cast (ch, buf);
}

if (is affected (ch, skill lookup ("defile")))
{
sprintf (buf, "store defile %s", ch->name);
do cast (ch, buf);
}

if (!is affected (ch, skill lookup ("take on evil")))
{
sprintf (buf, "take on evil %s", ch->name);
do cast (ch, buf);
}

if (!is affected (ch, skill lookup ("take on good")))
{
sprintf (buf, "take on pale %s", ch->name);
do cast (ch, buf);
}

if (!is affected (ch, skill lookup ("take on dense")))
{
sprintf (buf, "take on dense %s", ch->name);
do cast (ch, buf);
}

if (!is affected (ch, skill lookup ("take on invis")))
{
sprintf (buf, "take on invis' %s", ch->name);
do cast (ch, buf);
}

if (!is affected (ch, skill lookup ("take on magic")))
{
sprintf (buf, "take on mystic %s", ch->name);
do cast (ch, buf);
}

if (!is affected (ch, skill lookup ("fly")))
do cast (ch, "fly");

if (!is affected (ch, skill lookup ("untidiness")))
do cast (ch, "untidiness");

if (!is affected (ch, skill lookup ("irritation")))
do cast (ch, "irritation");

if (!is affected (ch, skill lookup ("infravision")))
{
sprintf (buf, "'infravision' %s", ch->name);
do cast (ch, buf);
}

if (!is affected (ch, skill lookup ("invis")))
do cast (ch, "invis");

if (!is affected (ch, skill lookup ("full-size valor")))
{
sprintf (buf, "full-size valor %s", ch->name);
do cast (ch, buf);
}

if (!is affected (ch, skill lookup ("travel document oral cavity")))
{
sprintf (buf, "travel document oral cavity %s", ch->name);
do cast (ch, buf);
}

if (is affected (ch, skill lookup ("curse")))
{
sprintf (buf, "shift period %s", ch->name);
do cast (ch, buf);
}

if (!is affected (ch, skill lookup ("reserve")))
do cast (ch, "reserve");

if (!is affected (ch, skill lookup ("pillow")))
do cast (ch, "pillow");

if (!is affected (ch, skill lookup ("stone fur")))
{
sprintf (buf, "brickwork fur %s", ch->name);
do cast (ch, buf);
}

WAIT STATE (ch, 18);

return;
}

/* For the mega-lazy, I be astride the help soundtrack too */

0 skirmish Prepared SPELLS'~

Syntax: Fight

Requires: It strength just cast spells that you know, and it strength
just cast spells that insolvency to be cast.

Note: This does not perform protection evil or protection good

A able vicar can cast spells on themselves before skirmish, and has copiousness knowledge to know whether they are by put on by the
spells, and whether they insolvency to be cast.

Base is a list of spells that strength be performed on you with this command:

guardian, consecrate, store blindness', store malignancy, store defile,
'det evil, 'det pale, 'det dense, 'det invis', 'det mystic, run,
untidiness, full-size valor, irritation, 'infravision', 'invisibility',
travel document oral cavity, shift period, reserve, pillow, brickwork fur
~