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

Comparing oup/current/Tools/TxmpReplace.pas (file contents):
Revision 194 by alloc, Sat May 26 18:26:48 2007 UTC vs.
Revision 199 by alloc, Sat May 26 20:41:34 2007 UTC

# Line 129 | Line 129 | begin
129      mem := TMemoryStream.Create;
130  
131      case OniImage_New.Format of
132 +      ifX1R5G5B5: new_storetype := 1;
133        ifA1R5G5B5: new_storetype := 2;
134        ifA4R4G4B4: new_storetype := 0;
135        ifA8R8G8B8:
# Line 164 | Line 165 | begin
165        ConManager.Connection[ConnectionID].UpdateRawFile(fileid, $9C, mem);
166      end;
167  
167 –    datbyte := $00;
168      if check_fading.Checked then
169 <      datbyte := datbyte or $01;
169 >      oldfading := oldfading or $01
170 >    else
171 >      oldfading := oldfading and (not Byte($01));
172      ConManager.Connection[ConnectionID].UpdateDatFilePart(fileid, $88, 1, @datbyte);
173      datbyte := $10;
174   //    if check_transparency.Checked then

Diff Legend

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