| Giochi :: Blackjack. Giochi :: Blackjack è un modulo perl con classi di utilità di Blackjack. |
Scarica ora |
Giochi :: Blackjack. Classifica e riepilogo
- Licenza:
- Perl Artistic License
- Nome editore:
- Mike Schilli
- Sito web dell'editore:
- http://search.cpan.org/~mschilli/X10-Home-0.03/Home.pm
Giochi :: Blackjack. Tag
Giochi :: Blackjack. Descrizione
Giochi :: Blackjack è un modulo Perl con classi di utilità di Blackjack. Giochi :: Blackjack è un modulo perl con classi di utilità di blackjack.synopsis use giochi :: Blackjack; # Crea una nuova scarpa di carte My $ Shoe = Giochi :: Blackjack :: Shoe-> Nuovo (nof_decks => 4); # Crea due mani, giocatore / rivenditore My $ Player = Giochi :: Blackjack :: Mano-> Nuovo (scarpa => $ scarpa); My $ Dealer = Games :: Blackjack :: Mano-> Nuovo (scarpa => $ scarpa); # Due biglietti di rivenditori $ Dealer-> Disegna (); Stampa "Dealer:", $ Dealer-> AS_STRING (), "n"; $ rivenditore-> Disegna (); # 2nd card non mostrato $ Player-> Disegna (); $ Player-> Disegna (); Stampa "Lettore:", $ Player-> AS_STRING, "(", $ Player-> count_asstring, ") n"; # Prendiamo il giocatore decide di stare in piedi. Turno del rivenditore. # Concessionario gioca le regole di Las Vegas mentre (! $ Dealer-> Busted () e $ rivenditore-> conteggio ("soft") <17) {$ rivenditore-> Disegna (); } # Mostra Winner (-1: Dealer, 1: Player, 1.5: Player Blackjack) Stampa "Punteggio del giocatore:", $ Player-> Punteggio ($ rivenditore), "n"; Requisiti: · Perl.
Giochi :: Blackjack. Software correlato