\rput{10}{%
  \pstGeonode[PosAngle={0,-90,-90,90}]
     (1,-1){O}(2,1){A}(2,0.1){B}(2.5,1){C}}
\pstCircleOA[linecolor=red]{C}{B}
\pstInterCC[PosAngleA=135, CodeFigA=true, CodeFigAarc=false,
  CodeFigColor=magenta]{O}{A}{C}{B}{D}{E}
\pstInterCC[PointSymbolB=none, PointNameB=none,
  PosAngleA=170, CodeFigA=true, CodeFigAarc=false,
  CodeFigColor=green]{B}{E}{C}{B}{F}{G}