(c12)
block([plot_style:dragstyle],drag(3))$

picture

(c3)
block([plot_style:dragstyle],zrp(8))$

picture