VAULT
troom->rtype = VAULT; /* treasure vault */
if(croom->rtype == VAULT) {
if(tmp < 0 || rooms[tmp].rtype != VAULT) {
if((i = inroom(nx,ny)) >= 0 && rooms[i].rtype == VAULT)