steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

Update docs/summary for poker vocab

db4
Aaron Schaefer 2009-05-07 18:50:46 -04:00
parent 7f6998a815
commit d9e4f6e9cb
2 changed files with 13 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

16
extra/poker/poker-docs.factor
View File

@ -2,7 +2,7 @@ USING: help.markup help.syntax strings ;
IN: poker IN: poker
HELP: <hand> HELP: <hand>
{ $values { "str" string } { "hand" "a new hand" } } { $values { "str" string } { "hand" "a new " { $link hand } } }
{ $description "Creates a new poker hand containing the cards specified in " { $snippet "str" } "." } { $description "Creates a new poker hand containing the cards specified in " { $snippet "str" } "." }
{ $examples { $examples
{ $example "USING: kernel math.order poker prettyprint ;" { $example "USING: kernel math.order poker prettyprint ;"
@ -13,7 +13,7 @@ HELP: <hand>
{ $notes "Cards may be specified in any order. Hands are directly comparable to each other on the basis of their computed value. Two hands are considered equal when they would tie in a game (despite being composed of different cards)." } ; { $notes "Cards may be specified in any order. Hands are directly comparable to each other on the basis of their computed value. Two hands are considered equal when they would tie in a game (despite being composed of different cards)." } ;
HELP: best-hand HELP: best-hand
{ $values { "str" string } { "hand" "a new hand" } } { $values { "str" string } { "hand" "a new " { $link hand } } }
{ $description "Creates a new poker hand containing the best possible combination of the cards specified in " { $snippet "str" } "." } { $description "Creates a new poker hand containing the best possible combination of the cards specified in " { $snippet "str" } "." }
{ $examples { $examples
{ $example "USING: kernel poker prettyprint ;" { $example "USING: kernel poker prettyprint ;"
@ -21,7 +21,7 @@ HELP: best-hand
} ; } ;
HELP: >cards HELP: >cards
{ $values { "hand" "a hand" } { "str" string } } { $values { "hand" hand } { "str" string } }
{ $description "Outputs a string representation of a hand's cards." } { $description "Outputs a string representation of a hand's cards." }
{ $examples { $examples
{ $example "USING: poker prettyprint ;" { $example "USING: poker prettyprint ;"
@ -29,10 +29,18 @@ HELP: >cards
} ; } ;
HELP: >value HELP: >value
{ $values { "hand" "a hand" } { "str" string } } { $values { "hand" hand } { "str" string } }
{ $description "Outputs a string representation of a hand's value." } { $description "Outputs a string representation of a hand's value." }
{ $examples { $examples
{ $example "USING: poker prettyprint ;" { $example "USING: poker prettyprint ;"
"\"AC KC QC JC TC\" <hand> >value ." "\"Straight Flush\"" } "\"AC KC QC JC TC\" <hand> >value ." "\"Straight Flush\"" }
} }
{ $notes "This should not be used as a basis for hand comparison." } ; { $notes "This should not be used as a basis for hand comparison." } ;
HELP: <deck>
{ $values { "deck" "a new " { $link deck } } }
{ $description "Creates a standard deck of 52 cards." } ;
HELP: shuffle
{ $values { "deck" deck } { "deck" "a shuffled " { $link deck } } }
{ $description "Shuffles the cards in " { $snippet "deck" } ", in-place, using the Fisher-Yates algorithm." } ;

2
extra/poker/summary.txt
View File

@ -1 +1 @@
5-card poker hand evaluator Poker hand evaluator