CLS
SMALL
Color b+/n
BOX (0,0,24,79,GRID)            ; background grid
Color b/n
BOX (2,3,13,77,Å)               ; shadow of the box
Color g+/n
BOX (1,2,12,76,FULL)            ; Green box
Color b+/n
Select
  Case ((@TIME > "00:00:00") And (@TIME < "12:00:00"))
       AT(9,5) "Good Morning " + @fullname
       AT(10,5) "You are entering the " + @domain + " domain."
       Color r+/n
       AT(11,5)"Please wait - Network authentication is being verified . . ."
       Color b+/n
  Case ((@TIME > "12:00:00") AND (@TIME < "18:00:00"))
       Color b+/n
       AT(9,5) "Good Afternoon " + @fullname
       AT(10,5) "You are entering the " + @domain + " domain."
       Color r+/n
       AT(11,5)"Please wait - Network authentication is being verified . . ."
       Color b+/n
  Case 1
       AT(9,5) "Good Evening " + @fullname
       AT(10,5) "You are entering the " + @domain + " domain."
       Color r+/n
       AT(11,5)"Please wait - Network authentication is being verified . . ."
       Color b+/n
EndSelect
Color w+/n
AT (2,5) "Userid       : "    ; label for user and network identification text strings
AT (3,5) "Full Name    : "
AT (4,5) "Workstation  : "
AT (5,5) "NT Domain    : "
AT (6,5) "Logon Server : "
AT (7,5) "OS           : "
AT (8,5) "Service Pack : "

Color y+/n
AT (2,20) @userid              ; macro's for user and network identification text strings
AT (3,20) @fullname
AT (4,20) @wksta
AT (5,20) @domain
AT (6,20) @lserver              ; Lists the authenticating server
AT (7,20) @ProductType
AT (8,20) @CSD
AT (11,65)                      ; Moves the cursor to the end of the message