summaryrefslogtreecommitdiff
path: root/metapost
diff options
context:
space:
mode:
authorMarius <mariausol@gmail.com>2011-10-18 23:20:15 +0300
committerMarius <mariausol@gmail.com>2011-10-18 23:20:15 +0300
commit1e72402c3201340b2bd4452ed11bfb45bccabc4a (patch)
tree8ad5259c7000597be196cc3fd48ae055d57e756a /metapost
parentfbaf4b2bb7fec1ba72bf646ff65bbb1398478c2a (diff)
downloadcontext-1e72402c3201340b2bd4452ed11bfb45bccabc4a.tar.gz
beta 2011.10.18 22:09
Diffstat (limited to 'metapost')
-rw-r--r--metapost/context/base/mp-char.mpiv14
1 files changed, 14 insertions, 0 deletions
diff --git a/metapost/context/base/mp-char.mpiv b/metapost/context/base/mp-char.mpiv
index f2bbb8b68..5450ed972 100644
--- a/metapost/context/base/mp-char.mpiv
+++ b/metapost/context/base/mp-char.mpiv
@@ -654,6 +654,12 @@ def flow_connect_left_right (expr xfrom,yyfrom,zfrom) (expr xto,yyto,zto) =
flow_xypoints[3] := flow_y_on_grid(2,yfrom,yto,zfrom) ;
flow_xypoints[4] := flow_xy_on_grid(5,3) ;
fi ;
+ %%%% begin experiment
+ if flow_dsp_y <> 0 :
+ flow_xypoints[3] := flow_xypoints[3] shifted (0,-flow_dsp_y) ;
+ flow_xypoints[4] := flow_xypoints[4] shifted (0,-flow_dsp_y) ;
+ fi ;
+ %%%% end experiment
flow_draw_connection ;
fi ;
enddef ;
@@ -783,6 +789,14 @@ def flow_connect_top_top (expr xfrom,yyfrom,zfrom) (expr xto,yyto,zto) =
flow_xypoints[3] := flow_x_on_grid(2,xfrom,xto,zfrom) ;
flow_xypoints[4] := flow_xy_on_grid(3,5) ;
fi ;
+ %%%% begin experiment (todo: not value but just + and )
+ if flow_dsp_y <> 0 :
+ flow_xypoints[2] := flow_xypoints[2] shifted (0,flow_dsp_y) ;
+ flow_xypoints[3] := flow_xypoints[3] shifted (0,flow_dsp_y) ;
+ flow_xypoints[4] := flow_xypoints[4] shifted (0,flow_dsp_y) ;
+ flow_xypoints[5] := flow_xypoints[5] shifted (0,flow_dsp_y) ;
+ fi ;
+ %%%% end experiment
flow_draw_connection ;
fi ;
enddef ;