#include <lutils.h>

void   lg_insert_spirit(TlgSpiritLink **my_link,short x,short y,char *img,short dist);
void   lg_view_spirit(TlgSpiritLink **my_link);
void   lg_delete_link(TlgSpiritLink **my_link);
static void insert_link(TlgSpiritLink **my_link,TlgSpiritLink *spirit);
static void delete_link(TlgSpiritLink **my_link);
static TlgSpiritLink *lg_link=NULL;

void   lg_dist_spirit(short x,short y,char *spr,short dist)
{ lg_insert_spirit(&lg_link,x,y,spr,dist);
}
void   lg_dist_show()
{ lg_view_spirit(&lg_link);
  delete_link(&lg_link);
}
void lg_view_spirit(TlgSpiritLink **my_link)
{ TlgSpiritLink *p=*my_link;
  while (p) { 
    lputSpirit(p->x,p->y,p->img);
    p=p->next;
  }
}
void lg_insert_spirit(TlgSpiritLink **my_link,short x,short y,char *img,short dist)
{ TlgSpiritLink *p; 
  p = new TlgSpiritLink; 
  if (!p) return;
  p->x = x; p->y = y; p->dist = dist;
  p->img = img;
  insert_link(my_link,p);
}
void   lg_delete_link(TlgSpiritLink **my_link)
{ delete_link(my_link);
}
static void insert_link(TlgSpiritLink **my_link,TlgSpiritLink *spirit)
{ TlgSpiritLink *p,*before_p;
  if ( (!*my_link) || ((*my_link) && ((*my_link)->dist >= spirit->dist)) )
    { spirit->next=*my_link; *my_link=spirit; return; }
  p=(*my_link)->next; 
  before_p=*my_link;
  while ( (p) && (p->dist<spirit->dist) )
   { before_p=p;
     p=p->next;
   }
  before_p->next=spirit;
  spirit->next=p;
}
static void delete_link(TlgSpiritLink **my_link)
{ TlgSpiritLink *p=*my_link,*p2;
  while (p) { p2=p->next; delete p; p=p2; }
  *my_link=NULL;
}