/***********************************************/
/*                                             */
/* window.c - v. 1.0 -1.7.88-Antonio Ferrillo  */
/*                                             */
/*      funzioni di gestione di finestre       */
/*                                             */
/* versione Aztec v. 3.4 Lattice-compatibile   */
/*                                             */
/***********************************************/ 

  #include <functions.h> /* rimuovere questa 
                linea se si usano i compilatori 
                Lattice  v. 3.XX               */

  #include <exec/types.h>
  #include <intuition/intuition.h>

  static struct  Window  *a_window[] =
                        {NULL, NULL, NULL, NULL};
  static struct  NewWindow   NewWindow[4];

/*-----------------------------------------------
- int
- Window_Open(wn,widen,le,te,wi,he,dp,bp,mode,sn)
- 
-  FUNZIONE  : apertura di finestra: e'possibile
-              aprire fino a 4 finestre 
-              contemporaneamente
- 
-  ARGOMENTI : int wn;      - (valore = da 1 a 4)
-                numero della finestra da aprire.
-
-              char *widen; - stringa col nome
-                             della finestra 
-                   
-              int le;      - (valore da 0 a 589
-                 dipendente dalla risoluzione
-                 orizzontale dello schermo)
-                 distanza dal bordo sinistro
-                 dello schermo
-                   
-              int te;      - (valore da 0 a 480
-                 dipendente dalla risoluzione
-                 verticale dello schermo)
-                 distanza dal top dello schermo
-
-              int wi;      - (valore da 50 a 640
-                  dipendente dalla risoluzione
-                  orizzontale dello schermo)
-                  larghezza della finestra
-                   
-              int he;      - (valore da 0 a 512
-                  dipendente dalla risoluzione 
-                  verticale dello schermo) 
-                  altezza della finestra
-
-              int dp;      - (valore da 0 a 31
-                  dipendente dal numero dei 
-                  bit-planes dello schermo) 
-                  detail pen  
-                   
-              int bp;      - (valore da 0 a 31
-                  dipendente dal numero dei 
-                  bit-planes dello schermo) 
-                  block pen 
-                   
-            primi 8 colori : 0-blu,1 - bianco,
-                  2-nero, 3-giallo, 4-azzurro,
-                  5-rosso, 6-verde, 7-bianco                                    
-                  
-              int sn;     - numero dello schermo
-                  sul quale deve essere aperta
-                  la finestra (se uguale a NULL
-                  la finestra viene aperta sullo
-                  schermo del Workbench)
-
- RITORNO : TRUE se l'apertura ha avuto successo
-           FALSE se e' sopravvenuto un errore
- 
- NOTE    : richiede precedente apertura di
-           intuition.library, ricordarsi di
-           chiudere la finestra a fine lavoro
-           mediante la Window_Close.
-----------------------------------------------*/

  int
  Window_Open(wn,widen,le,te,wi,he,dp,bp,sn)

  int     wn;
  char    *widen;
  int     le;
  int     te;
  int     wi;
  int     he;
  int     dp;
  int     bp;
  int     sn;

  {
    struct Screen *Screen_Addr();
 
    if(wn < 1 || wn > 4) return(FALSE);
    if(le < 0 || (le + wi) > 640) return(FALSE);
    if(te < 0 || (te + he) > 512) return(FALSE);
    if(dp < 0 || dp > 31) return(FALSE);
    if(bp < 0 || bp > 31) return(FALSE);
  
    if(a_window[wn-1] != NULL) return(FALSE);
  
    wn -= 1;

    NewWindow[wn].LeftEdge    = le;
    NewWindow[wn].TopEdge     = te;
    NewWindow[wn].Width       = wi;
    NewWindow[wn].Height      = he;
    NewWindow[wn].DetailPen   = dp;
    NewWindow[wn].BlockPen    = bp;
    NewWindow[wn].Title       = (UBYTE *)widen;

    NewWindow[wn].Flags       =   ACTIVATE
                                | SMART_REFRESH
                                | REPORTMOUSE
                                | WINDOWCLOSE 
                                | WINDOWDRAG
                                | WINDOWDEPTH 
                                | WINDOWSIZING;

    NewWindow[wn].IDCMPFlags  =   CLOSEWINDOW 
                                | REFRESHWINDOW 
                                | GADGETDOWN
                                | GADGETUP 
                                | MOUSEBUTTONS
                                | MOUSEMOVE  
                                | REQCLEAR 
                                | SELECTDOWN 
                                | SELECTUP
                                | ACTIVEWINDOW   
                                | MENUPICK;
    NewWindow[wn].Type        = 
     (sn == NULL) ? WBENCHSCREEN : CUSTOMSCREEN;
    NewWindow[wn].FirstGadget = NULL;
    NewWindow[wn].CheckMark   = NULL;
    NewWindow[wn].Screen      = 
          (sn == NULL) ? NULL : Screen_Addr(sn);
    NewWindow[wn].BitMap      = NULL;
    NewWindow[wn].MinWidth    = 50;
    NewWindow[wn].MinHeight   = 25;
    NewWindow[wn].MaxWidth    = wi;
    NewWindow[wn].MaxHeight   = he;

    a_window[wn] = 
    (struct Window *)OpenWindow(&NewWindow[wn]);
   
    if (a_window[wn] == NULL) return(FALSE);

    return(TRUE);
  }


/*----------------------------------------------        
-    struct Window *
-    Window_Addr(wn)
-      
-      FUNZIONE  : restituisce l'indirizzo della
-                  finestra wn
-                  oppure FALSE in caso di errore
-       
-      ARGOMENTI : int wn;  - (valore da 1 a 4)
-                           numero della finestra  
-----------------------------------------------*/                  

  struct  Window  *
  Window_Addr(wn)
  int     wn;
  {
    if (wn < 1 || wn > 4) return(FALSE);
    if (a_window[wn-1] == NULL) return(FALSE);
      return(a_window[wn-1]);
  }

 

/*-----------------------------------------------
-    int
-    Window_Close(wn)
-
-        FUNZIONE  : chiusura della finestra
-
-        ARGOMENTI : int wn; - (valore da 1 a 4)
-                          numero della finestra  
-----------------------------------------------*/

  int
  Window_Close(wn)
  int   wn;
  {
    if (wn < 1 || wn > 4) return(FALSE);
    if (a_window[wn - 1] == NULL) return(FALSE);
            CloseWindow(a_window[wn - 1]);
            return(TRUE);
  }