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 u

⟦7181155f7⟧ TextFile

    Length: 813 (0x32d)
    Types: TextFile
    Names: »useful.c.orig«

Derivation

└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
    └─⟦this⟧ »EUUGD18/General/Tetris/useful.c.orig« 

TextFile

/*
** written by adam margulies vespa@ssyx.ucsc.edu
**                           {...}!ucbvax!ucscc!ssyx!vespa
**
** permission is granted to freely distribute this code provided that you:
**
** 1) don't charge for it
** 2) leave my name and header on it
** 3) clearly document your changes and place your name on them
**
*/
/* Tetris: useful.c														 */
/* these are functions that I find useful for all other function writing */
#include "tetris.h"
	
int pow(base, exponent)
int base, exponent;
{
	int tmp = 1;

	if (exponent == 0)
		return(1);

	if (exponent == 1)
		return(base);

	while (exponent--)
		tmp *= base;

	return(tmp);
}

void bfill(buf, len, ch)
char *buf, ch;
int len;
{
	while(len--)
		*buf++ = ch;
}

void cont_hand() {
	init_csr();
	bfill(window0, sizeof(window0), ' ');
	refresh();
}