home *** CD-ROM | disk | FTP | other *** search
- /* amiga_render.c -- Rendering for AmigaDOS
- Copyright (C) 1993, 1994 John Harper <jsh@ukc.ac.uk>
-
- This file is part of Jade.
-
- Jade is free software; you can redistribute it and/or modify it
- under the terms of the GNU General Public License as published by
- the Free Software Foundation; either version 2, or (at your option)
- any later version.
-
- Jade is distributed in the hope that it will be useful, but
- WITHOUT ANY WARRANTY; without even the implied warranty of
- MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
- GNU General Public License for more details.
-
- You should have received a copy of the GNU General Public License
- along with Jade; see the file COPYING. If not, write to
- the Free Software Foundation, 675 Mass Ave, Cambridge, MA 02139, USA. */
-
- #include "jade.h"
- #include "jade_protos.h"
-
- #ifdef _DCC
- # define GfxBase_DECLARED
- #endif
- #include <clib/graphics_protos.h>
- #include <graphics/gfxbase.h>
- #include <graphics/gfxmacros.h>
-
- _PR void sys_scroll_vw(VW *, long);
-
- extern struct GfxBase *GfxBase;
-
- /*
- * Scrolls the view `lines' towards line 0,
- */
- void
- sys_scroll_vw(VW *vw, long lines)
- {
- struct RastPort *rp = vw->vw_WindowSys.ws_Rp;
- ScrollRaster(rp, 0, lines * vw->vw_FontY, vw->vw_XStartPix,
- vw->vw_YStartPix, vw->vw_XEndPix,
- vw->vw_YStartPix + (vw->vw_MaxY * vw->vw_FontY) - 1);
- }
-