友達とかいないからエクセルをつかってゲームをつくるよ
TRPGとかそうしたものをやるのに憧れるけど、僕にはそんな友達がいないのでそんな感じのことができる何かを作成するよ。どんなゲームをつくろうかなんて設計を一切していないから途中で破綻する予定だけど応援してくれたら嬉しいよ。
「なんでエクセルを選んだの?」とかは聞いちゃだめだよ。
ダメージ処理だけつくった
とりあえずつくってみる。
VBAは前々から触っていたけど、フォームの方をいじってばかりだからセルの操作に関して苦戦したし新鮮だった。
とりあえずこんな形のエクセルシートを作成して、キャラを動かしていくようにしていくよ。
制作自体は途中破綻する予定だけど、なるべく作った時のノウハウ的なものは後々に繋げられるようにつくっていこうとは思う。
ソースはこう。
Sub damageCheck() '種族判定 Cells(1, 3).Select Dim checkSpe As Range Set checkSpe = Selection If checkSpe = "種族" Then Else MsgBox ("無効な値です") End If '体力の処理 (人間の場合) Dim FoundCell As Range For i = 1 To 10 Step 1 Set FoundCell = Cells(i, 3).Find("人間") If Not FoundCell Is Nothing Then Dim HP As Variant Dim damage As Variant damage = 3 HP = FoundCell.Next - damage MsgBox FoundCell.Previous & "は" & damage & "ptのダメージを受けた" Cells(i, 4) = HP End If Next End Sub
これを実行すると種族人間にだけダメージの処理だけできるようになるよ。
体力が0以下に死亡する設定とかできてないから次はそんな処理とかしようと思う。