Ошибка добавления в односвязный список

#include "stdafx.h"
#include <iostream>
#include <string>
using namespace std;
 
 
struct List //список
{
    int data;
    List *next;
};
List *head;
 
void AddList(int value)//добавление в список
{
    List *node = new List;
    node->data = value;
    if (head == NULL)
    {
        node->next = node;
        head = node;
    }
    else
    {
        List *p = head;
 
        node->data = value;
        node->next = p->next;
        p->next = node;
    }
}
 
void PrintList()//вывод списка
{
    if (head == NULL) cout << "\nSpisok pust\n\n";
    else
    {
        List *a = head;
        cout << "\nElementy spiska: ";
        do
        {
            cout << a->data << " ";
            a = a->next;
        } while (a != head); cout << "\n\n";
    }
 
}
 
struct Node//дерева
{
    int x;
    Node *l, *r;
};
 
void print(int deep, Node *Tree)//вывод дерева
{
    if (Tree)
    {
        print(deep + 1, Tree->l);
        for (int i = 0; i < deep; i++)
            printf("  ");
        printf(">%d", Tree->x);
        printf("\n");
        print(deep + 1, Tree->r);
    }
}
void add_node(int x, Node *&MyTree)//добавление в дерево
{
    if (NULL == MyTree)
    {
        MyTree = new Node;
        MyTree->x = x;
        MyTree->l = MyTree->r = NULL;
    }
 
    if (x<MyTree->x)
    {
        if (MyTree->l != NULL) add_node(x, MyTree->l);
        else
        {
            MyTree->l = new Node;
            MyTree->l->l = MyTree->l->r = NULL;
            MyTree->l->x = x;
        }
    }
 
    if (x>MyTree->x)
    {
        if (MyTree->r != NULL) add_node(x, MyTree->r);
        else
        {
            MyTree->r = new Node;
            MyTree->r->l = MyTree->r->r = NULL;
            MyTree->r->x = x;
        }
    }
}
 
void find(Node *&Tree)//поиск отрицательных элементов в дереве
{
    if (Tree != NULL)
    {
        find(Tree->l);
        if (Tree->x < 0)
        {
            AddList(Tree->x);
        }
        find(Tree->r);
    }
}
 
 
int main()
{
    Node *Tree = NULL;
    int value, position, x;
    int n;
    int s;
    do
    {
        cout << "\n1. Dobavit element" << endl;
        cout << "2. Vyvesti derevo" << endl;
        cout << "3. Vyvesti spisok" << endl;
        cout << "0. Vyiti" << endl;
        cout << "\nNomer operacii > "; cin >> x;
        switch (x)
        {
        case 1:
            cout << "Vvedite kolichestvo elementov v dereve:  ";
            cin >> n;
 
            for (int i = 0; i<n; ++i)
            {
                cout << "Vvedite chislo  ";
                cin >> s;
                add_node(s, Tree);
            }
            break;
        case 2:
 
            //show(Tree);
            print(0,Tree);
            break;
        case 3:
            Node *t = Tree;
            find(t);
            PrintList(); break;
        }
    } while (x != 0);
    cin.get();
    _getwch();
    return 0;
}

} while (a != NULL);