منتدي اكواد

منتدي اكواد (https://code.vpscairo.com/index.php)
-   تطوير سيرفرات كونكر (https://code.vpscairo.com/forumdisplay.php?f=11)
-   -   كوسته بفكره جديده Monster event (https://code.vpscairo.com/showthread.php?t=4884)

karem010 2020-05-12 05:11 AM

كوسته بفكره جديده Monster event
 
بسم الله الرحمن الرحيم


كوسته بفكره جديده لقيتها موجوده برضو
الكوسته عباره عن حرب بتبدا والكل بيدخل وبعد ما بتخلص وتاخد الجايزه بتاخد معاها بيضه تطلع بيها وحش من مهمه تديك سبس يرضو


ندخل ع الشرح

بتوع الحرب البتدي ايتم الوحشnpc

كود بلغة HTML:

#region Dead Hearts Group War
                #region Dead Hearts Group WarWar
                case 231400:
                    {
                        switch (npcRequest.OptionID)
                        {
                            case 0:
                                {
                                    dialog.Text("Hey There  " + client.Entity.Name + " Would You Like To Join The Dead Hearts Group WarWar...?");
                                    dialog.Option("Yes Please", 1);
                                    dialog.Option("I don't care.", 255);
                                    dialog.Send();
                                    break;
                                }
                            case 1:
                                {
                                    var Now64 = DateTime.Now;
                                    if (DateTime.Now.Hour >= 17 && DateTime.Now.Hour <= 18)
                                    {
                                        client.Entity.RemoveFlag(Update.Flags.Ride);
                                        client.Entity.Teleport(01019, 96, 113);
                                        client.Entity.PKMode = Game.Enums.PKMode.PK;
                                        client.Send(new Data(true) { UID = client.Entity.UID, ID = Data.ChangePKMode, dwParam = (uint)client.Entity.PKMode });

                                    }
                                    else
                                    {
                                        dialog.Text("Dead Hearts Group War War is Held Between xx:1 Every Hour .. End At xx:5 ");
                                        dialog.Option("I Don't Care.", 255);
                                        dialog.Send();
                                        break;
                                    }
                                    break;
                                }
                        }
                        break;
                    }
                #endregion

npc Winner
كود بلغة HTML:

                #region Winner of Dead Hearts Group War NPC 2315009
                case 2315009:
                    {
                        switch (npcRequest.OptionID)
                        {
                            case 0:
                                {
                                    dialog.Text("Hey There  " + client.Entity.Name + "  Would You Like To Claim Your Prize ...?");
                                    dialog.Option("Yes Please", 1);
                                    dialog.Option("I Don't Care.", 255);
                                    dialog.Send();
                                    break;
                                }
                            case 1:
                                {
                                    Daily.CheackAlive();
                                    int alive = 0;
                                    DateTime Now64 = DateTime.Now;
                                    foreach (Client.GameState Entitys in Kernel.GamePool.Values)
                                        if (Entitys.Entity.MapID == 01019 && (!Entitys.Entity.Dead))
                                            alive++;
                                    if (DateTime.Now.Hour >= 18)
                                    {
                                        if (alive == 1)
                                        {
                                            //#warning Dead Hearts Group War PRIZE

                                            if (client.Entity.VIPLevel != 6)
                                            {
                                                client.Entity.ConquerPoints += rates.Daily;
                                                client.Entity.Status3 = 1;
                                                HemaProject.Kernel.SendWorldMessage(new Message("Congratulations! " + client.Entity.Name + " Claimed The Prize [20.000.000] CPs ConquerPoints!, As He Won Dead Hearts Group War", System.Drawing.Color.Black, Message.Center), Program.Values);
                                            }
                                            else
                                            {
                                                client.Entity.ConquerPoints += rates.Daily * 2;
                                                client.Entity.Status3 = 1;
                                                HemaProject.Kernel.SendWorldMessage(new Message("Congratulations! " + client.Entity.Name + " claimed the prize [20.000.000] CPs ConquerPoints! as he is VIP, He won Dead Hearts Group War", System.Drawing.Color.Black, Message.Center), Program.Values);
                                            }
                                            client.Entity.AddFlag(Update.Flags.WeeklyPKChampion);
                                            client.Entity.SendSpawn(client, true);
                                            client.Entity.AddTopStatus((ulong)Update.Flags3.ConuqerSuperYellow, 3, DateTime.Now.AddDays(1));
                                            client.Inventory.Add(5542004, 0, 1);
                                            client.Entity.Teleport(1002, 302, 278);
                                            EntityTable.SaveEntity(client);
                                            foreach (var clients in Program.Values)
                                            {
                                                if (clients.Entity.MapID == 01019)
                                                {
                                                    clients.Entity.Teleport(1002, 300, 278);
                                                    clients.Send(new NpcReply(NpcReply.MessageBox, "Sorry Entity God Luck Next Time ;) "));
                                                }
                                            }
                                        }
                                        else
                                        {
                                            dialog.Text("There are still " + Daily.howmanyinmap + " players in the map kill it first to claim prize!");
                                            dialog.Option("okay", 255);
                                            dialog.Send();
                                            break;
                                        }
                                    }
                                    else
                                    {
                                        dialog.Text("Hey There " + client.Entity.Name + "You Can Only Claim The Prize When The Time On Or After xx:5 Or ");
                                        dialog.Option("Okay", 255);
                                        dialog.Send();
                                        break;
                                    }
                                    break;
                                }
                        }
                        break;
                    }
                #endregion
                #endregion

كود:

لو واجهك ارر كمل للاخر وهيمشي
npc البيدخلك للوحش
كود بلغة HTML:

#region Dead Hearts
                case 159753:
                    {
                        switch (npcRequest.OptionID)
                        {
                            case 0:
                                {
                                    dialog.Text("Hey There  " + client.Entity.Name + " Do you here to do dally monster event ?");
                                    dialog.Option("Yes", 1);
                                    dialog.Option("I don't have item.", 255);
                                    dialog.Send();
                                    break;
                                }
                            case 1:
                                {

                                    if (client.Inventory.Contains(5542004, 1))
                                    {
                                        client.Entity.RemoveFlag(Update.Flags.Ride);
                                        client.Entity.Teleport(11019, 96, 113);
                                        client.Entity.PKMode = Game.Enums.PKMode.PK;
                                        client.Send(new Data(true) { UID = client.Entity.UID, ID = Data.ChangePKMode, dwParam = (uint)client.Entity.PKMode });

                                    }
                                    else
                                    {
                                        dialog.Text("You dont have monster Egg");
                                        dialog.Option("oh! i will return soon.", 255);
                                        dialog.Send();
                                        break;
                                    }
                                    break;
                                }
                        }
                        break;
                    }
                #endregion

npc بيطلع الوحش
كود بلغة HTML:

#region Dead Hearts g
                case 1597534:
                    {
                        switch (npcRequest.OptionID)
                        {
                            case 0:
                                {

                                    if (client.Inventory.Contains(5542004, 1))
                                    {
                                        dialog.Text("HI" + client.Entity.Name + " ANA A3RF ATLA3 EL WA7SH PTA3K 7A OLT EA7?");
                                        dialog.Option("TAL3 YA 3AM", 1);
                                        dialog.Option("msh a4ta.", 255);
                                        dialog.Send();
                                        break;
                                    }
                                    else
                                    {
                                        dialog.Text("EMSHE MEN HENA YALA");
                                        dialog.Option("Ok.", 255);
                                        dialog.Send();
                                        break;
                                    }
                                    break;
                                }
                            case 1:
                                {
                                   
                                    #region MohamedHossam
                                   
                                    {
                                        ushort x = 0, y = 0;
                                        ushort MapID = 11019;
                                        y = 113;
                                        x = 96;
                                        if (Database.DMaps.LoadMap(MapID))
                                        {
                                            if (Program.MohamedHossam)
                                            {
                                                if (Kernel.Maps.ContainsKey(MapID))
                                                {
                                                    var Map = Kernel.Maps[MapID];
                                                    if (Database.MonsterInformation.MonsterInformations.ContainsKey(417101))
                                                    {
                                                        Database.MonsterInformation mt = Database.MonsterInformation.MonsterInformations[417101];
                                                        mt.BoundX = x;
                                                        Program.MohamedHossam = false;
                                                        mt.BoundY = y;
                                                        Entity entity = new Entity(EntityFlag.Monster, false);
                                                        entity.MapObjType = MapObjectType.Monster;
                                                        entity.MonsterInfo = mt.Copy();
                                                        entity.MonsterInfo.Owner = entity;
                                                        entity.Name = mt.Name;
                                                        entity.MinAttack = mt.MinAttack;
                                                        entity.MaxAttack = entity.MagicAttack = mt.MaxAttack;
                                                        entity.Hitpoints = entity.MaxHitpoints = mt.Hitpoints;
                                                        entity.Defence = mt.Defence;
                                                        entity.Body = mt.Mesh;
                                                        entity.Level = mt.Level;
                                                        entity.UID = Map.EntityUIDCounter.Next;
                                                        entity.MapID = MapID;
                                                        entity.X = x;
                                                        entity.Boss = 1;
                                                        entity.Y = y;
                                                        if (x == 0 || y == 0)
                                                        {
                                                            var cord = Map.RandomCoordinates();
                                                            entity.X = cord.Item1;
                                                            entity.Y = cord.Item2;
                                                            do
                                                            {
                                                                cord = Map.RandomCoordinates();
                                                                entity.X = cord.Item1;
                                                                entity.Y = cord.Item2;
                                                            }
                                                            while (!Map.Floor[entity.X, entity.Y, MapObjectType.Monster]);
                                                        }

                                                        Map.AddEntity(entity);
                                                        Network.GamePackets._String stringPacket =
                                        new Network.GamePackets._String(true);
                                                        stringPacket.UID = entity.UID;
                                                        stringPacket.Type = Network.GamePackets._String.Effect;
                                                        stringPacket.Texts.Add("MBStandard");
                                                        Data data = new Data(true);
                                                        data.UID = entity.UID;
                                                        data.ID = Network.GamePackets.Data.AddEntity;
                                                        data.wParam1 = entity.X;
                                                        data.wParam2 = entity.Y;
                                                        foreach (Client.GameState clllient in Program.Values)
                                                        {
                                                            if (clllient.Map.ID == entity.MapID)
                                                            {
                                                                if (Kernel.GetDistance(clllient.Entity.X, clllient.Entity.Y, entity.X, entity.Y) <
                                                                    Constants.nScreenDistance)
                                                                {
                                                                    entity.SendSpawn(clllient, false);
                                                                    clllient.Send(stringPacket);
                                                                    clllient.Send(data);
                                                                    if (entity.MaxHitpoints >
65535)
                                                                    {
                                                                        Update upd = new Update(true) { UID = entity.UID };
                                                                        upd.Append(Update.MaxHitpoints, entity.MaxHitpoints);
                                                                        upd.Append(Update.Hitpoints, entity.Hitpoints);
                                                                        clllient.Send(upd);
                                                                    }

                                                                }
                                                            }
                                                        }
                                                        foreach (var client10 in Program.Values)
                                                        {
                                                            client.Inventory.Remove(5542004, 1);
                                                        }
                                                    }
                                                }
                                            }
                                        }
                                    }
                                    #endregion



                                }

                                break;

                        }
                        break;
                    }
                #endregion

npc الرجل الي جو عند الوحش بيطلع يودي التون
كود بلغة HTML:

#region Dead Hearts
                case 1597533:
                    {
                        switch (npcRequest.OptionID)
                        {
                            case 0:
                                {
                                    if (client.Inventory.Contains(5542005, 1))
                                    {
                                        dialog.Text("MAPROK YASTA " + client.Entity.Name + " ENT FOZT PE 1 MELYAR A4TA  ?");
                                        dialog.Option("a4ta", 1);
                                        dialog.Option("msh a4ta.", 255);
                                        dialog.Send();
                                        break;
                                    }
                                    else
                                    {
                                        dialog.Text("You mast pe kill monster firest");
                                        dialog.Option("Ok.", 255);
                                        dialog.Send();
                                        break;
                                    }
                                    break;
                                }
                            case 1:
                                {

                                    client.Entity.Teleport(1002, 301, 280);
                                    client.Inventory.Add(3006589, 0, 1);
                                    client.Inventory.Remove(5542005, 1);
                                }
                     

                                break;

                        }
                        break;
                    }
                #endregion

تدخل ع monsterTable
هتبحث عن
كود بلغة HTML:

if (Name == "NemesisTyrant")
                Program.Nemesis = true;

----------------------------------------------
وفقيها او تحتها تضيف

كود بلغة HTML:

            if (Name == "MohamedHossam")
                Program.MohamedHossam = true;

                Program.SnowSoul = true;
            if (Name == "MohamedHossam")
            {

                killer.Owner.Inventory.Add(5542005, 0, 1);
                HemaProject.Kernel.SendWorldMessage(new HemaProject.Network.GamePackets.Message(" Congratulations " + killer.Name + " Has Killed " + Name + " and  Get [1M] ConquerPoints & [700] CpsBound fOR 7AZEM ", Message.Center));
                return;
            }

kernel تدخل ع
تبحث عن
كود بلغة HTML:

SpawnNemesis = false,
-----------------------
وتضيف تحتها او فقيها
كود بلغة HTML:

MohamedHossam = false,
تدخل ع map
تبحث عن
كود بلغة HTML:

if (monster.Name
-------------------------------
وتجي في اخر السطر بتعها قبل قفلة القوس وتضيف دي
كود بلغة HTML:

|| monster.Name == "MohamedHossam"
program تدخل ع

هتبحث عن
كود بلغة HTML:

public static bool Nemesis = true;
-----------------------------------
وتضيف تحتها او فقيها
كود بلغة HTML:

public static bool MohamedHossam = true;
worldتدخل ع
تحت ده تحت اي ايفينت حرب عندك
كود بلغة HTML:

            #region Dead Hearts
            if (Now64.Hour == 17 && Now64.Second == 0)
            {
                Kernel.SendWorldMessage(new Message("Dead Hearts Group war war is began !", Color.White, Message.Center), Program.Values);
                foreach (var client in Program.Values)
                    client.MessageBox("Dead Hearts Group war war began! Would you like to join ?",
                      p => { p.Entity.Teleport(1002, 335, 259); }, null, 60);
            }
            #endregion

items تدخل ع
تنزل اخر سطر وتضيف
----------------

تنزل اخر سطر وتضيف
----------------

كود بلغة HTML:

5542004@@MonsterEgg@@0@@0@@0@@0@@0@@0@@0@@0@@9@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@1@@1@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@MonsterEgg@@By~Mohamed~Hossam~for~skerpt~7azem~[01120712947-01019218315]!@@5@@0@@0@@0@@0@@500@@0@@0@@0@@0@@0@@
5542005@@IncantationGoust@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@9253900@@0@@0@@0@@0@@0@@0@@0@@1@@1@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@1@@110@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@0@@IncantationGoust@@By~Mohamed~Hossam~for~skerpt~7azem~[01120712947-01019218315]!@@8@@0@@0@@0@@14030@@500@@0@@0@@0@@0@@0@@

في قعدة البينات
هتخش علي
monsterinfos
--------------------
وتضيف دا

كود بلغة HTML:

417101        MohamedHossam        1        523        60000000        0        5000        1000        900000        7        8        200        200        140        3        0        0        0        0        0        1
--------------------------
هتخش علي

Maps

---------------------------
وتضيف

كود بلغة HTML:

11019        1507        7        0
------------------------------
وتخش علي

npcs

-------------------------------
وتضيف

كود بلغة HTML:

231400        Dead Hearts        2        3690        1002        336        258       
-----------------------------------------------------
2315009        Winner        2        36746        1019        84        112       
----------------------------------------------------------
159753        Monster event        2        3690        1002        308        244       
--------------------------------------------------------------
1597533        Exite        2        36746        11019        84        112       
---------------------------------------------------------------
1597534        Genarator        2        36747        11019        96        113       
---------------------------------------------------------------

اضافة الشكل في الكلينت ف ملف ani
كود بلغة HTML:

[Item5542005]
FrameAmount=1
Frame0=data/ItemMinIcon/5542005.dds

[Item5542004]
FrameAmount=1
Frame0=data/ItemMinIcon/5542004.dds

كده تمام والحمد لله اي شي ناقص عرفوني
ولو احتجتو الباتش ارفعهولكو

محمد ياسر 2020-05-12 10:20 AM

رد: كوسته بفكره جديده Monster event
 
عاش الله ينور

ToRWadA 2020-05-13 04:40 AM

رد: كوسته بفكره جديده Monster event
 
مسروق :)

karem010 2020-05-13 05:52 AM

رد: كوسته بفكره جديده Monster event
 
اقتباس:

المشاركة الأصلية كتبت بواسطة torwada (المشاركة 43365)
مسروق :)

مسروق منين بقي وانا بقول من سورس الي معايا يا عم خليني سارق اسرق انت كمان وضيف ف المنتدي هنا


الساعة الآن 10:18 AM

مرحبا بكم في منتدي اكواد لتطوير الالعاب