精易论坛

标题: 数字雨源码 [打印本页]

---

作者: 禁回忆    时间: 2020-9-13 15:39
标题: 数字雨源码
本源码修改自用户@small莲 分享的源码
原帖地址：黑ke数字雨，易语言版[附HTML版]  



关于数字雨的源代码我看过不少，@small莲 帖子中附带的HTML版在很早之前就看过了，是canvas绘制的，还算简单。
在下载下来@small莲 用户的源代码之后，发现里边声明了很多无用变量，也有很多没必要的语句单独列出。
强迫症，所以在工作之余对其源代码进行了修改

修改后的源代码采用双缓冲绘图，因为@small莲 用户在其帖子里说4K屏幕有点卡，所以修改了一下。

不过我这边没有4K显示屏，所以没测试。





修改了一下几个内容：

• 删除无用或者说声明后没使用的变量
• 删除不需要单独列出来的子程序
• 重写了部分注释
• 关于调用屏幕矩形部分进行了重写，没必要在每次使用的时候重新调用取屏幕宽高函数
• 删除多余的或者说没必要的窗口组件，比如说画板
• 修改数字雨的算法，具体可以两份源代码对比一下，这里不多说
• 添加了易语言自带的隐藏和显示任务栏的函数，主要是全屏还有任务栏，看上去难受
• 加入了一段密码，用于关闭程序，密码是helloworld，别找输入框，直接按就完事了
• 绘图方面采用了双缓冲绘图，多使用了一个GP内存图形类，理论上会比@small莲 的算法多占用内存。
  

数字雨.e (1.14 MB, 下载次数: 391)

2020-9-13 15:38 上传

点击文件名下载附件
下载积分: 精币 -2 枚

---

作者: 禁回忆    时间: 2020-9-13 15:46
补充说明一下，因为是做着玩的，所以按ESC也可以直接关闭。
在调试状态下，请正常关闭程序，因为显示任务栏的命令写在了窗口即将销毁的事件下，直接结束调试不走销毁事件。
估计不使用快捷键结束调试的话你也点不到

---

作者: 禁回忆    时间: 2020-9-13 15:49
编写的测试环境如下：
系统版本：Windows 10 企业版 （具体版本号忘了，懒得看）
CPU：i3-4170 3.7GHz
内存：4G
显卡：Intel(R) HD Graphics 4400
屏幕分辨率：1920*1080

标准的渣机配置

---

作者: 空城旧梦醉人心    时间: 2020-9-13 17:49
没模块     。。。。。。

---

作者: happyweeks365    时间: 2020-9-14 08:37
楼主模块都找道了但是运行报错附图了 请指点一下 谢谢

搜狗截图20年09月14日0834_1.png (139.65 KB, 下载次数: 0)

下载附件

2020-9-14 08:36 上传

---

作者: wjswzj0    时间: 2020-9-14 12:24
支持一下下。

---

作者: 意思    时间: 2020-9-14 13:17
牛逼  牛逼  学习了

---

作者: a3960382663    时间: 2020-9-14 19:51
~！感谢分享

---

作者: 小清晰2020    时间: 2020-9-14 20:15
这个六这个六

---

作者: 禁回忆    时间: 2020-9-15 08:45

happyweeks365 发表于 2020-9-14 08:37
楼主模块都找道了但是运行报错附图了 请指点一下 谢谢

这个我不太清楚，模块的参数只有第一个是必填的

  

.子程序名 复制

子程序名	返回值类型	公开	备 注
(未填写子程序名)
参数名	类 型	参考	可空	数组	备 注
参数名	类 型	参考	可空	数组	备 注
源取DC	整数型				由于“GP图形”是“GP内存图形”的基类，本参数也可以是“GP内存图形”
源取左边	整数型				取指定目标左边
源取顶边	整数型				取指定目标顶边
目标左边	整数型				自身左边。附加声明：一般为0，为扩展自由化而设。
目标顶边	整数型				自身顶边。附加声明：一般为0，为扩展自由化而设。
目标宽度	整数型				自身宽度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。
目标高度	整数型				自身高度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。
光栅运算	整数型				详见常量表。光栅运算_*

.版本 2<br /> .子程序名 复制<br /> .参数 源取DC, 整数型, , 由于“GP图形”是“GP内存图形”的基类，本参数也可以是“GP内存图形”<br /> .参数 源取左边, 整数型, 可空 , 取指定目标左边<br /> .参数 源取顶边, 整数型, 可空 , 取指定目标顶边<br /> .参数 目标左边, 整数型, 可空 , 自身左边。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标顶边, 整数型, 可空 , 自身顶边。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标宽度, 整数型, 可空 , 自身宽度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标高度, 整数型, 可空 , 自身高度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。<br /> .参数 光栅运算, 整数型, 可空 , 详见常量表。光栅运算_*

[attach]1043950[/attach]

---

作者: 禁回忆    时间: 2020-9-15 08:46

happyweeks365 发表于 2020-9-14 08:37
楼主模块都找道了但是运行报错附图了 请指点一下 谢谢

这个我不太清楚，模块只有第一个参数是必填的[attach]1043951[/attach]

  

子程序名	返回值类型	公开	备 注
(未填写子程序名)
参数名	类 型	参考	可空	数组	备 注
参数名	类 型	参考	可空	数组	备 注
源取DC	整数型				由于“GP图形”是“GP内存图形”的基类，本参数也可以是“GP内存图形”
源取左边	整数型				取指定目标左边
源取顶边	整数型				取指定目标顶边
目标左边	整数型				自身左边。附加声明：一般为0，为扩展自由化而设。
目标顶边	整数型				自身顶边。附加声明：一般为0，为扩展自由化而设。
目标宽度	整数型				自身宽度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。
目标高度	整数型				自身高度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。
光栅运算	整数型				详见常量表。光栅运算_*

.版本 2<br /> <br /> .参数 源取DC, 整数型, , 由于“GP图形”是“GP内存图形”的基类，本参数也可以是“GP内存图形”<br /> .参数 源取左边, 整数型, 可空 , 取指定目标左边<br /> .参数 源取顶边, 整数型, 可空 , 取指定目标顶边<br /> .参数 目标左边, 整数型, 可空 , 自身左边。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标顶边, 整数型, 可空 , 自身顶边。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标宽度, 整数型, 可空 , 自身宽度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标高度, 整数型, 可空 , 自身高度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。<br /> .参数 光栅运算, 整数型, 可空 , 详见常量表。光栅运算_*

---

作者: 禁回忆    时间: 2020-9-15 08:47

happyweeks365 发表于 2020-9-14 08:37
楼主模块都找道了但是运行报错附图了 请指点一下 谢谢

这个我不太清楚，模块只有第一个参数是必填的

  

子程序名	返回值类型	公开	备 注
(未填写子程序名)
参数名	类 型	参考	可空	数组	备 注
参数名	类 型	参考	可空	数组	备 注
源取DC	整数型				由于“GP图形”是“GP内存图形”的基类，本参数也可以是“GP内存图形”
源取左边	整数型				取指定目标左边
源取顶边	整数型				取指定目标顶边
目标左边	整数型				自身左边。附加声明：一般为0，为扩展自由化而设。
目标顶边	整数型				自身顶边。附加声明：一般为0，为扩展自由化而设。
目标宽度	整数型				自身宽度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。
目标高度	整数型				自身高度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。
光栅运算	整数型				详见常量表。光栅运算_*

.版本 2<br /> <br /> .参数 源取DC, 整数型, , 由于“GP图形”是“GP内存图形”的基类，本参数也可以是“GP内存图形”<br /> .参数 源取左边, 整数型, 可空 , 取指定目标左边<br /> .参数 源取顶边, 整数型, 可空 , 取指定目标顶边<br /> .参数 目标左边, 整数型, 可空 , 自身左边。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标顶边, 整数型, 可空 , 自身顶边。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标宽度, 整数型, 可空 , 自身宽度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标高度, 整数型, 可空 , 自身高度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。<br /> .参数 光栅运算, 整数型, 可空 , 详见常量表。光栅运算_*

---

作者: 禁回忆    时间: 2020-9-15 08:47

happyweeks365 发表于 2020-9-14 08:37
楼主模块都找道了但是运行报错附图了 请指点一下 谢谢

这个我不太清楚，模块只有第一个参数是必填的

  

子程序名	返回值类型	公开	备 注
复制
参数名	类 型	参考	可空	数组	备 注
源取DC	整数型				由于“GP图形”是“GP内存图形”的基类，本参数也可以是“GP内存图形”
源取左边	整数型				取指定目标左边
源取顶边	整数型				取指定目标顶边
目标左边	整数型				自身左边。附加声明：一般为0，为扩展自由化而设。
目标顶边	整数型				自身顶边。附加声明：一般为0，为扩展自由化而设。
目标宽度	整数型				自身宽度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。
目标高度	整数型				自身高度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。
光栅运算	整数型				详见常量表。光栅运算_*

.版本 2<br /> <br /> .子程序 复制<br /> .参数 源取DC, 整数型, , 由于“GP图形”是“GP内存图形”的基类，本参数也可以是“GP内存图形”<br /> .参数 源取左边, 整数型, 可空, 取指定目标左边<br /> .参数 源取顶边, 整数型, 可空, 取指定目标顶边<br /> .参数 目标左边, 整数型, 可空, 自身左边。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标顶边, 整数型, 可空, 自身顶边。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标宽度, 整数型, 可空, 自身宽度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。<br /> .参数 目标高度, 整数型, 可空, 自身高度(为空时，则以当前创建的宽度为准)。附加声明：一般为0，为扩展自由化而设。<br /> .参数 光栅运算, 整数型, 可空, 详见常量表。光栅运算_*

---

作者: happyweeks365    时间: 2020-9-15 09:31

禁回忆 发表于 2020-9-15 08:47
这个我不太清楚，模块只有第一个参数是必填的[e=0]
.版本 2

OK了。。。。。。。。。。。。

---

作者: 没病走两步    时间: 2020-9-17 02:10
码量太大，已经封装为独立API，感谢您的使用

---

作者: 来此一游    时间: 2020-9-18 10:53
用了第三方支持库

---

作者: woshipqj    时间: 2020-9-18 16:23
中文乱码怎么解决！！！！！！！！

---

作者: woshipqj    时间: 2020-9-18 16:27
如何顺序写入中文文本！！！！！！！！！！！！！！

---

作者: 禁回忆    时间: 2020-9-20 08:09

woshipqj 发表于 2020-9-18 16:27
如何顺序写入中文文本！！！！！！！！！！！！！！

调用gdiplus模块GP内存图形或者GP图形的画文本命令的时候使用

1. 画宽文本（）

复制代码

命令，应该是叫这个名，这是编码问题，属于基础问题

---

作者: 禁回忆    时间: 2020-9-20 08:11

来此一游 发表于 2020-9-18 10:53
用了第三方支持库

第三方支持库倒是没用，只是为了方便使用了易语言自带的应用接口支持库，这个完全可以使用api实现，调用的命令是

1. 隐藏任务栏（）
   
2. 显示任务栏

复制代码

---

作者: pewin    时间: 2020-9-26 12:40
6666666666666666666666666666666666666666

---

作者: 征尘    时间: 2020-10-27 21:14
用了第三方支持库

---

作者: 禁回忆    时间: 2020-10-28 09:22

a1144202699 发表于 2020-10-27 21:14
用了第三方支持库

不知道为什么你非得纠结这些，第三方支持库没用，如果你认为除了核心支持库以外的所有支持库都是第三方支持库，那用过一个应用接口支持库里的窗口操作里的隐藏任务栏、显示任务栏按钮，这个支持库是易语言自带的，你们如果选择用黑月那就自己改用dll，没必要来这里**

---

作者: 454890856    时间: 2022-3-9 02:46
谢谢分享  

---

作者: 胖子葛格    时间: 2022-4-12 14:16
感谢大神！

---

作者: lei5242323    时间: 2024-12-12 17:29
下载玩玩

---

欢迎光临 精易论坛 (https://125.confly.eu.org/)

Powered by Discuz! X3.4