void  Inthread(BiTree root)
/* 對root所指的二叉樹進行中序線索化，其中pre始終指向剛訪問過的結點，其初值為NULL*/
{
	if (root!=NULL)
	{ 
		Inthread(root->LChild);  /* 線索化左子樹 */
		if (root->LChild==NULL)
		{
			root->Ltag=1; 
			root->LChild=pre;  /*置前驅線索 */
		}
		if (pre!=NULL&& pre->RChild==NULL)  /* 置后繼線索 */
		{
			pre->RChild=root;
			pre->Rtag=1;
		}
	pre=root;
	Inthread(root->RChild);  /*線索化右子樹*/
	}
}