chiark / gitweb /
big circle templates as well as little ones
[trains.git] / layout / dualjn.m4
index fc6a170266117dfcab7959ce809b198b10bcda7e..05807021c92c2de26805faea616cdc5516331fc4 100644 (file)
@@ -1,6 +1,10 @@
+define(pt_circ, pt_peco_sr)
+define(radius_circ, 230)
+
 include(parts.i4)
+include(circles.i4)
 
-abs pt_i_c 600 800 130
+abs pt_i_c 400 800 130
 part pt_i pt_peco_cl c
 extend pt_i_a x_bl ang 1 -315
 # len 0.0001
@@ -24,5 +28,10 @@ extend -pt_o_c -o_begin uptoang 180 315
 #extend pt_o_a so_end uptoang 180 -315
 rel si_end so_end 0 37
 
-abs c230l 1500 600 90
-extend c230l c230ll ang 359 230
+abs tcp0_p_c 1500 1100 90
+part tcp0 tricirpair p_c
+
+abs tcp1_p_c 1500 400 90
+part tcp1 ^tricirpair p_c
+
+circle(600,800)