resident.vtc

来自「Unix下的MUD客户端程序」· VTC 代码 · 共 19 行

// Periodic mail check
mailcheck_interval = 60;
func mailcheck() [fname, oldsize, newsize] {
	fname = getenv("MAIL");
	if (!fname)
		return;
	mail_checking = 1;
	oldsize = fsize(fname);
	while (1) {
		sleep(mailcheck_interval);
		newsize = fsize(fname);
		if (newsize > oldsize)
			output("<!> You have new mail.\n");
		oldsize = newsize;
	}
}
if (!mail_checking) detach(.mailcheck);