| ゲーム::ブラックジャック Games :: BlackJackは、BlackJackユーティリティクラスを持つPerlモジュールです。 |
今すぐダウンロード |
ゲーム::ブラックジャック ランキングとまとめ
- ライセンス:
- Perl Artistic License
- 出版社のWebサイト:
- http://search.cpan.org/mschilli/X10-Home-0.03/Home.pm
ゲーム::ブラックジャック タグ
ゲーム::ブラックジャック 説明
Games :: BlackJackは、BlackJackユーティリティクラスを持つPerlモジュールです。 Games :: BlackJackはBlackJackユーティリティクラスを持つPerlモジュールです..Synopsis Games :: BlackJackを使用します。 #カードの新しい靴を作成する私の$ shoe =ゲーム::ブラックジャック::靴 - >新(NOF_DECKS => 4); #2つの手、選手/ディーラー私の$ PLAYER =ゲーム::ブラックジャック::ハンド - >新(Shoe => $ Shoe); My $ Dealer = Games :: BlackJack :: Hand-> New(Shoe => $ Shoe); #2ディーラーカード$販売店 - > draw(); 「ディーラー:」、$販売店 - > AS_STRING()、 "N"; $販売店 - > draw(); #2番目のカードは表示されません$ Player-> draw(); $ Player-> Draw(); ""、 "、$ PLAYER-> AS_STRING、"( "、$ PLAYER-> COUNT_AS_STRING、")N "を印刷します。 #選手が立っていると判断しましょう。 ディーラーのターン。 #販売店はラスベガスのルールをプレイします(!$ ailer-> busted()、$ auter-> count( "soft")<17){$ ailer-> draw(); winner(-1:ディーラー、1:プレーヤー、1.5:プレーヤーブラックジャック)印刷 "プレーヤースコア:"、$ PLAYER->スコア($販売店)、 "n"; 要件: ・Perl
ゲーム::ブラックジャック 関連ソフトウェア