print index('@'.($t->pointerx - $t->rootx).','.($t->pointery - $t->rooty));