[Spy4433]

For ro.pro=Each  pro
If mouse_1 then
if EntityDistance (user,ro\model)<4 then 
un_select()
ro\Statys=1  
ro\head#=ro\head#-yron
endif
endif 
next


function un_select()
For ro.pro=Each  pro
ro\status=0
next 
end function

хм ) попытка #2 )