x=$='*~(15-:%)%_     -- list of x coord of "*"s
y=$='*~(15-:)%_-     -- list of y coord ditto
f=x*M/(y|~-y)`(y~)   -- order
r="(" x ", " y ")" % -- format
f!r                  -- sort