From 4e7ba25af3acd352b74ac9900e10424fd89958be Mon Sep 17 00:00:00 2001
From: ian <ian>
Date: Mon, 26 Jan 2004 02:09:07 +0000
Subject: [PATCH] initially, some points

---
 layout/parts.i4 | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)
 create mode 100644 layout/parts.i4

diff --git a/layout/parts.i4 b/layout/parts.i4
new file mode 100644
index 0000000..fbca4f9
--- /dev/null
+++ b/layout/parts.i4
@@ -0,0 +1,24 @@
+define(`def_ord_pt',`
+ dnl OBJNAME-EXCLUDING-PT-L STRAIGHT-L CURVE-SHORTER CURVE-DIVERGE-Y
+ defobj pt_$1l
+  abs c 200 200 0
+  extend c a len $3
+  rel a b $4 $5 $2
+  join c b 0
+ enddefobj
+ defobj pt_$1r
+  abs c 200 200 0
+  objflip pt_$1l c c =
+ enddefobj
+')
+
+def_ord_pt(`peco_228',22.5, 87,  -0.5, -17)
+def_ord_pt(`peco_457',14,  126.5,-1.55,-13.21)
+def_ord_pt(`peco_914', 8,  160,  -0.4, -13.21)
+ # catalogue says 123.7 for STRAIGHT-L ?!
+
+abs o 200 200 30
+obj pt_peco_914r o c =
+
+#extend c bx ang 22.5 -239.797
+#extend c b len 94.168 -239.797
-- 
2.30.2