Games::Battleship::Craft

Spil :: Battleship :: Craft er en Battleship håndværk klasse.
SYNOPSIS
  bruge Games :: Slagskib :: Craft;
  min $ håndværk = Games :: Battleship :: Craft-> ny (
      id => 'T',
      name => 'slæbebåd «,
      points => 1,
  )
  $ Points_remaining = $ craft-> hit;
En Games :: Battleship :: Craft objekt repræsenterer profilen af ​​en Battleship
OFFENTLIGE METODER
nye% ARGUMENTER
id => $ STRING
En skalar id at bruge til at angive position på nettet. Hvis man ikke er tilvejebragt, vil uppercased fornavn tegn blive brugt som standard.
I øjeblikket kræves det, at dette være et enkelt stort bogstav (det første bogstav i fartøjets navn, sandsynligvis), eftersom et hit vil blive angivet med "lowercasing" dette mærke på en spiller gitter.
name => $ STRING
En nødvendig attribut forudsat at give fartøjet et navn.
point => $ NUMMER
En attribut anvendes til at definere linjestykket span på spillepladen nettet.
position => [$ X, $ Y]
Positionen af ​​fartøjet bue ("næse") på nettet.
I øjeblikket er fartøjet antages at have en vandret eller lodret justering. Der vil snart være diagonal positionering ...
hit
  $ Points_remaining = $ craft-> hit;
Øg fartøjets hit attribut værdi og returnere hvad der er tilbage af fartøjet (total pointværdi minus antallet af hits)

Krav :.

• Perl