Perpotongan dua garis - 2

\path[name path=g2] (B)--(Q);
\path[name path=g3] (A)--($(A)!3cm!90:(B)$) coordinate (S);
\path[name intersections={of = g2 and g3, by={C}}];