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

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

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

extern struct Window *OpenWindow();
extern struct Screen *Screen;
extern struct Window *Window;
extern struct TextAttr font[2];

UBYTE PlrNum[11];
UBYTE Data[16];
UBYTE UNDOBuffer[16];

USHORT inppts[2][18] =
 {
  {0,0,249,0,249,59,1,59,1,0,248,0,248,59,0,59,0,0},
  {0,0,155,0}
 };

struct Border inpggbo[2] =
 {
  {-3,10,13,0,JAM2,2,&inppts[1][0],NULL},
  {-3,11,15,0,JAM2,2,&inppts[1][0],&inpggbo[0]}
 };

struct StringInfo inpggsi =
 {&Data[0],&UNDOBuffer[0],0,15,0,0,0,0,0,0,NULL,0,NULL};

struct IntuiText inpggtxt[4] =
 {
  {11,0,JAM2,-18,-27,&font[0],"Bitte Name eingeben",&inpggtxt[1]},
  {11,0,JAM2,24,-15,&font[0],&PlrNum[0],NULL},
  {11,0,JAM2,-21,-27,&font[0],"Bitte Firma eingeben",&inpggtxt[3]},
  {11,0,JAM2,24,-15,&font[0],&PlrNum[0],NULL}
 };

struct Gadget inpgg =
 {NULL,50,35,150,13,GADGHCOMP,STRINGCENTER|RELVERIFY,STRGADGET|REQGADGET,&inpggbo[1],NULL,NULL,0L,&inpggsi,0,NULL};

struct NewWindow HelpWindow =
 {195,80,250,60,0,0,GADGETUP,SIMPLE_REFRESH|BORDERLESS|ACTIVATE,&inpgg,NULL,NULL,NULL,NULL,0,0,0,0,CUSTOMSCREEN};

struct Border inpbo =
 {0,0,13,0,JAM2,9,&inppts[0][0],NULL};

GetInput(mode,i)
int mode,i;
 {
  struct Window *HelpWind;
  struct IntuiMsg *inpmsg;
  BOOL choosen = FALSE;

  Data[0] = '\0';

  sprintf(&PlrNum[0],"Player #%d",i+1);
  inpgg.GadgetText = &inpggtxt[mode*2];

  HelpWindow.Screen = Screen;
  HelpWind = OpenWindow(&HelpWindow);

  DrawBorder(HelpWind->RPort,&inpbo,0,0);

  ActivateGadget(&inpgg,HelpWind,NULL);

  while (!(choosen))
   {
    while((inpmsg=(struct IntuiMessage *)GetMsg(HelpWind->UserPort))==NULL);
    ReplyMsg(inpmsg);
    if (inpmsg->Class == GADGETUP)
     choosen = TRUE;
   }

  CloseWindow(HelpWind);

  return(&Data[0]);
 }