SHOPBASE
if (isbig(sroom) && i + SHOPBASE == WANDSHOP)
i = GENERAL - SHOPBASE;
sroom->rtype = i + SHOPBASE;