Tmp_at
void Tmp_at(schar, schar);
Tmp_at(-1, sym);/* open call */
Tmp_at(bchx, bchy);
Tmp_at(-1, -1);
Tmp_at(-1, '*'); /* open call */
Tmp_at(zx, zy);
Tmp_at(-1, -1); /* closing call */
Tmp_at(-1, dirlet(dx, dy)); /* open call */
Tmp_at(sx, sy);
Tmp_at(-2, dirlet(dx, dy));
Tmp_at(-2, dirlet(dx, dy));
Tmp_at(-1, -1);