home *** CD-ROM | disk | FTP | other *** search
- /* wasp - copyright Steven Reiz 1990, 1991
- * see wasp.c for further info,
- * scrsz.c, 27/12/90, 8/7/91 - 9/7/91
- */
-
- #ifndef AMIGA
- #error AMIGA should be defined!
- #endif
-
- #ifdef AZTEC_C
- #include <functions.h>
- #endif
- #ifdef LATTICE
- #include <proto/exec.h>
- #include <proto/dos.h>
- #endif
- #include <graphics/view.h>
- #include <intuition/intuitionbase.h>
- #ifndef NOSH
- #include "scrsz.sh"
- #endif
-
- struct IntuitionBase *IntuitionBase;
- extern short scrw, scrh; /* also defined in wasp.h */
-
- #ifdef __STDC__
- get_scr_size(void)
- #else
- get_scr_size()
- #endif
- {
- struct ViewPort *vp;
-
- if (IntuitionBase=(struct IntuitionBase *)OpenLibrary("intuition.library", 0L)) {
- vp=IntuitionBase->ViewLord.ViewPort;
- scrw=vp->DWidth;
- scrh=vp->DHeight;
- if (vp->Modes & HIRES)
- scrw/=2;
- if (vp->Modes & LACE)
- scrh/=2;
- CloseLibrary((struct Library *)IntuitionBase);
- }
- }
-
-
- #ifdef DEBUG
- static long startticks;
- #ifdef __STDC__
- resetsecs(void)
- #else
- resetsecs()
- #endif
- {
- long dv[3];
-
- #ifdef AZTEC_C
- DateStamp(dv);
- #else
- DateStamp((struct DateStamp *)dv);
- #endif
- startticks=dv[1]*6000+dv[2]*2;
- }
-
-
- #ifdef __STDC__
- long centisecs(void)
- #else
- long centisecs()
- #endif
- {
- long curticks, dv[3];
-
- #ifdef AZTEC_C
- DateStamp(dv);
- #else
- DateStamp((struct DateStamp *)dv);
- #endif
- curticks=dv[1]*6000+dv[2]*2;
- return curticks-startticks;
- }
- #endif
-