遊戲::戰艦::工藝是戰艦工藝一流。
概要
使用遊戲::戰艦::工藝;
我的手藝$ = ::遊戲::戰艦Craft->新(
ID =>'T',
NAME =>'拖船',
點=> 1,
)
$ points_remaining = $ craft->命中;
遊戲::戰艦::工藝對象代表戰艦的輪廓
公共方法
新%ARGUMENTS
ID => $ STRING
標量標識符用來表示對電網的位置。如果未提供,則大寫的名字字符將被默認使用。
目前,它是必需的,這是一個單一的大寫字母(工藝名字的第一個字母,可能),因為命中將由“lowercasing”這對玩家的網格標記來指示。
名稱=> $ STRING
提供必需屬性給工藝的名稱。
點=> $ NUMBER
一個屬性用於定義播放網格線段跨度。
位置=> [$ X,$ Y]
工藝弓(“鼻子”),對電網的位置。
目前,該工藝被認為具有水平或垂直取向。很快就會有角的定位...
撞
$ points_remaining = $ craft->命中;
增加工藝的命中屬性值,並返回還剩下什麼手藝(總點值減去命中數)
要求:
- 的Perl
評論沒有發現