rem  *************
rem  *  SCANNER  *
rem  *************
rem  this 'droid just sits there, scans and fires if it sees anything

aim = 0
10 rng=scan(aim):if rng<0 then gosub 300
20 aim=aim+17:goto 10

300 shot=-rng
310 rng=scan(aim):if rng<0 then 300
    return

