File:  [CSRG BSD Unix] / 43BSDTahoe / new / X / libibm / libsrc / apa16.c
Revision 1.1.1.1 (vendor branch): download - view: text, annotated - select for diffs
Tue Apr 24 16:12:58 2018 UTC (8 years, 1 month ago) by root
Branches: MAIN, BSD
CVS tags: HEAD, BSD43tahoe
BSD 4.3tahoe

#ifndef lint
static char *rcsid_apa16_c = "$Header: /var/lib/cvsd/repos/CSRG/43BSDTahoe/new/X/libibm/libsrc/apa16.c,v 1.1.1.1 2018/04/24 16:12:58 root Exp $";
#endif	lint
/* apa16.c - APA16 controller initialization
 *
 * 	apa16_init	APA16 initialization routine
 *
 *  	Author:
 *		Scott Bates
 *		Brown University
 *		IRIS, Box 1946
 *      	Providence, RI 02912
 *
 *
 *		Copyright (c) 1986 Brown University
 *
 * Permission to use, copy, modify and distribute this software and its
 * documentation for any purpose and without fee is hereby granted, provided
 * that the above copyright notice appear in all copies, and that both
 * that copyright notice and this permission notice appear in supporting
 * documentation, and that the name of Brown University not be used in
 * advertising or publicity pertaining to distribution of the software
 * without specific, written prior permission. Brown University makes no
 * representations about the suitability of this software for any purpose.
 * It is provided "as-is" without express or implied warranty.
 */

#include "private.h"
#include "bitblt.h"
#include "apa16.h"

/*
 * Initialize APA16
 */

apa16_init()
{

#ifdef TRACE_X
        fprintf (stderr, "In apa16_init\n");
        fflush (stderr);
#endif TRACE_X

        /*
         * Initialize (reset) the APA16 screen
         */

        RESET_APA16();
        *(short *)MR = MR_DEFAULT;
        *(short *)CSR = WHITE_ON_BLACK;
        ENABLE_VD_OUT();
 
        /*
         * Test for the APA16 screen.
         */

        *(char *)SCREEN_BASE = 0x0F;
        if (*(char *)SCREEN_BASE != 0x0F) {
		/*
		 * Log error and exit
		 */

                DeviceError("apa16 not found !!");
		exit(2);
        }
}

unix.superglobalmegacorp.com

This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.