real minDist = 10000000
real minUnit = null
for all units in 500 aoe do:
if distance(picked unit) < minDist then
minDist = distance(picked unit)
minUnit = picked unit
endif
endloop
-> minUnit is nearest unit. if there is no unit in 500 aoe minUnit is null