|
|
DataMuseum.dkPresents historical artifacts from the history of: DKUUG/EUUG Conference tapes |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about DKUUG/EUUG Conference tapes Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - downloadIndex: T u
Length: 822 (0x336)
Types: TextFile
Names: »useful.c«
└─⟦b20c6495f⟧ Bits:30007238 EUUGD18: Wien-båndet, efterår 1987
└─⟦this⟧ »EUUGD18/General/Tetris/useful.c«
/*
** 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((char *) window0, sizeof(window0), ' ');
refresh();
}