shell "c:\scripts\getipadr.cmd" : Collect WTSClientAddress
sleep 5 
$x=open(1,"%temp%\ipaddress.txt")
$ip=readline(1)

$Systems= LTRIM(substr($ip,18,11))  ; Test IP Address
$NY=LCASE $Systems="10.176.192" ; Test Scope
	Run "REGEDIT.EXE /S C:\Scripts\USA.Reg" : Registory for USA
	Run "Regedit.exe /S C:\Scripts\NY.reg"  : Registory for EST
	? "Timezone set to GMT"
	sleep 1
	CASE $NY="10.20.84"
	Run "REGEDIT.EXE /S C:\Scripts\USA.Reg"
	Run "Regedit.exe /S C:\Scripts\NY.reg
	? "TimeZone set to EST"
	Sleep 1
	CASE $CH="10.50.11"
	? "TimeZone Set to CST"
	Sleep 1
	
ENDSELECTTRIM(Substr($ip,18,9))  ; 10.20.84
$CH=LTRIM(Substr($ip,18,9))  ; 10.50.11
SELECT

shell "c:\scripts\envtscip.exe > %temp%\ipaddress.txt" 
$nul = Open(1,"%temp%\ipaddress.txt")
$ip = ReadLine(1)
$nul = Close(1)
$systems = SubStr($ip,18,11)
$ip = SubStr($ip,18,9)

Select
   Case Left($systems,10) = "10.176.192"
      Shell 'Regedit.exe /S C:\Scripts\USA.Reg'
      Shell 'Regedit.exe /S C:\Scripts\NewYork.reg'
      Shell 'control.exe timedate.cpl,,/Z GMT Standard Time'
   Case Left($ip,8) = "10.80.84"
      Shell 'Regedit.exe /S C:\Scripts\USA.Reg'
      Shell 'Regedit.exe /S C:\Scripts\NY.reg'
      Shell 'control.exe timedate.cpl,,/Z Eastern Standard Time'
   Case Left($ip,8) = "10.78.11"
      Shell 'control.exe timedate.cpl,,/Z Central Standard Time'
EndSelect