anchor.diff:    end;
   
   procedure TTokEd.OnCmdAccept( s : string );
  -  begin
  -    buf.addline(s); cmd.reset; cmd.work :=''; _dirty := true;
  +  begin buf.addline(s); cmd.reset; cmd.work :=''; smudge;
     end;
     
   procedure TTokEd.onspace;
  -  begin
  -    oncmdaccept(cmd.work);
  +  begin oncmdaccept(cmd.work)
     end;
   
   
positive.code:     ndk := undk.open('stuff.ndk');
      cmd := ui.ZInput.Create(self);
      cmd.x := xMax div 2 - 16; cmd.y := yMax div 2;
      cmd.dlen := 32; cmd.maxlen := cmd.dlen;
      cmd.tcol := $11f3; cmd.work := '';
      cmd.OnAccept := self.OnCmdAccept;
      wrap := uww.TWordWrap.Create(self); wrap.width := kvm.width;
      buf := TBuffer.Create(64, kvm.height);
      self.loadPage('home');
    end;
  
  procedure TTokEd.done;
    begin
      wrap.Free;
    end;
  
  
negative.code:   public
      procedure init; override;
      procedure done; override;
      procedure draw; override;
      procedure keys(km : ukm.TKeyMap); override;
      procedure LoadPage(key : string);
  