Map using dlls.

[ShadowDancer]

defs:

Code Select Expand


dword fastcall fog_10021(*char name);
dword fastcall fog_10101(dword direct, dword unknow);
dword fastcall fog_10089(dword unknow);
dword stdcall fog_10218();
dword stdcall d2win_10030();
dword  fastcall d2lang_10009(dword unknow, *char language, dword unknow2);
dword stdcall d2common_10506(dword unknow1, *char desc_, dword unknow2);

stdcall exception_handler {
}


call order/params:

Code Select Expand


fog_10021("name"); //name is the start for log files
fog_10019("string1",@exception_handler,"string2",1);
fc_fog_10101(1, 0); //first param: 1 = -direct | 0 = load from mpqs| 2 = unknow
fog_10089(1);
fog_10218();
d2win_10030();
d2lang_10009(1, "ENG", 1);
d2common_10506(1, "init title...", 0);


Code Select Expand


function tmapping_enginne.load_room(act_pointer:pointer; level_id:integer; x, y:integer; unknow:integer=0):integer;
begin
result:=D2Common_10787(act_pointer, level_id, x, y, unknow);
end;

function tmapping_enginne.unload_act(act_pointer:pointer):integer;
begin
result:=D2Common_10651(act_pointer);
end;

function tmapping_enginne.load_act(mapid:integer; level_id:integer; unknow1:integer=0):integer;
begin
result:=d2common_10669(
{1->} $7C802400,  //who knows wtf is this...
{2->} mapid,  //seed 1
{3->} 0,   //this is 0 in the server
{4->} 0,     //pointer
{5->} unknow1, // byte ...   
{6->} 0, //
{7->} level_id, // lvl id
{8->} 0, //0 in server
{9->} 0 //0 in server
);
end;

[AntiRush]

This is really neat.  I'm impressed.