autogreet = [
	agl1 = @(listclients)
	agl2 = (listclients)
	if (> $agl1 $ag2) [
		newcn = (listdel $agl1 $agl2)
		]
	newname = (getclientname $newcn) ]
	sleep 1 [
		autogreet ]
	]
]