Cleaned it up a little bit.
Code:
raw 473:*:if ($network == $network) { set %Drone $+ $2 1 | names $2 }

raw 353:*:{
  if ([ [ $+(%,Drone,$3) ] ]) {
    haltdef
    if ($istok($remove($4-,~,&,@,+),Drone,32)) { .msg Drone enter $3 user key }
  }
}

raw 366:*:if ([ [ $+(%,Drone,$2) ] ]) { haltdef | unset %Drone $+ $2 }