- 注册时间
- 2010-7-26
- 最后登录
- 2010-7-27
- 在线时间
- 0 小时
编程入门
- 魔鬼币
- 0
|
主窗口设计及代码：
1， 点击左边的程序[窗口]的_启动窗口，在空白的窗口区拖入右边的控件。新建三个选择框~3， 两个时钟和一个
2， 双击窗口的空白处（别点控件），进入代码区后输入：
窗口程序集名：窗口程序集
变量名：x(整数型)；申明x为整数型是方便我们调用，因为下面我们要给x赋
新建一个子程序，在子程序名下输入（初始化）
回到_启动窗口双击空白处，_启动窗口_创建完毕下放输入代码：
初始化()
新建变量名，在变量名下输入：i(整数型)，窗口标题（文本型），进程标识（整数型），找到游戏窗口（逻辑型）
到游戏窗口 = 假输 入执行代码：
连连看 = 查找窗口（_启动窗口.取窗口句柄(),0）
I = 0
╋判断循环首（连连看≠0）‘是否被打开（启动）
↓窗口标题 = 取重复文本（，““） ‘获取窗口标题
↓取窗口标题（连连看，窗口标题，） ‘获取连连看窗口标题
↓ ╋如果真（窗口标题 = “连连看”） ‘这里判断，如果窗口标题是连连看就执行下面代码
↓ ↓找到游戏窗口 = 真 ‘找到游戏窗口是真依次执行
↓ ↓取游戏进程 （连连看，进程标识） ‘获取游戏进程，连连看的进程标识
↓ ↓进程ID = 打开进程（，，进程标识）‘强行打开游戏进程
↓ —→连连.标题看 = 查“找窗口（游戏已启动连连”看， ‘） ‘这里确过定已是游 连连看的游戏窗口的 上写入游戏已启动
—→判断循环尾() ‘结束判断循环
3， 回到窗口区双击时钟，输入代码：
╋如果真（选择框.选中 = 真） ‘如果窗口区的选择框被选中（真）执行下面代码
↓x = 1244856 ‘对x赋值为，是十进制
↓写内存数据 （进程ID，x,100,2,0） ‘执行强制写入数据，数据是要写入的数值
╋如果真（选择框.选中 = 真） ‘如果窗口区的选择框被选中（真）执行下面代码
↓x = 1244860 ‘对x赋值为，是十进制
↓写内存数据 （进程ID，x,100,2,0） ‘执行强制写入数据，数据是要写入的数值
╋如果真（选择框.选中 = 真） ‘如果窗口区的选择框被选中（真）执行下面代码
↓写内存数据 （‘进对程x赋ID值，为x,100,2,01242324） ，‘执行强制写入进数制据， 100数据是要写入的数值
—→返回()） ‘返回再执行
注意：易语言跟VB，VC++，Delphi 有所不同，它在写入内存里是按十进制进行，而不是十六进制。
编释成独立的可执行文件试试，编释→独立编释~~OK！ |
|
发表于 2010-7-28 11:17:55
