function dealer$($nPlayers$,$ nCards$)\%$ Check if the total number of cards exceeds $52$ if nPlayers $*$ nCards $>52$ error$(\text{'}$Total cards dealt exceeds the number of cards in a deck $(52).\text{'})$; end $\%$ Create a shuffled deck of cards deck $=$ randperm$(52)$; $\%$ Loop over each player for player $=1$:nPlayers fprintf$(\text{'}$Player $\%$d

$\text{'},$ player$)$; $\%$ Loop over the number of cards to deal for cardIndex $=1$:nCards $\%$ Get the current card from the deck cardNumber $=$ deck$(($player $-1)*$ nCards $+$ cardIndex$)$; $\%$ Determine the rank $(1-13)$ rank $=$ mod$($cardNumber $-1,13)+1$; $\%1-13\%$ Determine the suit $(1-4)$ suit $=$ ceil$($cardNumber $/13)$; $\%1=$Clubs, $2=$Diamonds, $3=$Hearts, $4=$Spades $\%$ Convert rank and suit to strings for display rankStr $=$ getRankString$($rank$)$; suitStr $=$ getSuitString$($suit$)$; $\%$ Print the card fprintf$(\text{'}\%$s of $\%$s

$\text{'},$ rankStr, suitStr$)$; end end end function rankStr $=$ getRankString$($rank$)\%$ Map the rank number to its string representation if rank $==1$ rankStr $=$ 'Ace'; elseif rank $==11$ rankStr $=$ 'Jack'; elseif rank $==12$ rankStr $=$ 'Queen'; elseif rank $==13$ rankStr $=$ 'King'; else rankStr $=$ num$2$str$($rank$)$; end end function suitStr $=$ getSuitString$($suit$)\%$ Map the suit number to its string representation switch suit case $1$ suitStr $=$ 'Clubs'; case $2$ suitStr $=$ 'Diamonds'; case $3$ suitStr $=$ 'Hearts'; case $4$ suitStr $=$ 'Spades'; end end