WOO logo

在这一页

编程视频扑克代码

简介

编程视频扑克代码

这是我关于编程视频扑克的视频。

以下是视频中开发的代码。

#include <iostream>
#包括<时间.h>

结构卡
{
int r;
int s;
};

无效设置(无效);
无效交易(无效);
无效绘制(int c1,int c2,int c3,int c4,int c5);
int 分数(发牌[]);

int 分数数组[2598960];
卡片组[52];
int draw_combinations_array[] = { 1533939, 178365, 178365, 16215, 178365, 16215, 16215, 1081, 178365, 16215, 16215, 1081, 16215, 1081, 1081, 47, 178365, 16215, 16215, 1081, 16215, 1081, 1081, 47, 16215, 1081, 1081, 47, 1081, 47, 47, 1 };
int weighting_array[] = { 5, 43, 43, 473, 43, 473, 473, 7095, 43, 473, 473, 7095, 473, 7095, 7095, 163185, 43, 473, 473, 7095, 473, 7095, 7095, 163185, 473, 7095, 7095, 163185, 7095, 163185, 163185, 7669695 };
__int64 tot_combinations[52];

const char* hand_name_array[] = {
"输","J 或更好","两对","三条","顺子","同花","葫芦","四条","同花顺","皇家同花顺","总数" };
int win_array[] = { 0,1,2,3,4,6,9,25,50,800 };


int main()
{
time_t 开始时间,结束时间;
开始时间 = 时间(NULL);
设置();
交易();
结束时间 = 时间(NULL);
printf("总秒数=\t%i\n", (int)endtime - (int)begtime);
}

无效设置(无效)
{
int i,c1,c2,c3,c4,c5,计数,score_deal_array[52],sc;
发牌[5];
对于(i = 0;i <= 51;i++)
{
甲板[i].r = (int)(i / 4);
甲板[i]。s = i % 4;
得分交易数组[i] = 0;
总组合数[i] = 0;
}
计数=0;
对于(c1 = 0;c1 <= 47;c1++)
{
交易[0] = 甲板[c1];
对于(c2 = c1 + 1;c2 <= 48;c2++)
{
交易[1] = 甲板[c2];
对于(c3 = c2 + 1;c3 <= 49;c3++)
{
交易[2] = 甲板[c3];
对于(c4 = c3 + 1;c4 <= 50;c4++)
{
交易[3] = 甲板[c4];
对于(c5 = c4 + 1;c5 <= 51;c5 ++)
{
交易[4] = 甲板[c5];
sc = 分数(交易);
分数数组[计数] = sc;
得分交易数组[sc]++;
计数++;
}
}
}
}
}
std::cerr << "count =\t" << count << "\n";
对于(i = 0;i <= 9;i++)
std::cerr << hand_name_array[i] << "\t" << score_deal_array[i] << "\n";
}


无效交易(无效)
{
int i,c1,c2,c3,c4,c5;
int 计数 = 0;
对于(c1 = 0;c1 <= 47;c1++)
{
对于(c2 = c1 + 1;c2 <= 48;c2++)
{
对于(c3 = c2 + 1;c3 <= 49;c3++)
{
对于(c4 = c3 + 1;c4 <= 50;c4++)
{
对于(c5 = c4 + 1;c5 <= 51;c5 ++)
{
绘制(c1,c2,c3,c4,c5);
计数++;
如果((计数%1000)==0)
std::cerr << count << "\n";
}
}
}
}
}
对于(i=9;i>=0;i--)
printf("%s\t%i\t%I64i\n", hand_name_array[i], win_array[i], tot_combinations[i]);
}

无效绘制(int c1,int c2,int c3,int c4,int c5)
{
int i,j, d1, d2, d3, d4, d5, 索引, sc, draw_score_array[32][10];
int 计数 = 0;
对于(i = 0;i <= 31;i++)
{
对于(j = 0;j <= 9;j++)
draw_score_array[i][j] = 0;
}
对于(d1 = 0;d1 <= 47;d1++)
{
对于(d2 = d1 + 1;d2 <= 48;d2++)
{
对于 (d3 = d2 + 1; d3 <= 49; d3++)
{
对于(d4 = d3 + 1;d4 <= 50;d4++)
{
对于(d5 = d4 + 1;d5 <= 51;d5++)
{
sc = 分数数组[计数];
索引=0;
if ((d1 == c1) || (d2 == c1) || (d3 == c1) || (d4 == c1) || (d5 == c1))
索引 += 16;
如果((d1 == c2)||(d2 == c2)||(d3 == c2)||(d4 == c2)||(d5 == c2))
索引+=8;
如果((d1 == c3)||(d2 == c3)||(d3 == c3)||(d4 == c3)||(d5 == c3))
索引+=4;
如果((d1 == c4)||(d2 == c4)||(d3 == c4)||(d4 == c4)||(d5 == c4))
索引 += 2;
如果((d1 == c5)||(d2 == c5)||(d3 == c5)||(d4 == c5)||(d5 == c5))
索引+=1;
draw_score_array[索引][sc]++;
计数++;
}
}
}
}
}
双倍 ev;
双倍max_ev = 0;
int best_play = 0;
对于(i = 0;i <= 31;i++)
{
ev = 0.0;
对于(j = 0;j <= 9;j++)
ev += draw_score_array[i][j] * win_array[j];
ev /= draw_combinations_array[i];
如果(ev>max_ev)
{
最大有效值 = 有效值;
最佳发挥=我;
}
}
对于(j = 0;j <= 9;j++)
{
tot_combinations[j] += draw_score_array[best_play][j]* weighting_array[best_play];
}
}

int 分数(发牌[])
{
int 顺子,同花;
如果((交易[0].s == 交易[1].s)&&(交易[0].s == 交易[2].s)&&(交易[0].s == 交易[3].s)&&(交易[0].s == 交易[4].s))
冲洗=1;
别的
冲洗=0;
如果((交易[0].r!=交易[1].r)&&(交易[1].r!=交易[2].r)&&(交易[2].r!=交易[3].r)&&(交易[3].r!=交易[4].r))
{
如果((交易[0].r + 4)==交易[4].r)
直=1;
else if ((deal[4].r == 12) && (deal[3].r == 3)) // 轮子
直=1;
别的
直=0;
}
别的
直=0;
if ((顺子 == 1) && (同花 == 1))
{
如果(交易[0].r == 8)
返回 9;
别的
返回 8;
}
否则,如果(刷新==1)
返回 5;
否则,如果(直==1)
返回 4;
否则如果 ((交易[0].r == 交易[3].r) || (交易[1].r == 交易[4].r))
返回 7;
否则,如果((交易[0].r == 交易[2].r)&&(交易[3].r == 交易[4].r))
返回 6;
否则,如果((交易[0].r == 交易[1].r)&&(交易[2].r == 交易[4].r))
返回 6;
否则,如果((交易[0].r == 交易[2].r)||(交易[1].r == 交易[3].r)||(交易[2].r == 交易[4].r))
返回 3;
否则,如果((交易[0].r == 交易[1].r)&&(交易[2].r == 交易[3].r))
返回 2;
否则,如果((交易[0].r == 交易[1].r)&&(交易[3].r == 交易[4].r))
返回 2;
否则,如果((交易[1].r == 交易[2].r)&&(交易[3].r == 交易[4].r))
返回 2;
否则,如果((交易[0].r == 交易[1].r)&&(交易[0].r >= 9))
返回 1;
否则,如果((交易[1].r == 交易[2].r)&&(交易[1].r >= 9))
返回 1;
否则,如果((交易[2].r == 交易[3].r)&&(交易[2].r >= 9))
返回 1;
否则,如果((交易[3].r == 交易[4].r)&&(交易[3].r >= 9))
返回 1;
别的
返回 0;
}

链接

我的视频扑克分析方法