u:=1cm;
pair a,b;
a := (3,4)*u;
b := (0.5,0)*u;
draw a--b;
ang = angle(a shifted -b);
pair m;
m := 1/2[a,b];
path p[];
p1 := (-0.3,0)*u -- (0.3,0)*u ;
draw p1 rotated (ang+45) shifted m dashed evenly withcolor red;
draw p1 rotated (ang-45) shifted m dashed evenly withcolor red;
show angle(a shifted -b);
paste to here