Changeset 222 for oup/current/Global
- Timestamp:
- Jun 18, 2007, 4:22:53 PM (18 years ago)
- Location:
- oup/current/Global
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
oup/current/Global/RawList.pas
r209 r222 44 44 for i := 0 to links - 1 do 45 45 begin 46 Result[i].Name := '<TBD>'; 46 47 Result[i].SrcOffset := $20 + i * 4; 47 48 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $20 + i * 4, 4, @link); … … 65 66 for i := 0 to links - 1 do 66 67 begin 68 Result[i].Name := '<TBD>'; 67 69 Result[i].SrcOffset := $20 + i * $74 + $24; 68 70 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $20 + i * $74 + $24, 4, @link); … … 85 87 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $08, 4, @datasize); 86 88 SetLength(Result, 1); 89 Result[0].Name := 'BinaryData'; 87 90 Result[0].SrcOffset := $0C; 88 91 Result[0].RawAddr := link; … … 102 105 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $0C, 4, @link); 103 106 SetLength(Result, 1); 107 Result[0].Name := 'SoundBinaryData'; 104 108 Result[0].SrcOffset := $0C; 105 109 Result[0].RawAddr := link; … … 129 133 Result[0].SrcOffset := $44; 130 134 end; 135 Result[0].Name := 'SoundData'; 131 136 Result[0].RawAddr := link; 132 137 Result[0].RawSize := datasize; … … 170 175 begin 171 176 SetLength(Result, 1); 177 Result[0].Name := 'Subtitles'; 172 178 Result[0].SrcID := FileID; 173 179 Result[0].SrcOffset := $18; … … 196 202 SetLength(Result, 13); 197 203 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $16C, 2, @frames); 198 { x-z-pos}204 {y-pos} 199 205 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $0C, 4, @link); 206 Result[0].Name := 'y-pos'; 200 207 Result[0].SrcOffset := $0C; 201 208 Result[0].RawAddr := link; 202 Result[0].RawSize := frames * 4;203 { y-pos}209 Result[0].RawSize := frames * 4; 210 {x-z-pos} 204 211 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $10, 4, @link); 212 Result[1].Name := 'x-z-pos'; 205 213 Result[1].SrcOffset := $10; 206 214 Result[1].RawAddr := link; 207 Result[1].RawSize := frames * 8;215 Result[1].RawSize := frames * 8; 208 216 {attacks} 209 217 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $182, 1, @tempb); 210 218 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $14, 4, @link); 219 Result[2].Name := 'Attacks'; 211 220 Result[2].SrcOffset := $14; 212 221 Result[2].RawAddr := link; … … 215 224 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $183, 1, @tempb); 216 225 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $18, 4, @link); 226 Result[3].Name := 'Damage'; 217 227 Result[3].SrcOffset := $18; 218 228 Result[3].RawAddr := link; … … 221 231 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $184, 1, @tempb); 222 232 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $1C, 4, @link); 233 Result[4].Name := 'MotionBlur'; 223 234 Result[4].SrcOffset := $1C; 224 235 Result[4].RawAddr := link; … … 227 238 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $185, 1, @tempb); 228 239 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $20, 4, @link); 240 Result[5].Name := 'Shortcut'; 229 241 Result[5].SrcOffset := $20; 230 242 Result[5].RawAddr := link; … … 232 244 {throw} 233 245 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $24, 4, @link); 246 Result[6].Name := 'Throw'; 234 247 Result[6].SrcOffset := $24; 235 248 Result[6].RawAddr := link; … … 238 251 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $186, 1, @tempb); 239 252 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $28, 4, @link); 253 Result[7].Name := 'Footstep'; 240 254 Result[7].SrcOffset := $28; 241 255 Result[7].RawAddr := link; … … 244 258 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $187, 1, @tempb); 245 259 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $2C, 4, @link); 260 Result[8].Name := 'Particle'; 246 261 Result[8].SrcOffset := $2C; 247 262 Result[8].RawAddr := link; … … 249 264 {position} 250 265 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $30, 4, @link); 266 Result[9].Name := 'Position'; 251 267 Result[9].SrcOffset := $30; 252 268 Result[9].RawAddr := link; 253 269 Result[9].RawSize := frames * 8; 254 { particle}270 {sound} 255 271 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $154, 2, @tempw); 256 272 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $38, 4, @link); 273 Result[11].Name := 'Sound'; 257 274 Result[11].SrcOffset := $38; 258 275 Result[11].RawAddr := link; … … 261 278 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $138, 4, @templ); 262 279 ConManager.Connection[ConnectionID].LoadDatFilePart(fileid, $13C, 4, @link); 280 Result[12].Name := 'Extent'; 263 281 Result[12].SrcOffset := $13C; 264 282 Result[12].RawAddr := link; … … 291 309 end; 292 310 end; 311 Result[10].Name := 'BodyParts Animation'; 293 312 Result[10].SrcOffset := $34; 294 313 Result[10].RawAddr := link; … … 351 370 Result[0].RawAddr := link_mac; 352 371 end; 372 Result[0].Name := 'ImageData'; 353 373 Result[0].RawSize := datasize; 354 374 Result[0].LocSep := not (ConManager.Connection[ConnectionID].DataOS = DOS_WIN); … … 365 385 begin 366 386 RawList := GetRawList(ConnectionID, FileID); 387 Result.Name := ''; 367 388 Result.SrcID := -1; 368 389 Result.SrcOffset := -1; … … 375 396 if RawList[i].SrcOffset = DatOffset then 376 397 begin 398 Result.Name := RawList[i].Name; 377 399 Result.SrcID := FileID; 378 400 Result.SrcOffset := RawList[i].SrcOffset; -
oup/current/Global/TypeDefs.pas
r124 r222 76 76 77 77 TRawDataInfo = record 78 Name: String; 78 79 SrcID: Integer; 79 80 SrcOffset: Integer;
Note:
See TracChangeset
for help on using the changeset viewer.