Code: Select all
function GetTileFlags(grp:byte;tile:word) : cardinal;
Code: Select all
function GetTileFlags(grp:byte;tile:word) : cardinal;
Code: Select all
TyleType[0] := 3293;
TyleType[1] := 3290;
TyleType[2] := 3283;
TyleType[3] := 3296;
TyleType[4] := 3280;
TyleType[5] := 3283;
TyleType[6] := 3286;
TyleType[7] := 3289;
TyleType[8] := 3291;
TyleType[9] := 3292;
TyleType[10] := 3294;
TyleType[11] := 3295;
TyleType[12] := 3296;
TyleType[13] := 3299;
TyleType[14] := 3302;
TyleType[15] := 3394;
TyleType[16] := 3395;
TyleType[17] := 3417;
TyleType[18] := 3440;
TyleType[19] := 3460;
Code: Select all
function GetTileFlags(Group: Byte; Tile: Word): Cardinal; // Узнать флаг тайла