$name   = 'Drone4';
$author = 'Autrijus Tang';
$team   = 'Free Drones';

enable shield;

sub main {
    scan perimeter;
    if (&found('enemy')) {
        attempt destruct;
    }
    redo;
}