zdoom
/
qzdoom
mirror of https://github.com/ZDoom/qzdoom.git
0
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

- exported several Wads.GetLump...() methods to ZScript 

* GetLumpName() returns 8-characters lump name
* GetLumpFullName() returns full name with path and extension
* GetLumpNamespace() returns lump's namespace
* GetNumLumps() returns total number of lumps

https://forum.zdoom.org/viewtopic.php?t=66285
This commit is contained in:
alexey.lysiuk 2019-11-25 17:37:56 +02:00
parent 4d8dfd2437
commit 20d3752fdd
2 changed files with 34 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

29
src/gamedata/w_wad.cpp
View File

@ -371,6 +371,12 @@ int FWadCollection::GetNumLumps () const
return NumLumps;
}
DEFINE_ACTION_FUNCTION(_Wads, GetNumLumps)
{
PARAM_PROLOGUE;
ACTION_RETURN_INT(Wads.GetNumLumps());
}
//==========================================================================
//
// GetNumFiles
@ -1220,6 +1226,15 @@ void FWadCollection::GetLumpName(FString &to, int lump) const
}
}
DEFINE_ACTION_FUNCTION(_Wads, GetLumpName)
{
PARAM_PROLOGUE;
PARAM_INT(lump);
FString lumpname;
Wads.GetLumpName(lumpname, lump);
ACTION_RETURN_STRING(lumpname);
}
//==========================================================================
//
// FWadCollection :: GetLumpFullName
@ -1238,6 +1253,13 @@ const char *FWadCollection::GetLumpFullName (int lump) const
return LumpInfo[lump].lump->Name;
}
DEFINE_ACTION_FUNCTION(_Wads, GetLumpFullName)
{
PARAM_PROLOGUE;
PARAM_INT(lump);
ACTION_RETURN_STRING(Wads.GetLumpFullName(lump));
}
//==========================================================================
//
// FWadCollection :: GetLumpFullPath
@ -1271,6 +1293,13 @@ int FWadCollection::GetLumpNamespace (int lump) const
return LumpInfo[lump].lump->Namespace;
}
DEFINE_ACTION_FUNCTION(_Wads, GetLumpNamespace)
{
PARAM_PROLOGUE;
PARAM_INT(lump);
ACTION_RETURN_INT(Wads.GetLumpNamespace(lump));
}
//==========================================================================
//
// FWadCollection :: GetLumpIndexNum

5
wadsrc/static/zscript/base.zs
View File

@ -873,6 +873,11 @@ struct Wads
native static int CheckNumForFullName(string name);
native static int FindLump(string name, int startlump = 0, FindLumpNamespace ns = GlobalNamespace);
native static string ReadLump(int lump);
native static int GetNumLumps();
native static string GetLumpName(int lump);
native static string GetLumpFullName(int lump);
native static int GetLumpNamespace(int lump);
}
struct TerrainDef native