geoscaner

$${
&ban="stone,gravel,air,dirt"
#radius=2
#calc_radius=(%#radius%*2)+1
#x=-%#radius%
#y=-%#radius%
#z=-%#radius%
#id=999
log("начинаю сканирование");
do(%#calc_radius%);
    do(%#calc_radius%);
        do(%#calc_radius%);
            getidrel(%#x%,%#y%,%#z%,&id)
            match(%&ban%,%&id%,&test)
            if(%&test%=%&id%); else(); log("x:%#x% y%#y% z:%#z% name:%&id%"); endif();
            #z=%#z%+1
        loop();
        #z=-%#radius%
        #y=%#y%+1
    loop();
    #x=%#x%+1
    #y=-%#radius%
loop();
#x=-%#radius%

}$$