DataMuseum.dk

Presents historical artifacts from the history of:

DKUUG/EUUG Conference tapes

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

See our Wiki for more about DKUUG/EUUG Conference tapes

Excavated with: AutoArchaeologist - Free & Open Source Software. 

top - metrics - download
Index: T r

⟦50860a21c⟧ TextFile

    Length: 2206 (0x89e)
    Types: TextFile
    Names: »rotate.c«

Derivation

└─⟦a0efdde77⟧ Bits:30001252 EUUGD11 Tape, 1987 Spring Conference Helsinki
    └─⟦526ad3590⟧ »EUUGD11/gnu-31mar87/X.V10.R4.tar.Z« 
        └─⟦2109abc41⟧ 
            └─⟦this⟧ »./X.V10R4/xtrek/rotate.c«

TextFile

#ifndef lint
static char *rcsid_rotate_c = "$Header: rotate.c,v 10.1 86/11/30 15:28:23 jg Rel $";
#endif	lint
/* Copyright (c) 1986 	Chris Guthrie */

#include <stdio.h>
#include <math.h>



#define xx_width 16
#define xx_height 16

static short xx_bits[] = {
  0xfc3f, 0xf81f, 0xf00f, 0xf00f,
   0xf00f, 0xf81f, 0xfc3f, 0xf66f,
   0xf66f, 0xf66f, 0xf00f, 0xf66f,
   0xf66f, 0xf7ef, 0xf7ef, 0xf7ef};
int start[16][16];
int finish[16][16];

main()
{
    register int i, j;
    int bit;
    double deg = 3.14159 / 2;

    for (j = 0; j < 16; j++) {
	for (i = 0; i < 16; i++) {
		start[i][j] = (xx_bits[j] & 1);
		xx_bits[j] >>= 1;
	}
    }
    for (j = 0; j < 16; j++) {
	for (i = 0; i < 16; i++) {
	    if (start[i][j])
		finish[15-j][i] = 1;
	    else
		finish[15-j][i] = 0;
	}
    }
    fprintf(stderr, "#define xx_width 16\n");
    fprintf(stderr, "#define xx_height 16\n");
    fprintf(stderr, "static short xx_bits[] = {");
    for (j = 0; j < 16; j++) {
	bit = 0;
	for (i = 0; i < 16; i++) {
	    bit += (finish[i][j] << i);
	}
	if (!(j % 4))
	    fprintf(stderr, "\n    ", bit);
        fprintf(stderr, "0x%x, ", bit);
    }
    fprintf(stderr, "};\n");

    for (j = 0; j < 16; j++) {
	for (i = 0; i < 16; i++) {
	    if (finish[i][j])
		start[15-j][i] = 1;
	    else
		start[15-j][i] = 0;
	}
    }
    fprintf(stderr, "#define xx_width 16\n");
    fprintf(stderr, "#define xx_height 16\n");
    fprintf(stderr, "static short xx_bits[] = {");
    for (j = 0; j < 16; j++) {
	bit = 0;
	for (i = 0; i < 16; i++) {
	    bit += (start[i][j] << i);
	}
	if (!(j % 4))
	    fprintf(stderr, "\n    ", bit);
        fprintf(stderr, "0x%x, ", bit);
    }
    fprintf(stderr, "};\n");
    for (j = 0; j < 16; j++) {
	for (i = 0; i < 16; i++) {
	    if (start[i][j])
		finish[15-j][i] = 1;
	    else
		finish[15-j][i] = 0;
	}
    }
    fprintf(stderr, "#define xx_width 16\n");
    fprintf(stderr, "#define xx_height 16\n");
    fprintf(stderr, "static short xx_bits[] = {");
    for (j = 0; j < 16; j++) {
	bit = 0;
	for (i = 0; i < 16; i++) {
	    bit += (finish[i][j] << i);
	}
	if (!(j % 4))
	    fprintf(stderr, "\n    ", bit);
        fprintf(stderr, "0x%x, ", bit);
    }
    fprintf(stderr, "};\n");

}