DataMuseum.dk

Presents historical artifacts from the history of:

Commodore CBM-900

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Commodore CBM-900

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download

⟦5160647c3⟧ TextFile

    Length: 2409 (0x969)
    Types: TextFile
    Notes: UNIX file
    Names: »pattern.c«

Derivation

└─⟦f27320a65⟧ Bits:30001972 Commodore 900 hard disk image with partial source code
    └─⟦2d53db1df⟧ UNIX Filesystem
        └─⟦this⟧ »frankh/format/pattern.c« 
        └─⟦this⟧ »frankh/src/pattern.c« 
        └─⟦this⟧ »sys/z8001/diag/pattern.c«

TextFile

/* (-lgl
 * 	The information contained herein is a trade secret of Mark Williams
 * 	Company, and  is confidential information.  It is provided  under a
 * 	license agreement,  and may be  copied or disclosed  only under the
 * 	terms of  that agreement.  Any  reproduction or disclosure  of this
 * 	material without the express written authorization of Mark Williams
 * 	Company or persuant to the license agreement is unlawful.
 * 
 * 	COHERENT Version 0.7.3
 * 	Copyright (c) 1982, 1983, 1984.
 * 	An unpublished work by Mark Williams Company, Chicago.
 * 	All rights reserved.
 -lgl) */
char	databuf[512];

char	extrabuf[512];

unsigned char	pattern[512] = {
0,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0,
255,255,255,255, 255,255,255,255, 255,255,255,255, 255,255,255,255,
170,170,170,170, 170,170,170,170, 170,170,170,170, 170,170,170,170,
89,89,89,89, 89,89,89,89, 89,89,89,89, 89,89,89,89,
0,255,0,255, 0,255,0,255, 0,255,0,255, 0,255,0,255,
255,0,255,0, 255,0,255,0, 255,0,255,0, 255,0,255,0,
170,89,170,89, 170,89,170,89, 170,89,170,89, 170,89,170,89,
89,170,89,170, 89,170,89,170, 89,170,89,170, 89,170,89,170,
0,89,170,255, 0,89,170,255, 0,89,170,255, 0,89,170,255,
255,170,89,0, 255,170,89,0, 255,170,89,0, 255,170,89,0,
0,170,89,255, 0,170,89,255, 0,170,89,255, 0,170,89,255,
0,89,170,255, 0,89,170,255, 0,89,170,255, 0,89,170,255,
0,0,255,255, 0,0,255,255, 0,0,255,255, 0,0,255,255,
255,255,0,0, 255,255,0,0, 255,255,0,0, 255,255,0,0,
89,89,170,170, 89,89,170,170, 89,89,170,170, 89,89,170,170,
170,170,89,89, 170,170,89,89, 170,170,89,89, 170,170,89,89,
255,0,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0,
255,255,0,0, 0,0,0,0, 0,0,0,0, 0,0,0,0,
255,255,255,0, 0,0,0,0, 0,0,0,0, 0,0,0,0,
255,255,255,255, 0,0,0,0, 0,0,0,0, 0,0,0,0,
255,255,255,255, 255,0,0,0, 0,0,0,0, 0,0,0,0,
255,255,255,255, 255,255,0,0, 0,0,0,0, 0,0,0,0,
255,255,255,255, 255,255,255,0, 0,0,0,0, 0,0,0,0,
255,255,255,255, 255,255,255,255, 0,0,0,0, 0,0,0,0,
255,255,255,255, 255,255,255,255, 255,0,0,0, 0,0,0,0,
255,255,255,255, 255,255,255,255, 255,255,0,0, 0,0,0,0,
255,255,255,255, 255,255,255,255, 255,255,255,0, 0,0,0,0,
255,255,255,255, 255,255,255,255, 255,255,255,255, 0,0,0,0,
255,255,255,255, 255,255,255,255, 255,255,255,255, 255,0,0,0,
255,255,255,255, 255,255,255,255, 255,255,255,255, 255,255,0,0,
255,255,255,255, 255,255,255,255, 255,255,255,255, 255,255,255,0,
255,255,255,255, 255,255,255,255, 255,255,255,255, 255,255,255,255};