anchor.diff:  
       // Now read the block
       Block._Data := GetMem( Block._Size );
  -    FileHandle.Read(Block._Data, Block._Size);
  +    FileHandle.Read(Block._Data^, Block._Size);
   
       inc( BytesRead, Block._Size  );
       Blocks.Add( Block );
  
positive.code:   BitmapData: PBYTE;
    ptr: PByte;
  begin
    // Allocate memory to store the bitmap
    Bitmapdata := GetMem( TotalSize );
  
    // Copy header to bitmap
    MemCopy( _Header, BitmapData, sizeof( _Header ) );
  
    // Copy palette into bitmap
    ptr := BitmapData + sizeof( _Header );
    MemCopy( _pPalette, ptr, GetPaletteSize );
  
    BytesWritten := 0;
  
  
negative.code:     case Block._CompressionType of
        0,1: // uncompressed (I'm not sure about 1)
        begin
          MemCopy( Block._Data^, BitmapOutputPointer^, Block._Size );
          BytesWrittenFromBlock := Block._Size;
          inc( BytesWritten, BytesWrittenFromBlock );
        end;
  