2 files changed, 22 insertions(+), 0 deletions(-)

A electronics/kicad/etc/.gitignore
A electronics/kicad/etc/sort-pads.moon

@@ 0,0 1,1 @@
+*.lua

@@ 0,0 1,21 @@
+preamble, entries, postamble = {}, {}, {}
+
+for l in assert io.lines arg[1]
+    t = l\match'^  %(pad' and entries or #entries > 0 and postamble or preamble
+    table.insert t, l
+
+table.sort entries, (a, b) ->
+    ax, ay = a\match '%(at (%-?[%d.]+) (%-?[%d.]+)%)'
+    bx, by = b\match '%(at (%-?[%d.]+) (%-?[%d.]+)%)'
+    if not ax or not bx
+        error 'no at found'
+    if ax == bx
+        return tonumber(ay) < tonumber(by)
+    return tonumber(ax) < tonumber(bx)
+
+for l in *preamble
+    print l
+for l in *entries
+    print l
+for l in *postamble
+    print l