\version "2.18.0"

stroke = \markup { 
  \postscript           
                   #"
  0.1     setlinewidth
  0.5 8   moveto
  0.5 0   lineto
  0.2 0.6 lineto
  0.5 0   moveto
  0.8 0.6 lineto
  stroke
"}

line = \markup { 
  \postscript           
                   #"
  0.1     setlinewidth
  0.5 8   moveto
  0.5 0   lineto
  stroke
"}


\relative c'' {
#(define RH rightHandFinger)
\override StrokeFinger.font-size = #'-2.3
\override StrokeFinger.font-shape = #'natural
  
  
  \times 4/5{ gis'16(\> b, g! d a)\!} s4
  
  \arpeggioArrowDown <gis''!^\tweak #'extra-offset #'(-3.1 . -1.8) -\RH#3 b, g! d a>4 \arpeggio s
  
 
  
   \once\override TextScript #'extra-offset = #'( 8 . -2.2 )
   \once\override TextScript #'rotation = #'(69 0 0)
  \times 4/5 {gis16_\stroke ^\tweak #'extra-offset #'(-.4 . -6.65) -\RH#3
               \> b, g! d a\!} s4
  
  \once\override TextScript #'extra-offset = #'( 8 . -2.2 )
  \once\override TextScript #'rotation = #'(69 0 0)
  \times 4/5 {gis''!16_\line ^\tweak #'extra-offset #'(-.4 . -6.65) -\RH#3
               \> b, g! d a\!} 
  
  
  
}