易语言+D2D logo加载并排版文字显示演示

1. .版本 2
   
2. 
   
3. .程序集 我的游戏
   
4. .程序集变量 logo图片, D2D图片
   
5. .程序集变量 logo精灵, D2D精灵
   
6. .程序集变量 显示文字开始位置, 整数型
   
7. 
   
8. .子程序 _启动子程序, 整数型, , 本子程序在程序启动后最先执行
   
9. .局部变量 屏幕, D2D_屏幕
   
10. 
    
11. 屏幕.帧率 ＝ 60
    
12. 屏幕.逻辑函数 ＝ &屏幕逻辑
    
13. 屏幕.渲染函数 ＝ &屏幕渲染
    
14. 屏幕.标题 ＝ “易语言+D2D logo加载并排版文字演示 By 潇潇 2010.4.27”
    
15. 屏幕.宽 ＝ 640
    
16. 屏幕.高 ＝ 480
    
17. 屏幕.小图标 ＝ 取运行目录 () ＋ “/logo/demo.ico”
    
18. 引擎.创建 (屏幕, #窗口化)
    
19. ' ---------------------------------------------------------------------
    
20. 
    
21. logo图片.纹理 ＝ 引擎.载入纹理 (取运行目录 () ＋ “\logo\logo.png”)
    
22. logo精灵.创建 (logo图片, 0, 0, 260, 158)
    
23. 
    
24. logo文字.创建 (“宋体”, 20, 假, 假, 假, #颜色_黄)
    
25. 
    
26. ' ---------------------------------------------------------------------
    
27. 引擎.启动 ()
    
28. ' ---------------------------------------------------------------------
    
29. 引擎.销毁 ()
    
30. 返回 (0)
    
31. 
    
32. 
    
33. .子程序 屏幕逻辑, 逻辑型, , 返回真 游戏结束
    
34. 
    
35. 
    
36. 
    
37. 
    
38. 
    
39. 返回 (假)
    
40. 
    
41. 
    
42. 
    
43. 
    
44. 
    
45. .子程序 屏幕渲染, 逻辑型, , 返回真 游戏结束
    
46. .局部变量 文本内容, 文本型
    
47. .局部变量 文本内容字节集, 字节集
    
48. .局部变量 文本长度, 整数型
    
49. .局部变量 i, 整数型
    
50. .局部变量 行, 整数型
    
51. .局部变量 列, 整数型
    
52. .局部变量 输出文本, 文本型
    
53. .局部变量 是否换行, 逻辑型
    
54. 
    
55. 引擎.渲染开始 ()
    
56. 引擎.清屏 ()
    
57. ' ---------------------------------------------------------------------
    
58. 文本内容 ＝ “潇潇编程简介：主要以编程开发为主，包括易语言、VB、Delphi、汇编、C/C++、VC++、C#、JAVA、D语言、PB、.NET、习语言、加密解密、脱壳破解、游戏设计、游戏引擎、辅助制作、图形动画、网页设计、WEB开发、Flash动画、Flash编程、电工电子等相关技术及视频教学，还包括常用工具软件下载以及视频教程下载等，努力创建程序设计相关的综合教学网站。主页:http://www.wgbcw.cn 论坛:http://www.wgbcw.com 易语言+D2D logo加载并排版文字演示 By 潇潇 2010.4.27”
    
59. ' 文本内容 ＝ 读入文本 (打开文件 (取运行目录 () ＋ “\logo\logo.txt”, #读入, ), )
    
60. 文本长度 ＝ 取文本长度 (文本内容)
    
61. 文本内容字节集 ＝ 到字节集 (文本内容)
    
62. logo精灵.显示 ((引擎.取屏幕宽度 () － logo精灵.取宽度 ()) ÷ 2, 0)
    
63. 显示文字开始位置 ＝ logo精灵.取高度 () ＋ 20
    
64. 行 ＝ 1
    
65. i ＝ 1
    
66. 是否换行 ＝ 假
    
67. .判断循环首 (i ≤ 文本长度)
    
68.     .如果 (文本内容字节集 [i] ＞ 127)  ' 判断是汉字
    
69.         输出文本 ＝ 到文本 (取指定位置字节集 (文本内容字节集, i, 2))  ' 取指定位置字节集() 为自定义函数，可用库命令"取字节集中间()"代替
    
70. 
    
71.         .如果 (行 ＝ 1)
    
72.             .如果 (10 × i ＜ 引擎.取屏幕宽度 () － 20)
    
73.                 logo文字.显示 (10 × i, 显示文字开始位置 ＋ 20 × 行, 输出文本)
    
74.                 是否换行 ＝ 假
    
75.             .否则
    
76.                 .如果 (10 × i ≥ 引擎.取屏幕宽度 () － 20)
    
77.                     是否换行 ＝ 真
    
78.                     行 ＝ 行 ＋ 1
    
79.                     列 ＝ 1
    
80.                 .否则
    
81. 
    
82.                 .如果结束
    
83. 
    
84.             .如果结束
    
85. 
    
86.         .否则
    
87. 
    
88.         .如果结束
    
89. 
    
90.         .如果 (是否换行 ＝ 假 且 行 ＞ 1)
    
91.             .如果 (10 × 列 ＜ 引擎.取屏幕宽度 () － 20)
    
92.                 logo文字.显示 (10 × 列, 显示文字开始位置 ＋ 20 × 行, 输出文本)
    
93.                 列 ＝ 列 ＋ 2
    
94.                 是否换行 ＝ 假
    
95.             .否则
    
96.                 .如果 (10 × 列 ≥ 引擎.取屏幕宽度 () － 20)
    
97.                     是否换行 ＝ 真
    
98.                     行 ＝ 行 ＋ 1
    
99.                     列 ＝ 1
    
100.                 .否则
     
101. 
     
102.                 .如果结束
     
103. 
     
104.             .如果结束
     
105. 
     
106.         .否则
     
107. 
     
108.         .如果结束
     
109.         .如果 (是否换行 ＝ 真 且 行 ＞ 1)
     
110.             .如果 (10 × 列 ＜ 引擎.取屏幕宽度 () － 20)
     
111.                 logo文字.显示 (10 × 列, 显示文字开始位置 ＋ 20 × 行, 输出文本)
     
112.                 列 ＝ 列 ＋ 2
     
113.                 是否换行 ＝ 假
     
114.             .否则
     
115.                 .如果 (10 × 列 ≥ 引擎.取屏幕宽度 () － 20)
     
116.                     是否换行 ＝ 真
     
117.                     行 ＝ 行 ＋ 1
     
118.                 .否则
     
119. 
     
120.                 .如果结束
     
121. 
     
122.             .如果结束
     
123. 
     
124.         .否则
     
125. 
     
126.         .如果结束
     
127. 
     
128.         i ＝ i ＋ 2
     
129.     .否则
     
130.         .如果 (文本内容字节集 [i] ＜ 127)  ' 判断是字符和字母
     
131.             输出文本 ＝ 到文本 (取指定位置字节集 (文本内容字节集, i, 1))
     
132.             .如果 (行 ＝ 1)
     
133.                 .如果 (10 × i ＜ 引擎.取屏幕宽度 () － 20)
     
134.                     logo文字.显示 (10 × i, 显示文字开始位置 ＋ 20 × 行, 输出文本)
     
135.                     列 ＝ i
     
136.                     是否换行 ＝ 假
     
137.                 .否则
     
138.                     .如果 (10 × i ≥ 引擎.取屏幕宽度 () － 20)
     
139.                         是否换行 ＝ 真
     
140.                         行 ＝ 行 ＋ 1
     
141.                         列 ＝ 1
     
142.                     .否则
     
143. 
     
144.                     .如果结束
     
145. 
     
146.                 .如果结束
     
147. 
     
148.             .否则
     
149. 
     
150.             .如果结束
     
151. 
     
152.         .否则
     
153. 
     
154.         .如果结束
     
155. 
     
156.         .如果 (是否换行 ＝ 真 且 行 ＞ 1)
     
157.             .如果 (10 × 列 ＜ 引擎.取屏幕宽度 () － 20)
     
158.                 logo文字.显示 (10 × 列, 显示文字开始位置 ＋ 20 × 行, 输出文本)
     
159.                 列 ＝ 列 ＋ 1
     
160.             .否则
     
161.                 .如果 (10 × 列 ≥ 引擎.取屏幕宽度 () － 20)
     
162.                     是否换行 ＝ 真
     
163.                     行 ＝ 行 ＋ 1
     
164.                 .否则
     
165. 
     
166.                 .如果结束
     
167. 
     
168.             .如果结束
     
169. 
     
170.         .否则
     
171. 
     
172.         .如果结束
     
173.         .如果 (是否换行 ＝ 假 且 行 ＞ 1)
     
174.             .如果 (10 × 列 ＜ 引擎.取屏幕宽度 () － 20)
     
175.                 logo文字.显示 (10 × 列, 显示文字开始位置 ＋ 20 × 行, 输出文本)
     
176.                 列 ＝ 列 ＋ 1
     
177.                 是否换行 ＝ 假
     
178.             .否则
     
179.                 .如果 (10 × 列 ≥ 引擎.取屏幕宽度 () － 20)
     
180.                     是否换行 ＝ 真
     
181.                     行 ＝ 行 ＋ 1
     
182.                 .否则
     
183. 
     
184.                 .如果结束
     
185. 
     
186.             .如果结束
     
187. 
     
188.         .否则
     
189. 
     
190.         .如果结束
     
191. 
     
192. 
     
193.         i ＝ i ＋ 1
     
194.     .如果结束
     
195. 
     
196. .判断循环尾 ()
     
197. 
     
198. ' ---------------------------------------------------------------------
     
199. 引擎.渲染结束 ()
     
200. 返回 (假)
     
201. 
     
202. 
     
203. .子程序 取指定位置字节集, 字节集
     
204. .参数 字节集内容, 字节集
     
205. .参数 起始位置, 整数型
     
206. .参数 要取个数, 整数型
     
207. .局部变量 i, 整数型
     
208. .局部变量 字集内容, 字节集
     
209. .局部变量 字集长度, 整数型
     
210. .局部变量 字符长度, 整数型
     
211. 
     
212. 字集长度 ＝ 取字节集长度 (字节集内容)
     
213. .变量循环首 (起始位置, 字集长度, 1, i)
     
214.     字集内容 ＝ 字集内容 ＋ 到字节集 (字节集内容 [i])
     
215.     .如果 (i ＝ 起始位置 ＋ 要取个数 － 1)
     
216.         跳出循环 ()
     
217.     .否则
     
218. 
     
219.     .如果结束
     
220. 
     
221. .变量循环尾 ()
     
222. 返回 (字集内容)

复制代码

1. .版本 2
   
2. 
   
3. .全局变量 引擎, D2D引擎
   
4. .全局变量 logo文字, D2D文字

复制代码

易语言＋D2D游戏开发例程

游客，如果您要查看本帖隐藏内容请回复

来看看...呵呵。。。顶顶

LOGO是什么意思 请告诉下 在使用中有什么

hgjjgggggggggggggggggggggg

路过此第 休息 看一看

dffffffffffffffffffffffff

谢谢谢谢谢谢谢谢

8*8*8*8*/8*8*8

大话西游II单机版
11111111111

貌似很强大啊！

哇   向往中啊.

这个是好东西·········

支持支持支持支持