Geforce File Manager

NAME	SIZE	ACTIONS
📄 addedges	291 B	[ EDIT ] \| [ DEL ]
📄 addranks	830 B	[ EDIT ] \| [ DEL ]
📄 addrings	1,319 B	[ EDIT ] \| [ DEL ]
📄 anon	422 B	[ EDIT ] \| [ DEL ]
📄 attr	151 B	[ EDIT ] \| [ DEL ]
📄 bb	997 B	[ EDIT ] \| [ DEL ]
📄 bbox	532 B	[ EDIT ] \| [ DEL ]
📄 binduce	1,166 B	[ EDIT ] \| [ DEL ]
📄 bipart	455 B	[ EDIT ] \| [ DEL ]
📄 chkclusters	532 B	[ EDIT ] \| [ DEL ]
📄 chkedges	916 B	[ EDIT ] \| [ DEL ]
📄 cliptree	178 B	[ EDIT ] \| [ DEL ]
📄 col	601 B	[ EDIT ] \| [ DEL ]
📄 collapse	469 B	[ EDIT ] \| [ DEL ]
📄 color	1,440 B	[ EDIT ] \| [ DEL ]
📄 cycle	560 B	[ EDIT ] \| [ DEL ]
📄 dechain	264 B	[ EDIT ] \| [ DEL ]
📄 deghist	351 B	[ EDIT ] \| [ DEL ]
📄 deledges	116 B	[ EDIT ] \| [ DEL ]
📄 delmulti	397 B	[ EDIT ] \| [ DEL ]
📄 delnodes	249 B	[ EDIT ] \| [ DEL ]
📄 depath	547 B	[ EDIT ] \| [ DEL ]
📄 dijkstra	647 B	[ EDIT ] \| [ DEL ]
📄 flatten	88 B	[ EDIT ] \| [ DEL ]
📄 get-layers-list	277 B	[ EDIT ] \| [ DEL ]
📄 group	791 B	[ EDIT ] \| [ DEL ]
📄 histogram	319 B	[ EDIT ] \| [ DEL ]
📄 indent	378 B	[ EDIT ] \| [ DEL ]
📄 knbhd	1,226 B	[ EDIT ] \| [ DEL ]
📄 maxdeg	307 B	[ EDIT ] \| [ DEL ]
📄 path	449 B	[ EDIT ] \| [ DEL ]
📄 rotate	1,194 B	[ EDIT ] \| [ DEL ]
📄 scale	1,147 B	[ EDIT ] \| [ DEL ]
📄 scalexy	1,123 B	[ EDIT ] \| [ DEL ]
📄 span	139 B	[ EDIT ] \| [ DEL ]
📄 topon	429 B	[ EDIT ] \| [ DEL ]
📄 treetoclust	988 B	[ EDIT ] \| [ DEL ]

[ CLOSE ]

EDIT: scalexy

/* finds root node of graph.
 * scales the x and y position of all other nodes using, first,
 * ARGV[0], or $G.scale.
 * 
 * The expected syntax is "x,y" where at least one of x or y must
 * be given. If only one is given, the other is taken as 1.
 */
BEGIN {
  double scalex, scaley;
  int r, done;

int setScale (char* s) 
  {
    if ((sscanf (s, ",%f",&scaley))) {
        scalex = 1;
        return 1;
    }
    else {
      r = sscanf (s, "%f,%f",&scalex,&scaley);
      if (r) {
        if (r == 1) scaley = 1;
        return 1;
      }
    }
    return 0;
  }

}

BEG_G {
  node_t ctr = node($,aget($,"root"));
  double cx, cy, x, y, delx;
  
  /* get scale argument */
  done = 0;
  if (ARGC == 1)
    done = setScale (ARGV[0]);
  if (!done && isAttr($,"G","scale"))
    done = setScale ($.scale);
  if (!done)
    scalex = scaley = 1.0;

if ((scalex == 1.0) && (scaley == 1.0))
    exit (0);

$.bb = "";
  sscanf (ctr.pos, "%f,%f", &cx, &cy);
}
N [$ != ctr] {
    sscanf ($.pos, "%f,%f", &x, &y);
    delx = scalex*(x - cx) + cx;
    dely = scaley*(y - cy) + cy;
    $.pos = sprintf ("%f,%f", delx, dely);
}