anchor.diff:      filename := '';
       done := false;
       dirty := true;
  -    self.led := ui.ZInput.Create(nil);
  +    self.led := ui.ZInput.Create(aOwner);
       self.ToTop;
       TellUser('welcome to minneron.');
     end;
  
positive.code: { editor widget for minneron }
  {$mode delphi}{$I xpc.inc}{$H+}
  unit mned;
  interface uses xpc, classes, fs, ustr, num, cw, ui, kvm, kbd, fx,
    tiles, vorunati, sysutils, mnml, mnbuf, mnrnd, impworld, cli, ukm,
  
negative.code:       filename          : string;
        status            : string;
        topline, position : cardinal;
        state             : vor;
      published { basic interface }
        led               : ui.zinput;  // led = (L)ine (ED)itor
        constructor Create(aOwner : TComponent); override;
        function Load( path : string ) : boolean;
        procedure SaveAs( path : string );
  