//  int  Print(int X, int Y,const char *bufik, int F);

int k;

int _ADD(int);

struct     Graph_OUT      //-------------------------------------------------------------------------------------------
{
	int    		  x, x2,   //   Коородината для TextOut
	       		  y, y2,   //   Коородината для TextOut
	       		  L,       //   Кол-во символом
			 status;
	char 	  *addr;

	Graph_OUT  *LAST,
	           *NEXT;

	static char *Last_addr;
	static int     Deleted;
	static int  Last_Slovo;
	static int           i;
    static char base[4096];

    static RECT rect;

    static int  Chek(int, int, int, Graph_OUT *newelem);
    static int  Chek_Del();
    static int  ADD_Slovo(int, int, const char*);

    int  add(char *buf);

}  *First = 0,
        *Tail;


//-------------------------------------------------------------------------------------------
//     Справочная информация КЛАССА
//-------------------------------------------------------------------------------------------
int   Graph_OUT::   Deleted = 0;
int   Graph_OUT::Last_Slovo = 0;
int   Graph_OUT::         i = 0;

char  Graph_OUT::    base[4096];

char *Graph_OUT::Last_addr = base;

RECT  Graph_OUT::rect;






//---------------------------------------------------------------------
//    Если новая строка перекрывает старую, то старую строку стираем
//---------------------------------------------------------------------

int Graph_OUT::Chek(int X, int Y, int X2, Graph_OUT *newelem)
{
	    Graph_OUT *pre_OB;
  L_x1: int _L = 0;  // в этой переменной будет накапливаться смещение адреса начала слов
	    int  k = 1;
		Graph_OUT *n = First;
	    while(n)
	    {
			k++;
			if(n -> status == 1)
			{
				n -> addr -= _L;
				if(!_L)
				{
			    	if(abs(Y - n->y) < 13)
			    	{
						if(X  >= n->x && X  <= n->x2) goto L_01;
						if(X2 >= n->x && X2 <= n -> x2)
						{
	                L_01:    n -> status = -555;		//  -555 - (ожидание) стереть надпись    || (x  >= Slovo[i].x && x  <= Slovo[i].x2))
							 SetRect( &rect, n -> x,
							    			 n -> y,
											 n -> x2,      							// ширина надписи в пикселях
											 n -> y2);       				  		// Высота строки
							 InvalidateRect(hWnd, &rect, 1);
							 //---------------------------------------------------------------------------------------------
							 _L += n -> L;

							  memcpy(n->addr, n->addr + _L, Last_addr - n->addr + _L);

							  Last_addr -= n->L;
							  newelem->addr -= n -> L;
						}
					}
			    }
            }n = n -> LAST;
		 }	 if(_L) goto L_x1;
}

//-------------------------------------------------------------------------------------------//


int Graph_OUT::Chek_Del()
{
	    Graph_OUT *n = First;
	    Graph_OUT *old_OB,
		          *pre_OB;
	    while(n)
	    {
			if(n -> status == 0)
			{
				pre_OB = n -> LAST;

				if(n == First) First = pre_OB;

			    else  old_OB -> LAST = n -> LAST;

				pre_OB -> NEXT = n -> NEXT;
				delete n;
				Deleted ++;
				return 0;
		    }
			old_OB = n;
			n = n -> LAST;
	    }
}



//**************************************================================================================================
//======================================================================================================================


int Graph_OUT::ADD_Slovo(int X, int Y, const char *buf)
{

    Graph_OUT *newelem = new Graph_OUT;
    //************************
    newelem -> x = X;
    newelem -> y = Y;
	GetTextExtentPoint32(hdc, buf, lstrlen(buf), &sz);	//  -----------------   ----  Отобразить строку на экране
	newelem -> x2 = X + sz.cx;
	newelem -> y2 = Y + sz.cy;
	newelem ->  L = strlen(buf);
	newelem -> addr = Last_addr;
    Last_addr += newelem -> L;
	memcpy(newelem -> addr, buf, newelem -> L);

	newelem -> status = 1;
	Chek(X, Y, newelem -> x2, newelem);
	SetRect(&rect, X,
		    	   Y,
	   newelem -> x2,      												// ширина надписи в пикселях
	   newelem -> y2);       				  							// Высота строки

	InvalidateRect(hWnd, &rect, 1); //----------------------------------------------------------------------
	Last_Slovo++;
    //************************
	newelem -> LAST = 0;

	if(First)
	{
	   newelem -> NEXT = Tail;      //  Запоминаем (впередистоящего)за кем стоим в очереди
       Tail -> LAST = newelem; 		//  а впередистоящий (оборачивается и...) запоминает нас
       Tail = newelem;				//	объявляем себя последними в очереди
    }
    else 							            //  Если создаём первый элемент
    {
       newelem -> NEXT = 0;			//  впередистоящего нет ( заглушка = 0 )
       First = Tail = newelem;      //  первый элемент является и самым последним одновременно

    }
//********************************************************************************************************************
	Chek_Del();
	return 0;
}









int _Print(int X, int Y,const char *bufik, int F)
{
	     if (IsIconic(hWnd)) return -1;
	     char      buf[170],
	                bug[11];

	     itoa(F,  bug,  10);

 		 strcpy(buf, bufik);
 		 strcat(buf,   bug);       //  ___________________________________________   Склеили всё в одну мтроку: "buf"
		 Graph_OUT::ADD_Slovo(X, Y, buf);
}


int _Print(int X, int Y,const char *bufik, double F)
{
         if (IsIconic(hWnd)) return -1;

	     char buf[170],
	          bug[12];
	     gcvt (F, 11, bug);
 		 strcpy(buf, bufik);
 		 strcat(buf,   bug);       //  ___________________________________________   Склеили всё в одну мтроку: "buf"
		 Graph_OUT::ADD_Slovo(X, Y, buf);
}


int _Print(int X, int Y,const char *bufik)
{
	     if (IsIconic(hWnd)) return -1;
		 Graph_OUT::ADD_Slovo(X, Y, bufik);
}






int Draw_OUT()
{
    hdc = BeginPaint(hWnd, &paintStruct);



    if(hdc)
    {
		TextOut(hdc, 100, 100, "kjsdjsljlj JLKJLKJ 12323470", 30);
		Graph_OUT *n = First; //*n = First;
						k = 0;
						while(n)
						{
							    k++;

							    Transit[1][k] =  (int)n -> addr;
								Transit[2][k] =  n -> L;
								Transit[3][k] =  n -> x;
								Transit[4][k] =  n -> y;
								Transit[5][k] =  n -> status;
								Transit[6][k] =  (int)n;
								Transit[7][k] =  (int)n -> NEXT;
								Transit[8][k] =  (int)n -> LAST;
								Transit[5][k+1] = 0;
								Transit[6][k+1] = 0;
								Transit[7][k+1] = 0;
								Transit[8][k+1] = 0;
						    	if(n -> status == -555)  n -> status = 0;
						    	if(n -> status ==  1)
								{
						    	       TextOut( hdc,                                                //   if(Graph_OUT::Last_Slovo == 1)              26, 320, Graph_OUT::base, strlen(Graph_OUT::base));
						                     n -> x,
										  	 n -> y,
										  n -> addr,
						                  n -> L  );
								}
							    n = n -> LAST;
						}

	};

	EndPaint(hWnd, &paintStruct);
}