revert between 56095 -> 55830 in arch
[AROS.git] / rom / graphics / setapen.c
blobeb3905253e2cf7782a927f70151435992c542e78
1 /*
2 Copyright © 1995-2011, The AROS Development Team. All rights reserved.
3 $Id$
5 Desc: Graphics function SetAPen()
6 Lang: english
7 */
9 #include "graphics_intern.h"
10 #include "gfxfuncsupport.h"
12 /*****************************************************************************
14 NAME */
15 #include <graphics/rastport.h>
16 #include <proto/graphics.h>
18 AROS_LH2(void, SetAPen,
20 /* SYNOPSIS */
21 AROS_LHA(struct RastPort *, rp, A1),
22 AROS_LHA(ULONG , pen, D0),
24 /* LOCATION */
25 struct GfxBase *, GfxBase, 57, Graphics)
27 /* FUNCTION
28 Set primary pen for rastport
30 INPUTS
31 rp - RastPort
32 pen - pen number (0...255)
34 RESULT
36 NOTES
37 This functions turns on PenMode for the RastPort.
39 EXAMPLE
41 BUGS
43 SEE ALSO
45 INTERNALS
47 HISTORY
48 29-10-95 digulla automatically created from
49 graphics_lib.fd and clib/graphics_protos.h
51 *****************************************************************************/
53 AROS_LIBFUNC_INIT
55 rp->FgPen = pen;
56 rp->linpatcnt = 15;
57 rp->Flags &= ~RPF_NO_PENS;
59 AROS_LIBFUNC_EXIT
60 } /* SetAPen */