假设有:
二万,三万,四万,五万,六万,七万,八万如果听牌的话有下列:
1,(二万,三万,四万)+(五万,六万,七万)+八万---->听八万2,(二万,三万,四万)+(六万,七万,八万)+五万---->听五万3,(三万,四万,五万)+(六万,七万,八万) +二万---->听二万就要判断出上面的三组听牌可能,上面的牌都有一个对应值,分别是(2,3,4,5,6,7,8)你能谈谈你的思路吗?????
二万,三万,四万,五万,六万,七万,八万如果听牌的话有下列:
1,(二万,三万,四万)+(五万,六万,七万)+八万---->听八万2,(二万,三万,四万)+(六万,七万,八万)+五万---->听五万3,(三万,四万,五万)+(六万,七万,八万) +二万---->听二万就要判断出上面的三组听牌可能,上面的牌都有一个对应值,分别是(2,3,4,5,6,7,8)你能谈谈你的思路吗?????
解决方案 »
- delphi如何把光标放在按钮上
- 高分求EFEdit, EFListView的组件包
- 如何代码控制控件dbgird的横向滚动条
- 我的Delphi中怎么么有TClientSocket和TServerSocket控件啊?
- Mediaplay在win2000下播放mp3说不能确定设备,但在98下可以,如何解决
- Application.MessageBox('真的中止吗?','警告',MB_OKCANCEL) 弹出来的时候能不能让缺省选中取消啊?
- QuickReport纸张方向的问题:设置为横向后,打印正常,而预览不正常(纸张没有横过来)。
- 怎样在程序中引用另一个exe文件?
- 关于Delphi模块的拆分?
- windows上delphi开发,连接linux机器,调用linux编程,可否实现?如何实现?
- 求救~急!关于用SHFILEOPERATION复制文件~
- 向指定程序(窗口或者非活动窗口)进行模拟键盘操作
http://www.cublog.cn/opera/showart.php?blogid=463&id=47368以上两个都是C的实现,可以参考一下
---------------------
有没有具体点的思路,上面的都只是简单的,假如:
一万
一万
一万
二万
三万
四万
五万
五万
六万
七万
八万
九万
九万
九万那又如何判断了,只要随便来一张万牌就能胡牌
----------------------------
你不是要听的牌么?你把一万到九万挨个试到你的胡牌函数里,可以胡就显示出来就是了
for i:=1 to 9 do
if hupai(i万) then memo1.lines.add(i万)这样得到的就是听的所有牌了,比如
二万,三万,四万,五万,六万,七万,八万
那么Memo1里显示的就是258
一万 一万 一万 二万 三万 四万 五万 五万 六万 七万 八万 九万 九万 九万
显示的就123456789
被鸡糊给推了