Games::Battleship::Craft

Jeux :: :: Battleship Craft est une classe d'artisanat Battleship.
SYNOPSIS
  Jeux utiliser :: :: Battleship Craft;
  mon métier = $ Jeux :: :: Battleship Craft-> new (
      id => 'T',
      name => 'remorqueur »,
      des points => 1,
  )
  Points_remaining $ = $ craft-> frapper;
Un objet Jeux :: :: Battleship Artisanat représente le profil d'un Battleship
Méthodes publiques
nouveaux arguments%
id => $ STRING
Un identifiant de scalaire à utiliser pour indiquer la position sur la grille. Si l'on est pas fourni, le premier caractère en majuscule du nom sera utilisé par défaut.
Actuellement, il est nécessaire que ce soit une seule lettre majuscule (la première lettre du nom de l'artisanat, sans doute), car un résultat positif sera indiqué par "en minuscules" cette marque sur une grille de joueur.
name => $ STRING
Un attribut obligatoire prévu pour donner le métier un nom.
des points => $ NOMBRE
Un attribut utilisé pour définir la durée de segment de ligne sur la grille de jeu.
Position => [$ X, Y $]
La position de l'arc de l'artisanat ("nez") sur la grille.
Actuellement, l'engin est supposée avoir un alignement horizontal ou vertical. Bientôt il y aura un positionnement en diagonale ...
frapper
  Points_remaining $ = $ craft-> frappé,
Incrémenter le hit de l'engin valeur d'attribut et retourner ce qui reste de l'engin (valeur du point total moins le nombre de hits)

Exigences :.

• Perl