潇潇 发表于 2010-4-30 22:10:51

易语言+D2D游戏开发——创建四方向可移动的角色精灵


.版本 2
.程序集 我的游戏
.子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
.局部变量 屏幕, D2D_屏幕
屏幕.帧率 ＝ 60
屏幕.逻辑函数 ＝ &屏幕逻辑
屏幕.渲染函数 ＝ &屏幕渲染
屏幕.宽 ＝ 640
屏幕.高 ＝ 480
屏幕.标题 ＝ “易语言+D2D游戏开发 —创建四方向可移动的主角 by 潇潇 2010.04.30”
引擎.创建 (屏幕, #窗口化)
' ---------------------------------------------------------------------
角色图片.纹理 ＝ 引擎.载入纹理 (取运行目录 () ＋ “/纸娃娃.jpg”)
角色动画_下.创建 (角色图片, 6, 8, 58, 0, 58, 131)' 创建角色下方向序列动画帧数:6（下方向动作共七张图-站立的第一张图）动画速度:6（自已定义） 从角色图片的(0,0)位置开始获取7帧动画 单帧宽度:58＝序列图宽度/7=406/7单帧高度:131=序列图高度/9=1179/9
' 角色动画_下.播放 ()
角色动画_左.创建 (角色图片, 6, 8, 58, 131 × 1, 58, 131)
角色动画_右.创建 (角色图片, 6, 8, 58, 131 × 2, 58, 131)
角色动画_上.创建 (角色图片, 6, 8, 58, 131 × 3, 58, 131)
角色状态 ＝ #站立
角色方向 ＝ #下
角色位置.x ＝ 280
角色位置.y ＝ 180
' ---------------------------------------------------------------------
引擎.启动 ()
' ---------------------------------------------------------------------
引擎.销毁 ()
返回 (0)

.子程序 屏幕逻辑, 逻辑型, , 返回真 游戏结束
.局部变量 最后帧时间, 小数型
最后帧时间 ＝ 引擎.取最后帧时间 ()
.判断开始 (引擎.取按键事件 (#下光标键))
    角色动画_下.更新 (最后帧时间)
    角色方向 ＝ #下
    角色动画_下.继续 ()
.默认
.判断结束
.判断开始 (引擎.取按键事件 (#左光标键))
    角色动画_左.更新 (最后帧时间)
    角色方向 ＝ #左
    角色动画_左.继续 ()
.默认
.判断结束
.判断开始 (引擎.取按键事件 (#右光标键))
    角色动画_右.更新 (最后帧时间)
    角色方向 ＝ #右
    角色动画_右.继续 ()
.默认
.判断结束
.判断开始 (引擎.取按键事件 (#上光标键))
    角色动画_上.更新 (最后帧时间)
    角色方向 ＝ #上
    角色动画_上.继续 ()
.默认
.判断结束
.如果真 (引擎.取按键弹起 (#下光标键) 或 引擎.取按键弹起 (#左光标键) 或 引擎.取按键弹起 (#右光标键) 或 引擎.取按键弹起 (#上光标键))
    角色动画_下.置当前帧 (0)
    角色动画_左.置当前帧 (0)
    角色动画_右.置当前帧 (0)
    角色动画_上.置当前帧 (0)
    角色动画_下.停止 ()
    角色动画_左.停止 ()
    角色动画_右.停止 ()
    角色动画_上.停止 ()
.如果真结束
返回 (假)
.子程序 屏幕渲染, 逻辑型, , 返回真 游戏结束
引擎.渲染开始 ()
引擎.清屏 ()
' ---------------------------------------------------------------------
.判断开始 (角色方向 ＝ #下)
    角色动画_下.显示 (角色位置.x, 角色位置.y)
.默认
.判断结束
.判断开始 (角色方向 ＝ #左)
    角色动画_左.显示 (角色位置.x, 角色位置.y)
.默认
.判断结束
.判断开始 (角色方向 ＝ #右)
    角色动画_右.显示 (角色位置.x, 角色位置.y)
.默认
.判断结束
.判断开始 (角色方向 ＝ #上)
    角色动画_上.显示 (角色位置.x, 角色位置.y)
.默认
.判断结束
' ---------------------------------------------------------------------
引擎.渲染结束 ()
返回 (假)
[创建四方向可移动的角色精灵源码]

lch 发表于 2010-5-4 22:20:21

学习了。谢谢。

uds19861021 发表于 2010-5-5 01:18:26

来学习了啊

z1564123 发表于 2010-5-6 23:11:29

我来学习了，谢谢

yinxuanyou 发表于 2010-6-13 11:09:56

前来学习 对游戏开发很感兴趣

保护伞 发表于 2010-7-3 17:27:30

来看下~~~需要个东西

chinajie 发表于 2010-7-31 22:23:40

写游戏啊？开源~支持 经典

a46039 发表于 2010-8-3 10:29:25

sfhdgyioouohkhk

b379551184 发表于 2010-10-17 23:27:50

路过此地 掺观一下

ju42306 发表于 2010-10-24 11:38:23

youxikaifa                     

badboyzyx 发表于 2010-11-2 13:06:42

我喜欢我重要 下载

631935411 发表于 2010-11-6 09:43:29

................

631935411 发表于 2010-11-6 09:44:59

土土土寺在十三陵

yang7591041 发表于 2010-12-4 09:56:47

来看看    我想学习

sbtdkj 发表于 2010-12-5 19:19:35

学习了。谢谢。
学习了。谢谢。
页: [1] 2
查看完整版本: 易语言+D2D游戏开发——创建四方向可移动的角色精灵