Не добавляется следующий элемент в список

#include "stdafx.h"
#include <iostream>
#include <string>
#include <stdlib.h>
#include <locale.h>
using namespace std;
 
struct LnSp {
    string name;
    string x;
    LnSp *Next;
    LnSp *Prev;
};
 
LnSp *PHead;
void add(string name, string x, LnSp **Head);
void add_zn();
void print(LnSp *Head);
void printcall();
void delete_el(LnSp **Head);
void delete_elcall();
void delete_sp(LnSp **Head);
void delete_spcall();
int main()
{
    setlocale(LC_ALL, "Russian");
    typedef void(*pmen) ();
    pmen mas[5];
    cout << "МЕНЮ: " << endl;
    cout << "1 - добавление;" << endl;
    cout << "2 - печать;" << endl;
    cout << "3 - удаление;" << endl;
    cout << "4 - удаление всего списка;" << endl;
 
    mas[0] = add_zn;
    mas[1] = printcall;
    mas[2] = delete_elcall;
    mas[3] = delete_spcall;
    int m = 0;
    while (m < 5)
    {
        cout << endl << endl << "Выберите пункт меню:";
        cin >> m;
        if (m < 5) mas[m - 1]();
    }
    system("pause");
    return 0;
}
 
void add(string name, string x, LnSp **Head) {
    LnSp *p, *p1;
    p = new LnSp;
    p->name = name;  //имя
    p->x = x;        //код
    p->Next = NULL;
    p->Prev = NULL;
    if (*Head == NULL) // список пуст
    {
        *Head = p;
    }
    else if (p->name > (*Head)->name) //список не пуст
    {
        p->Next = p;
        p->Prev = (*Head);
        (*Head) = p;
    }
    else
    {
        p1 = (*Head);
        while (p1 != NULL) {
            if ((p1->name > p->name) && (p1->Next->name < p->name)) {
                p->Next = p1->Next;
                p->Prev = p1;
                p1->Next->Prev = p;
                p1->Next = p;
                break;
            }
            p1 = p1->Next;
        }
    }
}
 
void add_zn()
{
    string name;
    string k = " ";
    cout << "Добавьте цвета в список" << endl;
    cout << "Имя: ";
    cin >> name;
    cout << "Код: ";
    cin >> k;
    add(name, k, &PHead); //вызов функции добавления
    cout << "Добавлено." << endl;
}
 
void print(LnSp *Head)
{
    LnSp *p;
    p = Head;
    if (p == NULL) {
        cout << "Список пуст." << endl;
    }
    else
        while (p != NULL)
        {
            cout << p->name << ": "; //вывод имени
            cout << p->x << endl; //вывод кода
            p = p->Prev;
        }
}
 
void printcall()
{
    print(PHead);
}
 
void delete_el(LnSp **Head)
{
    LnSp *p;
    LnSp *p1;
    p = (*Head);
    string str;
    cout << "Введите название удаляемого цвета: " << endl;
    cin >> str;
    cout << endl;
    bool b = false;
    while (p != NULL)
    {
        if (p->name == str) {   //если цвет найден
            b = true;
            if (p == (*Head)) {   //если элемент один в списке
                delete (*Head);
                *Head = NULL;
                cout << "Удалено!" << endl;
                break;
            }
            else if (p == (*Head)) //если найденный элемент первый в писке
            {
                (*Head) = p->Prev;
                (*Head)->Next = NULL;
                delete (p);
                cout << "Удалено!" << endl;
                break;
            }
        }
        p = p->Prev;
    }
    if (!b) cout << "Неверно введен цвет!" << endl;
}
 
void delete_elcall()
{
    delete_el(&PHead);
}
void delete_sp(LnSp **Head)
{
    LnSp *p;
    p = (*Head);
    while (p != NULL)
    {
        delete (*Head);
        delete (*Head);
        *Head = NULL;
        cout << "Удалено!" << endl;
        break;
    }
}
 
void delete_spcall()
{
    delete_sp(&PHead);
}