65.9K
CodeProject 正在变化。 阅读更多。
Home

战役按钮记忆游戏

starIcon
emptyStarIcon
starIcon
emptyStarIconemptyStarIconemptyStarIcon

1.61/5 (12投票s)

2004年2月20日

CPOL

2分钟阅读

viewsIcon

45857

downloadIcon

585

本教程介绍了一个中级水平的竞选按钮记忆游戏,以及如何自定义游戏。游戏是数据驱动的,因此您可以更改图像、难度等,而无需更改 VB 代码。

引言

这个竞选按钮记忆游戏由 www.pcbutton.com 带来 - (2004 年竞选按钮、政治按钮和纪念品按钮)

本教程介绍了一个中级水平的竞选按钮记忆游戏,以及如何自定义游戏。游戏是数据驱动的,因此您可以更改图像、难度等,而无需更改 VB 代码。

竞选按钮记忆游戏如何玩?

首先,用户通过点击“开始游戏”来启动游戏。

Sample image

然后,用户点击两张图片来翻开它们(在本例中,是两张吉米·卡特的照片)。

Sample image

然后,用户点击“继续”。如果图片匹配,它们将保持翻开状态。一旦用户翻开所有图片并点击“继续”,他们就赢得了游戏,并且他们的分数(步数)会显示出来。分数越低,玩家表现越好。

没有时间限制,用户可以根据需要尝试多次匹配所有图片。

Sample image

如何替换我自己的图片?

只需更新 data.xml 文件,指向您选择的图片即可。必须有 12 张或更少的图片标签,并且必须是偶数个。此外,必须有两张相同的图片。顺序决定了图片的显示方式。请务必将 visible 属性设置为“FALSE”。

.
.
.
<images>
 <image>
  <file>CARTERGOLD.jpg</file>
  <visible>FALSE</visible>
 </image>
 <image>
  <file>CARTERGOLD1.jpg</file>
  <visible>FALSE</visible>
 </image>
.
.
.

为什么“image”标签下有一个“visible”子标签?

将可见状态放在数据中更多的是一种风格上的选择,因为它可以完全驻留在内存中。visible 标签用于存储匹配成功时图片的显示状态。这样,您可以修改代码以具有“保存游戏”功能,该功能只需保存修改后的 data.xml 文件,而无需为存储和加载已保存的游戏创建新的机制。

我可以使用不同大小的图片吗?

是的。但是,第一张图片必须是最大的,并且它们必须与第一张图片具有相似的宽高比,因为第一张图片决定了其余图片的间距。

.
.
.
Function realignimages()
    Dim imagesize As Double

获取第一张图片的大小

    imagesize = picImage(0).Picture.Width * 0.6

显示第一行

    picImage(1).Left = picImage(0).Left + imagesize
    picImage(2).Left = picImage(1).Left + imagesize
    picImage(3).Left = picImage(2).Left + imagesize
    picImage(1).Top = picImage(0).Top
    picImage(2).Top = picImage(0).Top
    picImage(3).Top = picImage(0).Top

显示第二行

    picImage(4).Top = picImage(0).Top + imagesize
    picImage(5).Left = picImage(4).Left + imagesize
    picImage(6).Left = picImage(5).Left + imagesize
    picImage(7).Left = picImage(6).Left + imagesize
    picImage(5).Top = picImage(4).Top
    picImage(6).Top = picImage(4).Top
    picImage(7).Top = picImage(4).Top

显示第三行

    picImage(8).Top = picImage(4).Top + imagesize
    picImage(9).Left = picImage(8).Left + imagesize
    picImage(10).Left = picImage(9).Left + imagesize
    picImage(11).Left = picImage(10).Left + imagesize
    picImage(9).Top = picImage(8).Top
    picImage(10).Top = picImage(8).Top
    picImage(11).Top = picImage(8).Top
End Function
.
.
.
© . All rights reserved.