Games::Battleship::Craft

Ігри :: Броненосець :: Ремесло це ремесло клас Броненосець.
ОГЛЯД
  використовувати Ігри :: :: Battleship Craft;
  мій $ ремесло = Ігри :: Броненосець :: Craft-> Новий (
      ID => 'Т',
      Name => 'буксир ",
      точки => 1,
  )
  $ = $ Points_remaining craft-> вдарив;
Об'єкт гри :: Броненосець :: Ремесло являє собою профіль Battleship
Загальнодоступні методи
нові АРГУМЕНТИ%
ID => $ STRING
Ідентифікатор скалярний використовувати, щоб вказати положення на сітці. Якщо не передбачено, у верхній регістр ім'я персонажа буде використовуватися за замовчуванням.
В даний час, необхідно, щоб це бути один великої літери (перша літера імені корабля, напевно), так хітом буде зазначено "lowercasing" цієї марки на гравця сітці.
Ім'я => $ STRING
Обов'язковий атрибут умови, щоб дати Craft ім'я.
точки => $ НОМЕР
Атрибут використовується для визначення тривалості сегмента лінії на ігровому сітки.
положення => [$ X, $ Y]
Положення судів цибулю («ніс») на сітці.
В даний час судно передбачається мати горизонтальне або вертикальне вирівнювання. Найближчим часом буде діагональ позиціонування ...
удар
  $ = $ Points_remaining craft-> вдарив;
Збільште хіт ремесло в значення атрибуту і повернути те, що залишилося від (загальною вартістю точці мінус число хітів) судів

Вимоги :.

• Perl