ImportExport`RegisterImport[
	"UnsignedInteger16",
	Import[#1,{"Binary","UnsignedInteger16"},##2]&,
	"AvailableElements" -> {_Integer},
	"Sources" -> ImportExport`DefaultSources["Binary"],
	"FunctionChannels" -> {"Streams"},
	"BinaryFormat" -> True
]