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 i

⟦cd81dbd66⟧ TextFile

    Length: 517 (0x205)
    Types: TextFile
    Names: »init.c«

Derivation

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

TextFile

#include "adv.h"

/*
 * Initialize game variables.  Move to init room; carrying nothing;
 * light has full time; move items to initial rooms; set vars to 0.
 * Clear the base window and print the startup message.
 */
init()
{
	register int i;
	register struct item *ip;

	rm = i_rm;
	littim = litmax;
	for (ip = items; ip < iteme; ip++)
		ip->rm = ip->i_rm;
	for (i = 0; i < 256; ++i)
		var[i] = 0;
	isend = FALSE;

	CurWin = BaseWin;
	Wclear(BaseWin, 2);
	WAcursor(BaseWin, ROWS - 1, 0);
	prt(msg[0]);
	prt("\n");
}