if Kz==0;
    errordlg('請先按 [ 發牌 ] 按鈕 !');
    Kk=1;
    return
end


an(abN==0)=[];
anc(abN==0)=[];
cc=[];
if length(an)>0;
    cc=sub2ind([4,13],anc,an);   
end
cc(length(cc)+1:5)=PPd(11:10+5-length(cc));
bb=PPd(16:20);
aa=cc;

[anc,an]=ind2sub([4,13],aa);
[bnc,bn]=ind2sub([4,13],bb);

[an,K]=sort(an);
anc=anc(K);
aSC=zeros(3,5);
ppl=find(anc<3);
aSC(1,ppl)=1;

[bn,K]=sort(bn);
bnc=bnc(K);
bSC=zeros(3,5);
ppl=find(bnc<3);
bSC(1,ppl)=1;
M=M-Kp;
set(aTS1,'string',CC(anc(1)),'color',aSC(:,1));
set(aTS2,'string',CC(anc(2)),'color',aSC(:,2));
set(aTS3,'string',CC(anc(3)),'color',aSC(:,3));
set(aTS4,'string',CC(anc(4)),'color',aSC(:,4));
set(aTS5,'string',CC(anc(5)),'color',aSC(:,5));

set(bTS1,'string',CC(bnc(1)),'color',bSC(:,1));
set(bTS2,'string',CC(bnc(2)),'color',bSC(:,2));
set(bTS3,'string',CC(bnc(3)),'color',bSC(:,3));
set(bTS4,'string',CC(bnc(4)),'color',bSC(:,4));
set(bTS5,'string',CC(bnc(5)),'color',bSC(:,5));

%%%%%%%%%%%
set(aTN1,'string',S(an(1)));
set(aTN2,'string',S(an(2)));
set(aTN3,'string',S(an(3)));
set(aTN4,'string',S(an(4)));
set(aTN5,'string',S(an(5)));

set(bTN1,'string',S(bn(1)));
set(bTN2,'string',S(bn(2)));
set(bTN3,'string',S(bn(3)));
set(bTN4,'string',S(bn(4)));
set(bTN5,'string',S(bn(5)));
[aR,aT,aSkk]=suosuo(anc,an);
[bR,bT,bSkk]=suosuo(bnc,bn);
set(aui,'string',aSkk);
set(bui,'string',bSkk);
M=sign(aR-bR)*Kp*aT+M+Kp;
set(Mone,'string',num2str(M));
Kz=0;