文件名称:cl-poker-eval:常见的Lisp 7卡扑克手评估。 基于扑克资源的评估
文件大小:22KB
文件格式:ZIP
更新时间:2024-06-10 18:05:33
CommonLisp
cl-poker-eval 纯普通的Lisp 7卡扑克手评估。 基于pokersource的评估。 可通过quicklisp加载。 * (ql:quickload " cl-poker-eval " ) cl-poker-eval对卡值使用以下枚举: 2c-Ac = 0-12 2d-Ad = 13-25 2h-Ah = 26-38 2s-As = 39-51 您可以使用eval-hand-var评估5到7张牌的手牌,也可以使用eval-hand-7评估7张牌的手牌。 例如,要获得一个列表中7张卡的价值,您可以执行以下操作: ( defvar *hand* '( 1 2 3 4 5 6 7 )) ; this would be the hand 3c 4c 5c 6c 7c 8c 9c (apply #'cl-poker-eval:eval-hand-var
【文件预览】:
cl-poker-eval-master
----top-card-tbl.lisp(42KB)
----license.txt(2KB)
----README.md(951B)
----package.lisp(2KB)
----top-5-cards-tbl.lisp(93KB)
----nbits-tbl.lisp(44KB)
----poker-defs.lisp(6KB)
----cl-poker-eval.asd(2KB)
----straight-tbl.lisp(44KB)
----hands.lisp(3KB)
----cl-poker-eval.lisp(7KB)