***You can do some tricks w/ diesel. For example (place in menu): ***[Line breaks not noted w/ a "+" are a function of your browser] [Obj Snap Toggle]$M=$(if,$(>,$(getvar,osmode),0),'_setvar;+ osmode;0,'_setvar;osmode;39) [Delete Layer(s)]^C^C^C_layer;t;0;s;0;f;*;unlock;*;lock;0;t;\;_erase;all; [MoveRotate]^C^C_select;auto;\_move;p;;\\_rotate;p;;\\redraw [CopyRotate]^C^C_select;auto;\_copy;p;;0,0;0,0;_move;p;;\\_rotate;+ p;;\\redraw [Change to current]^C^C_select;auto;\_change;_p;;_p;_la;+ $M=$(getvar,clayer);_c;_bylayer;lt;bylayer;; [Explode to current]^C^C_select;auto;\_explode;p;;_change;+ _p;;_p;_la;$M=$(getvar,clayer);_c;_bylayer;lt;bylayer;; [RevCloud]^C^C^C_plinewid;0;_pline;\a;a;110;\a;110;\a;110;\a;110;\a;110;\ ****note:add more "a;110;\" for more arcs. draw ccw [$(eval,"1/2 snap "$(/,$(rtos,$(getvar,snapunit)),2))]'_SETVAR;SNAPUNIT;+ $M=$(/,$(getvar,snapunit),2),$M=$(/,$(getvar,snapunit),2) [Snapang +5]'_SETVAR;SNAPANG;$M=$(+,$(angtos,$(getvar,snapang),0),5) [Upd Text St]^C^C_select;single;\_change;_previous;;;;+ $M=$(getvar,textstyle);;;;