中序遍历线索二叉树

先上效果图：

#include<stdio.h>
#include<stdlib.h>
#define TElemType char
typedef enum{Link, Thread} PointerTag;//分别为0,1 

typedef struct BiThrNode{
	TElemType data;
	struct BiThrNode *lchild, *rchild;
	PointerTag LTag;
	PointerTag RTag;
}BiThrNode, *BiThrTree;
//创建二叉链表 
bool CreateBiTree(BiThrTree *T){
	TElemType ch;
	BiThrTree r;
	
	scanf("%c", &ch);//测试数据：AB#D##C## 
	if(ch == '#'){
		*T = NULL;
	}else{
		*T = (BiThrTree) malloc(sizeof(BiThrNode));
		r = *T;
		if(! r){
			return false;
		}else{
			r->data = ch;			
			r->LTag = Link;
			r->RTag = Link;
			CreateBiTree(&(r->lchild));
			CreateBiTree(&(r->rchild));
		}
	}
}
//中序遍历进行中序线索化 
void InThreading(BiThrTree p, BiThrTree *pre){
	if(p){
		InThreading(p->lchild, pre);
//------线索化---------------------		
		if(! p->lchild){
			p->LTag = Thread;
			p->lchild = *pre;
		}
		if(! (*pre)->rchild){
			(*pre)->RTag = Thread;
			(*pre)->rchild = p;
		}
		*pre = p;		
//----------------------------------		
		InThreading(p->rchild, pre);
	}
}
//为线索二叉树添加头结点，使之可以双向操作
bool InOrderThreading(BiThrTree *Thrt, BiThrTree T){
	BiThrTree pre;//刚访问过的结点 
	//初始化头结点 
	*Thrt = (BiThrTree) malloc(sizeof(BiThrNode));
	(*Thrt)->LTag = Link;
	(*Thrt)->RTag = Thread;
	(*Thrt)->rchild = (*Thrt);	
	//若根结点不存在，则返回头结点 
	if(! T){
		(*Thrt)->lchild = (*Thrt);
		return true;
	}
	pre = (*Thrt);
	(*Thrt)->lchild = T;
	//二叉树线索化 
	InThreading(T, &pre);
	//此时pre为二叉树中序遍历下的最后一个节点 
	pre->rchild = (*Thrt);
	pre->RTag = Thread;
	(*Thrt)->rchild = pre;
	return true;	
} 
//遍历线索二叉树 
int InOrderTraverse_Thr(BiThrTree T){
	BiThrTree p;
	p = T->lchild;//p为root结点 
	
	while(p != T){
		while(p->LTag == Link){
			p = p->lchild;
		}		
		printf("%c", p->data);
		
		while(p->RTag == Thread && p->rchild != T){
			p = p->rchild;//当前结点的后续，不是右结点 
			printf("%c", p->data);
		}
		
		p = p->rchild;//右结点 
	}
	return 0;
}

int main(){
	BiThrTree T, Thrt;
	CreateBiTree(&T);
	InOrderThreading(&Thrt, T);
	
	printf("中序遍历线索化二叉树：");
	InOrderTraverse_Thr(Thrt);//Thrt为头结点,传入头结点 
}