Click above to get retro games delivered to your door ever month!

 BOXGET()    Display a shadow-boxed single GET box & wait for input

 Syntax....: BOXGET(c_title,c_say,c_get,[c_pict,c_vald,ac_colr,i_row,i_colm,i_tmo])
 Parameters: <expC>: c_title= box title string
             <expC>: c_say  = the SAY label string
             <expX>: x_get  = the input mvar
 [optional]  <expC>: c_pict = PICTURE string for GET  (default = none)
  "      "   <expC>: c_vald = VALID expression as a string
  "      "   <arrC>: ac_colr= color array:     [defaults]
  "      "                    [1] = "N/W"  Box
  "      "                    [2] = "B/W"  Title
  "      "                    [3] = "B/W"  Option panel
  "      "                    [4] = "N/W"  SAY
  "      "                    [5] = "W+/N" GET
  "      "                    [6] = "W/N"  Shadow
  "      "   <expN>: i_row  = top row     (default = centered)
  "      "   <expN>: i_colm = left column (default = centered)
  "      "   <expN>: i_tmo  = time out    (default = 0 ie. until keypress)

 Returns...: <expC>: the GET string
 Cautions..: none
 CC Calls..: BOXREST(), CTRPOS(), SETSCRSTS(), SHADOWBOX()
 Alias.....: none

 Example...: PRIVATE LastName
             LastName= BOXGET( "Locate by Last Name","Name:",SPACE(30),"@! " )
             IF LASTKEY() <> 27
               DO something WITH LastName...