Evolution Dragon

[Darkness_PR]

Originally Posted by michaelgibson

In [props, look at the KP and Stage, when i shrink my pet and unshrink it, the KP goes to 0 and the Stage goes back to 1... but my pet's appearence doesnt go back.

well what shrink system you using atm, if ur using FS from Ronin you need to follow certain steps in order to work right, that the only thing i can think of right now

[mystic wind]

ide have to say kyle and sage are the greatest gms and evo dragons rule!

[soliddilos]

HI! i like ur script but how do i change it to when u double click it it AUTOMATICly hatches...1 day is to long for my players and i ....

[Shadow1980]

Originally Posted by KillerBeeZ

I say BRAVO for balancing this script, I'd love to see yours in action, I've been needing to remove the evo dragons from my shard because of the balance.

However, this is an issue I've been wondering about..

Say player A has 5 control slots and 3 are filled with the dragon, then he has 2 more pets taking up the rest, if the dragon evolves and suddenly takes 4 slots... what happens? Will the players pet slots be 6/5 ?

Yes. I have tried putting a "check" in to prevent evolution when a player doesn't have enough control slots free, and didn't work too well in the end. For some reason the script kept totally ignoring that part of my code and evolving anyways.
I aint too sure what to do about it or if I actually will do anything about it. Once a player stables one or more of his/her pets he/she will lose this advantage anyways.
If it becomes and issue and/or is exploited on our shard I will look at it again. *smiles*
Unless somebody can come up with a good way to check it?

[Shadow1980]

Originally Posted by soliddilos

HI! i like ur script but how do i change it to when u double click it it AUTOMATICly hatches...1 day is to long for my players and i ....

In DragonEgg.cs, THis should be as simple as changing this:

			AllowEvolution = false;

to:

			AllowEvolution = true;

This *should* work unless I am overlooking something. If it doesn't, simply remove all lines refering to evolution timers, or quickly script a new egg that literally only serves as an item to spawn evo dragons from.

Good luck.

[LindyLou]

Originally Posted by telekea

Has anyone found this bug; with Evolution Dragons deleting or disappearing without a trace?

Had a player with a level 6 dragon tonite fighting a champ spawn and the dragon just disappeared right in front of them. Had this happen two other times with level 1 dragons.

We have had 2 evo dragons over the past couple of months just vanish. The last one vanished right before her eyes. The dragon disappears and even disappears off the ball of summoning that had been linked to it.

The first dragon was at rikktor stage when it vanished and this 2nd dragon was almost there. What can be causing this problem and has anyone else had it happen? I'm really perplexed by it all. Now I have to recreate another evo for the sad owner of the missing one.

I notice that nobody responded to the original post of Telekea's. It's a wonderful script but this is an issue we don't have an answer for. Anyone?

[Erica]

Originally Posted by LindyLou

We have had 2 evo dragons over the past couple of months just vanish. The last one vanished right before her eyes. The dragon disappears and even disappears off the ball of summoning that had been linked to it.

The first dragon was at rikktor stage when it vanished and this 2nd dragon was almost there. What can be causing this problem and has anyone else had it happen? I'm really perplexed by it all. Now I have to recreate another evo for the sad owner of the missing one.

I notice that nobody responded to the original post of Telekea's. It's a wonderful script but this is an issue we don't have an answer for. Anyone?

wierd cause ive have evolution on my shard and this has never happen to me or players so im not sure why its causing yours to vanish . and evolution on my shard been there over a year now never had any issues .

[masternightmage]

for some reseon my players can not lore these evos to see stats where can this be set? i cant find anywhere and my gm said he can lore at 110, need to set to 100!!! help please!!

[Xplozive]

Use this i have make you can lore whit 100.. replace your animallor.cs with this.

using System;
using Server;
using Server.Gumps;
using Server.Mobiles;
using Server.Targeting;

namespace Server.SkillHandlers
{
public class AnimalLore
{
public static void Initialize()
{
SkillInfo.Table[(int)SkillName.AnimalLore].Callback = new SkillUseCallback( OnUse );
}

public static TimeSpan OnUse(Mobile m)
{
m.Target = new InternalTarget();

m.SendLocalizedMessage( 500328 ); // What animal should I look at?

return TimeSpan.FromSeconds( 1.0 );
}

private class InternalTarget : Target
{
public InternalTarget() : base( 8, false, TargetFlags.None )
{
}

protected override void OnTarget( Mobile from, object targeted )
{
if ( !from.Alive )
{
from.SendLocalizedMessage( 500331 ); // The spirits of the dead are not the province of animal lore.
}
else if ( targeted is BaseCreature )
{
BaseCreature c = (BaseCreature)targeted;

if ( !c.IsDeadPet )
{
if ( c.Body.IsAnimal || c.Body.IsMonster || c.Body.IsSea )
{
if ( (!c.Controled || !c.Tamable) && from.Skills[SkillName.AnimalLore].Base < 100.0 )
{
from.SendLocalizedMessage( 1049674 ); // At your skill level, you can only lore tamed creatures.
}
else if ( !c.Tamable && from.Skills[SkillName.AnimalLore].Base < 100.0 )
{
from.SendLocalizedMessage( 1049675 ); // At your skill level, you can only lore tamed or tameable creatures.
}
else if ( !from.CheckTargetSkill( SkillName.AnimalLore, c, 0.0, 100.0 ) )
{
from.SendLocalizedMessage( 500334 ); // You can't think of anything you know offhand.
}
else
{
from.CloseGump( typeof( AnimalLoreGump ) );
from.SendGump( new AnimalLoreGump( c ) );
}
}
else
{
from.SendLocalizedMessage( 500329 ); // That's not an animal!
}
}
else
{
from.SendLocalizedMessage( 500331 ); // The spirits of the dead are not the province of animal lore.
}
}
else
{
from.SendLocalizedMessage( 500329 ); // That's not an animal!
}
}
}
}

public class AnimalLoreGump : Gump
{
private static string FormatSkill( BaseCreature c, SkillName name )
{
Skill skill = c.Skills[name];

if ( skill.Base < 10.0 )
return "<div align=right>---</div>";

return String.Format( "<div align=right>{0:F1}</div>", skill.Base );
}

private static string FormatAttributes( int cur, int max )
{
if ( max == 0 )
return "<div align=right>---</div>";

return String.Format( "<div align=right>{0}/{1}</div>", cur, max );
}

private static string FormatStat( int val )
{
if ( val == 0 )
return "<div align=right>---</div>";

return String.Format( "<div align=right>{0}</div>", val );
}

private static string FormatElement( int val )
{
if ( val <= 0 )
return "<div align=right>---</div>";

return String.Format( "<div align=right>{0}%</div>", val );
}

private const int LabelColor = 0x24E5;

public AnimalLoreGump( BaseCreature c ) : base( 250, 50 )
{
AddPage( 0 );

AddImage( 100, 100, 2080 );
AddImage( 118, 137, 2081 );
AddImage( 118, 207, 2081 );
AddImage( 118, 277, 2081 );
AddImage( 118, 347, 2083 );

AddHtml( 147, 108, 210, 18, String.Format( "<center><i>{0}</i></center>", c.Name ), false, false );

AddButton( 240, 77, 2093, 2093, 2, GumpButtonType.Reply, 0 );

AddImage( 140, 138, 2091 );
AddImage( 140, 335, 2091 );

int pages = ( Core.AOS ? 5 : 3 );
int page = 0;


#region Attributes
AddPage( ++page );

AddImage( 128, 152, 2086 );
AddHtmlLocalized( 147, 150, 160, 18, 1049593, 200, false, false ); // Attributes

AddHtmlLocalized( 153, 168, 160, 18, 1049578, LabelColor, false, false ); // Hits
AddHtml( 280, 168, 75, 18, FormatAttributes( c.Hits, c.HitsMax ), false, false );

AddHtmlLocalized( 153, 186, 160, 18, 1049579, LabelColor, false, false ); // Stamina
AddHtml( 280, 186, 75, 18, FormatAttributes( c.Stam, c.StamMax ), false, false );

AddHtmlLocalized( 153, 204, 160, 18, 1049580, LabelColor, false, false ); // Mana
AddHtml( 280, 204, 75, 18, FormatAttributes( c.Mana, c.ManaMax ), false, false );

AddHtmlLocalized( 153, 222, 160, 18, 1028335, LabelColor, false, false ); // Strength
AddHtml( 320, 222, 35, 18, FormatStat( c.Str ), false, false );

AddHtmlLocalized( 153, 240, 160, 18, 3000113, LabelColor, false, false ); // Dexterity
AddHtml( 320, 240, 35, 18, FormatStat( c.Dex ), false, false );

AddHtmlLocalized( 153, 258, 160, 18, 3000112, LabelColor, false, false ); // Intelligence
AddHtml( 320, 258, 35, 18, FormatStat( c.Int ), false, false );

if ( Core.AOS )
{
AddImage( 128, 278, 2086 );
AddHtmlLocalized( 147, 276, 160, 18, 1049594, 200, false, false ); // Loyalty Rating

AddHtmlLocalized( 153, 294, 160, 18, (!c.Controled || c.Loyalty == PetLoyalty.None) ? 1061643 : 1049594 + (int)c.Loyalty, LabelColor, false, false );
}
else
{
AddImage( 128, 278, 2086 );
AddHtmlLocalized( 147, 276, 160, 18, 3001016, 200, false, false ); // Miscellaneous

AddHtmlLocalized( 153, 294, 160, 18, 1049581, LabelColor, false, false ); // Armor Rating
AddHtml( 320, 294, 35, 18, FormatStat( c.VirtualArmor ), false, false );
}

AddButton( 340, 358, 5601, 5605, 0, GumpButtonType.Page, page + 1 );
AddButton( 317, 358, 5603, 5607, 0, GumpButtonType.Page, pages );
#endregion

#region Resistances
if ( Core.AOS )
{
AddPage( ++page );

AddImage( 128, 152, 2086 );
AddHtmlLocalized( 147, 150, 160, 18, 1061645, 200, false, false ); // Resistances

AddHtmlLocalized( 153, 168, 160, 18, 1061646, LabelColor, false, false ); // Physical
AddHtml( 320, 168, 35, 18, FormatElement( c.PhysicalResistance ), false, false );

AddHtmlLocalized( 153, 186, 160, 18, 1061647, LabelColor, false, false ); // Fire
AddHtml( 320, 186, 35, 18, FormatElement( c.FireResistance ), false, false );

AddHtmlLocalized( 153, 204, 160, 18, 1061648, LabelColor, false, false ); // Cold
AddHtml( 320, 204, 35, 18, FormatElement( c.ColdResistance ), false, false );

AddHtmlLocalized( 153, 222, 160, 18, 1061649, LabelColor, false, false ); // Poison
AddHtml( 320, 222, 35, 18, FormatElement( c.PoisonResistance ), false, false );

AddHtmlLocalized( 153, 240, 160, 18, 1061650, LabelColor, false, false ); // Energy
AddHtml( 320, 240, 35, 18, FormatElement( c.EnergyResistance ), false, false );

AddButton( 340, 358, 5601, 5605, 0, GumpButtonType.Page, page + 1 );
AddButton( 317, 358, 5603, 5607, 0, GumpButtonType.Page, page - 1 );
}
#endregion

#region Damage
if ( Core.AOS )
{
AddPage( ++page );

AddImage( 128, 152, 2086 );
AddHtmlLocalized( 147, 150, 160, 18, 1017319, 200, false, false ); // Damage

AddHtmlLocalized( 153, 168, 160, 18, 1061646, LabelColor, false, false ); // Physical
AddHtml( 320, 168, 35, 18, FormatElement( c.PhysicalDamage ), false, false );

AddHtmlLocalized( 153, 186, 160, 18, 1061647, LabelColor, false, false ); // Fire
AddHtml( 320, 186, 35, 18, FormatElement( c.FireDamage ), false, false );

AddHtmlLocalized( 153, 204, 160, 18, 1061648, LabelColor, false, false ); // Cold
AddHtml( 320, 204, 35, 18, FormatElement( c.ColdDamage ), false, false );

AddHtmlLocalized( 153, 222, 160, 18, 1061649, LabelColor, false, false ); // Poison
AddHtml( 320, 222, 35, 18, FormatElement( c.PoisonDamage ), false, false );

AddHtmlLocalized( 153, 240, 160, 18, 1061650, LabelColor, false, false ); // Energy
AddHtml( 320, 240, 35, 18, FormatElement( c.EnergyDamage ), false, false );

AddButton( 340, 358, 5601, 5605, 0, GumpButtonType.Page, page + 1 );
AddButton( 317, 358, 5603, 5607, 0, GumpButtonType.Page, page - 1 );
}
#endregion

#region Skills
AddPage( ++page );

AddImage( 128, 152, 2086 );
AddHtmlLocalized( 147, 150, 160, 18, 3001030, 200, false, false ); // Combat Ratings

AddHtmlLocalized( 153, 168, 160, 18, 1044103, LabelColor, false, false ); // Wrestling
AddHtml( 320, 168, 35, 18, FormatSkill( c, SkillName.Wrestling ), false, false );

AddHtmlLocalized( 153, 186, 160, 18, 1044087, LabelColor, false, false ); // Tactics
AddHtml( 320, 186, 35, 18, FormatSkill( c, SkillName.Tactics ), false, false );

AddHtmlLocalized( 153, 204, 160, 18, 1044086, LabelColor, false, false ); // Magic Resistance
AddHtml( 320, 204, 35, 18, FormatSkill( c, SkillName.MagicResist ), false, false );

AddHtmlLocalized( 153, 222, 160, 18, 1044061, LabelColor, false, false ); // Anatomy
AddHtml( 320, 222, 35, 18, FormatSkill( c, SkillName.Anatomy ), false, false );

AddHtmlLocalized( 153, 240, 160, 18, 1044090, LabelColor, false, false ); // Poisoning
AddHtml( 320, 240, 35, 18, FormatSkill( c, SkillName.Poisoning ), false, false );

AddImage( 128, 260, 2086 );
AddHtmlLocalized( 147, 258, 160, 18, 3001032, 200, false, false ); // Lore & Knowledge

AddHtmlLocalized( 153, 276, 160, 18, 1044085, LabelColor, false, false ); // Magery
AddHtml( 320, 276, 35, 18, FormatSkill( c, SkillName.Magery ), false, false );

AddHtmlLocalized( 153, 294, 160, 18, 1044076, LabelColor, false, false ); // Evaluating Intelligence
AddHtml( 320, 294, 35, 18,FormatSkill( c, SkillName.EvalInt ), false, false );

AddHtmlLocalized( 153, 312, 160, 18, 1044106, LabelColor, false, false ); // Meditation
AddHtml( 320, 312, 35, 18, FormatSkill( c, SkillName.Meditation ), false, false );

AddButton( 340, 358, 5601, 5605, 0, GumpButtonType.Page, page + 1 );
AddButton( 317, 358, 5603, 5607, 0, GumpButtonType.Page, page - 1 );
#endregion

#region Misc
AddPage( ++page );

AddImage( 128, 152, 2086 );
AddHtmlLocalized( 147, 150, 160, 18, 1049563, 200, false, false ); // Preferred Foods

int foodPref = 3000340;

if ( (c.FavoriteFood & FoodType.FruitsAndVegies) != 0 )
foodPref = 1049565; // Fruits and Vegetables
else if ( (c.FavoriteFood & FoodType.GrainsAndHay) != 0 )
foodPref = 1049566; // Grains and Hay
else if ( (c.FavoriteFood & FoodType.Fish) != 0 )
foodPref = 1049568; // Fish
else if ( (c.FavoriteFood & FoodType.Meat) != 0 )
foodPref = 1049564; // Meat

AddHtmlLocalized( 153, 168, 160, 18, foodPref, LabelColor, false, false );

AddImage( 128, 188, 2086 );
AddHtmlLocalized( 147, 186, 160, 18, 1049569, 200, false, false ); // Pack Instincts

int packInstinct = 3000340;

if ( (c.PackInstinct & PackInstinct.Canine) != 0 )
packInstinct = 1049570; // Canine
else if ( (c.PackInstinct & PackInstinct.Ostard) != 0 )
packInstinct = 1049571; // Ostard
else if ( (c.PackInstinct & PackInstinct.Feline) != 0 )
packInstinct = 1049572; // Feline
else if ( (c.PackInstinct & PackInstinct.Arachnid) != 0 )
packInstinct = 1049573; // Arachnid
else if ( (c.PackInstinct & PackInstinct.Daemon) != 0 )
packInstinct = 1049574; // Daemon
else if ( (c.PackInstinct & PackInstinct.Bear) != 0 )
packInstinct = 1049575; // Bear
else if ( (c.PackInstinct & PackInstinct.Equine) != 0 )
packInstinct = 1049576; // Equine
else if ( (c.PackInstinct & PackInstinct.Bull) != 0 )
packInstinct = 1049577; // Bull

AddHtmlLocalized( 153, 204, 160, 18, packInstinct, LabelColor, false, false );

if ( !Core.AOS )
{
AddImage( 128, 224, 2086 );
AddHtmlLocalized( 147, 222, 160, 18, 1049594, 200, false, false ); // Loyalty Rating

AddHtmlLocalized( 153, 240, 160, 18, (!c.Controled || c.Loyalty == PetLoyalty.None) ? 1061643 : 1049594 + (int)c.Loyalty, LabelColor, false, false );
}

AddButton( 340, 358, 5601, 5605, 0, GumpButtonType.Page, 1 );
AddButton( 317, 358, 5603, 5607, 0, GumpButtonType.Page, page - 1 );
#endregion
}
}
}

[KillerBeeZ]

thank you for sharing your code, but please put the code brackets around it

like this

I loved this script man great work

[Ceksu]

How to get an egg other than mating:
You have to kill the Guardian Dragon.

player can also steal it..

[deinonst]

i was just wondering if any though about scripting armor for u evos. Just think it would be kool to see a evo running around in ful plate.

[Greystar]

Originally Posted by deinonst

i was just wondering if any though about scripting armor for u evos. Just think it would be kool to see a evo running around in ful plate.

#1 Dead post in Archives
#2 it wont show anyway since there is no graphics for it
#3 Necromancer
#4 This is old code I think for RC0 or even B36 (a modded version is in Xanthos' system
#5 Necroing posts Bad, suggest not doing it again
#6 Just felt like having 6 reasons even though 3 of them where the same thing.

[Twice]

Originally Posted by Greystar

#1 Dead post in Archives
#2 it wont show anyway since there is no graphics for it
#3 Necromancer
#4 This is old code I think for RC0 or even B36 (a modded version is in Xanthos' system
#5 Necroing posts Bad, suggest not doing it again
#6 Just felt like having 6 reasons even though 3 of them where the same thing.

#1 lol
#2 rofl
#3 haha
#4 lmao
#5 roflmao
#6 good point
#7 because i am gonna do it GS style and have a 7th reaon

-2x

[smeghead]

Thanks for this script
Im going to add it for a few players to test with soon.
I think i'll have to nerf them a little bit, i want a Hiryu to be able to kick ones butt right up UNTIL the last stage when it should be able to kill a Hiryu most times.
Bit worried about the vanishing dragons. I also dont like the mating aspect I'd like to remove that. I want it HARD to get eggs.

fingers crossed and thanks again

[Shadow1980]

smeghead this has been posted: 08-15-2004
I would suggest looking for a newer version ;-)

[Kenshin1591]

As long as this is necro'd anyways... what would you all suggest for training at a 3rd level?

[smeghead]

hey Shadow howsit going :-) LTNS

Im finding that the dragons arent levelling right, im bumping its KPs up and once it gets to 7750000 its go BOom - level 6 - boom level 7 instantly

Sorry to be a dummy but wheres the newer version?

Gimmie an ICQ sometime P

[Shadow1980]

Originally Posted by smeghead

hey Shadow howsit going :-) LTNS

Im finding that the dragons arent levelling right, im bumping its KPs up and once it gets to 7750000 its go BOom - level 6 - boom level 7 instantly

Sorry to be a dummy but wheres the newer version?

Gimmie an ICQ sometime P

Hey mate, I don't really use irc anymore, but you can usually find me in the Prophecies IRC channel (you'll find it through our website).

It's probably fairly easy to fix, have you had a look at the code?
I never looked at another version as I made our own back when our shard started, before xanthos released his version. You should be able to find a script that allows you to create evos when u search for xanthos threads though.

[Tarian31]

If you have evo drags OR mercs Or fighting cocks train by fighting vorpal bunnies will get alot faster gains then have them fight guardian drags when get a little tougher

[steefmon]

i get Error:+ Custom/Evolution Dragon/KPCommand.cs:
CS0246: line 24 : The type or namespace name 'commandeventargs'could not be found < Are you midding a using directive or an assembly reference?>
someone know what to do?

[Broadside]

Your trying to add it to 2.0 and its a 1.0 here is a link to some common fixes. 1.0->2.0RC1 Conversion miniFAQ

[rsbkeeper]

i was just interested in seeing if i could add a more powerfull dragon dust for event gifts and things i was wondering what i would have to do to get there i know i would need to change my evolutiondragon.cs script and i would also have to make a new dragon dust script but what lines in evolutiondragon.cs would i change and or add to make this so here is what i did and server wont take it. this is my evolutiondragon.cs script

    //////////////////////////////////
   //			           //
  //      Scripted by Raelis      //
 //		             	 //
//////////////////////////////////
using System;
using System.Collections; 
using Server.Mobiles;
using Server.Items;
using Server.Network; 
using Server.Targeting;
using Server.Gumps;

namespac