/state save def
/S { show } bind def
/M { moveto } bind def
/L { rlineto currentpoint stroke moveto } bind def
