[Release]Ancient-Devil's-Quest!5165 source!

[killersub]

Originally Posted by coreymills

i'll work on the spawns and all if i have them done befor there released i'll release them

dat will b appreciated lol...and thanks for da help! XD

[coreymills]

Sorry it took so long but i've had other things to do but here are the spawns and a few fixes. i fixed up the npc's alittle more when u had the cert it still did not take it or anything
put this is NPCDialog.cs

Spoiler:

#region Ancient-Devils-Quest
                            case 9535:
                                {
                                    GC.AddSend(Packets.NPCSay("The Ancient Devil was sealed in this Island. The seal's power is very weak now."));
                                    GC.AddSend(Packets.NPCSay("The devil will awake soon. Can you help us?"));
                                    GC.AddSend(Packets.NPCLink("How can I help you?", 1));
                                    GC.AddSend(Packets.NPCLink("Just passing by.", 255));
                                    GC.AddSend(Packets.NPCSetFace(30));
                                    GC.AddSend(Packets.NPCFinish());
                                }
                                if (Control == 1)
                                {
                                    GC.AddSend(Packets.NPCSay("First, get 5 Amulers. Each amulet is protected by a Guard of different professions."));
                                    GC.AddSend(Packets.NPCSay(" Only if you are of the same profession, can you challenge the Guard. So you had better ask a friend for help."));
                                    GC.AddSend(Packets.NPCSay(" After you gather the 5 Amulets, click on the yellow marks on the ground to bring out the devil and its guards."));
                                    GC.AddSend(Packets.NPCSay(" Enable PK mode to kill them. Will you help us?"));
                                    GC.AddSend(Packets.NPCLink("Yes. I shall try.", 2));
                                    GC.AddSend(Packets.NPCLink("Let me think it over.", 255));
                                    GC.AddSend(Packets.NPCSetFace(30));
                                    GC.AddSend(Packets.NPCFinish());
                                }
                                if (Control == 2)
                                {
                                    GC.MyChar.Teleport(1082, 189, 233);
                                }
                                break;
                            #endregion
                            #region Trojan Guard
                            case 9536:
                                {
                                    GC.MyChar.ADJob = "Trojan";
                                    if (Control == 0 && GC.MyChar.Job >= 10 && GC.MyChar.Job <= 15)
                                    {
                                        GC.AddSend(Packets.NPCSay("To obtain the " + GC.MyChar.ADJob + " Amulet, you must enable PK mode to kill the " + GC.MyChar.ADJob + "Devil and give me the " + GC.MyChar.ADJob + " Cert. Are you ready?"));
                                        GC.AddSend(Packets.NPCLink("Yeah.", 1));
                                        GC.AddSend(Packets.NPCLink("i have the " + GC.MyChar.ADJob + " Cert", 2));
                                        GC.AddSend(Packets.NPCLink("Not yet.", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                if (Control == 1)
                                {
                                    if (GC.MyChar.Job >= 10 && GC.MyChar.Job <= 15)
                                    {
                                        GC.MyChar.Teleport(1082, 076, 175);
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("Sorry, only a " + GC.MyChar.ADJob + " can challenge this test."));
                                        GC.AddSend(Packets.NPCLink("I see.", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                if (Control == 2)
                                {
                                    if (GC.MyChar.InventoryContains(710017, 1))
                                    {
                                        GC.MyChar.RemoveItem(GC.MyChar.NextItem(710017));
                                        GC.MyChar.AddItem(710012);
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("Are you trying to make me look like a fool you dont have the" + GC.MyChar.ADJob + " Cert"));
                                        GC.AddSend(Packets.NPCLink("No Sorry", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                break;
                            #endregion
                            #region Fire Guard
                            case 9537:
                                {
                                    GC.MyChar.ADJob = "Fire";
                                    if (Control == 0 && GC.MyChar.Job >= 140 && GC.MyChar.Job <= 145)
                                    {
                                        GC.AddSend(Packets.NPCSay("To obtain the " + GC.MyChar.ADJob + " Amulet, you must enable PK mode to kill the " + GC.MyChar.ADJob + "Devil and give me the " + GC.MyChar.ADJob + " Cert. Are you ready?"));
                                        GC.AddSend(Packets.NPCLink("Yeah.", 1));
                                        GC.AddSend(Packets.NPCLink("I have the " + GC.MyChar.ADJob + " Cert", 2));
                                        GC.AddSend(Packets.NPCLink("Not yet.", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                if (Control == 1)
                                {
                                    if (GC.MyChar.Job >= 140 && GC.MyChar.Job <= 145)
                                    {
                                        GC.MyChar.Teleport(1082, 295, 168);
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("Sorry, only a " + GC.MyChar.ADJob + " can challenge this test."));
                                        GC.AddSend(Packets.NPCLink("I see.", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                if (Control == 2)
                                {
                                    if (GC.MyChar.InventoryContains(710018, 1))
                                    {
                                        GC.MyChar.RemoveItem(GC.MyChar.NextItem(710018));
                                        GC.MyChar.AddItem(710013);
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("Are you trying to make me look like a fool you dont have the" + GC.MyChar.ADJob + " Cert"));
                                        GC.AddSend(Packets.NPCLink("No Sorry", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                break;
                            #endregion
                            #region Water Guard
                            case 9538:
                                {
                                    GC.MyChar.ADJob = "Water";
                                    if (Control == 0 && GC.MyChar.Job >= 130 && GC.MyChar.Job <= 135)
                                    {
                                        GC.AddSend(Packets.NPCSay("To obtain the " + GC.MyChar.ADJob + " Amulet, you must enable PK mode to kill the " + GC.MyChar.ADJob + "Devil and give me the " + GC.MyChar.ADJob + " Cert. Are you ready?"));
                                        GC.AddSend(Packets.NPCLink("Yeah.", 1));
                                        GC.AddSend(Packets.NPCLink("I have the " + GC.MyChar.ADJob + " Cert", 2));
                                        GC.AddSend(Packets.NPCLink("Not yet.", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                if (Control == 1)
                                {
                                    if (GC.MyChar.Job >= 130 && GC.MyChar.Job <= 135)
                                    {
                                        GC.MyChar.Teleport(1082, 168, 295);
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("Sorry, only a " + GC.MyChar.ADJob + " can challenge this test."));
                                        GC.AddSend(Packets.NPCLink("I see.", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                if (Control == 2)
                                {
                                    if (GC.MyChar.InventoryContains(710019, 1))
                                    {
                                        GC.MyChar.RemoveItem(GC.MyChar.NextItem(710019));
                                        GC.MyChar.AddItem(710014);
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("Are you trying to make me look like a fool you dont have the" + GC.MyChar.ADJob + " Cert"));
                                        GC.AddSend(Packets.NPCLink("No Sorry", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                break;
                            #endregion
                            #region Archer Guard
                            case 9539:
                                {
                                    GC.MyChar.ADJob = "Archer";
                                    if (Control == 0 && GC.MyChar.Job >= 40 && GC.MyChar.Job <= 45)
                                    {
                                        GC.AddSend(Packets.NPCSay("Since you have passed the test and obtained the " + GC.MyChar.ADJob + " Cert., I will give you the " + GC.MyChar.ADJob + " Amulet."));
                                        GC.AddSend(Packets.NPCLink("Thanks.", 2));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("To obtain the " + GC.MyChar.ADJob + " Amulet, you must enable PK mode to kill the " + GC.MyChar.ADJob + "Devil and give me the " + GC.MyChar.ADJob + " Cert. Are you ready?"));
                                        GC.AddSend(Packets.NPCLink("Yeah.", 1));
                                        GC.AddSend(Packets.NPCLink("Not yet.", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                if (Control == 1)
                                {
                                    if (GC.MyChar.Job >= 40 && GC.MyChar.Job <= 45)
                                    {
                                        GC.MyChar.Teleport(1082, 323, 302);
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("Sorry, only a " + GC.MyChar.ADJob + " can challenge this test."));
                                        GC.AddSend(Packets.NPCLink("I see.", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                if (Control == 2)
                                {
                                    if (GC.MyChar.InventoryContains(710020, 1))
                                    {
                                        GC.MyChar.RemoveItem(GC.MyChar.NextItem(710020));
                                        GC.MyChar.AddItem(710015);
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("Are you trying to make me look like a fool you dont have the" + GC.MyChar.ADJob + " Cert"));
                                        GC.AddSend(Packets.NPCLink("No Sorry", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                break;
                            #endregion
                            #region Warrior Guard
                            case 9540:
                                {
                                    GC.MyChar.ADJob = "Warrior";
                                    if (Control == 0 && GC.MyChar.Job >= 20 && GC.MyChar.Job <= 25)
                                    {
                                        GC.AddSend(Packets.NPCSay("To obtain the " + GC.MyChar.ADJob + " Amulet, you must enable PK mode to kill the " + GC.MyChar.ADJob + "Devil and give me the " + GC.MyChar.ADJob + " Cert. Are you ready?"));
                                        GC.AddSend(Packets.NPCLink("Yeah.", 1));
                                        GC.AddSend(Packets.NPCLink("I have the Warrior cert", 2));
                                        GC.AddSend(Packets.NPCLink("Not yet.", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                if (Control == 1)
                                {
                                    if (GC.MyChar.Job >= 20 && GC.MyChar.Job <= 25)
                                    {
                                        GC.MyChar.Teleport(1082, 152, 086);
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("Sorry, only a " + GC.MyChar.ADJob + " can challenge this test."));
                                        GC.AddSend(Packets.NPCLink("I see.", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                if (Control == 2)
                                {
                                    if (GC.MyChar.InventoryContains(710016, 1))
                                    {
                                        GC.MyChar.RemoveItem(GC.MyChar.NextItem(710016));
                                        GC.MyChar.AddItem(710011);
                                    }
                                    else
                                    {
                                        GC.AddSend(Packets.NPCSay("Are you trying to make me look like a fool you dont have the Warrior Cert"));
                                        GC.AddSend(Packets.NPCLink("No Sorry", 255));
                                        GC.AddSend(Packets.NPCSetFace(30));
                                        GC.AddSend(Packets.NPCFinish());
                                    }
                                }
                                break;
                            #endregion

put this in MobInfos.txt

8417 TrojanDevil 1 205 70 9436 700 0 0 420 396 1 2 2 True 10 100 1000 200 12 False
8418 WarriorDevil 1 205 70 23588 700 0 0 650 700 1 2 2 True 10 100 1000 200 12 False
8419 WaterDevil 1 205 70 38550 65000 0 91 0 0 2 2 21 1001 3 True 12 100 1000 500 12 False
8888 FireDevil 1 205 70 38550 65000 0 182 0 0 2 2 21 1002 3 True 15 100 1000 500 12 False
8421 ArcherDevil 1 205 70 33964 700 0 0 470 500 1 2 2 True 10 100 1000 200 12 False

then in MobSpawns.txt put this

8417 3 1082 77 165 83 171
8888 4 1082 283 162 291 171
8419 4 1082 160 279 169 288
8421 4 1082 315 298 321 304
8418 4 1082 164 75 171 83

in Portals.txt add this

1082 099 171 1082 191 230
1082 272 176 1082 191 230
1082 182 281 1082 191 230
1082 308 283 1082 191 230
1082 170 099 1082 191 230

the mibs were dropping the wrong items goback to the mob drops and replace them with this

Spoiler:

#region Map Drops
                    if (Char != null)
                        if (MyMath.ChanceSuccess(50))
                            if (Name == "WarriorDevil")
                            {
                                DI2.Info.ID = 710016;
                                DI2.Info.MaxDur = DI2.Info.DBInfo.Durability;
                                DI2.Info.CurDur = DI2.Info.MaxDur;
                            }
                    #endregion
                    #region Map Drops
                    if (Char != null)
                        if (MyMath.ChanceSuccess(50))
                            if (Name == "TrojanDevil")
                            {
                                DI2.Info.ID = 710017;
                                DI2.Info.MaxDur = DI2.Info.DBInfo.Durability;
                                DI2.Info.CurDur = DI2.Info.MaxDur;
                            }
                    #endregion
                    #region Map Drops
                    if (Char != null)
                        if (MyMath.ChanceSuccess(50))
                            if (Name == "FireDevil")
                            {
                                DI2.Info.ID = 710018;
                                DI2.Info.MaxDur = DI2.Info.DBInfo.Durability;
                                DI2.Info.CurDur = DI2.Info.MaxDur;
                            }
                    #endregion
                    #region Map Drops
                    if (Char != null)
                        if (MyMath.ChanceSuccess(50))
                            if (Name == "WaterDevil")
                            {
                                DI2.Info.ID = 710019;
                                DI2.Info.MaxDur = DI2.Info.DBInfo.Durability;
                                DI2.Info.CurDur = DI2.Info.MaxDur;
                            }
                    #endregion
                    #region Map Drops
                    if (Char != null)
                        if (MyMath.ChanceSuccess(50))
                            if (Name == "ArcherDevil")
                            {
                                DI2.Info.ID = 710020;
                                DI2.Info.MaxDur = DI2.Info.DBInfo.Durability;
                                DI2.Info.CurDur = DI2.Info.MaxDur;
                            }
                    #endregion

i have the drops set at 50 for testing perposes u can set it to wat ever u want
sorry but i dont know how to make the AncientDevil Spawn

[Paralyzer[GM]]

Hey, what is it in NPCs.txt ?

[-NewDawn-]

Why are you using a second job title in character.cs?
Why not just use GC.MyChar.Job and have the guards check for it before they enter the specialized class zones? I really don't see a point in it.

If you really want to save time, why don't you make a statement at the top of NPCDialog.cs that reads the job number and then spits out the String of the job title? Then you could use it for all of the NPC Dialogs.

[awesome100able]

I don`t even think there is a 5165 Source yet that is working without Any bugs.

______________________

5165=Fail Unless its edited alot. Like my friends Source Maced5165 its a good one here is what it includes and, IF elitepvpers is lucky he might even release it.
He is releasing it on 5CoBotter 5cobotters.forumbuild.com <-- there

His source details:

Max + 15
Max +14 stone (It still will let u get the gear +15)
3 rebirth
About 3-4 bugs (I will fix them if i get the release o.o)
There is monk but there is bug once ur level 137 u will auto get level 200
Max level 200
Ninja (Finnaly he made it full working)
Terato dragon (But it dies in 1 hit he could not fix it...)
FrozenGrotto ( Wont let u get out unless u use tc scroll)
It could (PROBALY) be known as #1 most edited 5165 source...
toke him like 8 months to make it hes not that GOOD of a C# coder but he can pretty much code anything TAkes him some time....
More details:

Tower/Fan (Upgrade all the way to level 200)
Level 175 wepons and gears..
HE has his own client u will be lucky if u find it... he hasent uploaded it but yeaah..
There is one problem with the source though It only works on NON-HAMACHI hamachi
will not work for this and its hosted on NewestCOServer if u don not mind