CLS

:TIME
; REM Synchronize local time with PDC
SETTIME "\\MAIN" /SET /YES

:ADMIN
IF @priv = "ADMIN"
GOTO ADMINBOX
ELSE
GOTO USERBOX
ENDIF
GO TO END

:ADMINBOX
; REM Display box for Administrators
SMALL ;display in small character mode
COLOR b+/n
BOX (0,0,24,79,GRID) ;"background grid"
COLOR b/n
BOX (8,21,18,61,A) ;"shadow of the box"
COLOR g+/n
BOX (7,20,17,60,FULL)

COLOR r+/n
AT (9,25) "Hello, @fullname, please wait while your logon script executes..."

; REM Display variable names
COLOR w+/b
AT (11,25) "UserID :" ;display some text strings
AT (12,25) "Full Name :"
AT (13,25) "Privilege :"
AT (14,25) "Workstation :"
AT (15,25) "Domain :"
AT (16,25) "Logon Server :"
COLOR r+/n
AT (17,22) "PLEASE WAIT WHILE LOGON IS VALIDATED"

; REM Display NT variables
COLOR y+/n
AT (11,40) @Userid :display some macros
AT (12,40) @fullname
AT (13,40) @privilege
AT (14,40) @workstation
AT (15,40) @domain
AT (16,40) @lserver
COLOR r+n ;wait 5 seconds
SLEEP 5
CLS
GOTO ASSVAR

:USERBOX
; REM Display for Box for Users
SMALL
COLOR b+/n
BOX (0,0,24,79,GRID)
COLOR b/n
BOX (8,21,18,61,A)
COLOR g+/n
BOX (7,20,17,60,FULL)

; REM Display variable names
COLOR w+/b
AT (11,25) "UserID :"
AT (12,25) "Full Name :"
AT (13,25) "Privilege :"
AT (14,25) "Workstation :"
AT (15,25) "Domain :"
AT (16,25) "Logon Server :"
COLOR r+/n
AT (17,22) "PLEASE WAIT WHILE LOGON IS VALIDATED"

; REM Display NT variables
COLOR y+/n
AT (11,40) @Userid
AT (12,40) @ fullname
AT (13,40) @privilege
AT (14,40) @workstation
AT (15,40) @domain
AT (16,40) @lserverCOLOR r+.n
SLEEP 5
CLS
GOTO ASSVAR

:ASSVAR
; REM Set user variables
$x="$$"
$userid=@userid + "$$"
USE H: "\\CORP\$userid" ;maps user home directory
USE S: "\\CORP\SHARE" ;standard map drive
IF INGROUP ("EVERYONE") ;drive mapped based on group membership
USE T: "\\SQL\DRISCOLL"

SLEEP 5
:END
;REM QUIT SCRIPT
CLS
EXIT
: