Ctrl+F
to vee :distance
  if :distance < 5 [stop]
  setpensize :distance / 5
  make "extra random int :distance
  make "distance :distance + :extra
  if :distance < 10 [setc "red]
  left 15
  forward :distance
    vee :distance / 2
  back :distance
  right 30
  forward :distance
    vee :distance / 2
  back :distance
  left 15
  setc "brown  
  setpensize :distance / 5
end
Ctrl+F

cg ht pu bk 200 pd setc "brown vee 50