منتدي كونكر عرب
تطوير سيرفرات كونكر قسم تطوير سيرفرات كونكر الشخصية
أهلا وسهلا بك إلى كونكر عرب.
مرحبا بك، إذا كنت تقرأ هذة الرسالة فهذا يعني أنك غير مسجل بكونكر عرب. يرجى اتخاذ ثانية، وفي خطوات بسيطة سوف تكون قادر على التمتع بجميع ميزات كونكر عرب.
كما يشرفنا أن تقوم سجل الآن
الضغط على زر التسجيل بكونكر عرب فإنك تقر بموافقتك على سياسة كونكر عرب، وأنك قد قرأتها بالكامل ويسمح للمشرفين و الإدارة التعامل معك حسب السياسة, بما في ذلك استخدام ملفات تعريف الارتباط (الكوكيز)
انبسي تقفيل الانر بور والصب كلاس لكل السورسات
تطوير سيرفرات كونكر
لسورس اليكس الاول ابحث عن public bool LearnNewSubClass(Database.DBLevExp.Sort type, Client.GameClient user, ServerSockets.Packet stream) وحط تحته ...
|
|
|
المشاركات 674 |
+التقييم 0.25 |
تاريخ التسجيل May 2019 |
الاقامة |
نظام التشغيل windows 10 |
رقم العضوية 248 |
2020-12-10, 10:23 AM
المشاركة
1
2020-12-10, 10:23 AM
المشاركة
1
انبسي تقفيل الانر بور والصب كلاس لكل السورسات
لسورس اليكس
الاول ابحث عن
وحط تحته
ابحث عن
وحط تحته
دي الاكواد حطها في انبسي
للسورسات المسج
واخيرا للسورسات العاديه
اي خدمه
الاول ابحث عن
كود:
public bool LearnNewSubClass(Database.DBLevExp.Sort type, Client.GameClient user, ServerSockets.Packet stream)
وحط تحته
كود:
public bool Opensubclassfull(Database.DBLevExp.Sort type, Client.GameClient user, ServerSockets.Packet stream)
{
return user.Player.SubClass.SendLearn2(user, Game.MsgServer.MsgSubClass.SubClases.Create(type), stream);
}
ابحث عن
كود:
public unsafe bool SendLearn(Client.GameClient client, Game.MsgServer.MsgSubClass.SubClases item, ServerSockets.Packet stream)
وحط تحته
كود:
public unsafe bool SendLearn2(Client.GameClient client, Game.MsgServer.MsgSubClass.SubClases item, ServerSockets.Packet stream)
{
if (!src.ContainsKey(item.ID))
{
src.TryAdd(item.ID, item);
client.Send(stream.SubClassCreate(MsgSubClass.Action.LearnSubClass, item.ID, 0, 0));
item.Level = 9;
item.Phrase = 9;
client.Send(stream.SubClassCreate(MsgSubClass.Action.SendUpdate, item.ID, 0, 0));
client.Send(stream.SubClassCreate(MsgSubClass.Action.Pro, item.ID, 0, 0));
return true;
}
return false;
}
دي الاكواد حطها في انبسي
كود:
/////////////////////////// subclasses//////////////////////////////
client.Player.SubClass.Opensubclassfull(Database.DBLevExp.Sort.MartialArtist, client, stream);
client.Player.SubClass.Opensubclassfull(Database.DBLevExp.Sort.Warlock, client, stream);
client.Player.SubClass.Opensubclassfull(Database.DBLevExp.Sort.ChiMaster, client, stream);
client.Player.SubClass.Opensubclassfull(Database.DBLevExp.Sort.Sage, client, stream);
client.Player.SubClass.Opensubclassfull(Database.DBLevExp.Sort.Apothecary, client, stream);
client.Player.SubClass.Opensubclassfull(Database.DBLevExp.Sort.Wrangler, client, stream);
client.Player.SubClass.Opensubclassfull(Database.DBLevExp.Sort.Performer, client, stream);
/////////////////////////////innerpower/////////////////////////////////
foreach (var m_stage in client.Player.InnerPower.Stages)
{
foreach (var m_gong in m_stage.NeiGongs)
{
m_stage.UnLocked = m_gong.Unlocked = true;
m_gong.Score = 100;
Database.InnerPowerTable.Stage DBStage = null;
Database.InnerPowerTable.Stage.NeiGong DBGong = null;
if (Database.InnerPowerTable.GetDBInfo(m_gong.ID, out DBStage, out DBGong))
m_gong.level = DBGong.MaxLevel;
}
}
////////////////////////////////////////////////////////////////////
للسورسات المسج
كود:
#region SubClassManager
case 21341:
{
switch (npcRequest.OptionID)
{
case 0:
{
dialog.Text("I Will Open All Sub Class Lvl 9 For 1 press by Server [" + Constants.ServerName + "].");
dialog.Option("Open All Sub-Class Lvl 9", 1);
dialog.Option("See~you~later.", 255);
dialog.Avatar(76);
dialog.Send();
break;
}
case 1:
{
for (byte i = 1; i <= 9; i++)
{
if (i != 7 && i != 8)
{
if (!client.Player.SubProStages.Pro.ContainsKey(i))
{
SubPro subClass3 = new SubPro();
subClass3.ID = i;
subClass3.Phase = 9;
subClass3.Level = 9;
client.Player.SubProStages.Pro.Add(subClass3.ID, subClass3);
client.Player.SubProStages.SendLearn((SubPro.ProID)subClass3.ID, subClass3.Level, client);
SubProBase.Insert(client.Player, subClass3.ID);
SubProBase.Update(client.Player, subClass3);
MsgSubPro subClassShow3 = new MsgSubPro(0);
subClassShow3.Action = MsgSubPro.Mode.SendUpdate;
subClassShow3.Class = subClass3.ID;
client.Send(subClassShow3.ToArray());
client.Player.SubProStages.Send(client);
client.Player.SubProStages.SendPromoted((SubPro.ProID)subClass3.ID, subClass3.Phase, client);
}
}
}
client.LoadItemStats();
break;
}
}
break;
}
#endregion
#region InnerPower
case 785410:
{
switch (npcRequest.OptionID)
{
case 0:
{
dialog.Text("im Selling InnePower System Full");
dialog.Option("Buy Full InnerPower", 1);
dialog.Option("I will come later. ", 255);
dialog.Send();
break;
}
case 1:
{
if (client.Player.ConquerPoints >= 1000 && client.Player.Reborn >= 2)
{
client.Player.ConquerPoints -= 1000;
Database.InnerPowerTable.Stage DBStage = null;
foreach (var m_stage in client.Player.InnerPower.Stages)
{
foreach (var m_gong in m_stage.NeiGongs)
{
m_stage.UnLocked = m_gong.Unlocked = true;
m_gong.Score = 100;
Database.InnerPowerTable.Stage.NeiGong DBGong = null;
if (Database.InnerPowerTable.GetDBInfo(m_gong.ID, out DBStage, out DBGong))
m_gong.level = DBGong.MaxLevel;
}
}
client.Player.InnerPower.UpdateStatus();
client.LoadItemStats();
InnerPower.InnerPowerRank.UpdateRank(client.Player.InnerPower);
}
else
{
dialog.Text("You do not have 1000 ConquerPoints with you or you are not 2 Reborn.");
dialog.Option("Ok, will come later. ", 255);
dialog.Send();
}
break;
}
}
break;
}
#endregion
واخيرا للسورسات العاديه
كود:
#region InnerPower Full
case 785410:
{
switch (npcRequest.OptionID)
{
case 0:
{
dialog.Text("im Selling InnerPower Items and InnePower System Full ");
dialog.Option("Buy Full InnerPower", 1);
dialog.Option("I will come later. ", 255);
dialog.Send();
break;
}
case 1:
{
if (client.Entity.ConquerPoints >= 1)
{
client.Entity.ConquerPoints -= 1;
Database.InnerPowerTable.Stage DBStage = null;
foreach (var m_stage in client.Entity.InnerPower.Stages)
{
foreach (var m_gong in m_stage.NeiGongs)
{
m_stage.UnLocked = m_gong.Unlocked = true;
m_gong.Score = 100;
Database.InnerPowerTable.Stage.NeiGong DBGong = null;
if (Database.InnerPowerTable.GetDBInfo(m_gong.ID, out DBStage, out DBGong))
m_gong.level = DBGong.MaxLevel;
}
}
client.Entity.InnerPower.UpdateStatus();
client.LoadItemStats();
//InnerPower.InnerPowerRank.UpdateRank(client.Entity.InnerPower);
}
else
{
dialog.Text("You do not have 1000 ConquerPoints with you.");
dialog.Option("Ok, will come later. ", 255);
dialog.Send();
}
break;
}
}
break;
}
#endregion
#region SubClassManager
case 123333:
{
switch (npcRequest.OptionID)
{
case 0:
{
dialog.Text("I Will Open All Sub Class Lvl 9 For 1 press by Server ["+Constants.ServerName+"].");
dialog.Option("Open All Sub-Class Lvl 9", 1);
dialog.Option("See~you~later.", 255);
dialog.Avatar(76);
dialog.Send();
break;
}
case 1:
{
for (byte i = 1; i <= 9; i++)
{
if (i != 7 && i != 8)
{
if (!client.Entity.SubClasses.Classes.ContainsKey(i))
{
Game.SubClass subClass3 = new Game.SubClass();
subClass3.ID = i;
subClass3.Phase = 9;
subClass3.Level = 9;
client.Entity.SubClasses.Classes.Add(subClass3.ID, subClass3);
client.Entity.SubClasses.SendLearn((ClassID)subClass3.ID, subClass3.Level, client);
ProjectName.Database.SubClassTable.Insert(client.Entity, subClass3.ID);
Database.SubClassTable.Update(client.Entity, subClass3);
SubClassShow subClassShow3 = new SubClassShow(0);
subClassShow3.ID = SubClassShow.SendUpdate;
subClassShow3.Class = subClass3.ID;
client.Send(subClassShow3.ToArray());
client.Entity.SubClasses.Send(client);
client.Entity.SubClasses.SendPromoted((ClassID)subClass3.ID, subClass3.Phase, client);
}
}
}
client.LoadItemStats();
break;
}
}
break;
}
#endregion
اي خدمه
2020-12-10, 10:48 AM
المشاركة
2
2020-12-11, 07:10 PM
المشاركة
7
2020-12-12, 03:31 PM
المشاركة
8
|
« الموضوع السابق | الموضوع التالي »
| الذين يشاهدون محتوى الموضوع الآن : 1 ( الأعضاء 0 والزوار 1) | |
|
| الموضوع | كاتب الموضوع | المنتدى | مشاركات | آخر مشاركة |
| مشكلة ف كلاس الشخصيات | Good | مشكلات السيرفيرات كونكر الشخصيه | 1 | 2020-12-09 11:50 PM |
| عندي ايرورات في كلاس Program | ElSaher | مشكلات السيرفيرات كونكر الشخصيه | 5 | 2020-08-31 09:14 PM |
| مشكلة غريبه الانر بور مش بيعمل Save | ahmedfathy | مشكلات السيرفيرات كونكر الشخصيه | 4 | 2020-05-04 05:02 PM |
| حل مشكلة الانر بور برستر السيرفر بيترستر | Rider | تطوير سيرفرات كونكر | 3 | 2019-10-26 01:13 AM |
| حل مشكلة الانر بور برستر السيرفر بيترستر من الاول | ahmedfathy | مشكلات السيرفيرات كونكر الشخصيه | 3 | 2019-10-23 04:13 PM |
الساعة الآن 05:34 PM