$cc  = "1584" 			; cost center
$srv = "\\Washington\"		; Print Server 
$bp  = "2"				; Beginning Printer Number
$ep  = "7"				; Ending Printer Number
$pgp = "WASPrint"			; Printer Group Prefix
$pnp  = "Printer"			; Printer Name Prefix

use "*" /delete
use p: $srv + priv_ + @userid
use s: $srv + shared
use u: $srv + share_ + @userid


while ($bp <= $ep)

	IF INGROUP ($cc)
		AddPrinterConnection ($srv + $pnp + $bp)
			If Ingroup ($pgp + $bp)
				SetDefaultPrinter ($srv + $pnp + $bp)
			EndIF
	EndIF
$pn = (1 + $bp)
loop