Games::Battleship::Craft

ゲーム::戦艦::クラフトは戦艦クラフトクラスです。
書式
  ゲーム::戦艦::クラフトを使用します。
  私の$クラフト=ゲーム::戦艦:: Craft->新しいです（
      ID => 'T'、
      => 'タグボート「名前を付け、
      ポイント=> 1、
  ）
  $ points_remaining = $ craft->ヒット。
ゲーム::戦艦::クラフトオブジェクトは、戦艦のプロファイルを表します
パブリック·メソッド
新しい％引き数
ID => $ STRINGの
グリッド上の位置を示すために使用するスカラー識別子。一方が設けられていない場合は、大文字名文字がデフォルトで使用されます。
ヒットがプレイヤーグリッド上にこのマーク「小文字」で示されますので、現在、それは、これは単一の大文字（クラフト名の最初の文字、おそらく）であることが要求されます。
名前=> $ STRINGの
必要な属性は、クラフトに名前を与えるために提供しました。
ポイント=> $番号
属性は、再生グリッド上の線分長さを定義するために使用されます。
位置=> [$ X、$ Y]
グリッド上のクラフト弓（「鼻」）の位置。
現在、クラフトは、水平または垂直方向の配置を有するものとします。すぐに斜めの位置決めがあるでしょう...
ヒット
  $ points_remaining = $ craft->ヒット。
クラフトのヒット属性値をインクリメントし、クラフト（合計ポイント値マイナスヒット数）の残っているもの返します。

要件：ます。

のPerl