学易语言适合做黑客么？

肯定不适合，原因很简单，易语言做的东西哪怕是没毒的，杀软都报毒...

在易语言中写一个那种数字雨的屏保,谁能给点思路

准备：一个窗口（_启动窗口），一个画板（画板1），一个时钟（时钟1）

_启动窗口 和 画板1 的 可视 都为 假，时钟1 的 时间周期 为 0，_启动窗口 的 总在最前 为 真。

cmaedu.com到 _启动窗口 对应的 窗口程序集，把下面的代码拷贝过去即可。

.版本 2

cmaedu.com.支持库 OPenGL

.支持库 EThread

.支持库 spec

cmaedu.com.支持库 iext

.支持库 eAPI

cmaedu.com.程序集 窗口程序集1, , , 高仿黑客帝国

.程序集变量 t, 整数型

.程序集变量 x, 整数型

.程序集变量 y, 整数型

cmaedu.com.程序集变量 z, 整数型

.程序集变量 屏幕高度, 整数型, , , 屏幕高度

cmaedu.com.程序集变量 屏幕宽度, 整数型, , , 屏幕宽度

.子程序 __启动窗口_创建完毕

cmaedu.com屏幕高度 ＝ 取屏幕高度 ()

屏幕宽度 ＝ 取屏幕宽度 ()

画板1.画板背景色 ＝ #黑色

_启动窗口.移动 (0, 0, 屏幕宽度, 屏幕高度)

画板1.移动 (0, 0, 屏幕宽度, 屏幕高度)

cmaedu.comt ＝ 0

z ＝ 屏幕高度 ÷ 20

显示光标 (假)

_启动窗口.可视 ＝ 真

cmaedu.com画板1.可视 ＝ 真

_启动窗口.调整层次 (1)

定义 ()

cmaedu.com画板1.获取焦点 ()

时钟1.时钟周期 ＝ 400  ' 每列产生间隔(ms)

cmaedu.com启动线程 (数字雨输出, , )

延迟 (400)

启动线程 (数字雨输出, , )

cmaedu.com延迟 (300)

启动线程 (数字雨输出, , )

cmaedu.com延迟 (200)

启动线程 (数字雨输出, , )

延迟 (200)

启动线程 (数字雨输出, , )

延迟 (200)

cmaedu.com启动线程 (数字雨输出, , )

延迟 (200)

cmaedu.com时钟2.时钟周期 ＝ 1000

_时钟2_周期事件 ()

cmaedu.com.子程序 _画板1_鼠标位置被移动, 逻辑型

.参数 横向位置, 整数型

cmaedu.com.参数 纵向位置, 整数型

cmaedu.com.参数 功能键状态, 整数型

cmaedu.com.如果真 (取绝对值 (横向位置 － x) ＞ 50 或 取绝对值 (纵向位置 － y) ＞ 50)

cmaedu.com    定义 ()

cmaedu.com    t ＝ t ＋ 1

    .如果真 (t ＞ 3)  ' 事不过三

        结束 ()

cmaedu.com    .如果真结束

.如果真结束

.子程序 _画板1_按下某键, 逻辑型

cmaedu.com.参数 键代码, 整数型

cmaedu.com.参数 功能键状态, 整数型

结束 ()

.子程序 定义

x ＝ 取鼠标水平位置 ()

cmaedu.comy ＝ 取鼠标垂直位置 ()

.子程序 数字雨输出, , , 数字雨输出

cmaedu.com.局部变量 E, 整数型, , , 垂直位置

.局部变量 F, 整数型, , , 水平位置,起点

cmaedu.com.局部变量 G, 整数型, , , 显示长度,单位=位

.局部变量 H, 整数型, , , 下降速度

cmaedu.com.局部变量 I, 整数型, , , 移动次数

cmaedu.com.局部变量 J, 整数型, , , 绿与白

cmaedu.com.局部变量 CHR, 文本型, , "1000"

置随机数种子 ()

J ＝ 取随机数 (1, 5)

.如果 (J ＝ 1 或 J ＝ 3 或 J ＝ 5)

    置随机数种子 ()

    E ＝ 取随机数 (0, 屏幕宽度)

    置随机数种子 ()

cmaedu.com    F ＝ 取随机数 (0, 到整数 (屏幕高度 × 0.75))

    置随机数种子 ()

    G ＝ 取随机数 (z × 0.2, z × 0.65)

    置随机数种子 ()

cmaedu.com    H ＝ 取随机数 (10, 600)

    .判断循环首 (真)

cmaedu.com        ' 画板1.字体.字体名称 ＝ “黑体”

        ' 画板1.字体.字体大小 ＝ 16

cmaedu.com        CHR [I ＋ 1] ＝ 获取字符 ()

        画板1.文本颜色 ＝ #绿色

        画板1.定位写出 (E, F ＋ I × 20, CHR [I ＋ 1])

        .如果真 (I ≠ 0)

            画板1.文本颜色 ＝ #墨绿

cmaedu.com            画板1.定位写出 (E, F ＋ (I － 1) × 20, CHR [I])

cmaedu.com        .如果真结束

        .如果真 (I ＞ G ＋ 1)

cmaedu.com            画板1.文本颜色 ＝ 取颜色值 (0, 40, 0)

cmaedu.com            画板1.定位写出 (E, F ＋ (I － G － 1) × 20, CHR [I － G])

cmaedu.com            画板1.文本颜色 ＝ #黑色

            画板1.定位写出 (E, F ＋ (I － G － 2) × 20, CHR [I － G － 1])

cmaedu.com        .如果真结束

        I ＝ I ＋ 1

cmaedu.com        .如果真 (F ＋ I × 20 ＞ 屏幕高度)

            跳出循环 ()

cmaedu.com        .如果真结束

cmaedu.com        延迟 (H)  ' 避免CPU过高

cmaedu.com        .如果真 (I ＞ 1000)

            结束 ()

cmaedu.com        .如果真结束

cmaedu.com    .判断循环尾 ()

    .判断循环首 (真)

cmaedu.com        .如果真 (I ＞ G ＋ 1)

            画板1.文本颜色 ＝ 取颜色值 (0, 40, 0)

            画板1.定位写出 (E, F ＋ (I － G － 1) × 20, CHR [I － G])

cmaedu.com            画板1.文本颜色 ＝ #黑色

cmaedu.com            画板1.定位写出 (E, F ＋ (I － G － 2) × 20, CHR [I － G － 1])

cmaedu.com        .如果真结束

        I ＝ I ＋ 1

cmaedu.com        .如果真 (F ＋ I × 20 － (G ＋ 2) × 20 ＞ 屏幕高度)

            跳出循环 ()

cmaedu.com        .如果真结束

        延迟 (H)  ' 避免CPU过高

        .如果真 (I ＞ 1000)

            结束 ()

cmaedu.com        .如果真结束

cmaedu.com    .判断循环尾 ()

.否则

    置随机数种子 ()

    E ＝ 取随机数 (0, 屏幕宽度)

cmaedu.com    置随机数种子 ()

cmaedu.com    F ＝ 取随机数 (0, 到整数 (屏幕高度 × 0.75))

cmaedu.com    置随机数种子 ()

cmaedu.com    G ＝ 取随机数 (z × 0.2, z × 0.65)

    置随机数种子 ()

    H ＝ 取随机数 (10, 600)

cmaedu.com    .判断循环首 (真)

        ' 画板1.字体.字体名称 ＝ “黑体”

cmaedu.com        ' 画板1.字体.字体大小 ＝ 16

        CHR [I ＋ 1] ＝ 获取字符 ()

cmaedu.com        画板1.文本颜色 ＝ #白色

cmaedu.com        画板1.定位写出 (E, F ＋ I × 20, CHR [I ＋ 1])

        .如果真 (I ≠ 0)

            画板1.文本颜色 ＝ #浅灰

            画板1.定位写出 (E, F ＋ (I － 1) × 20, CHR [I])

cmaedu.com        .如果真结束

cmaedu.com        .如果真 (I ＞ G ＋ 1)

cmaedu.com            画板1.文本颜色 ＝ #灰色

            画板1.定位写出 (E, F ＋ (I － G － 1) × 20, CHR [I － G])

            画板1.文本颜色 ＝ #黑色

            画板1.定位写出 (E, F ＋ (I － G － 2) × 20, CHR [I － G － 1])

cmaedu.com        .如果真结束

cmaedu.com        I ＝ I ＋ 1

        .如果真 (F ＋ I × 20 ＞ 屏幕高度)

            跳出循环 ()

cmaedu.com        .如果真结束

        延迟 (H)  ' 避免CPU过高

        .如果真 (I ＞ 1000)

            结束 ()

        .如果真结束

    .判断循环尾 ()

cmaedu.com    .判断循环首 (真)

cmaedu.com        .如果真 (I ＞ G ＋ 1)

            画板1.文本颜色 ＝ #灰色

            画板1.定位写出 (E, F ＋ (I － G － 1) × 20, CHR [I － G])

cmaedu.com            画板1.文本颜色 ＝ #黑色

            画板1.定位写出 (E, F ＋ (I － G － 2) × 20, CHR [I － G － 1])

cmaedu.com        .如果真结束

cmaedu.com        I ＝ I ＋ 1

        .如果真 (F ＋ I × 20 － (G ＋ 2) × 20 ＞ 屏幕高度)

cmaedu.com            跳出循环 ()

cmaedu.com        .如果真结束

        延迟 (H)  ' 避免CPU过高

        .如果真 (I ＞ 1000)

cmaedu.com            结束 ()

        .如果真结束

cmaedu.com    .判断循环尾 ()

.如果结束

cmaedu.com.子程序 获取字符, 文本型

.局部变量 A, 文本型

cmaedu.com置随机数种子 ()

cmaedu.comA ＝ 字符 (取随机数 (27, 127))

.判断循环首 (A ＝ “” 或 A ＝ “ ” 或 A ＝ “　”)

cmaedu.com    置随机数种子 ()

cmaedu.com    A ＝ 字符 (取随机数 (27, 127))

cmaedu.com.判断循环尾 ()

cmaedu.comA ＝ 到全角 (A)

返回 (A)

.子程序 _时钟1_周期事件

启动线程 (数字雨输出, , )

cmaedu.com

易语言怎么写远程,就是控制另一台电脑。

可以的，在网上很多这方面的源码，简单

cmaedu.com下面找的

cmaedu.com;ID=138839replyID=skin

《易语言远程控制技术教程》

cmaedu.com （2007年10月第一版）

cmaedu.com 前 言

利用远程控制技术对企业管理，可加快我国经济建设的需要。易语言以其易学易用功能完善的功能，从而为企业管理中的远程控制提供了基础的编程条件。

cmaedu.com 本教程从一个基本面说明了远程控制技术的编程环节，可能大家比较感兴趣的是双向通讯自动上线技术、网络通讯协议、内存压缩图片技术、TELNET超级终端等功能，本教程均提供了例程。高级的远程控制技术应用请大家继续学习WINSOCK，API应用，端口映射技术等。

cmaedu.com 对于破坏国家正常经济秩序的黑客行为，本书是严厉批评的。由于黑客技术的发展，远程控制被少数人利用，对国民生产产生了不良的后果。本教程不得不接触到远程控制这个方面，但仅以讨论的形式为大家介绍，并不进行细致的介绍，以让大家对此类黑客技术有所提防。

cmaedu.com 由于本教程中，某程序可能即包含了服务器组件，也包含了客户组件，因此如果用外部流行的“服务端/客户端”提法很容易混淆，因此本书将主动进行控制管理的一方称为：“主控方”，编写的程序为：“主控端”；将被动接受控制的一方称为：“受控方”，编写的程序为：“受控端”。

本教材个人可打印一份细看，各兄弟网站可自由转载而不用事先打招呼。版权所有，不得批量印刷即可。

作者还要说的话：本教程用了我两个月的时间写完，前期收集例程及写例程用了我更多的时间，特别辛苦。远程控制是把两刃剑，可以好好用，也可能造成不好的影响，还好回头再一看教材后，感觉对于企业内部管理应用还是非常不错的，可以提高中国中小企业的管理水平，但不可能制作成类似于灰鸽子那样的破坏功能，本书没有提供这样的技术，也请大家自重，不要写破坏性的程序。

本书使用到大量的例程，足有200MB，还好，书中我基本都提供了下载链接，如果书中没有列出的例程，请大家跟贴指出来，我会补上。我觉得最好的学习方法是先将这些例程收集全了，再一个一个打开看看，基本上就能明白了。

cmaedu.com目 录

第一课．远程控制原理 5

1．企业管理的需要 5

cmaedu.com 2．介绍相关管理工具 5

3．组件简介 7

cmaedu.com第二课．组件选择 8

1．数据报 8

2．服务器/客户组件 9

cmaedu.com 3．网络通讯支持库 9

4．保密通讯支持库 10

5．远程服务支持库 11

cmaedu.com 6．网络传送支持库 12

cmaedu.com 7．网络通讯支持库二 13

8．表1：网络通讯类支持库组件功能对比表 13

网络传送大文件丢包的原因 14

第三课．组件构成 15

cmaedu.com 1．用例图1：通讯类（易鸽子，局域网寻呼机，方舟千里眼） 15

2．用例图2：聊天室类 15

cmaedu.com 3．用例图3：远程控制 16

cmaedu.com 4．用例图4：远程数据服务（数据库） 16

cmaedu.com 5．采用单对组件 17

cmaedu.com 6．采用多种组件 17

7．组件搭配 17

cmaedu.com 8．表2：有易语言源码的远程控制软件对比 17

第四课．通讯协议 19

1．指令简介 19

cmaedu.com 2．指令应用 19

cmaedu.com第五课．用户连接 20

cmaedu.com 1．连接方式 20

2．登录口令 21

3．身份验证，MAC和硬盘码 21

第六课．远程监视 21

1．“服务器/客户”组件通讯模式 21

cmaedu.com 2．内存压缩图片 21

3．“远程服务支持库” 22

cmaedu.com第七课．自动上线 22

cmaedu.com 1．数据报广播自动上线 22

2．多对“服务器/客户”组件反向扫描上线 22

3．服务IP地址自动搜寻自动上线 22

4．将IP地址直接绑定在受控端 22

cmaedu.com 5．推举服务器 22

第八课．客户端功能 23

cmaedu.com 1．发送指令 23

2．对话聊天 23

cmaedu.com 3．监视屏幕 24

cmaedu.com 4．遥控功能 26

5．了解信息及修改信息 27

5．TELNET超级终端 27

cmaedu.com 6．文件传输 28

7．鼠标键盘录制 29

cmaedu.com 8．隐藏进程 29

9．开机启动运行 30

10．正常关机 30

11．多用户识别 31

cmaedu.com 12．不重复运行 31

13．系统服务权限 31

14．其他功能 31

cmaedu.com第九课．服务端功能 31

1．安全性保证 31

2．用户列表信息 33

cmaedu.com 3．数据库操作 35

cmaedu.com 4．自动生成EXE 37

cmaedu.com 5．跨网远程 40

cmaedu.com第十课．捆绑与免杀 40

cmaedu.com 1．捆绑 40

2．免杀 40

cmaedu.com第十一课．打造超小受控端 41

1．请使用斩月工具，去掉易语言的核心支持库。 41

2．尽量使用API，这样不带有大量的支持库，体积就小了。 42

cmaedu.com第十二课 一个实例的分析 42

1．设计文档 42

cmaedu.com 激活客户端过程 43

客户端上线过程 43

2．开机口令 43

3．用户列表/选择用户 44

4．发送指令 44

cmaedu.com 5．激活用户 45

cmaedu.com 6．发送文件 46参考资料：;ID=138839replyID=skin

易语言教程

IT9网络学院vip之零基础学习易语言教程（完整打包）

《易语言远程控制技术教程》

cmaedu.com 一切从零开始易语言辅助教程 荐

cmaedu.com 世宝易语言教程 荐

世恒易语言教程

cmaedu.com 中华隐士易语言全套高清课程【全套20课】完美收藏版

cmaedu.com 之乎者也易语言POST系列教程合集

cmaedu.com 仓库管理系统制作系列教程【全套1-11课】-全套打包下载易语言实战教程

华中红客基地易语言系列教程

天都吧易语言全套课程【共50课时】-史上最经典的易语言入门到精通课程【解压密码k9z6a3.b51..k】

cmaedu.com 技术海VIP课程易语言零基础到精通，特别好的最新教程！共2.27G！强烈推荐(1)

时光论坛易语言全套教程【易语言零基础+易语言抓包+易语言填表】完整版

易语言3D游戏开发视频教程+全套源码

易语言Hook从入门到精通

cmaedu.com 易语言VIP教程45课

易语言WEB QQ协议分析教程，实现各种QQ软件应用操作很不错的教程【共15课】 载很好的教程

cmaedu.com 易语言外挂初级【1-15】CE教程大全

cmaedu.com 易语言所有支持库 非静态库186个,静态库107个

易语言极品优秀源码

cmaedu.com 易语言正则表达式教程【精易论坛出品共12课时】-高清高速

易语言源码

cmaedu.com 易语言编程系统pdf 含详细目录

易语言网络编程

星缘正则表达式系列教程

甲壳虫vip之易语言培训班

精易论坛VIP-POST填表全套全套教程

cmaedu.com 觅风易语言教程

cmaedu.com 道德网安-易语言基本教程（共4章节）

集中营易语言百集学习视频（1·80集）

驱动级的一个应用实例（易语言，C++）语音教程

魔鬼作坊易语言外挂教程

cmaedu.com 黑手安全网VIP之易语言系列教程（打包)

cmaedu.com 黑猫论坛易语教程【共32课时】-很不错的HK易语言教程

黑鹰易语言教程 - -

独立团--VIP工具包.rar

cmaedu.com        易友编程助手源码.rar 2.86 MB

易语言2D游戏开发引擎最终版.rar 1.75 MB

易语言3D射击游戏源码.rar 28.95 MB

cmaedu.com 易语言DNF源码.rar 4.52 MB 2013-07-21

cmaedu.com 易语言nes模拟器源码.rar 211.11 KB

cmaedu.com 易语言Win8界面风格源码.rar 1.43 MB

cmaedu.com 易语言XP虚拟操作系统.rar 8.09 MB

易语言下载自绘界面.rar 833.22 KB

易语言仿iPhone4s源码.rar 2.32 MB

易语言天龙八部Flash窗口.rar 2.25 MB

cmaedu.com 易语言情人节礼物源码.rar 10.02 MB

cmaedu.com 易语言拳皇格斗游戏源码.rar 227.34 KB

易语言桌面版酷狗音乐.rar 383.84 KB

易语言梦想逍遥游整套源码.rar 38.15 MB

cmaedu.com 易语言模仿QQ2013登陆.rar 826.76 K

易语言炫彩界面库.rar 7.04 MB

cmaedu.com 易语言简单网络游戏.rar 1.22 MB

cmaedu.com 易语言绿盾杀毒软件源码.rar 1.66 MB

cmaedu.com 易语言网络游戏源码.zip 3.47 MB

cmaedu.com 易语言超酷启动界面.rar 4.47 MB

cmaedu.com 易语言酷炫界面引擎.rar 1.28 MB

易语言金山毒霸界面源码.rar 1.44 MB

cmaedu.com 易语言黑客记事本.rar