Source position: agraphics.pas line 2133
function ObtainPen(
Cm: PColorMap;
N: LongInt;
R: LongWord;
G: LongWord;
B: LongWord;
F: LongInt
):LongWord;