git.gag.com Git - hw/altusmetrum/blob - packages/c8x8.5c

   1 /*
   2  * Copyright © 2019 Keith Packard <keithp@keithp.com>
   3  *
   4  * This program is free software; you can redistribute it and/or modify
   5  * it under the terms of the GNU General Public License as published by
   6  * the Free Software Foundation, either version 2 of the License, or
   7  * (at your option) any later version.
   8  *
   9  * This program is distributed in the hope that it will be useful, but
  10  * WITHOUT ANY WARRANTY; without even the implied warranty of
  11  * MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
  12  * General Public License for more details.
  13  */
  14
  15 load "footprint.5c"
  16 import Footprint;
  17 element_args();
  18
  19 /* from the data sheet */
  20
  21 real pad_sep = 3.1;     /* a */
  22 real pad_width = 4.0;   /* b */
  23 real pad_height = 2.0;  /* C */
  24
  25 real pad_space = pad_sep + pad_width;
  26
  27 element_start("l8x8");
  28
  29 pad_mm(-pad_space/2, 0, pad_width, pad_height, "1", "1");
  30 pad_mm( pad_space/2, 0, pad_width, pad_height, "2", "2");
  31
  32 arc(0, 0, 8.3/2, 8.3/2, 0, 360);
  33
  34 real mark_x = -pad_space / 2 - pad_width / 2;
  35 real mark_y = -pad_height;
  36 real mark_width = pad_height;
  37 real mark_height = pad_height;
  38
  39 line(mark_x - mark_width / 2, mark_y, mark_x + mark_width / 2, mark_y);
  40 line(mark_x, mark_y - mark_height / 2, mark_x, mark_y + mark_height/2);
  41
  42 element_end();