From: Jair Subject: Diety admiration shapeCompliments. Doesn't matter what follows is my submission at a working worship/god shapethat allows squad to draw togethera god to admiration at creation (I have available this exclusive by alignment andeven class, you may not yearn for to do this). Subsequent to this god is picked,introduce is a pray low that allows them to beg to their god, andqualities also who has the dreadfully god can to boot get the messages. Wheneveryou penalty something, it goes to your god significantly of 'Mota', orwhatever you've set that to. I to boot (instead) made to order the msetregulate (lone set mob etc...) so that you can set a handwriting godfrom appearing in the game. In spite of everything, this is not exclusive by alighment orclass (to allow for special RP situations). After that, the god you admirationshows up in your cut.A word of warning: I couldn't make a armed plot for thishaving the status of our mixture is made to order ample from unoriginal that the line come to passwould be way off, so where it's shroud as to where to stick themixture, I'll try and put resistance to the fore and one time the stick. NOTE: all the principally what that's in black and white isLope's colo(u)r mixture. If you have available it, rather. If you don't, lone wipe cleanall that stuff. The colour codes are faceas soon as.My remarks on the mixture should be sheltered in < >.In need supplementary ado:/* Jair's diety admiration shape, by implementing this mixture you are underno ought to to attribute for myself for doesn't matter what or notify me at all;even so, if you wish to leap me attribute, I'll be delighted */
in comm.c
group add(ch,"rom basics",Untrue); group add(ch,class table[ch->class].base group,Untrue); ch->pcdata->learned[gsn recall] = 50; write to buffer(d,"Do you wish to customize thischaracter?nr",0); write to buffer(d,"Customization takes time, but allows a widerscale of skills and abilities.nr",0); write to buffer(d,"Customize (Y/N)? ",0); d->connected = CON DEFAULT CHOICE; break; write to buffer(d,"The as soon as gods are available:nr ",0); for ( god = 0; god < MAX GOD; god++ ) { if ((god table[god].pc evil && ch->alignment == -750) (god table[god].pc neutral && ch->alignment == 0) (god table[god].pc good && ch->alignment == 750) ) { if((god table[god].pc mage && ch->class == 0) (god table[god].pc cleric && ch->class == 1) (god table[god].pc thief && ch->class == 2) (god table[god].pc warrior & write to buffer(d, ,1); } } } write to buffer(d,"nr",0); write to buffer(d,"Who do you yearn for to admiration (help for aboveinformation)? ",0); d->connected = CON GET GOD; break; instance CON GET GOD: one argument(mop the floor with,arg); if (!strcmp(arg,"help")) { mop the floor with = one argument(mop the floor with,arg); if (mop the floor with == ') do help(ch,"gods"); also do help(ch,mop the floor with); write to buffer(d,"Who do you yearn for to admiration (help forabove information)? ",0); break; } god = god lookup(mop the floor with); if ( god == 0 (!god table[god].pc evil && ch->alignment == -750) (!god table[god].pc neutral && ch->alignment == 0) (!god table[god].pc good && ch->alignment == 750) (!god table[god].pc mage && ch->class == 0) (!god table[god].pc cleric && ch->class == 1) (!god table[god].pc thief && ch->class == 2) (!god table[god].pc warrior & write to buffer(d,"The as soon as gods areavailable:nr",0); for ( god = 0; god < MAX GOD; god++ ) { if ((god table[god].pc evil && ch->alignment == -750) (god table[god].pc neutral && ch->alignment == 0) (god table[god].pc good && ch->alignment == 750) ) { if((god table[god].pc mage && ch->class == 0) (god table[god].pc cleric && ch->class == 1) (god table[god].pc thief && ch->class == 2) (god table[god].pc warrior & write to buffer(d, ,1); } } } write to buffer(d,"nr",0); write to buffer(d, "Who do you yearn for to admiration (help for above information)?",0); break; } ch->god = god; write to buffer(d,"nr",0); group add(ch,"rom basics",Untrue); group add(ch,class table[ch->class].base group,Untrue); ch->pcdata->learned[gsn recall] = 50; write to buffer(d,"Do you wish to customize thischaracter?nr",0); write to buffer(d,"Customization takes time, but allows a widerscale of skills and abilities.nr",0); write to buffer(d,"Customize (Y/N)? ",0); d->connected = CON DEFAULT CHOICE; break;< act( "n offers mself to g, who graciously declines.",> act( "n offers mself to Mota, who graciously declines.",< act( "g appreciates your present and may carry it highly developed.", ch, Unsound,Unsound, TO CHAR );> send to char( "Mota appreciates your present and may carry it highly developed.nr", ch );< act( "g gives you one silver coin for your penalty.",ch, Unsound, Unsound, TO CHAR );> send to char( "Mota gives you one silver coin for your penalty.nr", ch ); < sprintf(buf,"%s gives you %d silver money for your penalty.nr",< god table[ch->god].name,silver);> sprintf(buf,"Mota gives you %d silver money for your penalty.nr",> silver);< act( "n sacrifices p to g.", ch, obj, Unsound, TO ROOM );> act( "n sacrifices p to Mota.", ch, obj, Unsound, TO ROOM ); if (comm flags
in const.c
sprintf( buf, "You admiration %s nr",(god table[ch->god].name)); send to char( buf, ch);Ok, that should be it. The cause that I'm transfer this to the mailinglist is having the status of I looked series (instead considerably) for a shape like peas in a podthis to use on my mud and didn't find one. I know that lots of othercitizens have available coded something twin on their muds, I've played on ajoin, but I impersonation I'd hurl this up for everybody to use. If qualitiesdesires to put this on their web/ftp page of snippets, great!Now, I know that I don't have available a realy igloo snatch on a lot of the fabricthat I'm coding, does qualities suggestions/ideas/flames/etc?Jair