extend -midx_bl -hj_a len 10 315
part hj ^pt_peco_sr a
-extend -hj_c l0_lst uptoang 90 315
-rel l0_lst l2_lst 0 -37
-rel l2_lst l3_lst 0 -37
-#rel l3_lst l4_lst 0 -37
-#rel l4_lst l5_lst 0 -37
-
#rel l0_jblx_c l2_pblx 0 37
#rel l2_pblx l3_pblx 0 37
#extend -l0_lst l0_jblx_c uptoang 0 -315
extend -hj_c -l0_jbl_b parallel demos!right_main_up 315
part l0_jbl ^pt_main_r b
+extend -l0_jbl_c l0_lst uptoang 90 315
+rel l0_lst l2_lst 0 -37
+rel l2_lst l3_lst 0 -37
+#rel l3_lst l4_lst 0 -37
+#rel l4_lst l5_lst 0 -37
+
rel -l0_jbl_c l2_pbl 0 -37
rel l2_pbl l3_pbl 0 -37
#silent:
extend l3_pbl -h_bbll upto l3_lst
-extend h_bbll h_bbll_c len 120
+extend h_bbll h_bbll_c len 150
part h_bbll ^pt_peco_sr c
extend h_bbll_b -h_bll_b uptoang 80 -230
part h_bll pt_peco_sr b
extend h_bll_a -demo_h_bbl_b parallel demos!right_short_down -230
part demo_h_bbl pt_peco_sr b
-extend hj_b hj_s1 len 40
-extend hj_s1 hj_s2 uptoang 135 -315
+extend hj_b hj_s1 len 0.0040
+extend hj_s1 hj_s2 uptoang 135 -230
#extend hj_s2 hj_ct uptoang 180 -230
-join hj_s2 h_bll_c 230
+
+extend -h_bll_c -hj_s9 ang 40 -230
+#join hj_s2 hj_s9 230
+join hj_s2 hj_s9 0
eof