Juegos :: Blackjack JUEGOS :: Blackjack es un módulo Perl con clases de utilidad Blackjack.
Descargar ahora

Juegos :: Blackjack Clasificación y resumen

Juegos :: Blackjack Etiquetas

Módulo perl utilidad Veintiuna Utilidad de blackjack Clases de blackjack

Juegos :: Blackjack Descripción

Juegos :: Blackjack es un módulo Perl con clases de utilidad Blackjack. Juegos :: Blackjack es un módulo Perl con clases de utilidad Blackjack.Synopsis Use Juegos :: Blackjack; # Crear nuevo zapato de tarjetas My $ Shoe = Juegos :: Blackjack :: Shoe-> Nuevo (NOF_DECKS => 4); # Crear dos manos, jugador / distribuidor My $ Player = Juegos :: Blackjack :: Hand-> New (zapato => $ zapato); My $ Dealer = Juegos :: Blackjack :: Hand-> New (zapato => $ Shoe); # Dos tarjetas de distribuidor $ distribuidor-> dibujar (); Imprimir "Distribuidor:", $ distribuidor-> as_string (), "n"; $ distribuidor-> dibujar (); # 2nd tarjeta no mostrada $ Player-> Dibujar (); $ jugador-> dibujar (); Imprimir "Player:", $ Player-> As_String, "(", $ Player-> cuenta_as_string, ") n"; # Asume que el jugador decide estar de pie. El turno del distribuidor. # El distribuidor juega las reglas de Las Vegas mientras (! $ Distribuidor-> Rusted () y $ Distribuidor-> Contar ("Soft") <17) {$ distribuidor-> Dibujar (); } # Mostrar ganador (-1: Distribuidor, 1: Jugador, 1.5: Jugador Blackjack) Imprimir "Puntuación del jugador:", $ Player-> Puntuación ($ distribuidor), "n"; Requisitos: · Perl

Juegos :: Blackjack Software relacionado