科技行者

行者学院 转型私董会 科技行者专题报道 网红大战科技行者

知识库

知识库 安全导航

至顶网软件频道基础软件用Visual Basic.NET编写扑克牌游戏

用Visual Basic.NET编写扑克牌游戏

  • 扫一扫
    分享文章到微信

  • 扫一扫
    关注官方公众号
    至顶头条

本文拟借用Windows自带的Cards.dll和简单的21点游戏为例,介绍扑克游戏编程的初步方法

作者:朱罗海 来源:天极网 2007年11月9日

关键字: Visual Basic 编写 扑克牌游戏

  • 评论
  • 分享微博
  • 分享邮件
扑克游戏林林总总,同一种游戏各地玩法亦不尽相同。编程爱好者多喜欢编写一些本地玩法的扑克游戏。那么,编写自己的扑克游戏该从何处入手呢?

  扑克游戏编程关键有两点:一是扑克牌面的绘制;二是扑克游戏规则的算法实现。初学扑克游戏编程的爱好者可从一些简单的游戏、借用一些现有资源开始。本文拟借用Windows自带的Cards.dll和简单的21点游戏为例,介绍扑克游戏编程的初步方法。

  一、 扑克牌面绘制

  Cards.dll支持Windows自带的游戏,如Solitaire(纸牌游戏)。如果我们知道如何使用Cards.dll中的API函数,那么,我们就能像Windows自带的游戏一样绘制扑克牌面。我们需要使用其中三个基本函数:cdtInit, cdtDrawExt,和 cdtTerm。并且需要两个变量:width和height用于初始化函数cdtInit进行初始化。下面给出这些接口函数的声明及参数说明。

Private width As Integer = 0
Private height As Integer = 0

Declare Function cdtInit Lib "cards.dll" (ByRef width As Integer, _
ByRef height As Integer) As Boolean

  参数说明:width,height返回牌默认宽和高,单位为pixels。

Declare Function cdtDrawExt Lib "cards.dll" (ByVal hdc As IntPtr, _
ByVal x As Integer, ByVal y As Integer, ByVal dx As Integer, _
ByVal dy As Integer, ByVal card As Integer, _
ByVal mode As Integer, ByVal color As Long) As Boolean

  参数说明:hdc(handle to a device context)句柄;

  x,y指定牌左上角坐标位;
  dx,dy指定牌宽和高;
  card需要绘制的牌,0-51[A(草花、方块、红桃、黑桃),2,…,K];53-65牌背面;
  mode 指定绘制方式,牌面向上为0,牌面向下为1;
  color 指定背景色。
 
Declare Sub cdtTerm Lib "cards.dll" ()

  无参数。

  我们需要在游戏开始时调用cdtInit对cards.dll进行初始化,这样我们才能使用cards.dll中的cdtDrawEx等函数;每绘制一张牌,我们都要调一次cdtDrawExt函数;当我们结束游戏时,调用一次cdtTerm以结束cards.dll的使用。
    • 评论
    • 分享微博
    • 分享邮件
    邮件订阅

    如果您非常迫切的想了解IT领域最新产品与技术信息,那么订阅至顶网技术邮件将是您的最佳途径之一。

    重磅专题
    往期文章
    最新文章