tmp

(
Arr = #()
try (s = openFile "c:\\Vertex_ID_selector.txt") catch()
if (selection.count==1 and s != undefined) then
	(
	while not eof s do -- пока не есть eof (конец файла s) делать
		(
		a = readValue s
		append Arr a
		)
	For i=1 to Arr.count do
	Arr[i] += 1
	try(PolyOp.SetVertSelection $ Arr) catch(messagebox("Some ID is  not exist"))
	if getCommandPanelTaskMode() != #modify then (max modify mode)
	subobjectlevel = 1
	redrawViews()
	close s
	)
)