Welcome!

Join our community of MMO enthusiasts and game developers! By registering, you'll gain access to discussions on the latest developments in MMO server files and collaborate with like-minded individuals. Join us today and unlock the potential of MMO server development!

Join Today!

[Delphi] [Source] [v83+]Delphi MapleStory Server (supports v83/v90/v97)

Newbie Spellweaver
Joined
Jun 13, 2008
Messages
94
Reaction score
13
Do all jobs, potential,cs,etc work in the V1.02 source?
 
Experienced Elementalist
Joined
Feb 15, 2010
Messages
201
Reaction score
296
Server/Footholds.pas
function TFootholdTree.FindBelow...
That code sometimes is incorrect(OdinMs base).
I change to:

Code:
function TFootholdTree.FindBelow(const Pos: TPoint; var FH: TFoothold): TPoint;
var
  F: TFoothold;
  X, Y: Integer;
  First: Boolean;
  MaxY: Double;
  CMax: Double;
  NewPos: TPoint;
begin
  First := True;
  X := Pos.X;
  Y := Pos.Y;
  for F in FFootholds do
    if((X >= F.X1) and (X <= F.X2)) or((X>=F.X2)and (X <= F.X1)) then
    begin
      if(First) then
      begin
	if(F.X1 = F.X2) then
	  Continue;
        MaxY := (F.Y1 - F.Y2 ) / (F.X1 - F.X2 )*(X - F.X1) + F.Y1 ;
        FH := F;
	if(MaxY >= Y) then
          First := False;
      end
      else
      begin
        if(F.X1 = F.X2)then
	  Continue;
        CMax := (F.Y1 - F.Y2) / (F.X1 - F.X2) * (X - F.X1) + F.Y1 ;
        if(CMax < MaxY) and (CMax >= Y)  then
        begin
          FH := F;
	  MaxY := CMax;
        end;
      end;
    end;

  if(not First) then
  begin
    NewPos.X := X;
    NewPos.Y := Trunc(MaxY);
    Exit(NewPos);
  end;
 
end;

The code is take from TitanMS.It works perfect with all map.I use it for my Delphi MapleStory client.Also,It's faster.
 
Newbie Spellweaver
Joined
Feb 13, 2012
Messages
9
Reaction score
1
what about mcdb for 97? you have v96 to download , will it be good enough?

also tried now mcdb96 but when im trying to login I keep getting "this is not a registered id" even though the whole user list is in delphims
like my user doesnt exist and tried to add users both in the server program and in the sql.
 
Last edited:
Newbie Spellweaver
Joined
Jun 30, 2011
Messages
6
Reaction score
0
how to change level of player in NPC... I use C.changelevel() but it not work...
 
Newbie Spellweaver
Joined
Mar 19, 2012
Messages
22
Reaction score
0
Re: [Delphi] [Source] [v83+]Delphi MapleStory Server (supports v83/v90/v97/v99/v102)

umm im just wondering, where is the sql for v102 gms?
 
Newbie Spellweaver
Joined
Apr 21, 2011
Messages
18
Reaction score
0
Can someone please tell me how to add player commands for v90 delphi? or is this dead :3
 
Back
Top