-shiftOn = \property Voice.NoteColumn \set #'horizontal-shift = #1
-shiftOnn = \property Voice.NoteColumn \set #'horizontal-shift = #2
-shiftOnnn = \property Voice.NoteColumn \set #'horizontal-shift = #3
-shiftOff = \property Voice.NoteColumn \revert #'horizontal-shift
+% There's also dash, but setting dash period/length should be fixed.
+slurDotted = \override Slur #'dashed = #1
+slurSolid = \revert Slur #'dashed
+
+
+phrasingSlurUp = \override PhrasingSlur #'direction = #1
+phrasingSlurDown = \override PhrasingSlur #'direction = #-1
+phrasingSlurBoth = \revert PhrasingSlur #'direction
+
+shiftOn = \override NoteColumn #'horizontal-shift = #1
+shiftOnn = \override NoteColumn #'horizontal-shift = #2
+shiftOnnn = \override NoteColumn #'horizontal-shift = #3
+shiftOff = \revert NoteColumn #'horizontal-shift
+
+tieUp = \override Tie #'direction = #1
+tieDown = \override Tie #'direction = #-1
+tieBoth = \revert Tie #'direction