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 */
if(sym) tmp_at(-1, sym); /* open call */
tmp_at(-1, -1); /* close call */
if(sym) tmp_at(bhitpos.x, bhitpos.y);
tmp_at(-1, (levl[(int)bhitpos.x][(int)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 */