Merge branch 'master' of ssh://git.gag.com/scm/git/hw/altusmetrum

[hw/altusmetrum] / packages / mlp8-4x3.5c

diff --git a/packages/mlp8-4x3.5c b/packages/mlp8-4x3.5c
index a00f536917acbc31d3f54d51c2ee4b525bc08dc9..5105c2e0a99b5a4dba0c33d364586838cbb9bc6a 100644 (file)
--- a/packages/mlp8-4x3.5c
+++ b/packages/mlp8-4x3.5c
@@ -54,7 +54,7 @@ real pad_top(real x, real y, int n) {
        real    w_pad = pad_width + pad_side * 2;
        real    h_pad = pad_height + pad_outside + pad_inside;
        real    x_pad = x;
-       real    y_pad = y - pad_outside + h_pad/2;
+       real    y_pad = y + pad_outside - h_pad/2;
 
        pad_mm(x_pad, y_pad, w_pad, h_pad, sprintf("%d", n), sprintf("%d", n));
 }
@@ -63,7 +63,7 @@ real pad_bottom(real x, real y, int n) {
        real    w_pad = pad_width + pad_side * 2;
        real    h_pad = pad_height + pad_outside + pad_inside;
        real    x_pad = x;
-       real    y_pad = y - pad_height - pad_inside + h_pad/2;
+       real    y_pad = y - pad_outside + h_pad/2;
 
        pad_mm(x_pad, y_pad, w_pad, h_pad, sprintf("%d", n), sprintf("%d", n));
 }
@@ -75,17 +75,17 @@ corner(1, 1);
 
 real dot_off = -.3;
 
-line(-package_width/2 + dot_off, -package_height/2 + dot_off,
-     -package_width/2 + dot_off, -package_height/2 + dot_off);
+line(-package_width/2 + dot_off, package_height/2 - dot_off,
+     -package_width/2 + dot_off, package_height/2 - dot_off);
 
-for (pad = 0; pad < num_pad; pad++) {
+for (int pad = 0; pad < num_pad; pad++) {
        /* top (1-4) */
 
-       pad_top (pad_off_x(pad), -package_height / 2, pad + 1);
+       pad_top (pad_off_x(pad), package_height / 2, pad + 1);
 
        /* bottom (8-5) */
 
-       pad_bottom (pad_off_x(pad), package_height / 2, 8 - pad);
+       pad_bottom (pad_off_x(pad), -package_height / 2, 8 - pad);
 }