Jeux :: cartes :: Bridge :: caoutchouc

objet pour pont (jeu de cartes) Scoring caoutchouc
Télécharger maintenant

Jeux :: cartes :: Bridge :: caoutchouc Classement & Résumé

Publicité

  • Rating:
  • Licence:
  • Perl Artistic License
  • Prix:
  • FREE
  • Nom de l'éditeur:
  • David Westbrook
  • Site Internet de l'éditeur:
  • http://search.cpan.org/~davidrw/

Jeux :: cartes :: Bridge :: caoutchouc Mots clés


Jeux :: cartes :: Bridge :: caoutchouc La description

Objet pour le pont (jeu de cartes) Scoring caoutchouc Jeux :: Cartes :: Bridge :: Le caoutchouc est un objet pour le pont (jeu de cartes) Scoring caoutchouc.SynopssiThis Module fournit une classe pour créer des objets en caoutchouc de pont, y compris les résultats et la notation et l'état actuel du caoutchouc. Utilisez des jeux :: cartes :: pont :: caoutchouc; Sous-show_score {My $ caoutchouc = shift; Printf "totaux (ci-dessus / ci-dessous): nous =% d /% d Ils =% d /% d ", $ caoutchouc-> we_above, $ caoutchouc-> we_below, $ caoutchouc-> ils_above, $ caoutchouc-> ils_below; printf" jambes: nous =% D ", $ caoutchouc-> we_leg, $ caoutchouc-> ils_leg; printf" VUL: nous =% d ils =% d ", $ caoutchouc-> we_vul, $ caoutchouc-> ils_vul; printf" == complet == Nous:% D qu'ils:% d ", $ caoutchouc-> we_score, $ caoutchouc-> ils_score si $ caoutchouc-> complet;} My $ caoutchouc = jeux = jeux :: cartes :: pont :: caoutchouc-> nouveau; caoutchouc); foreach opts ( {Direction => 'Nous', Trump => 'H', BID => '2', faite => '4'}, {direction => 'Ils', TROPUM => 'S', BID => '4 ', Down =>' 2 ', dbl => 1}, {direction =>' Ils ', Trump =>' N ', BID =>' 3 ', fabriqué => "4'}, {" direction => ' Ils ', Trump =>' S ', BID =>' 3 ', fabriqué =>' 3 '}, {direction =>' Ils ', Trump =>' D ', BID =>' 2 ', Down => '2'}, {direction => 'We', Trump => 'H', BID => '6', faite => '7', dbl => 1}, {direction => 'Ils', Trump = > 'N', offre => '1', faite => '2'}, {direction => 'Nous', Trump => 'C', BID => '3', fabriqué => '3'}, {Direction => 'Ils', Trump => 'H', BID => '3', faite => '3'},) {$ caoutchouc-> contrat (% $ opts); show_score ($ caoutchouc);};} Exigences: · Perl


Jeux :: cartes :: Bridge :: caoutchouc Logiciels associés