[pstricks] Geradenbüschel

[Hendrik Maryns]

Thanks a lot Herbert and others,

What is pstricks-add for?  I don’t seem to need it.  pst-eucl
automatically loads pstricks.

This is exactly what I had in mind:

\documentclass{scrartcl}
\usepackage{pst-eucl}

\def\NodeLine(#1)(#2)#3{%
  \pnode(#1){#3-1}\pnode(#2){#3-2}
  \pcline(#3-1)(#3-2)}
\begin{document}

\begin{pspicture}(5,5)
  \rput(3,5){%
   \NodeLine(1;70)(4.5;250){A}
   \NodeLine(1;91)(4;271){B}
   \NodeLine(1;115)(4;295){C}
   \NodeLine(1;133)(4.3;313){D}%
  }
  \uput[10](3,5){C}
  \NodeLine(1.2,1.6)(5.1,3.7){a}
  \uput[180](1.2,1.6){a}
  \NodeLine(1,1)(6,2.5){b}
  \uput[180](1,1){b}
  \pstInterLL[PointSymbol=none,PosAngle=135]{A-1}{A-2}{a-1}{a-2}{A_1}
  \pstInterLL[PointSymbol=none,PosAngle=-10]{B-1}{B-2}{a-1}{a-2}{A_2}
  \pstInterLL[PointSymbol=none,PosAngle=-20]{C-1}{C-2}{a-1}{a-2}{A_3}
  \pstInterLL[PointSymbol=none,PosAngle=-10]{D-1}{D-2}{a-1}{a-2}{A_4}
  \pstInterLL[PointSymbol=none,PosAngle=-30]{A-1}{A-2}{b-1}{b-2}{B_1}
  \pstInterLL[PointSymbol=none,PosAngle=-25]{B-1}{B-2}{b-1}{b-2}{B_2}
  \pstInterLL[PointSymbol=none,PosAngle=-25]{C-1}{C-2}{b-1}{b-2}{B_3}
  \pstInterLL[PointSymbol=none,PosAngle=-90]{D-1}{D-2}{b-1}{b-2}{B_4}
\end{pspicture}

\end{document}

(Maybe add this to the examples section under ‘Projective geometry’?)

Cheers, H.

P.S. Something seems wrong with the encoding of the digest, I see my ü
turn into a ?, also the í from Luís.
-- 
Hendrik Maryns
!!!NIEUW/NEU/NEW!!!
Lavendelstraat 44
NL-2034 MJ Haarlem
+31237370263
+31634861841
http://www.tcl-sfs.uni-tuebingen.de/hendrik/
===========
signature.asc?!?
http://nl.wikipedia.org/wiki/PGP
http://de.wikipedia.org/wiki/PGP
http://en.wikipedia.org/wiki/PGP

-------------- next part --------------
A non-text attachment was scrubbed...
Name: signature.asc
Type: application/pgp-signature
Size: 259 bytes
Desc: OpenPGP digital signature
URL: <http://tug.org/pipermail/pstricks/attachments/20100911/625d5bb0/attachment.bin>