Script: Add DigFreeMat

So that one can script magical winter services or whatever else that
requires removing just some specific materials.
Günther Brammer 2011-01-02 02:14:45 +01:00
parent 7a63dc8878
commit 654d29120a
1 changed files with 7 additions and 0 deletions

View File

@ -2869,6 +2869,12 @@ static C4Void FnDigFree(C4AulContext *cthr, long x, long y, long rad, bool fRequ
return C4VNull;
}
static C4Void FnDigFreeMat(C4AulContext *cthr, long x, long y, long wdt, long hgt, long mat)
{
::Landscape.DigFreeMat(x, y, wdt, hgt, mat);
return C4VNull;
}
static C4Void FnDigFreeRect(C4AulContext *cthr, long iX, long iY, long iWdt, long iHgt, bool fRequest)
{
::Landscape.DigFreeRect(iX,iY,iWdt,iHgt,fRequest,cthr->Obj);
@ -6096,6 +6102,7 @@ void InitFunctionMap(C4AulScriptEngine *pEngine)
AddFunc(pEngine, "ShakeFree", FnShakeFree);
AddFunc(pEngine, "ShakeObjects", FnShakeObjects);
AddFunc(pEngine, "DigFree", FnDigFree);
AddFunc(pEngine, "DigFreeMat", FnDigFreeMat);
AddFunc(pEngine, "FreeRect", FnFreeRect);
AddFunc(pEngine, "DigFreeRect", FnDigFreeRect);
AddFunc(pEngine, "Hostile", FnHostile);