home *** CD-ROM | disk | FTP | other *** search
- /* GadTools layout toolkit
- **
- ** Copyright © 1993-1995 by Olaf `Olsen' Barthel
- ** Freely distributable.
- */
-
- #include "gtlayout_global.h"
-
- VOID __regargs
- LTP_SetPens(struct RastPort *rp, UWORD apen, UWORD bpen,UBYTE mode)
- {
- if(V39)
- SetABPenDrMd(rp,apen,bpen,mode);
- else
- {
- if(apen != rp -> FgPen)
- SetAPen(rp,apen);
-
- if(bpen != rp -> BgPen)
- SetBPen(rp,bpen);
-
- if(mode != rp -> DrawMode)
- SetDrMd(rp,mode);
- }
- }
-
-
- /*****************************************************************************/
-
-
- VOID __regargs
- LTP_SetAPen(struct RastPort *rp,UWORD apen)
- {
- ULONG Pen;
-
- if(V39)
- Pen = GetAPen(rp);
- else
- Pen = rp -> FgPen;
-
- if(Pen != apen)
- SetAPen(rp,apen);
- }
-
-
- /*****************************************************************************/
-
-
- VOID __regargs
- LTP_SetFont(LayoutHandle *handle,struct TextFont *font)
- {
- SetFont(&handle -> RPort,font);
-
- if(handle -> Window)
- SetFont(handle -> Window -> RPort,font);
- }
-