عرض مشاركة واحدة
احصائياتى

الردود
3

المشاهدات
1298
 
karem010
.:: عضو نشيط ::.

karem010 is on a distinguished road

    غير متواجد

المشاركات
32

+التقييم
0.02

تاريخ التسجيل
May 2020

الاقامة

نظام التشغيل

رقم العضوية
3876
2020-05-12, 05:11 AM
المشاركة 1
افتراضي كوسته بفكره جديده 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
كده تمام والحمد لله اي شي ناقص عرفوني
ولو احتجتو الباتش ارفعهولكو