易语言多线程详解
易语言多线程雷电模拟器写法案例
易语言是一种面向中文的编程语言，它具有简单易学、易上手的特点，因而受到广大中文用户的喜爱和青睐。
在易语言中，多线程编程是一项重要的技能，可以大大提高程序的运行效率和并发处理能力。
而雷电模拟器作为一款Android模拟器，在广大用户中也备受欢迎。
本文将介绍在易语言中如何利用多线程实现雷电模拟器的模拟操作，希望能为广大易语言爱好者和雷电模拟器用户提供一些帮助和指导。
一、理论基础在开始介绍多线程雷电模拟器写法案例之前，我们首先需要了解一些理论基础知识。
多线程是指程序中同时存在多个线程，每个线程都可以执行不同的任务。
相比单线程，多线程可以实现并发处理，提高程序的运行效率和响应速度。
而雷电模拟器则是一款Android模拟器，可以在PC上模拟Android系统环境，用户可以在雷电模拟器上运行各种Android应用程序。
结合多线程和雷电模拟器的特点，我们可以利用多线程技术来实现对雷电模拟器的模拟操作，比如同时进行多个应用程序的操作或者多个设备的模拟等。
二、多线程雷电模拟器写法案例1. 创建多个线程我们需要在易语言中创建多个线程来分别实现不同的模拟操作。
可以使用易语言中的Thread组件来创建和管理线程，每个线程负责执行不同的模拟操作。
可以创建一个线程用来模拟点击某个应用程序的按钮，另一个线程用来模拟滑动屏幕等。
2. 同步多个线程由于多个线程是同时存在的，为了保证它们之间的操作不会相互干扰，需要进行线程同步。
可以使用互斥锁、信号量等机制来实现线程之间的同步，确保它们按照预期顺序执行，并且不会发生资源竞争和冲突。
3. 模拟雷电模拟器操作在多个线程创建和同步之后，我们就可以开始编写每个线程的具体模拟操作了。
可以编写点击按钮的操作、输入文本的操作、滑动屏幕的操作等，以及这些操作的循环执行逻辑。
通过这些模拟操作，我们就可以实现对雷电模拟器的多线程模拟操作了。
4. 异常处理和错误处理在实际的多线程编程中，难免会遇到各种异常和错误，比如线程卡死、操作超时、模拟操作失败等。
易语言多线程的认识与注意事项 - (浅谈多线程奔溃)
易语言多线程的认识与注意事项- (浅谈多线程奔溃)什么是多线程:每个正在系统上运行的程序都是一个进程。
每个进程包含一到多个线程。
进程也可能是整个程序或者是部分程序的动态执行。
线程是一组指令的集合，或者是程序的特殊段，它可以在程序里独立执行。
也可以把它理解为代码运行的上下文。
所以线程基本上是轻量级的进程，它负责在单个程序里执行多任务。
通常由操作系统负责多个线程的调度和执行。
线程是程序中一个单一的顺序控制流程.在单个程序中同时运行多个线程完成不同的工作,称为多线程.线程和进程的区别在于,子进程和父进程有不同的代码和数据空间,而多个线程则共享数据空间,每个线程有自己的执行堆栈和程序计数器为其执行上下文.多线程主要是为了节约CPU时间,发挥利用,根据具体情况而定. 线程的运行中需要使用计算机的内存资源和CPU。
一.关于多线程基本认识:1、关闭线程句柄对线程的运行不会有影响，关闭句柄并不代表结束线程；2、线程句柄是用于对线程挂起、恢复、结束等操作，线程创建后，都会有一个线程句柄，如果不需要对线程句柄进行操作，建议立即关闭线程句柄；3、线程句柄必须在适当的时候关闭，否则会造成句柄泄露，但不同于内存泄露。
该泄露无前兆特征,并且极大可能造成程序崩溃二.注意事项:1、虽然启动线程要比启动进程要快，但是启动线程仍是比较耗时的，因此，不要频繁的启动、退出线程，而是启动线程后将各种任务处理完成后才退出（这种和线程池差不多)；2、对窗口各种组件操作，最好是在创建该窗口的线程上进行操作，如果在其它线程上操作，可能会引起程序出错等情况（该错误是随机出现的）。
（未找到直接又安全的调用其他线程创建的组件的方法，有知道的人，麻烦告诉一下，谢谢！）3、线程运行次序并不是按照我们创建他们时的顺序来运行的，CPU处理线程的顺序也是不确定的。
4、读/写共享资源时一般需要使用许可区，当然，在明知读/写共享资源不会出现错误时，就不需要许可区，这样可提高性能。
易语言启动线程用法
易语言启动线程用法
一、易语言启动线程的方法
易语言启动线程是指通过易语言调用Windows API函数，创建线程，调用线程函数，实现多线程编程，实现并发操作，提高程序的性能和效率。
1、易语言创建线程的API函数
操作系统提供了多种API函数来创建线程，易语言编程中使用CreateThread函数的格式如下：
声明：
GetProcAddress(返回句柄, 'CreateThread')
函数：
CreateThread（
最高优先级标志，tt
t线程栈大小，t
tThreadProc函数地址，
t参数传递，
t创建线程的标志，
t线程的ID
）
2、易语言实现线程编程
（1）调用CreateThread函数来创建线程；
（2）设置线程函数
在调用CreateThread函数时，需要传入线程函数的地址，创建线程时，线程执行的是这个线程函数。
在易语言中，可以使用函数的指针类型来设置线程函数。
函数指针类型：
FuncPtr：函数指针类型
FuncPtr（参数）
例如：
func ThreadProc（x，y）
begin
t//代码
end
FuncPtr = ThreadProc
（3）线程函数实现多线程编程
设置线程函数后，就可以在线程函数中实现多线程操作，实现多线程编程，提高程序的效率。
3、易语言示例程序
程序分别实现了两个线程，主函数只作为启动线程，并没有实际执行。
易语言多线程稳定写法
易语言多线程稳定写法MQL5 多线程开发概览1、MQL5 多线程技术概述MQL5 支持将代码分为多个线程，以便分散执行任务。
MQL5 的多线程技术可帮助解决复杂的任务，提高程序效率，使程序更加优化，这是非常重要的。
MQL5 中可运行多线程的函数有两个：Thread（）和Create（）函数。
Thread（）函数用于创建和运行新线程，这是创建线程的主要方法。
在开发多线程的策略时，可以使用 Thread（）函数创建线程，并通过 Create（）函数来同步运行多线程。
2、Thread 函数用法Thread（）函数用于启动和管理多线程，该函数由两个参数组成：第一个参数是线程标识符，用于标识线程；第二个参数是线程回调函数的地址。
线程的回调函数用于设置线程的行为和信息，以及执行有关动作。
3、Create 函数用法Create 函数是一个同步函数，主要用于多线程的同步。
它的参数是一组整数的序列，表示将要同步的线程的标识符列表。
如果未指定标识符，代码会自动生成默认标识符，所以不用担心线程匹配问题。
Create（）函数还有一个非常重要的特点，它可以按顺序同步线程，以便每个线程在正确的时间运行。
4、MQL5 多线程开发流程开发 MQL5 多线程程序的基本流程如下：（1）在策略初始化时，使用 Thread（）函数按需创建线程；（2）在 OnTick（）函数中，设置程序的状态，比如策略是否在运行；（3）如果多个线程需要同步，就可以使用 Create（）函数同步多个线程；（4）在 OnDeinit（）函数中，清理多线程的资源；（5）最后，可以使用 Thread（）函数释放多线程资源，以便关闭策略时释放程序内存。
5、MQL5 多线程实例下面是一个利用 MQL5 多线程技术实现初始化数据处理和实时报表处理的示例：（1）策略初始化时，创建两个线程，一个是初始化数据处理线程，另一个是实时报表处理线程；（2）当一分钟到达时，使用 Create（）函数将两个线程同步；（3）然后，初始化数据处理线程可以更新历史数据，实时报表处理线程可以处理和显示实时报表；（4）最后，策略结束时，释放多线程资源，以关闭线程。
详解易语言启动多线程
详解易语⾔启动多线程⽤易语⾔写多线程应⽤要么使⽤多线程相关的api,⽀持库或模块，其实那些⽀持库或模块也都是封装的api，但是要⽐api使⽤⽅便。
总体来说易语⾔官⽅的多线程⽀持库要⽐⼀些杂七杂⼋的模块好多了。
⽀持库勾选上之后就可以使⽤易语⾔的多线程⽀持库了。
⾸先看⽤易语⾔多线程⽀持库创建线程的命令：启动线程：命令名：启动线程创建并启动⼀条线程，可重复使⽤以创建多条线程，成功返回真，失败返回假。
参数数据类型说明参数<1>的名称为“欲执⾏的⼦程序”⼦程序指针（SubPtr）本参数提供创建线程时欲启动的⼦程序，根据是否需要传递参数数据，该⼦程序必须没有或具有⼀个整数型参数，否则将出错。
参数数据整数型（int）可以被省略。
本参数提供线程被启动时传递到欲启动⼦程序的整数数据。
如果本参数未被省略，此时被启动⼦程序必须接收⼀个整数型参数，否则将出错。
线程句柄整数型（int），可以被省略，提供参数数据时只能提供变量。
如果提供了本参数，将向参数变量写⼊线程句柄（Windows下为HANDLE，Linux下为pthread_t），请在适当的时机关闭该句柄。
如果不提供本参数接收线程句柄，内部将⾃动处理线程句柄。
⽤易语⾔多线程⽀持库启动⼀条线程(控制台程序下)：.版本 2.⽀持库 EThread.程序集程序集1.程序集变量线程句柄, 整数型.⼦程序 _启动⼦程序, 整数型, , 本⼦程序在程序启动后最先执⾏启动线程 (&⼦程序1, , 线程句柄)返回 (0) ' 可以根据您的需要返回任意数值.⼦程序⼦程序1标准输出 (#标准输出设备, “线程已启动，线程句柄为：” ＋到⽂本 (线程句柄))这时候⼦程序1 将不是在主线程中执⾏的，⽽是在线程句柄为552的新线程中执⾏，和主线程互不相关。
通过下⾯的代码可以⽅便我们理解多线程：.版本 2.程序集窗⼝程序集1.⼦程序 _按钮1_被单击⼦程序1 ().⼦程序⼦程序1.局部变量 n, 整数型.计次循环⾸ (1000, n)输出调试⽂本 (到⽂本 (n)).计次循环尾 ()按钮按下之后，循环不结束，界⾯是不能响应任何消息的额，也就是拖动点击什么的都没⽤，相当于卡死。
易语言多线程详解
前记：无意中发现的一个关于易语言多线程的讲解，分享给大家，有用得着的看看。
其中还提供了关于限制多开的办法，仔细阅读发现吧。
（BY 挂茶馆）一、关于多线程冲突问题。
3.6版开始增加了多线程支持库，提供对多线程的支持，并通过实现进入许可证机制以避免多线程冲突。
多线程是这样一种机制，它允许在程序中并发执行多个指令流，每个指令流都称为一个线程，彼此间互相独立。
线程又称为轻量级进程，它和进程一样拥有独立的执行控制，由操作系统负责调度，区别在于线程没有独立的存储空间，而是和所属进程中的其它线程共享一个存储空间，这使得线程间的通信远较进程简单。
多个线程的执行是并发的，也就是在逻辑上“同时”，而不管是否是物理上的“同时”。
如果系统只有一个CPU，那么真正的“同时”是不可能的，但是由于CPU的速度非常快，用户感觉不到其中的区别，因此我们也不用关心它，只需要设想各个线程是同时执行即可。
多线程和传统的单线程在程序设计上最大的区别在于，由于各个线程的控制流彼此独立，使得各个线程之间的代码是乱序执行的，由此带来的线程调度，同步等问题，将在下面探讨。
由于同一进程的多个线程共享同一片存储空间，在带来方便的同时，也带来了访问冲突这个严重的问题。
多线程也有它不利的一面。
任何时候某个应用程序使用的线程多于一个时，如果多个线程在同一时刻试图使用相同的数据或资源，可能出现麻烦。
这种情况一旦出现，程序将变得非常复杂并且难以调试。
更糟的是多线程代码经常在最初开发时运行良好，在形成产品时却往往失败，原因在于有未被发现的多个线程与相同的数据或资源相互作用的情况。
这使得多线程编程非常危险。
因此，在编程时需要考虑在多个线程访问同一资源时产生冲突的问题：当一个线程正在访问一个进程对象时，另一个线程要改变该对象，这时可能会产生错误的结果。
所以，程序员编程时要解决这种冲突。
最简单的避免线程冲突的的方法是使线程之间永远不与相同的数据或资源交互。
但这不一定可行，对任何多线程程序来说，避免或最小化共享数据或资源应作为一个目标。
江中游易语言教学高级第16章 中控多线程-收尾
江中游作品
第一课 线程启动UI更新及分析
• 三、多线程信息：
• 多线程信息：当我们程序开始运行时，通过子程序多线程初始化先创建了结构体—多线程信息并加入到数组中，并且设置为数组最 大成员数为200，前100为主线程数量，后100为副线程数量，而这个主线程序号就是这前100的数组成员的下标值，后100是副线程 序号，这个我们以后再讲。
• 小视频—附加1、解决脚本在停止线程界面崩溃的问题—在线程外部停止命令中加入关闭线程句柄命令 • 小视频—附加2、解决第4课作业：读取第一行没有返回的问题—加入如果真行数=1直接返回行文本
• 下面是正式课程：这是一个特殊的操作 • 1、为了方便存取，设置两个自定义数据类型（结构体）
• 1、结构体：用户目录—并设置为全局变量，包括成员有：插件、配置、文本三个路径 • 2、结构体：账号—成员包括有：账号密码行数
数组分析的快一些。
• 如果大家想详细的了解文本对象数组操作，请学习我的经典教学——《大文件多线程》教学 • 大文本操作： • 制作 • 读取 • 写入 • 本课是针对多线程应用文本文档来制作的，所以相对普通的文本操作要复杂一些，所以还请大家多动手学习
江中游作品
第四课 账号密码制作读写
• 为了能更好的让大家理解操作，我将以账号密码输入的例子给大家讲解一下中控的控制方式，所以我将使用1-2课时间给大家讲 一下大文本的操作：
• 系统基本支持库的文本操作速度已经很快了，但针对大文本操作就略显慢了一些，为了大家大批量的操作文本文档所以我使用 了快速文本对象。
• 通用对象支持库——快速文本对象操作的我在经典教学中已经做过详细的讲解，这个经典我也不再重新更新了。 • 为了我的教学的完整性，本课从另一种方式再讲解一下通用对象支持库——快速文本对象操作过程，理论上针对大文件操作要比
易语言多线程多任务下载器的代码
易语⾔多线程多任务下载器的代码多线程多任务下载模块源码1.DLL命令表.版本 2.DLL命令 InternetGetConnectedStateHTTP, , "Wininet.dll", "InternetGetConnectedState", 公开.参数 lpdwFlags, 整数型, 传址.参数 dwReserved, 整数型.DLL命令 InternetOpenAHTTP, 整数型, "Wininet.dll", "InternetOpenA", 公开.参数 lpszAgent, ⽂本型.参数 dwAccessType, 整数型.参数 lpszProxyName, 整数型.参数 lpszProxyBypass, 整数型.参数 dwFlags, 整数型.DLL命令 InternetOpenUrlAHTTP, 整数型, "Wininet.dll", "InternetOpenUrlA", 公开.参数 hInternet, 整数型.参数 lpszUrl, ⽂本型.参数 lpszHeaders, ⽂本型.参数 dwHeadersLength, 整数型.参数 dwFlags, 整数型.参数 dwContext, 整数型.DLL命令 InternetCloseHandleHTTP, , "Wininet.dll", "InternetCloseHandle", 公开.参数 handle, 整数型.DLL命令 HttpQueryInfoAHTTP, 整数型, "Wininet.dll", "HttpQueryInfoA", 公开.参数 hRequest, 整数型.参数 dwInfoLevel, 整数型.参数 lpvBuffer, 整数型, 传址.参数 lpdwBufferLength, 整数型, 传址.参数 lpdwIndex, 整数型, 传址.DLL命令创建⽂件, 整数型, "kernel32.dll", "CreateFileA", 公开.参数⽂件名, ⽂本型.参数打开⽅式, 整数型, , -2147483648表⽰读，1073741824表⽰写，0可取属性.参数共享⽅式, 整数型, , 1共享读，2共享写，0不共享.参数安全性, 整数型, , 为空即可.参数打开⽅式2, 整数型, , 1创建⽂件（⽂件存在出错），2创建⽂件（改写），3⽂件必须存在，4如果⽂件不存在则创建，5将现有⽂件缩短为0.参数⽂件属性, 整数型, , 128默认属性，268435456随机访问优化，134217728连续访问优化，67108864临时⽂件.参数⽂件句柄, 整数型, , ⼀般为0.DLL命令创建映射, 整数型, "kernel32.dll", "CreateFileMappingA", 公开.参数⽂件句柄, 整数型.参数安全对象, 整数型, , 0表⽰默认属性.参数映射⽅式, 整数型, , 2表⽰只读，4表⽰可读写.参数⾼32位, 整数型, , ⽂件映射的最⼤长度（⾼32位）.参数低32位, 整数型, , ⽂件映射的最⼩长度（低32位）.参数对象名字, 整数型, , 可以更改为⽂件型.DLL命令映射装载, 整数型, "kernel32.dll", "MapViewOfFile", 公开.参数映射句柄, 整数型.参数映射⽅式, 整数型, , 2可读可写,4只读,.参数⾼32位, 整数型, , ⽂件中映射起点的⾼32位地址，64k的整数倍.参数低32位, 整数型, , ⽂件中映射起点的低32位地址，64k的整数倍.参数字节数, 整数型, , ⽂件中要映射的字节数，根据实际长度指定.DLL命令映射卸载, 整数型, "kernel32.dll", "UnmapViewOfFile", 公开.参数映射地址, 整数型, , ⽤映射装载函数获得的.DLL命令 CloseHandleHTTP, 整数型, "kernel32.dll", "CloseHandle", 公开.参数 hObject, 整数型.DLL命令 HeapCreate, 整数型, "kernel32.dll", "HeapCreate", 公开.参数 flOptions, 整数型.参数 dwInitialSize, 整数型.参数 dwMaximumSize, 整数型.DLL命令 HeapAllocHTTP, 整数型, "kernel32.dll", "HeapAlloc", 公开.参数 hHeap, 整数型.参数 dwFlags, 整数型.参数 dwBytes, 整数型.DLL命令 HeapDestroy, 逻辑型, "kernel32.dll", "HeapDestroy", 公开.参数 hHeap, 整数型.DLL命令 RtlMoveMemory_读整数, , "kernel32.dll", "RtlMoveMemory", 公开.参数 Destination, 整数型, 传址.参数 Source, 整数型.参数 Length, 整数型.DLL命令 RtlMoveMemory_写整数, , "kernel32.dll", "RtlMoveMemory", 公开.参数 Destination, 整数型.参数 Source, 整数型, 传址.参数 Length, 整数型.DLL命令 RtlMoveMemory_写⽂本, , "kernel32.dll", "RtlMoveMemory", 公开.参数 Destination, 整数型.参数 Source, ⽂本型, 传址.参数 Length, 整数型.DLL命令 InitializeCriticalSectionHTTP, , "kernel32.dll", "InitializeCriticalSection", 公开.参数 lpCriticalSection, 整数型.DLL命令 CreateThreadHTTP, 整数型, "kernel32.dll", "CreateThread", 公开.参数 lpThreadAttributes, 整数型.参数 dwStackSize, 整数型.参数 lpStartAddress, ⼦程序指针.参数 lpParameter, 整数型.参数 dwCreationFlags, 整数型.参数 lpThreadId, 整数型, 传址.DLL命令 DeleteCriticalSectionHTTP, , "kernel32.dll", "DeleteCriticalSection", 公开.参数 lpCriticalSection, 整数型.DLL命令 EnterCriticalSectionHTTP, , "kernel32.dll", "EnterCriticalSection", 公开.参数 lpCriticalSection, 整数型.DLL命令 LeaveCriticalSectionHTTP, , "kernel32.dll", "LeaveCriticalSection", 公开.参数 lpCriticalSection, 整数型.DLL命令 WaitForSingleObjectHTTP, 整数型, "kernel32.dll", "WaitForSingleObject", 公开.参数 hHandle, 整数型.参数 dwMilliseconds, 整数型.DLL命令 InternetReadFileHTTP, 整数型, "Wininet.dll", "InternetReadFile", 公开.参数 hFile, 整数型.参数 lpBuffer, 整数型.参数 dwNumberOfBytesToRead, 整数型.参数 lpdwNumberOfBytesRead, 整数型, 传址.DLL命令写⼊映射, , "kernel32.dll", "RtlMoveMemory", 公开.参数起始位置, 整数型, , ⽤映射装载命令得到的.参数待写⼊数据, 整数型, , 要写⼊的数据，可以更改为其他类型.参数数据长度, 整数型, , 要写⼊的数据长度，不⼤于实际数据长度.DLL命令 HeapFree, 逻辑型, "kernel32.dll", "HeapFree", 公开.参数 hHeap, 整数型.参数 dwFlags, 整数型.参数 lpMem, 整数型.DLL命令 PathFindExtensionAjtw, ⽂本型, "shlwapi.dll", "PathFindExtensionA", 公开.参数⽂件路径, ⽂本型.DLL命令 InternetGetConnectedState, 逻辑型, "Wininet.dll", "InternetGetConnectedState", 公开, 本来是⽆返回值.参数 lpdwFlags, 整数型, 传址.参数 dwReserved, 整数型.DLL命令 HttpQueryInfohx, 整数型, "wininet.dll", "HttpQueryInfoA", 公开.参数 Internet请求句柄, 整数型.参数待查信息, 整数型.参数返回容器, ⽂本型, 传址.参数返回容器长度, 整数型, 传址.参数 lpdwIndex, 整数型, 传址2.全局变量表.版本 2.全局变量配备⽂本变量, ⽂本型, , "0".全局变量多任务句柄, 整数型, , "0"3.多线程.版本 2.程序集程序集2.⼦程序⽂件_取⽹络⽂件名1, ⽂本型, 公开.参数地址, ⽂本型.局部变量 Onlined, 逻辑型.局部变量 dwFlags, 整数型.局部变量 strAgent, ⽂本型.局部变量 hConnect, 整数型.局部变量 hOpen, 整数型.局部变量 szTemp, ⽂本型.局部变量 dwSizeOfRq, 整数型Onlined ＝ InternetGetConnectedState (dwFlags, 0).如果真 (Onlined ＝假)返回 (取⽂件名11 (地址)).如果真结束strAgent ＝ “我的下载” ＋到⽂本 (取启动时间 ()).如果 (位与 (dwFlags, 4) ＝ 0)hOpen ＝ InternetOpenAHTTP (strAgent, 4, 0, 0, 0).否则hOpen ＝ InternetOpenAHTTP (strAgent, 0, 0, 0, 0).如果结束.如果真 (hOpen ＝ 0)返回 (取⽂件名11 (地址)).如果真结束hConnect ＝ InternetOpenUrlAHTTP (hOpen, 地址, “”, 0, 2097152 ＋ 2147483648 ＋ 67108864 ＋ 256, 0).如果真 (hConnect ＝ 0)InternetCloseHandleHTTP (hOpen)返回 (取⽂件名11 (地址)).如果真结束szTemp ＝取空⽩⽂本 (255)dwSizeOfRq ＝ 255.如果真 (HttpQueryInfohx (hConnect, 51, szTemp, dwSizeOfRq, 0) ＝ 0)InternetCloseHandleHTTP (hOpen)返回 (取⽂件名11 (地址)).如果真结束InternetCloseHandleHTTP (hOpen)返回 (取⽂件名11 (szTemp)).⼦程序取⽂件名11, ⽂本型.参数地址, ⽂本型.局部变量 i, 整数型.局部变量 szTemp, ⽂本型szTemp ＝⼦⽂本替换 (地址, “\”, “/”, , , 真)i ＝倒找⽂本 (szTemp, “/”, , 假).如果真 (i ≠ -1)szTemp ＝取⽂本右边 (szTemp, 取⽂本长度 (szTemp) － i).如果真结束i ＝寻找⽂本 (szTemp, “?”, , 假).如果真 (i ＝ -1)返回 (szTemp).如果真结束返回 (取⽂本左边 (szTemp, i － 1)).⼦程序⽂件_取扩展名, ⽂本型, 公开, 返回⼀个⽂件的后缀名,如：.jpg 如果没有后缀,返回空.参数⽂件名, ⽂本型, , 需要处理的原始⽂件名返回 (PathFindExtensionAjtw (⽂件名)).⼦程序多线程_HTTP下载_开始_多任务, 整数型.参数参数_下载地址, ⽂本型.参数参数_保存路径, ⽂本型, , 可以只填写下载路径，程序将会以下载地址的⽂件名来保存，如果⾃⼰添加路径加⽂件名，则程序会将以⾃⼰添加的⽂件名来命名，注意：路径中不能有 . ，除⾮是添加路径加⽂件名.参数参数_线程数, 整数型.参数参数_回调函数地址, 整数型.局部变量变量_dwFlags, 整数型.局部变量变量_hOpen, 整数型.局部变量变量_szHead, ⽂本型.局部变量变量_hConnect, 整数型.局部变量变量_dwByteToRead, 整数型.局部变量变量_dwSizeOfRq, 整数型.局部变量变量_⽂件句柄, 整数型.局部变量变量_映射句柄, 整数型.局部变量变量_块, 整数型.局部变量变量_次数, 整数型.局部变量变量_hHeap, 整数型.局部变量变量_msg, 整数型.局部变量变量_地址, 整数型.局部变量变量_许可证, 整数型.局部变量变量_当前线程数, 整数型.局部变量变量_进程句柄, 整数型.局部变量 c, ⽂本型, , "0".局部变量 a, ⽂本型.局部变量 cc, ⽂本型a ＝⽂件_取扩展名 (参数_保存路径).如果真 (a ＝ “”).如果 (取⽂本右边 (参数_保存路径, 1) ＝ “\”)cc ＝⽂件_取⽹络⽂件名1 (参数_下载地址)参数_保存路径＝参数_保存路径＋ cc.否则cc ＝⽂件_取⽹络⽂件名1 (参数_下载地址)参数_保存路径＝参数_保存路径＋ “\” ＋ cc.如果结束.如果真结束.如果 (倒找⽂本 (参数_保存路径, “.”, , 假) ＝ -1) ' 那么就是路径 ,没有⽂件名c ＝分割⽂本 (参数_保存路径, “\”, ).如果真 (取⽂本右边 (参数_保存路径, 1) ≠ “\”)参数_保存路径＝参数_保存路径＋ “\”.如果真结束参数_保存路径＝参数_保存路径＋ c [取数组成员数 (c)].否则.如果结束' 取⽂件⼤⼩InternetGetConnectedStateHTTP (变量_dwFlags, 0).如果 (位与 (变量_dwFlags, 4) ＝ 0)变量_hOpen ＝ InternetOpenAHTTP (字符 (0), 4, 0, 0, 0).否则变量_hOpen ＝ InternetOpenAHTTP (字符 (0), 0, 0, 0, 0).如果结束.如果真 (变量_hOpen ＝ 0)' Internet连接错误返回 (-1).如果真结束变量_szHead ＝ “Accept: */*” ＋ #换⾏符＋ “Accept-Language: zh-cn” ＋ #换⾏符＋ “Accept-Encoding: gzip, deflate” ＋ #换⾏符＋ “User-Agent: Mozilla/4.0(compatible; MSIE 6.0; Windows NT 5.0; MyIE2; .NET CLR 1.1.4322)”变量_hConnect ＝ InternetOpenUrlAHTTP (变量_hOpen, 参数_下载地址, 变量_szHead, 取⽂本长度 (变量_szHead), 2214592768, 0).如果真 (变量_hConnect ＝ 0)' 不能打开该URL!InternetCloseHandleHTTP (变量_hOpen)返回 (-1).如果真结束变量_dwByteToRead ＝ 0变量_dwSizeOfRq ＝ 4.如果真 (HttpQueryInfoAHTTP (变量_hConnect, 536870917, 变量_dwByteToRead, 变量_dwSizeOfRq, 0) ＝ 0)变量_dwByteToRead ＝ 0.如果真结束InternetCloseHandleHTTP (变量_hConnect)InternetCloseHandleHTTP (变量_hOpen)' '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 创建⽂件变量_⽂件句柄＝创建⽂件 (参数_保存路径, 位或 (-2147483648, 1073741824), 位或 (1, 2), 0, 2, 0, 0).如果真 (变量_⽂件句柄＝ -1)返回 (-1).如果真结束变量_映射句柄＝创建映射 (变量_⽂件句柄, 0, 4, 0, 变量_dwByteToRead, 0).如果真 (变量_映射句柄＝ 0)CloseHandleHTTP (变量_⽂件句柄)返回 (-1).如果真结束.如果真 (变量_dwByteToRead ＝ 0)CloseHandleHTTP (变量_映射句柄)CloseHandleHTTP (变量_⽂件句柄)返回 (0).如果真结束' ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 计算分段变量_块＝ 1024 × 1024变量_次数＝变量_dwByteToRead ÷ 变量_块.如果真 (变量_dwByteToRead ％变量_块 ≠ 0)变量_次数＝变量_次数＋ 1.如果真结束.如果真 (参数_线程数＞变量_次数)参数_线程数＝变量_次数.如果真结束' ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 传递信息结构变量_hHeap ＝ HeapCreate (4, 0, 0).如果真 (变量_hHeap ＝ 0)CloseHandleHTTP (变量_映射句柄)CloseHandleHTTP (变量_⽂件句柄)返回 (-1).如果真结束' 下载地址指针，回调函数地址+4，⽂件句柄+8，映射句柄+12，堆+16，许可证指针+20，线程数+24，当前线程数+28，任务状态+32，块+36，当前次数+40，总次数+44，完成⼤⼩+48，⽂件⼤⼩+52，传递完毕+56变量_msg ＝ HeapAllocHTTP (变量_hHeap, 8, 15 × 4).如果真 (变量_msg ＝ 0)HeapDestroy (变量_hHeap)CloseHandleHTTP (变量_映射句柄)CloseHandleHTTP (变量_⽂件句柄)返回 (-1).如果真结束变量_地址＝ HeapAllocHTTP (变量_hHeap, 8, 取⽂本长度 (参数_下载地址) ＋ 1).如果真 (变量_地址＝ 0)HeapDestroy (变量_hHeap)CloseHandleHTTP (变量_映射句柄)CloseHandleHTTP (变量_⽂件句柄)返回 (-1).如果真结束RtlMoveMemory_写⽂本 (变量_地址, 参数_下载地址, 取⽂本长度 (参数_下载地址) ＋ 1)变量_许可证＝ HeapAllocHTTP (变量_hHeap, 8, 24).如果真 (变量_许可证＝ 0)HeapDestroy (变量_hHeap)CloseHandleHTTP (变量_映射句柄)CloseHandleHTTP (变量_⽂件句柄)返回 (-1).如果真结束InitializeCriticalSectionHTTP (变量_许可证)RtlMoveMemory_写整数 (变量_msg, 变量_地址, 4)RtlMoveMemory_写整数 (变量_msg ＋ 4, 参数_回调函数地址, 4)RtlMoveMemory_写整数 (变量_msg ＋ 8, 变量_⽂件句柄, 4)RtlMoveMemory_写整数 (变量_msg ＋ 12, 变量_映射句柄, 4)RtlMoveMemory_写整数 (变量_msg ＋ 16, 变量_hHeap, 4)RtlMoveMemory_写整数 (变量_msg ＋ 20, 变量_许可证, 4)RtlMoveMemory_写整数 (变量_msg ＋ 24, 参数_线程数, 4)RtlMoveMemory_写整数 (变量_msg ＋ 28, 变量_当前线程数, 4)RtlMoveMemory_写整数 (变量_msg ＋ 32, 0, 4) ' -1错误 0开始 1停⽌ 2暂停RtlMoveMemory_写整数 (变量_msg ＋ 36, 变量_块, 4)RtlMoveMemory_写整数 (变量_msg ＋ 40, 0, 4)RtlMoveMemory_写整数 (变量_msg ＋ 44, 变量_次数, 4)RtlMoveMemory_写整数 (变量_msg ＋ 48, 0, 4)RtlMoveMemory_写整数 (变量_msg ＋ 52, 变量_dwByteToRead, 4)' ''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''' 创建线程变量_进程句柄＝ CreateThreadHTTP (0, 0, &HTTP下载处理_1_多任务, 变量_msg, 0, 0).如果真 (变量_进程句柄＝ 0)DeleteCriticalSectionHTTP (变量_许可证)HeapDestroy (变量_hHeap)CloseHandleHTTP (变量_映射句柄)CloseHandleHTTP (变量_⽂件句柄)返回 (-1).如果真结束CloseHandleHTTP (变量_进程句柄)返回 (变量_msg).⼦程序多线程_HTTP下载_停⽌, , 公开.参数参数_句柄, 整数型.局部变量变量_许可证, 整数型RtlMoveMemory_读整数 (变量_许可证, 参数_句柄＋ 20, 4)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_写整数 (参数_句柄＋ 32, 1, 4) ' -1错误 0开始 1停⽌ 2暂停LeaveCriticalSectionHTTP (变量_许可证).⼦程序多线程_HTTP下载_暂停, , 公开.参数参数_句柄, 整数型.局部变量变量_许可证, 整数型RtlMoveMemory_读整数 (变量_许可证, 参数_句柄＋ 20, 4)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_写整数 (参数_句柄＋ 32, 2, 4) ' -1错误 0开始 1停⽌ 2暂停LeaveCriticalSectionHTTP (变量_许可证).⼦程序多线程_HTTP下载_继续, , 公开.参数参数_句柄, 整数型.局部变量变量_许可证, 整数型RtlMoveMemory_读整数 (变量_许可证, 参数_句柄＋ 20, 4)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_写整数 (参数_句柄＋ 32, 0, 4) ' -1错误 0开始 1停⽌ 2暂停LeaveCriticalSectionHTTP (变量_许可证).⼦程序 HTTP下载处理_1_多任务.参数参数_信息指针, 整数型.局部变量变量_回调函数地址, 整数型.局部变量变量_⽂件句柄, 整数型.局部变量变量_映射句柄, 整数型.局部变量变量_堆, 整数型.局部变量变量_许可证, 整数型.局部变量变量_线程数, 整数型.局部变量变量_总次数, 整数型.局部变量变量_⽂件⼤⼩, 整数型.局部变量变量_当前次数, 整数型.局部变量变量_当前线程数, 整数型.局部变量变量_任务状态, 整数型.局部变量变量_进程句柄, 整数型.局部变量变量_传递完毕, 整数型.局部变量变量_完成⼤⼩, 整数型.局部变量 i, 整数型.局部变量 a, ⽂本型.局部变量传递ID, 整数型' 下载地址指针，回调函数地址+4，⽂件句柄+8，映射句柄+12，堆+16，许可证指针+20，线程数+24，当前线程数+28，任务状态+32，块+36，当前次数+40，总次数+44，完成⼤⼩+48，⽂件⼤⼩+52，传递完毕+56 RtlMoveMemory_读整数 (变量_回调函数地址, 参数_信息指针＋ 4, 4)RtlMoveMemory_读整数 (变量_⽂件句柄, 参数_信息指针＋ 8, 4)RtlMoveMemory_读整数 (变量_映射句柄, 参数_信息指针＋ 12, 4)RtlMoveMemory_读整数 (变量_堆, 参数_信息指针＋ 16, 4)RtlMoveMemory_读整数 (变量_许可证, 参数_信息指针＋ 20, 4)RtlMoveMemory_读整数 (变量_线程数, 参数_信息指针＋ 24, 4)RtlMoveMemory_读整数 (变量_总次数, 参数_信息指针＋ 44, 4)RtlMoveMemory_读整数 (变量_⽂件⼤⼩, 参数_信息指针＋ 52, 4)变量_当前次数＝ 0.判断循环⾸ (变量_当前次数＜变量_总次数)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_读整数 (变量_当前线程数, 参数_信息指针＋ 28, 4)LeaveCriticalSectionHTTP (变量_许可证).如果真 (变量_当前线程数＜变量_线程数)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_读整数 (变量_任务状态, 参数_信息指针＋ 32, 4)LeaveCriticalSectionHTTP (变量_许可证).如果真 (变量_任务状态＝ -1 或变量_任务状态＝ 1)跳出循环 ().如果真结束.如果真 (变量_任务状态＝ 2)WaitForSingleObjectHTTP (-1, 100)到循环尾 ().如果真结束变量_当前次数＝变量_当前次数＋ 1RtlMoveMemory_写整数 (参数_信息指针＋ 40, 变量_当前次数, 4)变量_进程句柄＝ CreateThreadHTTP (0, 0, &HTTP下载处理_2_多任务, 参数_信息指针, 0, 0).如果真 (变量_进程句柄＝ 0)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_写整数 (参数_信息指针＋ 32, -1, 4)LeaveCriticalSectionHTTP (变量_许可证)跳出循环 ().如果真结束CloseHandleHTTP (变量_进程句柄).循环判断⾸ ()EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_读整数 (变量_传递完毕, 参数_信息指针＋ 56, 4)LeaveCriticalSectionHTTP (变量_许可证)WaitForSingleObjectHTTP (-1, 100).循环判断尾 (变量_传递完毕＝ 0).如果真结束WaitForSingleObjectHTTP (-1, 100).判断循环尾 ().循环判断⾸ ()EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_读整数 (变量_当前线程数, 参数_信息指针＋ 28, 4)LeaveCriticalSectionHTTP (变量_许可证)WaitForSingleObjectHTTP (-1, 100).循环判断尾 (变量_当前线程数 ≠ 0)RtlMoveMemory_读整数 (变量_任务状态, 参数_信息指针＋ 32, 4).判断开始 (变量_任务状态＝ -1).计次循环⾸ (取数组成员数 (多任务句柄), i).如果真 (参数_信息指针＝多任务句柄 [i])传递ID ＝ i.如果真结束.计次循环尾 ().如果真 (传递ID ≠ 0)程序_Call (变量_回调函数地址, 传递ID, -1, 0, 0)' 调⽤⼦程序 (变量_回调函数地址, , , 传递ID, -1, 0, 0).如果真结束.判断 (变量_任务状态＝ 0)RtlMoveMemory_读整数 (变量_完成⼤⼩, 参数_信息指针＋ 48, 4).计次循环⾸ (取数组成员数 (多任务句柄), i).如果真 (参数_信息指针＝多任务句柄 [i])传递ID ＝ i.如果真结束.计次循环尾 ().如果真 (传递ID ≠ 0)程序_Call (变量_回调函数地址, 传递ID, 0, 变量_⽂件⼤⼩, 变量_完成⼤⼩)' 调⽤⼦程序 (变量_回调函数地址, , , 传递ID, 0, 变量_⽂件⼤⼩, 变量_完成⼤⼩).如果真结束.默认.判断结束DeleteCriticalSectionHTTP (变量_许可证)HeapDestroy (变量_堆)CloseHandleHTTP (变量_映射句柄)CloseHandleHTTP (变量_⽂件句柄).⼦程序 HTTP下载处理_2_多任务.参数参数_信息指针, 整数型.局部变量变量_下载地址指针, 整数型.局部变量变量_回调函数地址, 整数型.局部变量变量_映射句柄, 整数型.局部变量变量_许可证, 整数型.局部变量变量_堆, 整数型.局部变量变量_当前线程数, 整数型.局部变量变量_块_1, 整数型.局部变量变量_当前次数, 整数型.局部变量变量_总次数, 整数型.局部变量变量_⽂件⼤⼩, 整数型.局部变量变量_dwFlags, 整数型.局部变量变量_hOpen, 整数型.局部变量变量_szHead, ⽂本型.局部变量变量_开始, 整数型.局部变量变量_结尾, 整数型.局部变量变量_hConnect, 整数型.局部变量变量_块_2, 整数型.局部变量变量_http块, 整数型.局部变量变量_当前⼤⼩, 整数型.局部变量变量_szTemp, 整数型.局部变量变量_dwSize, 整数型.局部变量变量_写⼊位置, 整数型.局部变量变量_块位置, 整数型.局部变量变量_视图句柄, 整数型.局部变量变量_完成⼤⼩, 整数型.局部变量变量_任务状态, 整数型.局部变量 i, 整数型.局部变量 a, ⽂本型.局部变量传递ID, 整数型' 下载地址指针，回调函数地址+4，⽂件句柄+8，映射句柄+12，堆+16，许可证指针+20，线程数+24，当前线程数+28，任务状态+32，块+36，当前次数+40，总次数+44，完成⼤⼩+48，⽂件⼤⼩+52，传递完毕+56 RtlMoveMemory_读整数 (变量_下载地址指针, 参数_信息指针, 4)RtlMoveMemory_读整数 (变量_回调函数地址, 参数_信息指针＋ 4, 4)RtlMoveMemory_读整数 (变量_映射句柄, 参数_信息指针＋ 12, 4)RtlMoveMemory_读整数 (变量_堆, 参数_信息指针＋ 16, 4)RtlMoveMemory_读整数 (变量_许可证, 参数_信息指针＋ 20, 4)RtlMoveMemory_读整数 (变量_当前线程数, 参数_信息指针＋ 28, 4)RtlMoveMemory_读整数 (变量_块_1, 参数_信息指针＋ 36, 4)RtlMoveMemory_读整数 (变量_当前次数, 参数_信息指针＋ 40, 4)RtlMoveMemory_读整数 (变量_⽂件⼤⼩, 参数_信息指针＋ 52, 4)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_读整数 (变量_当前线程数, 参数_信息指针＋ 28, 4)RtlMoveMemory_写整数 (参数_信息指针＋ 28, 变量_当前线程数＋ 1, 4)RtlMoveMemory_写整数 (参数_信息指针＋ 56, 1, 4)LeaveCriticalSectionHTTP (变量_许可证)InternetGetConnectedStateHTTP (变量_dwFlags, 0).如果 (位与 (变量_dwFlags, 4) ＝ 0)变量_hOpen ＝ InternetOpenAHTTP (字符 (0), 4, 0, 0, 0).否则变量_hOpen ＝ InternetOpenAHTTP (字符 (0), 0, 0, 0, 0).如果结束.如果真 (变量_hOpen ＝ 0)' Internet连接错误EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_写整数 (参数_信息指针＋ 32, -1, 4)RtlMoveMemory_读整数 (变量_当前线程数, 参数_信息指针＋ 28, 4)RtlMoveMemory_写整数 (参数_信息指针＋ 28, 变量_当前线程数－ 1, 4)LeaveCriticalSectionHTTP (变量_许可证)返回 ().如果真结束.如果 (变量_当前次数＝变量_总次数)变量_开始＝变量_块_1 × (变量_当前次数－ 1)变量_结尾＝变量_⽂件⼤⼩.否则变量_开始＝变量_块_1 × (变量_当前次数－ 1)变量_结尾＝变量_块_1 × 变量_当前次数－ 1.如果结束变量_szHead ＝ “Accept: */*” ＋ #换⾏符＋ “Accept-Language: zh-cn” ＋ #换⾏符＋ “Accept-Encoding: gzip, deflate” ＋ #换⾏符＋ “User-Agent: Mozilla/4.0(compatible; MSIE 6.0; Windows NT 5.0; MyIE2; .NET CLR 1.1.4322)”变量_szHead ＝变量_szHead ＋ #换⾏符＋ “Range:bytes=” ＋到⽂本 (变量_开始) ＋ “-” ＋到⽂本 (变量_结尾)变量_hConnect ＝ InternetOpenUrlAHTTP (变量_hOpen, 指针到⽂本 (变量_下载地址指针), 变量_szHead, 取⽂本长度 (变量_szHead), 2214592768, 0).如果真 (变量_hConnect ＝ 0)' 不能打开该URL!InternetCloseHandleHTTP (变量_hOpen)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_写整数 (参数_信息指针＋ 32, -1, 4)RtlMoveMemory_读整数 (变量_当前线程数, 参数_信息指针＋ 28, 4)RtlMoveMemory_写整数 (参数_信息指针＋ 28, 变量_当前线程数－ 1, 4)LeaveCriticalSectionHTTP (变量_许可证)返回 ().如果真结束变量_块_2 ＝ 65536变量_http块＝ 20480变量_当前⼤⼩＝ 0变量_szTemp ＝ HeapAllocHTTP (变量_堆, 8, 变量_http块).如果真 (变量_szTemp ＝ 0)InternetCloseHandleHTTP (变量_hConnect)InternetCloseHandleHTTP (变量_hOpen)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_写整数 (参数_信息指针＋ 32, -1, 4)RtlMoveMemory_读整数 (变量_当前线程数, 参数_信息指针＋ 28, 4)RtlMoveMemory_写整数 (参数_信息指针＋ 28, 变量_当前线程数－ 1, 4)LeaveCriticalSectionHTTP (变量_许可证)返回 ().如果真结束.循环判断⾸ ().如果真 (InternetReadFileHTTP (变量_hConnect, 变量_szTemp, 变量_http块, 变量_dwSize) ＝ 0)' 读⽂件失败EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_写整数 (参数_信息指针＋ 32, -1, 4)LeaveCriticalSectionHTTP (变量_许可证)跳出循环 ().如果真结束.如果真 (变量_dwSize ＝ 0)跳出循环 ().如果真结束变量_写⼊位置＝变量_开始＋变量_当前⼤⼩变量_块位置＝变量_写⼊位置 ÷ 变量_块_2变量_块位置＝变量_块位置 × 变量_块_2变量_视图句柄＝映射装载 (变量_映射句柄, 2, 0, 变量_块位置, 变量_写⼊位置－变量_块位置＋变量_dwSize).如果真 (变量_视图句柄＝ 0)' 映射装载失败EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_写整数 (参数_信息指针＋ 32, -1, 4)LeaveCriticalSectionHTTP (变量_许可证)跳出循环 ().如果真结束写⼊映射 (变量_视图句柄＋变量_写⼊位置－变量_块位置, 变量_szTemp, 变量_dwSize)映射卸载 (变量_视图句柄)变量_当前⼤⼩＝变量_当前⼤⼩＋变量_dwSizeEnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_读整数 (变量_完成⼤⼩, 参数_信息指针＋ 48, 4)变量_完成⼤⼩＝变量_完成⼤⼩＋变量_dwSizeRtlMoveMemory_写整数 (参数_信息指针＋ 48, 变量_完成⼤⼩, 4)' 输出调试⽂本 (参数_信息指针).计次循环⾸ (取数组成员数 (多任务句柄), i).如果真 (参数_信息指针＝多任务句柄 [i])传递ID ＝ i.如果真结束.计次循环尾 ().如果真 (传递ID ≠ 0)程序_Call (变量_回调函数地址, 传递ID, 1, 变量_⽂件⼤⼩, 变量_完成⼤⼩)' 调⽤⼦程序 (变量_回调函数地址, , , 传递ID, 1, 变量_⽂件⼤⼩, 变量_完成⼤⼩).如果真结束RtlMoveMemory_读整数 (变量_任务状态, 参数_信息指针＋ 32, 4)LeaveCriticalSectionHTTP (变量_许可证).判断循环⾸ (变量_任务状态＝ 2)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_读整数 (变量_任务状态, 参数_信息指针＋ 32, 4)LeaveCriticalSectionHTTP (变量_许可证).如果真 (变量_任务状态＝ -1 或变量_任务状态＝ 1)跳出循环 ().如果真结束WaitForSingleObjectHTTP (-1, 100).判断循环尾 ().循环判断尾 (变量_任务状态 ≠ -1 且变量_任务状态 ≠ 1)HeapFree (变量_堆, 0, 变量_szTemp)InternetCloseHandleHTTP (变量_hConnect)InternetCloseHandleHTTP (变量_hOpen)EnterCriticalSectionHTTP (变量_许可证)RtlMoveMemory_读整数 (变量_当前线程数, 参数_信息指针＋ 28, 4)RtlMoveMemory_写整数 (参数_信息指针＋ 28, 变量_当前线程数－ 1, 4)LeaveCriticalSectionHTTP (变量_许可证).⼦程序 Call, 整数型, 公开.参数参数_地址, 整数型.参数参数_⼀, 整数型.参数参数_⼆, 整数型.参数参数_三, 整数型置⼊代码 ({ 201, 88, 135, 4, 36, 255, 224 })返回 (0).⼦程序程序_Call, 整数型.参数⼦程序地址, 整数型.参数参数1, 整数型, 可空.参数参数2, 整数型, 可空.参数参数3, 整数型, 可空.参数参数4, 整数型, 可空.参数参数5, 整数型, 可空.参数参数6, 整数型, 可空.参数参数7, 整数型, 可空.参数参数8, 整数型, 可空.参数参数9, 整数型, 可空.参数参数10, 整数型, 可空.参数参数11, 整数型, 可空.参数参数12, 整数型, 可空.参数参数13, 整数型, 可空.参数参数14, 整数型, 可空.参数参数15, 整数型, 可空置⼊代码 ({ 86, 190, 15, 0, 0, 0, 141, 77, 8, 141, 76, 241, 252, 139, 65, 4, 133, 192, 116, 2, 255, 49, 78, 131, 233, 8, 133, 246, 117, 239, 255, 85, 8, 94, 201, 194, 124, 0 })返回 (0)4.多任务下载.版本 2.程序集下载_多任务, , 公开.程序集变量总计次, 整数型.⼦程序 _初始化, , , 当基于本类的对象被创建后，此⽅法会被⾃动调⽤总计次＝ 0.⼦程序 _销毁, , , 当基于本类的对象被销毁前，此⽅法会被⾃动调⽤.⼦程序下载_多任务, , 公开.参数下载地址, ⽂本型.参数保存路径, ⽂本型.参数线程数, 整数型.参数回调函数地址, 整数型, 可空, ⽆返回值，传递ID=整数型，信息=整数型，⽂件⼤⼩=整数型，完成⼤⼩=整数型.局部变量 a, 整数型总计次＝总计次＋ 1加⼊成员 (配备⽂本变量, 到⽂本 (总计次))a ＝多线程_HTTP下载_开始_多任务 (下载地址, 保存路径, 线程数, 回调函数地址)加⼊成员 (多任务句柄, a).⼦程序暂停下载, , 公开.参数暂停ID, 整数型多线程_HTTP下载_暂停 (多任务句柄 [暂停ID]).⼦程序全部暂停, , 公开.局部变量 i, 整数型.计次循环⾸ (取数组成员数 (多任务句柄), i)多线程_HTTP下载_暂停 (多任务句柄 [i]).计次循环尾 ().⼦程序停⽌下载.参数停⽌ID, 整数型多线程_HTTP下载_停⽌ (多任务句柄 [停⽌ID]).⼦程序全部停⽌, , 公开.局部变量 i, 整数型.计次循环⾸ (取数组成员数 (多任务句柄), i)多线程_HTTP下载_停⽌ (多任务句柄 [i]).计次循环尾 ().⼦程序继续下载, , 公开.参数继续ID, 整数型多线程_HTTP下载_继续 (多任务句柄 [继续ID]).⼦程序全部继续, , 公开.局部变量 i, 整数型.计次循环⾸ (取数组成员数 (多任务句柄), i)多线程_HTTP下载_继续 (多任务句柄 [i]).计次循环尾 ().⼦程序重试下载, , 公开.参数重试ID, 整数型多线程_HTTP下载_停⽌ (多任务句柄 [重试ID])多线程_HTTP下载_继续 (多任务句柄 [重试ID]).⼦程序全部重试, , 公开.局部变量 i, 整数型.计次循环⾸ (取数组成员数 (多任务句柄), i)多线程_HTTP下载_停⽌ (多任务句柄 [i])多线程_HTTP下载_继续 (多任务句柄 [i]).计次循环尾 ()以上是模块代码，下⾯是窗⼝程序集代码。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
前记：无意中发现的一个关于易语言多线程的讲解，分享给大家，有用得着的看看。
其中还提供了关于限制多开的办法，仔细阅读发现吧。
（BY 挂茶馆）一、关于多线程冲突问题。
3.6版开始增加了多线程支持库，提供对多线程的支持，并通过实现进入许可证机制以避免多线程冲突。
多线程是这样一种机制，它允许在程序中并发执行多个指令流，每个指令流都称为一个线程，彼此间互相独立。
线程又称为轻量级进程，它和进程一样拥有独立的执行控制，由操作系统负责调度，区别在于线程没有独立的存储空间，而是和所属进程中的其它线程共享一个存储空间，这使得线程间的通信远较进程简单。
多个线程的执行是并发的，也就是在逻辑上“同时”，而不管是否是物理上的“同时”。
如果系统只有一个CPU，那么真正的“同时”是不可能的，但是由于CPU的速度非常快，用户感觉不到其中的区别，因此我们也不用关心它，只需要设想各个线程是同时执行即可。
多线程和传统的单线程在程序设计上最大的区别在于，由于各个线程的控制流彼此独立，使得各个线程之间的代码是乱序执行的，由此带来的线程调度，同步等问题，将在下面探讨。
由于同一进程的多个线程共享同一片存储空间，在带来方便的同时，也带来了访问冲突这个严重的问题。
多线程也有它不利的一面。
任何时候某个应用程序使用的线程多于一个时，如果多个线程在同一时刻试图使用相同的数据或资源，可能出现麻烦。
这种情况一旦出现，程序将变得非常复杂并且难以调试。
更糟的是多线程代码经常在最初开发时运行良好，在形成产品时却往往失败，原因在于有未被发现的多个线程与相同的数据或资源相互作用的情况。
这使得多线程编程非常危险。
因此，在编程时需要考虑在多个线程访问同一资源时产生冲突的问题：当一个线程正在访问一个进程对象时，另一个线程要改变该对象，这时可能会产生错误的结果。
所以，程序员编程时要解决这种冲突。
最简单的避免线程冲突的的方法是使线程之间永远不与相同的数据或资源交互。
但这不一定可行，对任何多线程程序来说，避免或最小化共享数据或资源应作为一个目标。
二、下面介绍一下在Win32 基础上用API函数进行多线程编程的过程。
1、用Win32函数创建和中止线程Win32函数库中提供了多线程控制的操作函数，包括创建线程、中止线程、建立互斥区等。
首先，在应用程序的主线程或者其它活动线程的适当地方创建新的线程。
创建线程的函数如下：HANDLE CreateThread(LPSECURITY_ATTRIBUTES lpThreadAttributes, DWORD dwStackSize, LPTHREAD_START_ROUTINE lpStartAddress, LPVOID lpParameter, DWORD dwCreationFlags, LPDWORD lpThreadId );其中，参数lpThreadAttributes 指定了线程的安全属性，在Windows 95中被忽略；dwStackSize 指定了线程的堆栈深度；lpStartAddress 指定了线程的起始地址，一般情况为下面的原型函数：DWORD WINAPI ThreadFunc( LPVOID );lpParameter指定了线程执行时传送给线程的32位参数，即上面函数的参数；dwCreationFlags指定了线程创建的特性；lpThreadId 指向一个DWORD 变量，可返回线程ID值。
如果创建成功则返回线程的句柄，否则返回NULL。
创建了新的线程后，则该线程就开始启动执行了。
如果在dwCreationFlags中用了CREATE_SUSPENDED特性，那么线程并不马上执行，而是先挂起，等到调用ResumeThread 后才开始启动线程，在这个过程中可以调用函数：BOOL SetThreadPriority( HANDLE hThread, int nPriority);来设置线程的优先权。
当线程的函数返回后，线程自动中止。
如果在线程的执行过程中中止的话，则可调用函数：VOID ExitThread( DWORD dwExitCode);如果在线程的外面中止线程的话，则可调用下面的函数：2楼BOOL TerminateThread( HANDLE hThread, DWORD dwExitCode );但应注意：该函数可能会引起系统不稳定，而且线程所占用的资源也不释放。
因此，一般情况下，建议不要使用该函数。
如果要中止的线程是进程内的最后一个线程，则在线程被中止后相应的进程也应中止。
2、用Win32函数控制线程对共享资源的访问在线程体内，如果该线程完全独立，与其它的线程没有数据存取等资源操作上的冲突，则可按照通常单线程的方法进行编程。
但是，在多线程处理时情况常常不是这样，线程之间经常要同时访问一些资源。
例如，一个线程负责公式计算，另一个线程负责结果的显示，两个线程都要访问同一个结果变量。
这时如果不进行冲突控制的话，则很可能显示的是不正确的结果。
对共享资源进行访问引起冲突是不可避免的，但我们可用以下办法来进行操作控制：(1) 通过设置线程的互斥体对象，在可能冲突的地方进行同步控制。
首先，建立互斥体对象，得到句柄：HANDLE CreateMutex( );然后，在线程可能冲突区域的开始（即访问共享资源之前），调用WaitForSingleObject将句柄传给函数，请求占用互斥体对象：dwWaitResult = WaitForSingleObject(hMutex, 5000L);共享资源访问完后，释放对互斥体对象的占用：ReleaseMutex(hMutex);互斥体对象在同一时刻只能被一个线程占用。
当互斥体对象被一个线程占用时，若有另一线程想占用它，则必须等到前一线程释放后才能成功。
(2) 设置信号：在操作共享资源前，打开信号；完成操作后，关闭信号。
这类似于互斥体对象的处理。
首先，创建信号对象：HANDLE CreateSemaphore( );或者打开一个信号对象：HANDLE OpenSemaphore( );然后，在线程的访问共享资源之前调用WaitForSingleObject。
共享资源访问完后，释放对信号对象的占用：ReleaseSemaphore();信号对象允许同时对多个线程共享资源的访问，在创建对象时指定最大可同时访问的线程数。
当一个线程申请访问成功后，信号对象中的计数器减一；调用ReleaseSemaphore函数后，信号对象中的计数器加一。
其中，计数器值大于等于0，小于等于创建时指定的最大值。
利用信号对象，我们不仅可以控制共享资源的访问，还可以在应用的初始化时候使用。
假定一个应用在创建一个信号对象时，将其计数器的初始值设为0，这样就阻塞了其它线程，保护了资源。
待初始化完成后，调用ReleaseSemaphore函数将其计数器增加至最大值，进行正常的存取访问三、下面介绍易语言的多线程编程方法。
通过研究易语言附带的两个多线程例程，总结如下：（一）、先看易语言对自己的多程机制的解释：1、创建进入许可证：创建并返回一个进入许可证数值，此许可证值用作进入程序中的指定许可代码区，以避免多线程冲突。
2、删除进入许可证：删除由“创建进入许可证”命令所创建返回的进入许可证，以释放系统资源。
3、启动线程：创建并启动一条线程，可重复使用以创建多条线程。
4、进入许可区：根据已经创建的许可证进入指定许可代码区，在此线程未退出之前，其它线程如要通过同一个进入许可证进入该许可代码区则必须先等待此线程退出许可代码区，从而保证了指定许可代码区在任何时候都只能有一条线程进入并执行。
5、退出许可区：指示当前线程将退出许可代码区，并允许其它使用同一进入许可证的线程进入此许可代码区。
（二）、易语言的多线程编程过程大约如下：1、先用“创建进入许可证”命令为一个线程进入一个指定的许可代码区建立一个许可证。
2、用“启动线程”命令创建并启动一条线程，以运行一个线程的子程序。
3、在一个线程子程序里用“进入许可区”使该线程占用一个许可代码区，并锁定该代码区不让其他线程进入，并锁定其他线程运行，以避免线程冲突。
4、使用“退出许可区”解锁该许可代码区，以便让其他线程进入。
若想使多个线程同时运行，我们可以为每个线程建立一个进入许可证，进入许可区与退出许可区连着进行使多个线程同步运行。
5、当退出程序时，要删除进入许可证以释放系统资源。
（三）、下面的示例代码同时运行两个线程，一个是连续随机画圆，一个是连续随机画矩形：窗口程序集：窗口程序集1程序集变量：进入许可证1 数据类型：整数型程序集变量：画圆判断数据类型：逻辑型程序集变量：画矩形判断数据类型：逻辑型程序集变量：进入许可证2 数据类型：整数型══════════════════════════════子程序：_按钮1_被单击※备注：如果按钮1的标题为“停止画圆”时就开始画圆（画圆判断＝假），否则如果按钮1的标题为“开始画圆”时就停止画圆（画圆判断＝真）。
画圆判断＝取反(画圆判断)判断(画圆判断＝真)如果(进入许可证1 ≠0)如果真(启动线程(&画圆线程) ＝真)按钮1.标题＝“停止画圆”如果真结束否则信息框(“创建进入许可证失败”, 0, )如果结束默认按钮1.标题＝“开始画圆”判断结束══════════════════════════════子程序：画圆线程判断循环首(画圆判断＝真)置随机数种子()画板1.刷子颜色＝取颜色值(取随机数(0, 255), 取随机数(0, 255), 取随机数(0, 255))画板1.画笔颜色＝取颜色值(取随机数(0, 255), 取随机数(0, 255), 取随机数(0, 255)) 画板1.画椭圆(取随机数(1, 画板1.宽度), 取随机数(1, 画板1.高度), 取随机数(1, 画板1.宽度), 取随机数(1, 画板1.高度))进入许可区(进入许可证1)退出许可区(进入许可证1)延时(500)判断循环尾()══════════════════════════════子程序：__启动窗口_创建完毕进入许可证1 ＝创建进入许可证()进入许可证2 ＝创建进入许可证()══════════════════════════════子程序：__启动窗口_将被销毁删除进入许可证(进入许可证1)删除进入许可证(进入许可证2)══════════════════════════════子程序：_按钮2_被单击画矩形判断＝取反(画矩形判断)判断(画矩形判断＝真)如果(进入许可证2 ≠0)如果真(启动线程(&画矩形线程) ＝真)按钮2.标题＝“停止画矩形”如果真结束否则信息框(“创建进入许可证失败”, 0, )如果结束默认按钮2.标题＝“开始画矩形”判断结束══════════════════════════════子程序：画矩形线程判断循环首(画矩形判断＝真)置随机数种子()画板2.刷子颜色＝取颜色值(取随机数(0, 255), 取随机数(0, 255), 取随机数(0, 255)) 画板2.画笔颜色＝取颜色值(取随机数(0, 255), 取随机数(0, 255), 取随机数(0, 255)) 画板2.画矩形(取随机数(1, 画板2.宽度), 取随机数(1, 画板2.高度), 取随机数(1, 画板2.宽度), 取随机数(1, 画板2.高度))进入许可区(进入许可证2)退出许可区(进入许可证2)延时(500)判断循环尾()。