Changeset 222 for oup/current/Global

Timestamp:

Jun 18, 2007, 4:22:53 PM (17 years ago)

Author:

alloc

Message:

 

Location:

oup/current/Global

Files:

• RawList.pas (modified) (19 diffs)
• TypeDefs.pas (modified) (1 diff)

oup/current/Global/RawList.pas

@@ -44 +44 @@
   for i := 0 to links - 1 do
   begin
+    Result[i].Name := '<TBD>';
     Result[i].SrcOffset := $20 + i * 4;
     ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $20 + i * 4, 4, @link);
@@ -65 +66 @@
   for i := 0 to links - 1 do
   begin
+    Result[i].Name := '<TBD>';
     Result[i].SrcOffset := $20 + i * $74 + $24;
     ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $20 + i * $74 + $24, 4, @link);
@@ -85 +87 @@
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $08, 4, @datasize);
   SetLength(Result, 1);
+  Result[0].Name := 'BinaryData';
   Result[0].SrcOffset := $0C;
   Result[0].RawAddr   := link;
@@ -102 +105 @@
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $0C, 4, @link);
   SetLength(Result, 1);
+  Result[0].Name := 'SoundBinaryData';
   Result[0].SrcOffset := $0C;
   Result[0].RawAddr   := link;
@@ -129 +133 @@
     Result[0].SrcOffset := $44;
   end;
+  Result[0].Name := 'SoundData';
   Result[0].RawAddr := link;
   Result[0].RawSize := datasize;
@@ -170 +175 @@
     begin
       SetLength(Result, 1);
+      Result[0].Name      := 'Subtitles';
       Result[0].SrcID     := FileID;
       Result[0].SrcOffset := $18;
@@ -196 +202 @@
   SetLength(Result, 13);
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $16C, 2, @frames);
-  {x-z-pos}
+  {y-pos}
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $0C, 4, @link);
+  Result[0].Name      := 'y-pos';
   Result[0].SrcOffset := $0C;
   Result[0].RawAddr   := link;
-  Result[0].RawSize := frames * 4;
-  {y-pos}
+  Result[0].RawSize   := frames * 4;
+  {x-z-pos}
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $10, 4, @link);
+  Result[1].Name      := 'x-z-pos';
   Result[1].SrcOffset := $10;
   Result[1].RawAddr   := link;
-  Result[1].RawSize := frames * 8;
+  Result[1].RawSize   := frames * 8;
   {attacks}
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $182, 1, @tempb);
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $14, 4, @link);
+  Result[2].Name      := 'Attacks';
   Result[2].SrcOffset := $14;
   Result[2].RawAddr   := link;
@@ -215 +224 @@
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $183, 1, @tempb);
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $18, 4, @link);
+  Result[3].Name      := 'Damage';
   Result[3].SrcOffset := $18;
   Result[3].RawAddr   := link;
@@ -221 +231 @@
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $184, 1, @tempb);
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $1C, 4, @link);
+  Result[4].Name      := 'MotionBlur';
   Result[4].SrcOffset := $1C;
   Result[4].RawAddr   := link;
@@ -227 +238 @@
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $185, 1, @tempb);
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $20, 4, @link);
+  Result[5].Name      := 'Shortcut';
   Result[5].SrcOffset := $20;
   Result[5].RawAddr   := link;
@@ -232 +244 @@
   {throw}
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $24, 4, @link);
+  Result[6].Name      := 'Throw';
   Result[6].SrcOffset := $24;
   Result[6].RawAddr   := link;
@@ -238 +251 @@
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $186, 1, @tempb);
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $28, 4, @link);
+  Result[7].Name      := 'Footstep';
   Result[7].SrcOffset := $28;
   Result[7].RawAddr   := link;
@@ -244 +258 @@
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $187, 1, @tempb);
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $2C, 4, @link);
+  Result[8].Name      := 'Particle';
   Result[8].SrcOffset := $2C;
   Result[8].RawAddr   := link;
@@ -249 +264 @@
   {position}
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $30, 4, @link);
+  Result[9].Name      := 'Position';
   Result[9].SrcOffset := $30;
   Result[9].RawAddr   := link;
   Result[9].RawSize   := frames * 8;
-  {particle}
+  {sound}
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $154, 2, @tempw);
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $38, 4, @link);
+  Result[11].Name      := 'Sound';
   Result[11].SrcOffset := $38;
   Result[11].RawAddr   := link;
@@ -261 +278 @@
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $138, 4, @templ);
   ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $13C, 4, @link);
+  Result[12].Name      := 'Extent';
   Result[12].SrcOffset := $13C;
   Result[12].RawAddr   := link;
@@ -291 +309 @@
     end;
   end;
+  Result[10].Name      := 'BodyParts Animation';
   Result[10].SrcOffset := $34;
   Result[10].RawAddr   := link;
@@ -351 +370 @@
     Result[0].RawAddr   := link_mac;
   end;
+  Result[0].Name    := 'ImageData';
   Result[0].RawSize := datasize;
   Result[0].LocSep  := not (ConManager.Connection[ConnectionID].DataOS = DOS_WIN);
@@ -365 +385 @@
 begin
   RawList          := GetRawList(ConnectionID, FileID);
+  Result.Name      := '';
   Result.SrcID     := -1;
   Result.SrcOffset := -1;
@@ -375 +396 @@
       if RawList[i].SrcOffset = DatOffset then
       begin
+        Result.Name      := RawList[i].Name;
         Result.SrcID     := FileID;
         Result.SrcOffset := RawList[i].SrcOffset;

oup/current/Global/TypeDefs.pas

@@ -76 +76 @@
 
   TRawDataInfo = record
+      Name:          String;
       SrcID:         Integer;
       SrcOffset:     Integer;