tmp_at
void tmp_at(schar, schar);
tmp_at(-1, md->data->mlet); /* open call */
tmp_at(fx, fy);
tmp_at(-1, -1); /* close call */
tmp_at(-1, sym);/* open call */
tmp_at(-1, -1); /* close call */
tmp_at(bhitpos.x, bhitpos.y);
tmp_at(-1, (levl[bhitpos.x][bhitpos.y].typ == POOL) ? -1 : 0);
tmp_at(-1, sym); /* open call */
tmp_at(-2, sym);/* change let call */
tmp_at(-1, -1);
tmp_at(-1, -1);
tmp_at(bhitpos.x, bhitpos.y);
tmp_at(-1, -1); /* do not leave last symbol */