写出在前序线索二叉树中查找给定结点＊p的前序序列中的后继的算法。

在前序线索二叉树（Preorder Dotted Tree）中，每个节点除了常规的左孩子、右孩子指针外，还额外有一个线索，用于帮助遍历。如果某个节点是其父节点的前一个兄弟节点，那么它的线索就指向该父节点；如果不是，则线索通常会为空。

寻找给定结点*p的前序序列中的后继，需要按照以下步骤操作：

1. **检查当前节点**: 如果*p 的线索不为空，那么后继就是*p 线索所指的节点。
2. **检查右子树**: 否则，*p 没有前一个兄弟，后继可能是它右子树的第一个节点。如果*p 有右子节点，那么后继就是右子节点，否则后继不存在。
3. **递归搜索**: 如果右子节点也没有，再检查右子节点的线索，即右子节点的左子节点，这可能是*p 的后继（如果右子节点有左子节点的话）。

以下是伪代码描述这个过程：

function findSuccessor(p):
    if p->pre_order_dot is not null:
        return p->pre_order_dot
    else if p->right exists:
        return p->right
    else if p->right->left exists:
        // If right node has a left child, its left child is the successor
        return p->right->left
    else:
        // No successor in the current tree branch
        return null