var pk="a23456789⑩jqk王"//取A到王共14张不同的牌
var i=0
输出剩牌=""
输出炸弹=""
循环(i<14)//循环识别54张手牌，统计每张牌的数量
var p=字符串截取(pk,i,i+1)//取pk变量中第i个字符，放进变量p中
var lm1=字符串长度(两家)//计算当前牌组长度
两家=字符串替换(两家,p,"")//将当前牌组中的所有p牌删除
var lm2=字符串长度(两家)//计算当前牌组长度
i=i+1
var pn=lm1-lm2 //计算牌p有pn张，放进变量pn中
剩[p]=字符串截取左侧(剩[p],字符串长度(剩[p])-pn)//处理剩余牌库中牌p的数量
if(字符串长度(剩[p])>3)//判断剩余牌库中牌p的数量是否大于3
输出炸弹=输出炸弹&p//大于3张的有可能是炸弹
end
输出剩牌=输出剩牌&剩[p]//将剩余牌库混合到一个变量中，准备输出到编辑框中
//消息框(p&"有"&pn&"张")
//p为牌名,pn为p的数量
//计算现有牌数量
结束
编辑框设置文本("剩牌",输出剩牌)
编辑框设置文本("炸弹",字符串转大写(输出炸弹))
线程3=线程开启("右出","")
线程4=线程开启("左出","")
线程关闭(线程2,0)
结束 //手牌
var pk="a23456789⑩jqk王"
var i=0
循环(i<14)//循环识别左家出牌各张牌的数量，与上面开局识别手牌的语句类似
var p=字符串截取(pk,i,i+1)
var lm1=字符串长度(le)
le=字符串替换(le,p,"")
var lm2=字符串长度(le)
i=i+1
var pn=lm1-lm2
剩[p]=字符串截取左侧(剩[p],字符串长度(剩[p])-pn)
if(字符串长度(剩[p])>3)
输出炸弹=输出炸弹&p
end
if(右王1)
剩["王"]=字符串移除(剩["王"],1,假)
字库切换(1)
当=识字(x-5,300,x+20,350,"000000-333333|bb2008-bb2222|bf2f19-bf2222",0.9)
剩[当]=字符串拼接(剩[当],当)
ri=字符串拼接(ri,"当")
end
end
输出右家=编辑框获取文本("右家")&ri
编辑框设置文本("右家",字符串转大写(输出右家))
输出炸弹=""
输出剩牌=""
var pk="a23456789⑩jqk王"
var i=0
循环(i<14)
var p=字符串截取(pk,i,i+1)
var lm1=字符串长度(ri)
ri=字符串替换(ri,p,"")
var lm2=字符串长度(ri)
i=i+1
var pn=lm1-lm2
剩[p]=字符串截取左侧(剩[p],字符串长度(剩[p])-pn)
