TOP ＞ カジノゲームVCI ＞ スロットゲームサンプル

スロットゲームサンプル

概要

スロットマシンのサンプルです。
チップを指定位置に設置し、そのチップを増減させることでベット処理や配当処理を行います。
ソースがわかりやすいように、スロットの絵柄が必ず揃う設計になっています。

サンプルの説明

サンプルシーンを開く

サンプルシーンAssets/RamenVCI/Casino/SlotSampleを開くとスロットゲームのサンプルがあります。
SlotSampleオブジェクトからVCI出力すると、そのまま遊べます。

カジノゲームのサンプルのゲーム内容

ベットエリアへチップ設置して、チップから指定額を賭けてスロットを回すと、出てきた絵柄によって設置したチップが増えます。

プレイの説明
1 エリアにチップを設置する。
このチップは払い戻しができるクレジットのような扱いになります。
2 BetボタンをUseすると、設置したチップから$100ベットします。
最高$500までベットできます。
3 StartボタンをUseしてスロットゲームを開始する。
この時に揃った絵柄によって、設置したチップが増えます。
※必ず何かしらの絵柄が揃います。


チュートリアル：サンプルと同等のVCIを作る

オブジェクトの説明

||BETAREA||チップ置き場

ここにチップを設置します。

SlotTextX

スロットの絵柄を制御するテキストオブジェクトです。
実際にはスクリプトのSetTextで文字を変えて絵柄を変更します。

BetText

ベットされた回数を表示するテキストオブジェクトです。

BetButton　StartButton

ベット・ゲーム開始ボタンです。


スクリプトの組み込み

カジノライブラリの初期化

カジノライブラリ(モジュール)を読み込みと、ゲームコード・ベットエリアを登録します。
今回は一人プレイゲームのため、RegistBetAreaの引数にfalseを指定することで、一人だけしか賭けれないチップエリアを作成します。

  1. --カジノライブラリ読み込み
  2. local Casino = require("Casino")
  4. --ゲームコード登録
  5. Casino.RegistGameCode("SampleGame_Slot_CreatedByXXXXX")
  7. --ベットエリア登録
  8. Casino.RegistBetArea("||BETAREA||チップ置き場", false) --一人プレイのため、falseを指定することで一人だけしか賭けれない状態にする
    9. main.lua

チップが設置されている判定を作成

Bet/StartボタンをUseした時の処理は、どちらもチップが設置されていることが前提になるので、GetBetAreaDataからベットエリアに設置されているチップデータがあるか取得する。

  1. function onUse(use)
  2.     --ボタンの操作の前提として、ベットエリアに誰かがチップを設置している事が条件
  4.     --1番目に登録したベットエリアのデータを取得する
  5.     local betAreaData = Casino.GetBetAreaData(1)
  6.     --ベットエリアに設置されたチップが１つでもあるかチェックする
  7.     if #betAreaData.betChipData > 0 then
  8.         local chipData = betAreaData.betChipData[1] --
  9.         local chipVciID = chipData.chipVciID --チップVCIのInstanceID
  10.         local chipNum = chipData.chipNum --設置されたチップ額
  11.         print("ベットエリアに$" .. chipNum .. "チップが設置されています"")
  12.     end
  13. end
    14. main.lua

Betボタンからベット処理を行う

Betボタンを押して、設置チップから$100減らしてベットする処理を追加します。
最大5回までベットします。

  1. --1プレイにベットした回数
  2. local betCount = 0
  4. function onUse(use)
  5.     --ボタンの操作の前提として、ベットエリアに誰かがチップを設置している事が条件
  7.     --1番目に登録したベットエリアのデータを取得する
  8.     local betAreaData = Casino.GetBetAreaData(1)
  9.     --ベットエリアに設置されたチップが１つでもあるかチェックする
  10.     if #betAreaData.betChipData > 0 then
  11.         local chipData = betAreaData.betChipData[1] --
  12.         local chipVciID = chipData.chipVciID --チップVCIのInstanceID
  13.         local chipNum = chipData.chipNum --設置されたチップ額
  14.         print("ベットエリアに$" .. chipNum .. "チップが設置されています"")
  16.         --BetボタンがUseされた場合
  17.         if use == "BetButton" then
  18.             --ベット回数がMAX5回まで達していない場合
  19.             if betCount < 5 then
  20.                 --$100以上チップがある場合
  21.                 if chipNum >= 100 then
  22.                     --設置チップから$100減らす
  23.                     Casino.AddChipNumByFixedValue(1, chipVciID, -100)
  24.                     --ベット一回分加算する
  25.                     betCount = betCount + 1
  26.                     vci.assets._ALL_SetText("BetText", betCount)
  27.                 end
  28.             end
  29.         end
  30.     end
  31. end
    32. main.lua

Startボタンからゲーム処理を行う

Startボタンを押して、スロットの絵柄を表示して配当処理(チップの増加)を行う。

  1. --絵柄
  2. local SLOT_PICTURE = {"🍒", "🍆", "🍉", "🔔", "🍜", "<size=150%><color=red>７</color></size>"}
  3. --絵柄に対する配当倍率
  4. local REWARD_RATE = {1, 2, 3, 5, 10, 30}
  6. function onUse(use)
  7.     --ボタンの操作の前提として、ベットエリアに誰かがチップを設置している事が条件
  9.     --1番目に登録したベットエリアのデータを取得する
  10.     local betAreaData = Casino.GetBetAreaData(1)
  11.     --ベットエリアに設置されたチップが１つでもあるかチェックする
  12.     if #betAreaData.betChipData > 0 then
  13.         local chipData = betAreaData.betChipData[1] --
  14.         local chipVciID = chipData.chipVciID --チップVCIのInstanceID
  15.         local chipNum = chipData.chipNum --設置されたチップ額
  17.         --BetボタンがUseされた場合
  18.         if use == "BetButton" then
  19.             ～ベット処理～
  20.         end
  22.         --StartボタンがUseされた場合
  23.         if use == "StartButton" then
  24.             --表示する絵柄をランダムに選択
  25.             local picNum = math.random(1, #SLOT_PICTURE)
  26.             for slotID = 1, 3 do
  27.                 vci.assets._ALL_SetText("SlotText" .. slotID, SLOT_PICTURE[picNum])
  28.             end
  30.             --絵柄によって設置チップを増額する
  31.             --計算式(ベット回数 x $100 x 配当倍率)
  32.             Casino.AddChipNumByFixedValue(1, chipVciID, (betCount * 100 * REWARD_RATE[picNum]))
  34.             --ベット回数をゼロにリセットする
  35.             betCount = 0
  36.             vci.assets._ALL_SetText("BetText", betCount)
  37.         end
  38.     end
  39. end
    40. main.lua