Ive created a new [status] for servers who u can give/sell on ure site..
Obvious for 5165, but for the record: 5165 SOurce!!!
+ also a new [VIP] Zone(also entereble for gm/pm) where they can hunt Db/ DragonballScrolls...(If Status==[VIP] & if (GC.MyChar.Level >=129)
Legenda:
green= Edittable of youre choice
Red= Editable if already taken
How to start:
I am going 2 teach u how to add [VIP] to a players name.
Then u go to:
Step 1:NewestCoServer.exe(to open server lol)
Step 2: Typ: /accounts
step 4: In the box that pops up u press: Search for accounts
step 5: click the arrow down (^ but opposite side)
step 6: search for his/her account name.
step 7: in the box: Status u add: [VIP]
step 8: Press Save
Nice now youre player is a [VIP].
NOw here are the codes so he can even enter somewhere, where [VIP] is needed.
@ NpcDialog.Cs Search for:
Code:
default:
{
Above that add:
Code:
#region DragonballZone
case [COLOR="red"]666[/COLOR]:
{
if (Control == 0)
{
GC.AddSend(Packets.NPCSay("Hey if you are a [VIP], and level [COLOR="Lime"]130[/COLOR] i can teleport you to DragonBal Area? It will only cost you 20000 Cps."));
GC.AddSend(Packets.NPCLink("Yeah Lets make Dragonballs", 1));
GC.AddSend(Packets.NPCLink("Let me Buy [VIP] status for only 5$ a week, www.crankco.nl.", 255));
GC.AddSend(Packets.NPCSetFace(N.Avatar));
GC.AddSend(Packets.NPCFinish());
}
if (GC.AuthInfo.Status == "[GM]" || GC.AuthInfo.Status == "[PM]" || GC.AuthInfo.Status == "[VIP]")
if (GC.MyChar.CPs >= [COLOR="lime"]20000[/COLOR])
if (GC.MyChar.Level >=[COLOR="lime"]129[/COLOR])
if (Control == 1)
{
GC.MyChar.CPs -= [COLOR="lime"]20000[/COLOR];
GC.MyChar.Teleport(4021, 263, 64);
}
if (GC.AuthInfo.Status == "")
{
GC.AddSend(Packets.NPCSay("You are not a GM, PM, ADM, VIP"));
GC.AddSend(Packets.NPCSay("You can purchase this at http://www.cranko.nl"));
GC.AddSend(Packets.NPCSay(" Contact Crank, ore just purchase via site."));
GC.AddSend(Packets.NPCSay("VIP will cost u 5$ a week with many advantages"));
GC.AddSend(Packets.NPCLink("goto www.crankco.nl!.", 255));
GC.AddSend(Packets.NPCSetFace(N.Avatar));
GC.AddSend(Packets.NPCFinish());
}
if (GC.MyChar.CPs <= [COLOR="lime"]20000[/COLOR])
{
GC.AddSend(Packets.NPCSay("You Not have 20k cps"));
GC.AddSend(Packets.NPCLink("Oh ok, i will go hunt.", 255));
GC.AddSend(Packets.NPCSetFace(N.Avatar));
GC.AddSend(Packets.NPCFinish());
}
if (GC.MyChar.Level <= [COLOR="lime"]129[/COLOR])
{
GC.AddSend(Packets.NPCSay("You Not have level 130"));
GC.AddSend(Packets.NPCLink("Oh i will go level up.", 255));
GC.AddSend(Packets.NPCSetFace(N.Avatar));
GC.AddSend(Packets.NPCFinish());
}
break;
}
#endregion
Code:
#region back from DBZone Teleporater
case [COLOR="red"]6666[/COLOR]:
{
if (Control == 0)
{
GC.AddSend(Packets.NPCSay("Hey i can Teleport you back to twincity for 100 silver."));
GC.AddSend(Packets.NPCLink("Yes please Teleport me", 1));
GC.AddSend(Packets.NPCLink("Just passing by.", 255));
GC.AddSend(Packets.NPCSetFace(N.Avatar));
GC.AddSend(Packets.NPCFinish());
}
else if (GC.MyChar.Silvers >= [COLOR="lime"]100[/COLOR])
{
GC.MyChar.Silvers -= [COLOR="lime"]100[/COLOR];
if (Control == 1) GC.MyChar.Teleport([COLOR="lime"]1002, 500, 305[/COLOR]);
}
else
{
GC.AddSend(Packets.NPCSay("I said [COLOR="lime"]100[/COLOR] CPS! If you don't have that, don't bother me."));
GC.AddSend(Packets.NPCLink("I see.", 255));
GC.AddSend(Packets.NPCSetFace(N.Avatar));
GC.AddSend(Packets.NPCFinish());
}
break;
}
#endregion
Then go to Mob.cs and find:
Code:
else if (MyMath.ChanceSuccess(DropRates.CPBackpack))
Put:
Code:
if (Loc.Map == 4021)
{
if (Name == "Talon")
{
if (MyMath.ChanceSuccess([COLOR="lime"]3.5[/COLOR]))
{
DI2.Info.ID = 720028;
DI2.Info.MaxDur = DI2.Info.DBInfo.Durability;
DI2.Info.CurDur = DI2.Info.MaxDur;
}
}
}
if (Loc.Map == 4021)
{
if (Name == "Talon")
{
if (MyMath.ChanceSuccess([COLOR="lime"]10.5[/COLOR]))
{
DI2.Info.ID = 1088000;
DI2.Info.MaxDur = DI2.Info.DBInfo.Durability;
DI2.Info.CurDur = DI2.Info.MaxDur;
}
}
}
if (Loc.Map == 4021)
{
if (Name == "Syren")
{
if (MyMath.ChanceSuccess([COLOR="lime"]10.5[/COLOR]))
{
DI2.Info.ID = 1088000;
DI2.Info.MaxDur = DI2.Info.DBInfo.Durability;
DI2.Info.CurDur = DI2.Info.MaxDur;
}
}
}
if (Loc.Map == 4021)
{
if (Name == "Syren")
{
if (MyMath.ChanceSuccess([COLOR="Lime"]5.5[/COLOR]))
{
DI2.Info.ID = 720028;
DI2.Info.MaxDur = DI2.Info.DBInfo.Durability;
DI2.Info.CurDur = DI2.Info.MaxDur;
}
}
}
Go to youre C:/OldCoDb/MobSpawns.Txt
add:
Code:
[COLOR="Red"]91[/COLOR] 250 4021 199 391 445 335 [COLOR="red"]91[/COLOR] 25 4021 262 68 262 195 [COLOR="red"]91[/COLOR] 10 4021 267 203 280 334 [COLOR="red"]91[/COLOR] 10 4021 280 334 286 479 [COLOR="red"]93[/COLOR] 30 4021 262 68 262 195 [COLOR="red"]93[/COLOR] 50 4021 267 203 280 334 [COLOR="red"]93[/COLOR] 100 4021 280 334 286 479 [COLOR="red"]93[/COLOR] 200 4021 199 391 445 335
(C:/OldCODB/MobInfos.txt)
add:
Code:
[COLOR="red"]91[/COLOR] Talon 1 254 250 65535 3700 86 0 15550 15650 10 86 2 True 2 500 5000 1000 12 False [COLOR="red"]93[/COLOR] Syren 1 254 255 65535 3800 79 0 20000 23500 10 80 2 True 2 1000 10000 1000 12 False
Final: Add the Npc, To: C:/OldCoDB/NPCs
add:
Code:
[COLOR="red"]666[/COLOR] 6120 2 13 1002 445 444 [COLOR="red"]6666[/COLOR] 9800 2 13 4021 253 56
Here are some screenshots, of my NPc and itemdrops..
#Problem Fixed + editted the text
(Ty 2 Andrea)
Done
To be honest this is my 1st release/usefull post ever
Hope u all like it..
All credits are going to MY side, because i invented this and ive never seen this release before







