Переписать положительные и отрицательные элементы в разные списки

#include "pch.h"
#include <iostream>
 
using namespace std;
 
struct Spis2 {
    int info;
    Spis2 *next, *prev;
};
 
void Create_Spis2(Spis2**, Spis2**, int);
void Add_Spis2(int, Spis2**, Spis2**, int);
void View_Spis2(int, Spis2**, Spis2**);
void Del_All(Spis2**);
//void del_el(Spis2**, Spis2**);
void del_el2(Spis2**, Spis2**);
void del_el3(Spis2 **, Spis2 **, Spis2**, Spis2**);
 
 
int main()
{
 
    Spis2 *begin1 = NULL, *end1 = NULL;
    Spis2 *begin2 = NULL, *end2 = NULL;
    int  in, kod1, kod2;
    char Str[2][10] = { "begin ", "end " };
    while (true) {
        cout << "\n\tCreat - 1\n\tAdd - 2\n\tView - 3\n\tDel - 4\n\tTask  - 5 \n\tTask2  - 6\n\tEXIT  - 0 : ";
        cin >> kod1;
        switch (kod1) {
        case 1: if (begin1 != NULL) {
            cout << "Clear Memory!" << endl;
            break;
        }
                cout << "begin Info = "; cin >> in;
                Create_Spis2(&begin1, &end1, in);
                cout << "Creat begin = " << begin1->info << endl;
                break;
        case 2:
            cout << "Info = "; cin >> in;
            cout << "Add to begin - 0, Add to end - 1 : "; cin >> kod2;
            Add_Spis2(kod2, &begin1, &end1, in);
            break;
        case 3: if (!begin1) {
            cout << "Stack Pyst!" << endl;
            break;
        }
                cout << "View begin - 0, View end - 1:";
                cin >> kod2;
                View_Spis2(kod2, &begin1, &end1);
                break;
        case 4:
            Del_All(&begin1);
            Del_All(&begin2);
            cout << "Memory Free!" << endl;
            break;
            //case 5: del_el(&begin1, &end1); break;
        //case 6: del_el2(&begin1, &end1); break;
        case 7:
            del_el3(&begin1, &begin2, &end1, &end2);
            View_Spis2(0, &begin1, &end1);
            View_Spis2(1, &begin1, &end1);
            cout << endl;
            View_Spis2(0, &begin2, &end2);
            View_Spis2(1, &begin2, &end2);
            break;
        case 0: if (begin1 != NULL)
            Del_All(&begin1);
            return 0;
        }
    }
    return 0;
}
 
// ------------ Создание -----------
void Create_Spis2(Spis2**b, Spis2**e, int in) {
    Spis2 *t = new Spis2;
    t->info = in;
    t->next = t->prev = NULL;
    *b = *e = t;
}
 
//-----------------------  Добавление -----------
void Add_Spis2(int kod2, Spis2 **b, Spis2 **e, int in) {
 
    Spis2 *t = new Spis2;
    t->info = in;
    if (kod2 == 0) {
        t->prev = NULL;
        t->next = *b;
        (*b)->prev = t;
        *b = t;
    }
    else {
        t->next = NULL;
        t->prev = *e;
        (*e)->next = t;
        *e = t;
    }
}
 
//--------------------- Просмотр элементов списка ---------------------------
void View_Spis2(int kod2, Spis2 **b, Spis2 **e) {
    Spis2 *t = new Spis2;
    if (kod2 == 0) {
        t = *b;
        cout << "-- begin --" << endl;
    }
    else {
        t = *e;
        cout << "--- end --" << endl;
    }
    while (t != NULL) {
        cout << t->info << endl;
        if (kod2 == 0) t = t->next;
        else t = t->prev;
    }
}
 
void Del_All(Spis2 **b) {
    Spis2 *t = new Spis2;
    while (*b != NULL) {
        t = *b;
        *b = (*b)->next;
        delete t;
    }
}
 
 
/*void del_el2(Spis2**begin1, Spis2**e) {
    Spis2 *key = NULL;
    Spis2 *t = new Spis2;
    t = *begin1;
    while (t != NULL) {
        if (t->info < 0) {
            key = t;
            if (key == (*begin1))
            {
                *begin1 = (*begin1)->next;
                (*begin1)->prev = NULL;
            }
            else if (key == (*e)) {
                *e = (*e)->prev;
                (*e)->next = NULL;
            }
            else
            {
                (key->prev)->next = key->next;
                (key->next)->prev = key->prev;
            }
            t = t->next;
            delete key;
        }
        else t = t->next;
    }
 
}*/
 
void del_el3(Spis2 **begin1, Spis2 **begin2, Spis2 **end1, Spis2 **end2)
{
    Spis2 *first = new Spis2, *second = new Spis2;
    Spis2 *t = *begin1, *t_f = first, *t_s = second;
    t_f->prev = NULL;
    t_s->prev = NULL;
    while (t != NULL)
    {
        if (t->info < 0)
        {
            t_f->next = t;
            t->prev = t_f;
            t_f = t_f->next;
        }
        else
        {
            t_s->next = t;
            t->prev = t_s;
            t_s = t_s->next;
        }
        t = t->next;
    }
    *begin1 = first->next;
    *begin2 = second->next;
    *end1 = t_f->prev->next;
    *end2 = t_s->prev->next;
    delete first;
    delete second;
}

for (Spis2 *p = *begin1; p != nullptr;)
{
    if (p->info > 0)
        p = p->next;
    else
    {
        auto *p2 = p;
        p = p->next;
        if (p2 == *begin)
            *begin = (*begin)->next;
        if (p2 == *end)
            *end = (*end)->prev;
        
        p2->prev = nullptr;
        p2->next = *begin2;
        *begin2 = p2;
    }
}

        p2->next = nullptr;
        if (*begin)
        {
            p2->prev = *end;
            *end = p2;
        }
        else
        {
            *begin2 = *end = p2;
            p2->prev = nullptr;
        }