src/sheditor/WADSTRUCT.pas

   1 {$MODE DELPHI}
   2 unit WADSTRUCT;
   3
   4 {
   5 -----------------------------------
   6 WADSTRUCT.PAS ÂÅÐÑÈß ÎÒ 24.09.06
   7
   8 Ïîääåðæêà âàäîâ âåðñèè 1
   9 -----------------------------------
  10
  11 Ñòðóêòóðà DFWAD-ôàéëà âåðñèè 1:
  12  ------------------------------------------
  13  SIGNATURE  | Byte[5]             | 'DFWAD'
  14  VERSION    | Byte                | $01
  15  HEADER     | TWADHeaderRec_1     |
  16  RESRECORD1 | TResourceTableRec_1 |
  17  ...        | ................... |
  18  RESRECORDN | TResourceTableRec_1 |
  19  DATA       | RAW                 |
  20  ------------------------------------------
  21 }
  22
  23 interface
  24
  25 type
  26   Char16 = packed array[0..15] of Char;
  27
  28   TWADHeaderRec_1 = packed record
  29    RecordsCount: Word;
  30   end;
  31
  32   TResourceTableRec_1 = packed record
  33    ResourceName: Char16;
  34    Address:      LongWord;
  35    Length:       LongWord;
  36   end;
  37
  38 const
  39   DFWAD_SIGNATURE = 'DFWAD';
  40   DFWAD_VERSION   = $01;
  41
  42 implementation
  43
  44 end.