sub reload($parent)
{
  my $bullets = $parent->pockets->getbullets(6);
  $parent->gun->load($bullets);
}