ЛДС в ЛОС

void lds::del()
{clrscr();
lds *r;lds *ptr;
int key;
cout<<"\n Vvedite kluch elementa dlya udaleniya";
cin>>key;
r=p;
while(r!=NULL&&r->b!=key)
r=r->next;
if(r->b==key)
{if(r->prev!=NULL&&r->next!=NULL) //Проверка что элемент не первый и не последний
{ptr=r->next;
r->prev->next = r->next;          //удаляем информацию предыдущего о текущем, заменой на инфу о следующем
r->next->prev = r->prev;          //следующего о текущем заменой на предыдущий
delete(r);                        //удаляем текущий
r=ptr;}
else
    {if(r->prev==NULL)            //проверка на первый элемент
       {p=p->next;                //меняем наш P на следующий
    delete(r);                //удаляем текущий элемент
    p->prev=NULL;             //удаляем инфу о предыдущем элементе(из следующего)
    r=p;                      //меняем текущий на следующий
       }
     else
    {r->prev->next=NULL;      //удаляем инфу предыдущего элемента о его следущем(о текущем)
     delete(r);               //удаляем текущий элемент
     r=p;
    }
    }
}
getch();
}