Return Zip algorithm ID
Source position: zipper.pp line 323
public class function TShrinker.ZipID: Word; override;
always 1