ninosan https://blog.hatena.ne.jp/ninosan/ Android版ファイアーエムブレム ヒーローズ報告 https://ninosan.hateblo.jp/ VBA ↑ちゃんとエースが1で判定されている ここに来て急にブラックジャックらしくなってきた。今回はテキストベースであるが、もし画像に置き換えればもうモノホンの雰囲気だ。ちょっと自分を褒めたくなった。配列の検索で関数を使ってないのが妙である。 なお、「プレイヤーがなぜ配列の3～9か」というとそのままセルにあてはめるからである。フツーのプログラムなら「1～7」にしてセルに書くときに「+2」をあとからあてはめそうであるが、まあ「3～9」でも大混乱にはならないだろう。ここまできたらもうプレイヤーのBJ成立・バースト成立確率は出そうと思えば出せる。 Sub BlackJack()Dim card(52) As… 190 <iframe src="https://hatenablog-parts.com/embed?url=https%3A%2F%2Fninosan.hateblo.jp%2Fentry%2F2015%2F04%2F15%2F163051" title="VBAメモ：ブラックジャックでプレイヤーの3枚目以降 - Android版ファイアーエムブレム ヒーローズ報告" class="embed-card embed-blogcard" scrolling="no" frameborder="0" style="display: block; width: 100%; height: 190px; max-width: 500px; margin: 10px 0px;"></iframe> http://cdn-ak.f.st-hatena.com/images/fotolife/n/ninosan/20150415/20150415162434.png Hatena Blog https://hatena.blog 2015-04-15 16:30:51 rich https://ninosan.hateblo.jp/entry/2015/04/15/163051 1.0 100%