Games :: Battleship :: Craft е клас Battleship занаят.
СЪДЪРЖАНИЕ
използвате Games :: Battleship :: занаятите;
ми $ занаят = Games :: Battleship :: Craft-> нова (
ID => 'T',
назове => 'влекач лодка ",
точки => 1,
)
$ Points_remaining = $ craft-> удари;
A Games :: Battleship :: Craft обект представлява профила на Battleship
ОБЩЕСТВЕНИ МЕТОДИ
нови% АРГУМЕНТИ
ID => $ STRING
Идентификатор скаларна да използвате, за да се посочи позиция на стартовата решетка. Ако това не е така, на uppercased първото име характер ще се използва по подразбиране.
В момента той е длъжен, че това да бъде единичен главна буква (първата буква от името на плавателни съдове, най-вероятно), тъй като хит ще бъде посочено от "умалени букви" този знак върху решетка играч.
Име => $ STRING
A задължителен атрибут при условие, за да се получи занаята име.
точки => $ НОМЕР
Един атрибут се използва за определяне продължителността на отсечката на решетката на игралното поле.
Позиция => [$ X, $ Y]
Позицията на занаят лък ("нос") на стартовата решетка.
В момента този занаят се приема, че има хоризонтално или вертикално положение. Скоро ще има диагонал позициониране ...
удар
$ Points_remaining = $ craft-> удари;
Прираста хит на плавателния съд атрибут стойност и да се върне това, което е останало от плавателни съдове (общата стойност точка минус броя на хитовете) на
<силни> Изисквания :.
- Perl
Коментари не е намерена