番号をカードに換算する
calc は、番号をカードに換算するサブルーチンです。
1 組のカードを 1 次元の配列として扱っているので、換算が必要になります。
#番号をカードに換算する
sub calc($) {
my ($index) = @_;
return(int(($index % IMAX) / 13), ($index % IMAX) % 13);
}
- トランプ・ポーカー
- トランプ・ブラックジャック
- ギャンブルから株式為替まで役立つ資金管理
- 株式投資や為替取引のリスクマネジメント
- カード被害が預金者保護法で補償された体験
- アニメで英会話/台詞逆輸入
- 右脳と左脳を鍛える開発トレーニング