i've tried this.
 Code:
  
@Echo Off
Rem - set the XDCLIENTNAME environment var
XD4ClientName.exe
Rem - Run the Kix login script
kix32.exe kixtart.kix


 Code:
$sessiontype = SessionType()

If $sessiontype = "ICA"
   $computerprt = left ("%XDClientName%", 6)
else
   $computerprt = left (@wksta, 6)
endif

select 
   case $computerprt = "LA-FAC"
      AddPrinterConnection ("\\printserver\printer1")
      SetDefaultPrinter("\\printserver\printer1")
   case $computerprt = "LA-OFF"
      AddPrinterConnection ("\\printserver\printer2")
      SetDefaultPrinter("\\printserver\printer2")
   case $computerprt = "CA-REC"
      AddPrinterConnection ("\\printserver\printer3")
      SetDefaultPrinter("\\printserver\printer3")
   case $computerprt = "CA-ROO"
      AddPrinterConnection ("\\printserver\printer4")
      AddPrinterConnection ("\\printserver\printer1")
      SetDefaultPrinter("\\printserver\printer4")
endselect


also tried this:

 Code:
Break on

$sessiontype = SessionType()

If $sessiontype = "ICA"
	Run XD4ClientName.exe
	$clientname = ExpandEnvironmentVars(%XDClientName%)

	Select
		Case Left($clientname, 6) = "LA-DOC"
		AddPrinterConnection ("\\VA-PRN-001\LYC - ALG - op1020")
		AddPrinterConnection ("\\VA-PRN-001\LYC - LHB - HP8000")
		AddPrinterConnection ("\\VA-PRN-001\LYC - ROO - HP7700")
		SetDefaultPrinter("\\VA-PRN-001\LYC - ALG - op1020")

	EndSelect
EndIf

Function SessionType()

	Dim $sessionname, $session

	$sessionname = ExpandEnvironmentVars(%sessionname%)
	$session = Left($sessionname, 3)
	Select
		Case $Session = "Con"
			$sessiontype = "Console session"
		Case $session = "RDP"
			$sessiontype = "Remote desktop session"
		Case $session = "ICA"
			$sessiontype = "Citrix ICA session"
		Case 1
			$sessiontype = "Unknown session type"
	EndSelect
EndFunction


none work.