src/sheditor/WADSTRUCT.pas

   1 (* Copyright (C)  DooM 2D:Forever Developers
   2  *
   3  * This program is free software: you can redistribute it and/or modify
   4  * it under the terms of the GNU General Public License as published by
   5  * the Free Software Foundation, either version 3 of the License, or
   6  * (at your option) any later version.
   7  *
   8  * This program is distributed in the hope that it will be useful,
   9  * but WITHOUT ANY WARRANTY; without even the implied warranty of
  10  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  11  * GNU General Public License for more details.
  12  *
  13  * You should have received a copy of the GNU General Public License
  14  * along with this program.  If not, see <http://www.gnu.org/licenses/>.
  15  *)
  16 {$MODE DELPHI}
  17 unit WADSTRUCT;
  18
  19 {
  20 -----------------------------------
  21 WADSTRUCT.PAS ÂÅÐÑÈß ÎÒ 24.09.06
  22
  23 Ïîääåðæêà âàäîâ âåðñèè 1
  24 -----------------------------------
  25
  26 Ñòðóêòóðà DFWAD-ôàéëà âåðñèè 1:
  27  ------------------------------------------
  28  SIGNATURE  | Byte[5]             | 'DFWAD'
  29  VERSION    | Byte                | $01
  30  HEADER     | TWADHeaderRec_1     |
  31  RESRECORD1 | TResourceTableRec_1 |
  32  ...        | ................... |
  33  RESRECORDN | TResourceTableRec_1 |
  34  DATA       | RAW                 |
  35  ------------------------------------------
  36 }
  37
  38 interface
  39
  40 type
  41   Char16 = packed array[0..15] of Char;
  42
  43   TWADHeaderRec_1 = packed record
  44    RecordsCount: Word;
  45   end;
  46
  47   TResourceTableRec_1 = packed record
  48    ResourceName: Char16;
  49    Address:      LongWord;
  50    Length:       LongWord;
  51   end;
  52
  53 const
  54   DFWAD_SIGNATURE = 'DFWAD';
  55   DFWAD_VERSION   = $01;
  56
  57 implementation
  58
  59 end.