anchor.diff:  
   init_data(runq, {stats, _, T0, _, _}) -> {mk_max(),lists:sort(T0)};
   init_data(io,   {stats, _, _, {{_,In0}, {_,Out0}}, _}) -> {mk_max(), {In0,Out0}};
  -init_data(memory, _) -> {mk_max(), info(memory, undefined)};
  +init_data(memory, _) -> {mk_max(), info(memory, undefined, undefined)};
   init_data(alloc, _) -> {mk_max(), unused};
   init_data(utilz, _) -> {mk_max(), unused}.
   
  -info(runq, {stats, _, T0, _, _}) -> lists:seq(1, length(T0));
  -info(memory, _) -> [total, processes, atom, binary, code, ets];
  -info(io, _) -> [input, output];
  -info(alloc, First) -> [Type || {Type, _, _} <- First];
  -info(utilz, First) -> [Type || {Type, _, _} <- First];
  -info(_, []) -> [].
  +info(runq, {stats, _, T0, _, _}, Node) ->
  +    Dirty = get_dirty_cpu(Node),
  +    {lists:seq(1, length(T0)-Dirty), Dirty};
  +info(memory, _, _) -> [total, processes, atom, binary, code, ets];
  +info(io, _, _) -> [input, output];
  +info(alloc, First, _) -> [Type || {Type, _, _} <- First];
  +info(utilz, First, _) -> [Type || {Type, _, _} <- First];
  +info(_, [], _) -> [].
  +
  +get_dirty_cpu(Node) ->
  +    case rpc:call(node(Node), erlang, system_info, [dirty_cpu_schedulers]) of
  +        {badrpc,_R} -> 0;
  +        N -> N
  +    end.
   
   collect_data(runq, {stats, _, T0, _, _}, {Max,S0}) ->
       S1 = lists:sort(T0),
  
positive.code: 
      case Type of
  	runq ->
  	    drawText(DC, "Scheduler Utilization (%) ", TopTextX, ?BH),
  	    TN0 = Text(TopTextX, BottomTextY, "Scheduler: ", 0),
  	    lists:foldl(fun(Id, Pos0) ->
  				Text(Pos0, BottomTextY, integer_to_list(Id), Id)
  			end, TN0, Info);
  	memory ->
  	    drawText(DC, "Memory Usage " ++ Unit, TopTextX,?BH),
  	    lists:foldl(fun(MType, {PenId, Pos0}) ->
  
negative.code: 
  
  %%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%%
  draw_win(DC, #win{name=Name, no_samples=Samples, geom=#{scale:={WS,HS}},
                    graphs=Graphs, max={_,Max,_,_}, info=Info}=Win,
  	 #ti{tick=Tick, fetch=FetchFreq, secs=Secs, disp=DispFreq}=Ti,
  	 Paint=#paint{pens=Pens, dot_pens=Dots}) when Samples >= 2, Graphs =/= [] ->
      %% Draw graphs
      {X0,Y0,DrawBs} = draw_borders(DC, Ti, Win, Paint),
      Offset = Tick / DispFreq,
  