连连看易语言辅助源码 设计及代码

绯村剑心

主窗口设计及代码：  

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！