/** level.c ***********************************/
/*                                            */
/* Copyright © 1988 by Digital Artists (DgA). */
/* All Rights reserved.                       */
/*                                            */
/**********************************************/

/*
Firma   : Digital Artists (DgA)
Objekt  : reederei/level.c
Version : 1.0
Autor   : [RK]
Datum   : 09-03-1988
Status  : geheim
*/

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

extern struct Window *Window;
extern struct TextAttr font[2];
extern struct IntuiMessage *GetMsg();
extern USHORT *box3;

USHORT lpts[18] =
 {0,0,223,0,223,49,1,49,1,0,222,0,222,49,0,49,0,0};

struct Image lggim =
 {-2,-1,32,15,4,NULL,0xf,0x0,NULL};

struct IntuiText lggtxt[3] =
 {
  {1,13,JAM2,11,2,&font[0],"1",NULL},
  {1,13,JAM2,10,2,&font[0],"2",NULL},
  {1,13,JAM2,10,2,&font[0],"3",NULL}
 };

struct Gadget lgg[3] =
 {
  {&lgg[1],44,30,32,15,GADGIMAGE|GADGHCOMP,GADGIMMEDIATE,BOOLGADGET|REQGADGET,&lggim,NULL,&lggtxt[0],0L,NULL,1,NULL},
  {&lgg[2],96,30,32,15,GADGIMAGE|GADGHCOMP,GADGIMMEDIATE,BOOLGADGET|REQGADGET,&lggim,NULL,&lggtxt[1],0L,NULL,2,NULL},
  {NULL,148,30,32,15,GADGIMAGE|GADGHCOMP,GADGIMMEDIATE,BOOLGADGET|REQGADGET,&lggim,NULL,&lggtxt[2],0L,NULL,3,NULL},
 };

struct Border lbo =
 {0,0,13,0,JAM2,9,&lpts[0],NULL};

struct IntuiText ltxt =
 {11,0,JAM2,25,10,&font[0],"Welche Spielstufe ?",NULL};

struct Requester level =
 {NULL,208,75,224,50,0,0,&lgg[0],&lbo,&ltxt,0,0,NULL,NULL,NULL,NULL,NULL};

GetLevel()
 {
  BOOL choosen = FALSE;
  int id;
  struct Gadget *gg;
  struct IntuiMessage *lmsg;

  lggim.ImageData = box3;

  Request(&level,Window);

  while (!(choosen))
   {
    while((lmsg=(struct IntuiMessage *)GetMsg(Window->UserPort))==NULL);
    ReplyMsg(lmsg);
    if (lmsg->Class == GADGETDOWN)
     {
      gg = (struct Gadget *)lmsg->IAddress;
      id = gg->GadgetID;
      if ((id >= 0) && (id <= 3))
       choosen = TRUE;
     }
   }

  EndRequest(&level,Window);

  return(id);
 }