お世話になります。
仕事で急にVB6を使ってスロットマシンを作成することに、
なったのですが、はじめて使うVBに戸惑っております。
今のところ、イメージボックスにビットマップデータを入れ、Form loadにデータとしておいて、各リール用にタイマーを用意し、何回か回転すると、タイマーのインターバールを0にして、止めるというところまでは出来たのですが
リールデータは回転絵柄の為、停止時に表示する絵柄以外にも回転中の絵柄がはさんであります。
これを回転させ、ランダムに停止絵柄で止めて絵柄が揃ったら配当するといった判定方法が思いつきません。
ぜひご指導のほど、お願いします。
また参考サイトなども教えていただけるとありがたいです。
No.2ベストアンサー
- 回答日時:
配列データにフラグをつけると言っても、大したことではない。
保持している画像と同じ数の変数を作るだけでも良いし。例えば、今そのイメージボックスが配列になっていて、Image(0)、Image(1)、・・・Image(n)という風になっているのならば、別個にフォーム内の変数として、Private StopFlag(0 to n) As Booleanなどとして、同じ数のBoolean配列を作成する。Image(0)、Image(4)、Image(8)が停止画像ならば、StopFlag(0)=True、StopFlag(1)=False、StopFlag(2)=False、StopFlag(3)=False、StopFlag(4)=Trueという風に値を入れていけば良い。
スロットが回っている時、ループカウンタcountが1ずつ足されていって、n+1になったら0に戻るはずだ。それで、止めるよ~という判定の際にStopFlag(count)を参照して、これがTrueならばほんとに止める、と言った処理を行えば良い。
ありがとうございます。だいたいイメージがつかめました
近いうちに、タイマーや判定について、すると思いますが、またよろしくお願いします。
No.1
- 回答日時:
停止絵柄で止める、とあるので、例えば回転中の絵柄が3枚あるとしたら、つまり、
0=ベルの停止絵柄
1=ベル3/4、バー1/4の回転絵柄
2=ベル1/2、バー1/2の回転絵柄
3=ベル1/4、バー3/4の回転絵柄
4=バーの停止絵柄
・・・
というような配列になったとしたら、「必ず4で割り切れるところまで回転する」という処理にする事ですぐ対応可能かと。
つまり、停止絵柄がある法則で導き出されれば良い。前述の○で割り切れる、というのでも良いし、配列データ中に停止絵柄フラグのようなものを作っても良いだろう。後は、停止するかどうか決める時に、停止絵柄かどうかを判別するコードを入れれば良いだろうね。
おおざっぱな回答になったので、こまかな点はまた聞いていただきたい。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・漫画をレンタルでお得に読める!
- ・14歳の自分に衝撃の事実を告げてください
- ・架空の映画のネタバレレビュー
- ・「お昼の放送」の思い出
- ・昨日見た夢を教えて下さい
- ・ちょっと先の未来クイズ第4問
- ・【大喜利】【投稿~10/21(月)】買ったばかりの自転車を分解してひと言
- ・メモのコツを教えてください!
- ・CDの保有枚数を教えてください
- ・ホテルを選ぶとき、これだけは譲れない条件TOP3は?
- ・家・車以外で、人生で一番奮発した買い物
- ・人生最悪の忘れ物
- ・【コナン30周年】嘘でしょ!?と思った○○周年を教えて【ハルヒ20周年】
- ・ハマっている「お菓子」を教えて!
- ・最近、いつ泣きましたか?
- ・夏が終わったと感じる瞬間って、どんな時?
- ・10秒目をつむったら…
- ・人生のプチ美学を教えてください!!
- ・あなたの習慣について教えてください!!
- ・牛、豚、鶏、どれか一つ食べられなくなるとしたら?
- ・都道府県穴埋めゲーム
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
VBA 変数名に変数を使用したい。
-
エクセルでXY座標に並べられた...
-
vba フィルター 複数条件 3つ以...
-
VB6のメモリ解放に関して
-
Excel2010のinputboxで複数デー...
-
OutOfMemoryExceptionの回避策...
-
スロットマシンの判定方法(VB...
-
Dir関数で読み取り順を操作でき...
-
配列のペースト出力結果の書式...
-
コンボボックスのインデックス...
-
VBAにて、配列のデータを一度に...
-
Redim とEraseの違いは?
-
VBA(メモリ展開)
-
配列の中の最大値とそのインデ...
-
CheckBoxの配列化
-
EXCEL VBA 配列デー...
-
配列でValue(値)を表示させる書...
-
pictureboxの名前を変数で設定...
-
VB.NETの配列にExcelから読み込...
-
COBOLの基本的な事なので...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VBA 変数名に変数を使用したい。
-
エクセルでXY座標に並べられた...
-
C#でbyte配列から画像を表示さ...
-
配列のペースト出力結果の書式...
-
vba フィルター 複数条件 3つ以...
-
配列の中の最大値とそのインデ...
-
Excel2010のinputboxで複数デー...
-
Redim とEraseの違いは?
-
Excelのメモリ(配列)の上限は2G...
-
COBOLの基本的な事なので...
-
Dir関数で読み取り順を操作でき...
-
構造体配列の特定のメンバーをF...
-
構造体配列内の文字列検索のよ...
-
VBAでMODE関数をつくる
-
CheckBoxの配列化
-
Segmentation Fault (メモリ制限?)
-
定数配列の書き方
-
VB.NETにて、構造体へデータを...
-
複数のtextboxの処理を一括で行...
-
VBScriptでCSVファイルを読み出...
おすすめ情報