VB6でミニゲーム作成



VB6で作成したミニゲームのソースコードを紹介

スベリゲーム

スベリゲーム

概要

カーソルキーで灰色のボールを操作し、肉をゲットしてポイントを稼ぐゲームです。
ウンコに当たってしまうとマイナスポイントです。
地面が氷なので滑りますが、うまく操作して肉をゲットしてください。

ソースファイル

まずはソースファイルをダウンロードして下さい。

スベリゲームのソースファイルをダウンロード

プロジェクトファイル(slidegame.vbp)を開くと、4つのファイルがあります。
プロジェクト一覧

API(Api.bas)
ゲーム専用APIモジュール
frmMain(frmMain.frm)
メイン画面専用フォーム
frmPic(frmPic.frm)
画像置き場専用フォーム
mdlMain(mdlMain.bas)
メインプログラム専用モジュール

API(Api.bas)については、ゲーム専用モジュールをご参照下さい。
frmMainがゲームのメイン画面になります。
frmPicはゲームで使用する画像置き場にしています。 プログラム実行時に、このフォームは表示されませんが、バックグラウンドで存在しています。
mdlMainが、ゲームのメインプログラムになります。

メインプログラム

いくつかのプロシージャがありますが、まず初めに実行されるのがSub Main()です。
ここからプログラムがスタートし、Do〜Loop間でゲームの処理を行っています。
それぞれのプロシージャを簡単にご説明します。

Sub Main()
ここからプログラムが始まる。メインループ部分。
Sub Opening()
オープニング画面のループ処理。
Sub Setting()
変数などの初期設定。
Sub IceDraw
地面のアイスを描画。
Sub BallDraw()
ボールのキャラクターを描画。
Sub MeetDraw()
アイテムの肉を描画。
Sub UnkoDraw()
障害となるうんこの描画。
Sub GetKey()
キーボード入力処理。
Sub LetterDraw()
ポイントなどの数値を画面に描画。

▲上へ移動▲


© copyright nori