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
Kommentarer ikke fundet