chiark / gitweb /
turntables are in parts
authorian <ian>
Tue, 10 Feb 2004 22:46:02 +0000 (22:46 +0000)
committerian <ian>
Tue, 10 Feb 2004 22:46:02 +0000 (22:46 +0000)
layout/ours.m4
layout/parts.i4

index 96905d3546f72137fe289d04875a829b696a8bb7..62381f210f832fc9114196ea667eb0e795e03f44 100644 (file)
@@ -286,24 +286,22 @@ layer 20
 
 #---------- hill stations turntable
 
-defobj tt_corner
- layer 20
- abs mid 200 200 0
- extend mid out len 80
- extend -mid -in len 80
- extend out sout ang 45 -230
- extend -in -sin ang 45 230
-
- layer l20
- rel in forcirc0 80 80 0
- rel forcirc0 forcirc1 0 -160 180
- join forcirc0 forcirc1 0
- join forcirc1 forcirc0 0
-
- layer s20
- extend sin cnr upto sout
-enddef
-
-part tt tt_corner cnr -sq_br_i
+#defobj tt_corner
+# layer 20
+# abs mid 200 200 0
+# extend out sout ang 45 -230
+# extend -in -sin ang 45 230
+
+# layer l20
+# rel in forcirc0 80 80 0
+# rel forcirc0 forcirc1 0 -160 180
+# join forcirc0 forcirc1 0
+# join forcirc1 forcirc0 0
+
+# layer s20
+# extend sin cnr upto sout
+#enddef
+
+#part tt tt_corner cnr -sq_br_i
 
 eof
index 9bdee00bc5b79846e131527aec3198e7ee677ccd..b86f6a60a16c3dcb7df220e54986f828f8718cac 100644 (file)
@@ -155,3 +155,64 @@ defpart scis_shino
   join br ml 315
   join ml tl 315
 enddef
+
+define(`tt_do_circle',`
+ layer s
+ rel mid forcirc0$2 0 $1 0
+ rel mid forcirc1$2 0 -$1 180
+ layer l
+ join forcirc0$2 forcirc1$2 0
+ join forcirc1$2 forcirc0$2 0
+ layer =
+')
+
+defpart tt_peco
+ layer =
+ abs mid 200 200 0
+ extend mid out len 80
+ extend -mid -in len 80
+
+ tt_do_circle(80, `')
+enddef
+
+define(`tt_atlas_out',`
+ layer s
+ rel mid mid$1 0 0 $1
+ layer =
+ rel mid$1 out$1 109 0
+')
+
+defpart tt_atlas
+ layer =
+ abs mid 200 200 0
+ extend mid out len 109
+ extend -mid -in len 109
+
+ tt_atlas_out(`0')
+ tt_atlas_out(`15')
+ tt_atlas_out(`30')
+ tt_atlas_out(`45')
+ tt_atlas_out(`60')
+ tt_atlas_out(`75')
+ tt_atlas_out(`90')
+ tt_atlas_out(`105')
+ tt_atlas_out(`120')
+ tt_atlas_out(`135')
+ tt_atlas_out(`150')
+ tt_atlas_out(`165')
+ tt_atlas_out(`180')
+ tt_atlas_out(`195')
+ tt_atlas_out(`210')
+ tt_atlas_out(`225')
+ tt_atlas_out(`240')
+ tt_atlas_out(`255')
+ tt_atlas_out(`270')
+ tt_atlas_out(`285')
+ tt_atlas_out(`300')
+ tt_atlas_out(`315')
+ tt_atlas_out(`330')
+ tt_atlas_out(`345')
+
+ tt_do_circle(95.25, i)
+ tt_do_circle(109, `')
+enddef