ViewVC Help
View File | Revision Log | View Changeset | Root Listing
root/Oni2/oup/current/Global/RawList.pas
(Generate patch)

Comparing oup/current/Global/RawList.pas (file contents):
Revision 209 by alloc, Mon Jun 4 22:07:29 2007 UTC vs.
Revision 222 by alloc, Mon Jun 18 14:22:53 2007 UTC

# Line 43 | Line 43 | begin
43    SetLength(Result, links);
44    for i := 0 to links - 1 do
45    begin
46 +    Result[i].Name := '<TBD>';
47      Result[i].SrcOffset := $20 + i * 4;
48      ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $20 + i * 4, 4, @link);
49      Result[i].RawAddr := link;
# Line 64 | Line 65 | begin
65    SetLength(Result, links);
66    for i := 0 to links - 1 do
67    begin
68 +    Result[i].Name := '<TBD>';
69      Result[i].SrcOffset := $20 + i * $74 + $24;
70      ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $20 + i * $74 + $24, 4, @link);
71      Result[i].RawAddr := link;
# Line 84 | Line 86 | begin
86    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $0C, 4, @link);
87    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $08, 4, @datasize);
88    SetLength(Result, 1);
89 +  Result[0].Name := 'BinaryData';
90    Result[0].SrcOffset := $0C;
91    Result[0].RawAddr   := link;
92    Result[0].RawSize   := datasize;
# Line 101 | Line 104 | begin
104    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $08, 4, @datasize);
105    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $0C, 4, @link);
106    SetLength(Result, 1);
107 +  Result[0].Name := 'SoundBinaryData';
108    Result[0].SrcOffset := $0C;
109    Result[0].RawAddr   := link;
110    Result[0].RawSize   := datasize;
# Line 128 | Line 132 | begin
132      ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $44, 4, @link);
133      Result[0].SrcOffset := $44;
134    end;
135 +  Result[0].Name := 'SoundData';
136    Result[0].RawAddr := link;
137    Result[0].RawSize := datasize;
138    Result[0].LocSep  := False;
# Line 169 | Line 174 | begin
174      if foundzeros = 2 then
175      begin
176        SetLength(Result, 1);
177 +      Result[0].Name      := 'Subtitles';
178        Result[0].SrcID     := FileID;
179        Result[0].SrcOffset := $18;
180        Result[0].RawAddr   := baselink;
# Line 195 | Line 201 | var
201   begin
202    SetLength(Result, 13);
203    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $16C, 2, @frames);
204 <  {x-z-pos}
204 >  {y-pos}
205    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $0C, 4, @link);
206 +  Result[0].Name      := 'y-pos';
207    Result[0].SrcOffset := $0C;
208    Result[0].RawAddr   := link;
209 <  Result[0].RawSize := frames * 4;
210 <  {y-pos}
209 >  Result[0].RawSize   := frames * 4;
210 >  {x-z-pos}
211    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $10, 4, @link);
212 +  Result[1].Name      := 'x-z-pos';
213    Result[1].SrcOffset := $10;
214    Result[1].RawAddr   := link;
215 <  Result[1].RawSize := frames * 8;
215 >  Result[1].RawSize   := frames * 8;
216    {attacks}
217    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $182, 1, @tempb);
218    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $14, 4, @link);
219 +  Result[2].Name      := 'Attacks';
220    Result[2].SrcOffset := $14;
221    Result[2].RawAddr   := link;
222    Result[2].RawSize   := tempb * 32;
223    {damage}
224    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $183, 1, @tempb);
225    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $18, 4, @link);
226 +  Result[3].Name      := 'Damage';
227    Result[3].SrcOffset := $18;
228    Result[3].RawAddr   := link;
229    Result[3].RawSize   := tempb * 8;
230    {motionblur}
231    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $184, 1, @tempb);
232    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $1C, 4, @link);
233 +  Result[4].Name      := 'MotionBlur';
234    Result[4].SrcOffset := $1C;
235    Result[4].RawAddr   := link;
236    Result[4].RawSize   := tempb * 12;
237    {shortcut}
238    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $185, 1, @tempb);
239    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $20, 4, @link);
240 +  Result[5].Name      := 'Shortcut';
241    Result[5].SrcOffset := $20;
242    Result[5].RawAddr   := link;
243    Result[5].RawSize   := tempb * 8;
244    {throw}
245    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $24, 4, @link);
246 +  Result[6].Name      := 'Throw';
247    Result[6].SrcOffset := $24;
248    Result[6].RawAddr   := link;
249    Result[6].RawSize := 24;
250    {footstep}
251    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $186, 1, @tempb);
252    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $28, 4, @link);
253 +  Result[7].Name      := 'Footstep';
254    Result[7].SrcOffset := $28;
255    Result[7].RawAddr   := link;
256    Result[7].RawSize   := tempb * 4;
257    {particle}
258    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $187, 1, @tempb);
259    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $2C, 4, @link);
260 +  Result[8].Name      := 'Particle';
261    Result[8].SrcOffset := $2C;
262    Result[8].RawAddr   := link;
263    Result[8].RawSize   := tempb * 24;
264    {position}
265    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $30, 4, @link);
266 +  Result[9].Name      := 'Position';
267    Result[9].SrcOffset := $30;
268    Result[9].RawAddr   := link;
269    Result[9].RawSize   := frames * 8;
270 <  {particle}
270 >  {sound}
271    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $154, 2, @tempw);
272    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $38, 4, @link);
273 +  Result[11].Name      := 'Sound';
274    Result[11].SrcOffset := $38;
275    Result[11].RawAddr   := link;
276    Result[11].RawSize   := tempw * 34;
277    {extent}
278    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $138, 4, @templ);
279    ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $13C, 4, @link);
280 +  Result[12].Name      := 'Extent';
281    Result[12].SrcOffset := $13C;
282    Result[12].RawAddr   := link;
283    Result[12].RawSize   := templ * 12;
# Line 290 | Line 308 | begin
308        Result[10].RawSize := 0;
309      end;
310    end;
311 +  Result[10].Name      := 'BodyParts Animation';
312    Result[10].SrcOffset := $34;
313    Result[10].RawAddr   := link;
314   end;
# Line 350 | Line 369 | begin
369      Result[0].SrcOffset := $A0;
370      Result[0].RawAddr   := link_mac;
371    end;
372 +  Result[0].Name    := 'ImageData';
373    Result[0].RawSize := datasize;
374    Result[0].LocSep  := not (ConManager.Connection[ConnectionID].DataOS = DOS_WIN);
375   end;
# Line 364 | Line 384 | var
384    RawList: TRawDataList;
385   begin
386    RawList          := GetRawList(ConnectionID, FileID);
387 +  Result.Name      := '';
388    Result.SrcID     := -1;
389    Result.SrcOffset := -1;
390    Result.RawAddr   := -1;
# Line 374 | Line 395 | begin
395      begin
396        if RawList[i].SrcOffset = DatOffset then
397        begin
398 +        Result.Name      := RawList[i].Name;
399          Result.SrcID     := FileID;
400          Result.SrcOffset := RawList[i].SrcOffset;
401          Result.RawAddr   := RawList[i].RawAddr;

Diff Legend

– Removed lines
+ Added lines
< Changed lines (old)
> Changed lines (new)