Roblox コース mission04 レッツショッピング!( 後編 ) Chapter1 NPC と会話できるようにしよう Chapter2 コインがランダムに出るようにしよう Chapter3 GUI を作ろう Chapter4 GUI をプログラムでコントロールしよう Chapter5 デ

(1)

Roblox コース mission04

レッツ・ショッピング！（後編）

■Chapter1 NPC と会話できるようにしよう

■Chapter2 コインがランダムに出るようにしよう

■Chapter3 GUI を作ろう

■Chapter4 GUI をプログラムでコントロールしよう

■Chapter5 デバッグをしよう

■【応用編】買い物をする GUI を作ろう

■完成コード

(2)

1 Chapter1 NPC と会話できるようにしよう

NPC と会話できるようにする

前回の mission03 で作った NPC と会話できるようにしていきます。NPC をクリックしたら、NPC がしゃべりかけてくれるように作っていこうと思います。

NPC をクリックできるようにする

まずは NPC をクリックできるようにしていきます。

自動販売機と同じように ClickDetector を NPC に追加します。追加するときは NPC を Explorer から選択して、プラスボタンを押して追加するのでしたね。さらに Scri pt を追加して、NPCScriptという名前にしておきます。

クリックしたときに処理ができるように、

自動販売機と同様のコードを書いていきます。クリックされたときに clicked という

関数が実行されるようにしていきます。 ^NPCScript 1

2 3 4 5 6 7 8

local npc = script.Parent local click = npc.ClickDetector

function clicked()

end

click.MouseClick:Connect(clicked)

(3)

2 Chat 機能を使う

NPC と会話できるように

Chat

という機能を使います。Roblox Studio の Chat などの機能をコードから使う場合、game:Get

Service

という関数で取得して使います。

続いて NPC がしゃべる内容を変数に入れておきます。今回は連想配列というものを使ってみたいと思います。

連想配列

連想配列とは、Scratch や micratch のリ

ストのような機能です。今回のコードだと words という変数に文章を２つ入れて管理してみたいと思います。

リストは、リストに入れた順番で取得していましたが、連想配列の場合はキーと呼ばれる文字で取得することができます。

まず、4 行目では変数 words をカラの配列にしているコードです。{}と書きます。

5，6 行目でそれぞれ help1,help2 というキーで文章を入れています。こうすることで、リストのように数字ではなく、help1, help2 という文字でそれぞれの文章を取得できるようになります。

連想配列の内容を取得する場合も値を入れる場合も words[“help1”]のような書き方で行います。

それでは次のページから実際に連想配列の文章を表示させてみましょう。

NPCScript

1 2 3 4 5

6

7 8 9 10 11 12

local chat = game:GetService("Chat") local words = {}

words["help1"] = "誰かビルの上の宝を取ってきて！"

words["help2"] = "自動販売機でいいものが買えるかも！"

function clicked()

end

連想配列は、キーである文字から取得できる内容が予測できるというメリットがあります。

(4)

3 Chat で文章を出す

今回はクリックされるごとに内容を交互に変えてみます。7 行目で count という変数を作り、11 行目でクリックされた回数を数えていきます。

文章を表示する場所を指定する必要があるので 8 行目で NPC の頭のパーツである He ad を変数に入れておきます。

13 行目からの if の部分を見ていきます。if の条件で使っている「%」は、割った余りという意味の記号です。つまり、count を 2 で割った余りが１だったらという意味になります。

if と end の間に

else

という文字が新しく入っていますね。これは「もし～なら～でなければ～」というパーツの「でなければ」という意味と同じです。count を 2 で割った余りが 1 だったら 14 行目、でなければ 16 行目が実行されます。

14,16 行目では Chat 機能を使って文章を出す関数です。１つ目の引数で出す位置、

２つ目の引数で文章を指定します。

この時、連想配列を使っているので、wor ds[“help1”]のように書けば、文字であるキーで表示したい文章を取得することができます。

NPCScript

6

7 8 9 10 11 12 13 14 15 16 17 18 19 20

local count = 0 local head = npc.Head

function clicked() count += 1

if count % 2 == 1 then

chat:Chat(head, words["help1"]) else

chat:Chat(head, words["help2"]) end

end

(5)

4

実際に実行して試してみましょう。NPC をクリックするたびに表示される文章が変わるようになりました。

もしも自動販売機も会話できるようにしたい場合は、自動販売機の一番上のオブジェクトから Chat させることで実現できます。このとき、あらかじめ名前を Top など分かりやすい名前にしておくといいでしょう。

(6)

5 Chapter2 コインがランダムに出るようにしよう

コインをランダムに置く

前回のミッションでコインを作りました。

このコインをランダムにいくつも置かれるようにしていきましょう。

コインを複製する準備

ゲームの中にいくつもランダムに出すためには、コインを複製（クローン）してコインをいっぱい出す必要があります。

そのための準備として、Coin を Workspac e から

ServerStorage

に移動します。Coi n をクリックしながら移動させて、Server Storage の場所でマウスを離すと移動できます。

すると Coin がゲームから消えたと思います。ゲームの中からは消えますが、いつでも使えるように保存しておける場所が Ser verStorage という場所の役割です。

このようにオブジェクトを複製して使いたい場合は ServerStorage という場所にオリジナルを入れておいて使います。

コードから ServerStorage の Coin を複製してゲームの世界に出すように命令することで、Coin のコピーがゲームの世界に出てくるようになります。

コインを複製するコードの追加

コインを複製するコードを書いていきましょう。複製するコードはゲーム全体に関わるようなコードなので、ServerScriptSer

vice

にコードを書いていきます。ServerS criptService に

CreateCoinScript

という名前で Script を追加します。

(7)

6 複製（クローン）するコード

それでは Coin を複製するコードを書いていきましょう。

1 行目では ServerStorage にアクセスするために GetService という関数で取得しています。2 行目では ServerStorage の中に入れた Coin を変数に入れています。

ゲーム中は 2 秒ごとにコインが出続けるようにするため、while と wait を使います。

5 行目では、Coin を複製する関数を呼びます。Clone()という関数を呼び出すと、複製されたオブジェクトが作られるので変数に入れておきます。Scratch の「クローンを作る」というブロックと同じ意味です。

複製したオブジェクトは Workspace に入れてあげることでゲームの世界に出すことができるので、Parent を workspace にします。

ランダムな位置に出す

Coin が出てくる位置をランダムに出るようにしていきましょう。

準備として 7 行目の

Random.new()でラ

ンダムな値を作れるようにします。Scratc h や micratch でもありましたね。

8,9 行目で X 方向、Z 方向に対してランダムな値を作ります。NextIntegerという関数は、例えば 8 行目だと-180 から 100 までのランダムな整数を作ってくれる関数です。範囲は皆さんにお任せします。高さは固定でいいので Y 方向は作りません。

CFrame で位置を指定します。位置を指定するときは CFrame.new で新しい CFram e を作って代入すると指定することができます。

CreateCoinScript 1

2 3 4 5 6 7 8

local storage = game:GetService("ServerStora ge")

local coin = storage.Coin

while true do

local clone = coin:Clone() clone.Parent = workspace wait(2)

end

CreateCoinScript 1

2 3 4 5 6 7 8 9 10 11 12

local storage = game:GetService("ServerStora ge")

local coin = storage.Coin

while true do

local clone = coin:Clone() clone.Parent = workspace local random = Random.new()

local x = random:NextInteger(-180,100) local z = random:NextInteger(-180,200) clone.CFrame = CFrame.new(x,2,z) wait(2)

end

(8)

7

では実行して確かめてみましょう。すると、2 秒ごとに Coin がゲームの中に出てくるようになります。

(9)

8 Chapter3 GUI を作ろう

GUI とは

Chapter3 では

GUI

を作っていきましょう。その前に GUI とは何でしょうか。

GUI とは Graphical User Interface の略です。RPG の会話や買い物をするときにアイテムを選ぶ画面が出てくることがありますよね。このようにゲームに関する情報を表示するものが GUI です。

GUI を作る

GUI を作る場合は Explorer の中にある

St arterGui

という場所に作っていきます。S tarterGui を選択し、プラスボタンから

Sc reenGui

を選択します。ScreenGui はゲーム画面に表示するための GUI です。

さらに ScreenGui を選択し、プラスボタンから

TextLabel

を選択します。TextLabel は文字を表示するパーツです。

すると画面左上に白い四角が出てきたと思います。これで文字の表示ができました。

クエストの GUI を作る

今回は GUI を使って、今プレイヤーにやってほしい事、つまりクエストの内容を表示する GUI を作っていきましょう。

まずは表示する文字を変えていきます。Ex plorer から TextLabel を選択して Properti es を見てみます。

その中の

Text

という項目を「NPC に話し

かけよう！」に変えてあげます。すると表

示される文字が変わります。

(10)

9

他のプロパティも設定していきます。

TextColor3

というプロパティも好きな色に変えましょう。それぞれ背景と文字の色が変わります。

位置の調整

GUI を表示する位置を調整しましょう。直接マウスでクリックして移動することもできますが、プロパティから設定すると、さらに細かく設定が可能です。

Position

というプロパティを設定していきます。左にある矢印をクリックしていくとさらに表示されていきます。

(11)

10

Position は X と Y の 2 つの方向が設定できます。ゲームの中のオブジェクトは x,y,z の 3 方向でしたが、GUI は画面の縦（Y）

方向と横（X）方向の２つで表現します。

一番左上が 0 で、右側に行くほど X が大きくなり、下側に行くほど Y が大きくなります。

X,Y の中にさらに Offset と Scale というプロパティがあります。

Offset

は左上の位置からどれだけ移動させるかを指定できます。例えば X の offset を 50 にすると、ゲーム画面の大きさに関係なく、50 だけ右に移動して表示します。

Scale

は画面の大きさに対しての相対的な位置を指定することができ、0~1 の値で指定します。例えば X の scale を 0.5 にすると、画面の横方向の半分の位置に出てきます。画面の大きさを変えると、半分の位置に移動していることが分かります。

例では図のような Position に指定してみます。

offset は画面の大きさに関わらず指定できる値、scale が画面に対してどの位置にするかを指定できる値です。

Y

X

(12)

11 大きさを指定する

大きさを指定する場合は

Size

というプロパティを設定します。こちらも Position と同じように X,Y それぞれに Offset と Scale を設定できます。

例では図のような設定にします。すると、

左上に細長く表示されました。

この GUI は最初に表示する GUI なので、S creenGui の名前を

StartGui

という名前に変えて分かりやすくしておきましょう。

さらに GUI を追加する

NPC に話しかけた後に違うメッセージを表示するために、もう１つ GUI を追加します。StartGui を右クリック→Duplicate をクリックして複製します。複製した GUI は

QuestGui

という名前にしておきます。

QuestGui の方の TextLabel を選択します。先ほどのように Text プロパティを書き換える方法もありますが、ゲーム画面に表示されている文字をダブルクリックしても文字の編集ができます。

どちらの方法でも大丈夫なので、「コイン

を集めてパワーアップした宝を取りにいこう！」という文章に変えます。

2 つの GUI の位置が被っていますが、今はそのままでＯＫです。StartGui、QuestGui の

Enabled

というプロパティを変更すると表示非表示を切り替えられます。（TextL abel ではなく親のオブジェクトなので注意！）

TextLabel ではなく StartGui もしくは

QuestGui を選択

(13)

12 クリアしたときの GUI も作る

クリアしたときに表示される GUI も作ります。今度は新しく ScreenGui を作り、名前を

ClearGui

にしておきます。また TextLa bel も追加しておきましょう。

TextLabel を選択してプロパティを変えていきます。

Text を「Clear!」にします。大きさを変える場合、TextScaledという項目にチェックを入れることで変えることもできます。

チェックを入れると、GUI の大きさに応じて文字の大きさが自動的に変わるようになります。

Size と Position も設定します。例では画面の横幅いっぱいに出るようにしてみました。例のように offset と scale を組み合わせて指定することもできます。

(14)

13

図のような GUI になったかと思います。

この GUI はクリアしたときだけ出したいので、ClearGui の Enabled プロパティのチェックを外しておきましょう。

(15)

14 Chapter4 GUI をプログラムでコントロールしよう

GUI の管理について

GUI をコードから管理したいと思います。

その前に GUI について少し解説します。

今の状態でゲームを実行すると、Explorer を見てみると GUI は Players の各プレイヤーの中に作られていることが分かります。

Players というのは各プレイヤーに関する情報を管理する所です。なぜ GUI がこの中にあるかというと、GUI はプレイヤーごと

に表示を管理する必要があるからです。

ゲーム全体に影響するコードではなく、特

定のプレイヤーにだけ影響するコードを書

いていく必要があります。

この時、ゲーム全体を管理するサーバー側とプレイヤーのそれぞれの環境(クライア

ント側)で通信をすることで実現していき

ます。これは Roblox Studio の仕様上そうしないと GUI の管理ができませんので、そういうものだと思ってください。

実際にコードを書いてみる

実際にコードを書いてみてみましょう。まずは StartGui と QuestGui の表示を切り替えてみたいと思います。

最初は StartGui が表示されていて、NPC に話しかけたら QuestGui に切り替えるようにしてみます。なので、最初は QuestGu

例えばクリアする GUI を出したい場合、クリアしたプレイヤーにだけ GUI を出したいですよね。このようにプレイヤーごとに GUI の管理が必要です。

サーバー

（ゲームの世界）

プレイヤーA プレイヤーB

プレイヤーA がクリアしたよ！

GUI を表示！こっちは関係が無い

(16)

15

i の Enabled をオフにして StartGui だけ表示されている状態にしておきましょう。

NPC のコードに追加する

NPC に話しかけたときに GUI の表示を変えていきます。まずは NPCScript に追加していきます。

今まで書いてきた Script は、ゲーム全体に関わるサーバー側で動作するコードです。

NPCScript もサーバー側のコードなので、

クライアント側に NPC に話しかけたことを教えてあげる必要があります。このとき使うのが

Event

という機能です。Scratch のメッセージに似ています。

実はこの Event は今までにも使っています。NPCScript でもクリックされたときに MouseClick という Event に clicked という関数を登録していました。このように特定の何かが起こったときに、登録していた動作を実行できるのが Event です。

Event は自分でオリジナルのものを作ることができます。

Event を作る

まずはオリジナルの Event を作っていきます。サーバー側からクライアント側に送るためには

RemoteEvent

という専用のイベントを作ります。

RemoteEvent は

ReplicatedStorage

というものを親にする決まりがあるので設定します。これについてはそういう決まりだと思っておきましょう。

Event の名前を

Name

で設定します。Qu estEvent という名前にしておきます。

NPCScript

7 8 9 10 11 12

local event = Instance.new("RemoteEvent") event.Parent = game.ReplicatedStorage event.Name = "QuestEvent"

(17)

16

サーバー側からどのプレイヤー（クライアント）に Event を教えてあげればいいのかを指定してあげる必要があります。

VendingMachineScript の PlayerSetup の内容をそのままコピーして、プレイヤーの情報を取得しておくようにします。今は 1 人用前提で作っているので、このコードで大丈夫です。マルチプレイに対応する書き方は他のミッションで解説します。

続いて clicked 関数です。

話しかけた回数が 2 回になれば NPC との会話が終わったことになるので count==2 を if 文で使います。

このとき、event:FireClinentという関数でクライアント側に作った Event が起きたことを教えてあげることができます。

先ほど取得しておいたプレイヤー情報を引数にすることで、どのプレイヤーに教えてあげるのかを指定してあげています。

NPCScript

10 11 12 13 14 15 16 17 18 19 20

local players = game:GetService("Players") local player

function playerSetUp(p) player = p

end

players.PlayerAdded:Connect(playerSetUp)

NPCScript

22 23 24 25 26 27 28 29 30 31 32 33 34

if count == 2 then event:FireClient(player) end

end

クライアント QuestEvent が起きたよ！

オリジナルの Event を作ると特定のタイミングで特定の Event が起きたことを通知することができます。

サーバー

(18)

17 Event を受け取る

Event を作って通知することができました。次にクライアント側で Event を受け取ってみましょう。

そのために QuestGui に LocalScript を追加します。LocalScriptは今まで書いていた Script とは違い、クライアント側でのみ

動作するコード、つまり特定のプレイヤー

にだけ影響するコードです。GUI のようにプレイヤーごとに管理してあげる処理を書く時に使います。

名前を

QuestLocalScript

にしておきます。

では早速中身を書いていきましょう。

2,3 行目で先ほど NPCScript で作った Que stEvent を取得します。WaitForChild は Q uestEvent という子供が見つかるまで待つ関数です。FindFirstChild と似ています。

onFired という関数は、QuestEvent が起きたときに実行したい関数です。今回は親である QuestGui の Enabled を変えて、表示するようにします。ですので Enabled を true にしてあげます。

9 行目では Touched や MouceClick の時と同じように OnClinentEvent に onFired 関数を登録します。こうすることで、Quest Event が起きたら onFired 関数が実行されるようになります。

QuestLocalScript

1 2

3

4 5 6 7 8 9

local quest = script.Parent

local replicatedStorage = game:GetService("Re plicatedStorage")

local event = replicatedStorage:WaitForChild("

QuestEvent")

function onFired() quest.Enabled = true end

event.OnClientEvent:Connect(onFired)

(19)

18 StartGui を非表示にする

StartGui は逆に話しかけたときに非表示にしてあげたいですよね。

StartGui にも同様に LocalScript を追加し、名前を

StartLocalScript

にします。

QuestLocalScript と違う点は Enabled を f alse にする点だけなので、コピー＆ペーストして 6 行目を false 変えておきます。

また、1 行目で変数を作るときの名前も合わせて変えておくと、より丁寧ですね。

実行すると、2 回クリックしたら GUI が切り替わってくれます

クリアしたときに GUI を表示

もう１つ GUI を作っていました。ClearGu i です。こちらをクリアしたときに出すようにしてみましょう。

このゲームは何をしたらクリアになるかというと、宝を取ったときでしたね。宝を取ったときのコードは TreasureScript に書いていました。

StartLocalScript

1 2

3

4 5 6 7 8 9

local start = script.Parent

QuestEvent")

function onFired() start.Enabled = false end

NPCScript と同じように、TreasureScript に宝を取ったときに ClearEvent が通知されるように自分で書いてみよう！

?

(20)

19

TreasureScipt を書いてみましょう。

実はほとんど NPCScript に書いた内容と同じです。Event の名前を ClearEvent にし、FireClient を呼ぶ位置を 20 行目にしてあげればいいですね。

このとき、4 行目で Event を作っていますが、このコードは onTouched 関数よりも上に書くようにしましょう。上から順に実行されるので、変数を使う前に変数を作っておく必要があります。関数も同様です。

TreasureScript

1 2

3 4 5 6 7 8 9 10 11 12 13 14 15 16 17

18 19 20 21 22 23 24 25 26

local treasure = script.Parent

local sound = workspace["Turn Around (sting b)"]

local event = Instance.new("RemoteEvent") event.Parent = game.ReplicatedStorage event.Name = "ClearEvent"

end

function onTouched(hit)

local humanoid = hit.Parent:FindFirstChild("H umanoid")

if humanoid then event:FireClient(player) sound:Play()

treasure.Parent:Destroy() end

end

treasure.Touched:Connect(onTouched) 変数や関数は呼び出す行の上で

作っておく必要があります。

(21)

20

ClearGui で Event を受け取るコードを書きます。これも QuestLocalScript とほぼ同じです。

LocalScript を

ClearLocalScript

という名前で作ります。

QuestLocalScript の内容をコピー＆ペーストし、変数名と Event の名前だけを変えておきましょう。

こうすることで、宝を取ったときに Clear!

という GUI が表示されるようになりました。

ClearLocalScript

1 2

3

4 5 6 7 8 9

local clear = script.Parent

ClearEvent")

function onFired() clear.Enabled = true end

(22)

21 Chapter5 デバッグをしよう

デバッグとは

Chapter5 ではデバッグの方法について解説します。デバッグとは、エラーなどが起きてゲームが動かないときに、エラーの原因を探して直すことです。

デバッグの方法を解説するために、適当な位置に Block を追加して、名前を

ErrorPa rt にします。そして ErrorScript

という S cript を追加します。

このオブジェクトは、この Chapter が終わったあとに消します。

エラーの見つけ方

例えば、図のように 2 行目で変数の名前を打ち間違えたとします。

このようなときは図のように青い線が引かれて、ここが間違っていると教えてくれます。

この状態で実行すると、Output に赤い文字でエラーを教えてくれます。ただし、エラーメッセージはすべて英語なので、なかなか意味が分からないと思います。

そういう時は、エラーメッセージの行をクリックしてみましょう。すると、エラーが出ている場所に自動的に移動してくれます。

このように Output にエラーが出たときは、メッセージをクリックしてエラーが出ている場所に移動してエラーの原因を探すようにしましょう。

ErrorScript

1 2

local test = 1 testt += 1

(23)

22 print を使う

print という関数があります。これを上手く使うと、エラーの原因を探しやすくなります。

例えば、VendingMachineScript を見てみます。Clicked という関数は if がたくさん出てきてコードの流れが分かりづらいので、エラー探しが難しいです。

こういうときは、print を色々なところに入れることで、どの処理まで実行されたかを確認することができます。

実行して自動販売機をクリックすると、

Output は図のようになります。このように print を仕込んでおくと、複雑なコードでもどこまでの処理が実行されているかを確認することができます。

今回はコインが 0 枚のときにクリックしたので、15 行目の if 文は通りません。ですので 16 行目で入れた print が実行されていないのが正しいです。

チェック用に入れた print は、用がなくなったら消しておくと Output がきれいに保たれますので、print は消しておきましょう。また、ErrorPart,ErrorScript も消しておいて大丈夫です。

print で出す文字はゲームを公開するときは出てきませんので、

どんどん使って大丈夫です。

VendingMachineScript

7 8 9 10 11

12 13 14 15 16 17 18 19 20 21 22 23 24

function clicked()

local leaderstats = player.leaderstats print("leaderstats")

if leaderstats then

local coinValue = leaderstats:FindFirstChild("

coin")

print("coin") if coinValue then

print("coinValue")

if coinValue.Value > 0 then print("character")

local character = player.Character character.Humanoid.JumpPower *= 2 coinValue.Value = 0

sound:Play() end

end end end

エラーでは出ない、ゲームのロジックの確認をするのに print はとても使えます。

(24)

23 【応用編】買い物をする GUI を作ろう

買い物をする GUI の作成

買い物をするときに、どれを買うか選べるような GUI を作っていきましょう。

新しく ScreenGui を追加し、名前を

Vend ingMachineGui

にします。

今回はアイテムを選べる、つまり表示する項目が複数あります。このようなときは、

Frame

というパーツで管理します。いろいろなパーツを入れておく枠のイメージです。

VendingMachineGui を選択し、プラスボタンから Frame をクリックします。

Frame の Position と Size を設定して、買い物をする GUI をどこに出すかを設定します。例ではそれぞれ図のように設定します。

(25)

24

表示する枠の部分ができたので、次は中身を作っていきます。

Frame を選択し、プラスボタンから TextL abel を追加します。すると、Frame の左上に表示されました。このように Frame の中に作ったパーツは、Frame の左上が

Position(0,0)の位置になります。

TextLabel の Size を図のように設定します。Position はそのままで OK です。

さらに BackGoundColor3 を黒に、TextCo lor3 を白にします。文字の大きさは TextS caled にチェックを入れて自動的に調整されるようにします。

文字の内容も「買い物リスト」に変えておきましょう。

Frame の子供のパーツは、画面の左上ではなく Frame の左上が 0 の位置になります。

scale も同様に最大の大きさが Frame の右側下側になります。

(26)

25 ボタンの作成

次に、アイテムを３つ表示するパーツを作っていきます。アイテムはクリックすると買えるようにしたいので、今回は TextLab el ではなく

TextButton

というボタンのパーツを使います。TexButton はマウスクリックができる文字を表示するパーツです。

TextButton のプロパティを設定していきます。Position は、Y の offset を 50 にします。さきほど作った「買い物リスト」と表示する TextLabel の縦の大きさが 50 だったからです。

Size は TextLabel と同様の設定にします。

文字の大きさは TextSize を 30 にします。

ボタンの文字は左から詰めて表示したいので、TextXAlignmentという項目を Cent er から Left に変えます。

まったく同じやり方で、TextButton を 4 つ並べます。Position の Y だけ 50 ずつずらすと図のようになります。４つ目は買い物をせずに Gui を閉じるボタンにする予定です。

さらに表示する文字も変えていきます。図のように必要なコインとパワーアップする内容を書いてみました。

パーツが増えてきたので、それぞれ名前を上から図のように変えておくと分かりやすいです。

最後に、VendingMachineGui の Enabled をオフにして非表示にしておきましょう。

(27)

26 GUI を表示するコード

それでは自動販売機をクリックしたときに買い物をする GUI が表示されるようにしていきましょう。

VendingMachineScript に追加していきます。

VendingMachineEvent

という Event を新たに作り、クリックされたときに FireCli ent を呼んであげます。すると自動販売機をクリックしたときに Event が通知されるようになります。

続いて、VendingMachineGui に LocalScri pt を追加します。名前は

VendingMachi neLocalScript

にしておきましょう。

VendingMachineLocalScript は StartGui のときとほぼ同じなのでコピー＆ペーストしてしまいましょう。変数名や Event の名前、Enabled の値だけ注意して変えておきます。

1 2 3 4 5

6 7 8 9 10 11

local vendingMachine = script.Parent local click = vendingMachine.ClickDetector local players = game:GetService("Players") local player

local sound = vendingMachine["\"Goldrush \"

\"Win\"\"\""]

local event = Instance.new("RemoteEvent") event.Parent = game.ReplicatedStorage event.Name = "VendingMachineEvent"

function clicked()

event:FireClient(player)

VendingMachineLocalScript

1 2

3 4 5 6 7 8 9

local vending = script.Parent

VendingMachineEvent")

function onFired()

vending.Enabled = true end

(28)

27 ボタンを押して閉じるコード

次に、「さようなら」をクリックしたら GU I を閉じるようにしてみます。

ByeTextButton に LocalScript を

ByeLoc alScript

という名前で追加し、コードを書いていきます。

このボタンがクリックされたときの Event は MouseButton1Click という Event を使用します。

この Event に clicked という関数を登録します。この関数はボタンの親の親、つまり VendingMachineGui の Enabled を false にするコードです。

ここまでで１度実行して確認してみましょう。自動販売機をクリックすると買い物リストが出てきて、「さようなら」をクリックすると閉じれば OK です。

ボタンを押して買い物をする

閉じるボタンはできたので、ほかのボタンを押したときにパワーアップできるようにしていきしょう。

今まではサーバーからクライアントに Eve nt を通知していましたが、ボタンを押したときの処理はクライアント、買い物の処理はサーバー側で書いていました。なので今度はクライアント側である Gui からサーバー側に Event を通知してみます。

買い物をするコードは VendingMachineSc ript に書いてきましたが、ゴチャゴチャしてきたので、買い物の処理は別に分けておきます。

ServerScriptService に Script を

ShopSc ript

という名前で追加します。

VendingMachineLocalScript

1 2 3 4 5 6 7

local button = script.Parent

function clicked()

button.Parent.Parent.Enabled = false end

button.MouseButton1Click:Connect(clicked)

(29)

28 サーバー側の処理

ShopScript を書いていきます。３行目までは今までと同じです。

９行目はクライアント側からサーバー側に通知する Event なので、OnServerEvent という関数を使って Event に登録できるようにします。

登録する関数は onFired です。このとき、

どのプレイヤーからの Event なのか(playe r）と、必要なコインの枚数 (cost)の情報を受け取るために引数をそれぞれ追加しました。

このように、Event は引数をつけて情報を付け加えることが可能です。

クライアント側の処理

ボタンを押したときに Event を通知しましょう。

EffectButton に LocalScript を

EffectLoc alScript

という名前で追加します。

中身は今までとほとんど同じです。ShopE vent を作り、クリックされたタイミングで通知します。

今回はクライアント側からサーバー側に通知するので

FireServer

という関数を使います。

さきほどサーバー側では player と cost という２つを引数にとるようにしていました。プレイヤーに関する情報は書かなくても最初から引数に入っているので、必要なコインの枚数である５を引数に入れるだけで大丈夫です。

このボタンを押したときも GUI を閉じたいので８行目も書いておきましょう。

ShopScript

1 2 3 4 5 6 7 8 9

local event = Instance.new("RemoteEvent") event.Parent = game.ReplicatedStorage event.Name = "ShopEvent"

function onFired(player, cost)

end

event.OnServerEvent:Connect(onFired)

EffectLocalScript

1 2

3 4 5 6 7 8 9 10 11

local effect = script.Parent

ShopEvent")

function clicked() event:FireServer(5)

effect.Parent.Parent.Enabled = false end

effect.MouseButton1Click:Connect(clicked)

(30)

29 他のボタンにも同じことをする

スピードアップもジャンプ力アップも同じなので、同じように作っていきます。

EffectLocalScript の内容をコピー＆ペーストして、必要なコインの枚数だけ 10 と 30 に変えておきましょう。

図では省略しますがコードは最後のページの完成コードに載っています。

買い物をするコードの移動

それでは買い物をする処理を書いていきましょう。VendingMachineScript の clicke d 関数に書いていた、買い物をする処理をごっそり ShopScript の OnFired の中に貼り付けます。FireClinet の所だけ残しておきましょう。

このとき、変数 sound が取得する音は Ve ndingMachine の子供にあるので、４行目のように書き直しましょう。

onFired という関数は、cost という引数に買い物に必要なコインの枚数が入ってくるようにしました。

この枚数分持っていたら、その枚数だけコインを使ってパワーアップするように書いていけばよさそうですね。

ShopScript

1 2 3 4

5 6 7 8 9

10 11

12 13 14 15 16 17 18 19 20

local sound = workspace.VendingMachine["\"G oldrush \"\"Win\"\"\""]

function onFired(player, cost) local leaderstats = player.leaderstats if leaderstats then

coin")

if coinValue then

if coinValue.Value > 0 then local character = player.Character character.Humanoid.JumpPower *= 2 coinValue.Value = 0

sound:Play() end

end end end

(31)

30

VendingMachineScript を整理します。

VendingMachineScript の clicked 関数で、Event を通知する箇所以外全部持っていきました。また、音を鳴らす処理も買い物をしたときするので、変数 sound を作っている箇所も削ります。

かなりスッキリしましたね。

1 2 3 4

5 6 7 8 9 10 11

12 13 14 15 16 17 18 19 20

local sound = vendingMachine["\"Goldrush \"

\"Win\"\"\""]

function clicked() event:FireClient(player)

end

(32)

31 買い物をする処理を書く

いよいよ最後です。コインの枚数に応じた処理を書いていきます。

cost が 5 のときは、エフェクトを作るようにしています。このとき、コインを５枚以上持っていないと買い物ができないですよね。

このようなとき１１行目のように２つの条件が正しいときだけ実行されるようにするには、andで２つの条件をつなげることができます。Scratch や micratch の「かつ」というブロックと同じです。

cost が 5 かつ、５枚以上コインを持っていたら 12～14 行目のコードでエフェクトが作られるようになるわけです。エフェクトは何となく頭につけるようにしてみましたので、Parent を character.Head にしています。

このときに、15 行目で５枚だけコインが減るように変更しましょう。「-=」と書けば、左の値を右の値だけ引く計算ができます。16 行目で音を鳴らしておきます。

同じように１０枚、３０枚のときにそれぞれスピードアップとジャンプ力アップをするコードを書きます。「*=」と書くと、右の値の分だけ左の値にかけ算できます。

ShopScript

6 7 8 9

10 11

12 13 14 15 16 17 18 19

20 21 22 23 24 25 26

27 28 29 30 31 32 33 34

local leaderstats = player.leaderstats if leaderstats then

coin")

if coinValue then

if cost == 5 and coinValue.Value >= 5 the n

local effect = Instance.new("Fire") local character = player.Character effect.Parent = character.Head coinValue.Value -= 5

sound:Play() end

if cost == 10 and coinValue.Value >= 10 t hen

local character = player.Character character.Humanoid.WalkSpeed *= 2 coinValue.Value -= 10

sound:Play() end

if cost == 30 and coinValue.Value >= 30 t hen

local character = player.Character character.Humanoid.JumpPower *= 2 coinValue.Value -= 30

sound:Play() end

end end end

(33)

32

実際に実行してみましょう。

確認するためにコインを集めるのが面倒な場合は、LeaderboardScript の 10 行目で設定している、最初のコインの枚数を一時的に増やすと確認が楽です。

エフェクトを選ぶと、５枚使って頭が燃えます。他のボタンもスピードアップしたり、ジャンプ力が上がったりするか確認しましょう。

最後に BGM をアスレチックゲームと同じように追加しておくといいですね。Playin g と Looped のチェックを忘れないようにしましょう。また、Leaderboard の値を変えていたら 0 に戻しておきましょう。

LeaderboardScript

1 2 3 4 5 6 7 8 9 10 11 12 13 14

local players = game:GetService("Players")

function leaderboardSetUp(player)

local leaderstats = Instance.new("Folder") leaderstats.Name = "leaderstats"

leaderstats.Parent = player

local coin = Instance.new("IntValue") coin.Name = "coin"

coin.Value = 50

coin.Parent = leaderstats end

players.PlayerAdded:Connect(leaderboardSetU p)

コードの確認をしたい場合に一時的に数字をいじって楽をするといいですね。

(34)

33

お疲れ様でした！

今回のミッションは特に GUI の表示非表示を切り替えるコードが大変でしたね・・・。でも GUI を作ることができるとゲームの面白さがグン！と上がります！Roblox Studio の仕様の話もあるので細かいことは置いておいて、何となく分かっていれば OK ですよ。

次のミッションから新しいゲームを作ります！

それでは次のミッションでまた会いましょう！

(35)

34 完成コード

TreasureScript

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26

local treasure = script.Parent

local sound = workspace["Turn Around (sting b)"]

local event = Instance.new("RemoteEvent") event.Parent = game.ReplicatedStorage event.Name = "ClearEvent"

end

local humanoid = hit.Parent:FindFirstChild("Humanoid") if humanoid then

event:FireClient(player) sound:Play()

treasure.Parent:Destroy() end

end

treasure.Touched:Connect(onTouched)

(36)

35

LeaderboardScript

1 2 3 4 5 6 7 8 9 10 11 12 13 14

local players = game:GetService("Players")

function leaderboardSetUp(player)

local leaderstats = Instance.new("Folder") leaderstats.Name = "leaderstats"

leaderstats.Parent = player

local coin = Instance.new("IntValue") coin.Name = "coin"

coin.Value = 0

coin.Parent = leaderstats end

players.PlayerAdded:Connect(leaderboardSetUp)

(37)

36

CoinScript

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27

local coin = script.Parent

local players = game:GetService("Players") local sound = workspace["Blap 2"]

local humanoid = hit.Parent:FindFirstChild("Humanoid") if humanoid then

--コインの値を 1 増やす

local player = players:GetPlayerFromCharacter(hit.Parent) local leaderstats = player.leaderstats

if leaderstats then

local coinValue = leaderstats:FindFirstChild("coin") if coinValue then

coinValue.Value += 1 sound:Play()

end end

coin:Destroy() end

end

coin.Touched:Connect(onTouched)

while true do

coin.CFrame *= CFrame.Angles(0,math.rad(5),0) wait()

end

(38)

37

VendingMachineScript

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20

function clicked() event:FireClient(player) end

end

(39)

38

NPCScript

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36

local chat = game:GetService("Chat") local words = {}

words["help1"] = "誰かビルの上の宝を取ってきて！"

end

if count == 2 then event:FireClient(player) end

end

(40)

39

CreateCoinScript

1 2 3 4 5 6 7 8 9 10 11 12

local storage = game:GetService("ServerStorage") local coin = storage.Coin

while true do

local clone = coin:Clone() clone.Parent = workspace local random = Random.new()

local x = random:NextInteger(-180,100) local z = random:NextInteger(-180,200) clone.CFrame = CFrame.new(x,2,z) wait(2)

end

QuestLocalScript

1 2 3 4 5 6 7 8 9

local quest = script.Parent

local replicatedStorage = game:GetService("ReplicatedStorage") local event = replicatedStorage:WaitForChild("QuestEvent")

function onFired() quest.Enabled = true end

StartLocalScript

1 2 3 4 5 6 7 8 9

local start = script.Parent

local replicatedStorage = game:GetService("ReplicatedStorage") local event = replicatedStorage:WaitForChild("QuestEvent")

function onFired() start.Enabled = false end

(41)

40

ClearLocalScript

1 2 3 4 5 6 7 8 9

local clear = script.Parent

local replicatedStorage = game:GetService("ReplicatedStorage") local event = replicatedStorage:WaitForChild("ClearEvent")

function onFired() clear.Enabled = true end

VendingMachineLocalScript

1 2 3 4 5 6 7 8 9

local vending = script.Parent

local replicatedStorage = game:GetService("ReplicatedStorage") local event = replicatedStorage:WaitForChild("VendingMachineEvent")

function onFired() vending.Enabled = true end

(42)

41

ShopScript

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36

local sound = workspace.VendingMachine["\"Goldrush \"\"Win\"\"\""]

local leaderstats = player.leaderstats if leaderstats then

local coinValue = leaderstats:FindFirstChild("coin") if coinValue then

if cost == 5 and coinValue.Value >= 5 then local effect = Instance.new("Fire")

local character = player.Character effect.Parent = character.Head coinValue.Value -= 5

sound:Play() end

if cost == 10 and coinValue.Value >= 10 then local character = player.Character

character.Humanoid.WalkSpeed *= 2 coinValue.Value -= 10

sound:Play() end

if cost == 30 and coinValue.Value >= 30 then local character = player.Character

character.Humanoid.JumpPower *= 2 coinValue.Value -= 30

sound:Play() end

end end end

(43)

42

EffectLocalScript

1 2 3 4 5 6 7 8 9 10

local effect = script.Parent

local replicatedStorage = game:GetService("ReplicatedStorage") local event = replicatedStorage:WaitForChild("ShopEvent")

effect.Parent.Parent.Enabled = false end

effect.MouseButton1Click:Connect(clicked)

SpeedLocalScript

1 2 3 4 5 6 7 8 9 10

local speed = script.Parent

speed.Parent.Parent.Enabled = false end

speed.MouseButton1Click:Connect(clicked)

JumpLocalScript

1 2 3 4 5 6 7 8 9 10

local jump = script.Parent

jump.Parent.Parent.Enabled = false end

jump.MouseButton1Click:Connect(clicked)

Roblox コース mission04 レッツ ショッピング!( 後編 ) Chapter1 NPC と会話できるようにしよう Chapter2 コインがランダムに出るようにしよう Chapter3 GUI を作ろう Chapter4 GUI をプログラムでコントロールしよう Chapter5 デ