| 493 |
|
Result[i*3 + 0].DestID := -1; |
| 494 |
|
Result[i*3 + 0].PosDestExts := 'M3GA'; |
| 495 |
|
|
| 496 |
< |
Result[i*3 + 0].SrcOffset := $20 + i*240 + 4; |
| 497 |
< |
Result[i*3 + 0].DestID := -1; |
| 496 |
> |
Result[i*3 + 1].SrcOffset := $20 + i*240 + 4; |
| 497 |
> |
Result[i*3 + 1].DestID := -1; |
| 498 |
|
Result[i*3 + 1].PosDestExts := 'OBAN'; |
| 499 |
|
|
| 500 |
< |
Result[i*3 + 0].SrcOffset := $20 + i*240 + 8; |
| 501 |
< |
Result[i*3 + 0].DestID := -1; |
| 500 |
> |
Result[i*3 + 2].SrcOffset := $20 + i*240 + 8; |
| 501 |
> |
Result[i*3 + 2].DestID := -1; |
| 502 |
|
Result[i*3 + 2].PosDestExts := 'ENVP'; |
| 503 |
|
end; |
| 504 |
|
end; |
| 1151 |
|
begin |
| 1152 |
|
for i := 0 to packages - 1 do |
| 1153 |
|
begin |
| 1154 |
< |
Result[i].SrcOffset := $120 + i*292 + $134; |
| 1154 |
> |
Result[i].SrcOffset := $120 + i*292 + $114; |
| 1155 |
|
Result[i].DestID := -1; |
| 1156 |
|
Result[i].PosDestExts := 'TSFF'; |
| 1157 |
|
end; |