易语言动态分形三鹰翅算法源码

系统结构:Main,rst,Core,SetPix,GetDC,CreateCompatibleDC,CreateDIBSection,SetBitmapBits,StretchBlt,SelectObject,DeleteDC,DeleteObject,BitBlt,

======窗口程序集1
           |  |
           |  |------ Main
           |  |
           |  |------ rst
           |  |
           |  |------ _时钟1_周期事件
           |  |
           |  |------ Core
           |  |
           |  |------ SetPix
           |  |
           |  |------ __启动窗口_可否被关闭
           |  |
           |  |------ __启动窗口_创建完毕
           |  |
           |  |------ __启动窗口_首次激活
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetDC
           |  |
           |  |---[dll]------   CreateCompatibleDC
           |  |
           |  |---[dll]------   CreateDIBSection
           |  |
           |  |---[dll]------   SetBitmapBits
           |  |
           |  |---[dll]------   StretchBlt
           |  |
           |  |---[dll]------   SelectObject
           |  |
           |  |---[dll]------   DeleteDC
           |  |
           |  |---[dll]------   DeleteObject
           |  |
           |  |---[dll]------   BitBlt

调用的DLL命令:

.DLL命令 GetDC, 整数型, "user32", "GetDC", , 获取指定窗口的设备场景  指定窗口的设备场景句柄，出错则为0
    .参数 hwnd, 整数型, , 将获取其设备场景的窗口的句柄。若为0，则要获取整个屏幕的DC;

.DLL命令 CreateCompatibleDC, 整数型, "gdi32", "CreateCompatibleDC", , 创建一个与特定设备场景一致的内存设备场景  新设备场景句柄，若出错则为零
    .参数 设备场景句柄, 整数型, , 设备场景句柄。新的设备场景将与它一致。也可能为0以创建一个与屏幕一致的设备场景;

.DLL命令 CreateDIBSection, 整数型, "gdi32", "CreateDIBSection", , 创建一个DIBSection。这是一个GDI对象，可象一幅与设备有关位图那样使用。但是，它在内部作为一幅与设备无关位图保存  执行成功返回DIBSection位图的句柄，零表示失败。会设置GetLastError
    .参数 设备场景句柄, 整数型, , 一个设备场景的句柄。如dw设为DIB_PAL_COLORS，那么DIB颜色表就会用来自逻辑调色板的颜色进行初始化
    .参数 pBitmapInfo, 位图信息_, , BITMAPINFO，这个结构初始化成欲创建的那幅位图的配置数据
    .参数 常数, 整数型, , 下述常数之一：;DIB_PAL_COLORS：BITMAPINFO包含了一个16位调色板索引的数组;DIB_RGB_COLORS：BITMAPINFO包含了一个颜色表，其中保存有32位颜色（RGBQUAD）
    .参数 内存地址, 整数型, , 用于载入DIBSection数据区的内存地址
    .参数 文件映射句柄, 整数型, , 指向一个文件映射对象的可选句柄，位图将在其中创建。如设为零，Windows会自动分配内存
    .参数 偏移量, 整数型, , 如指定了句柄，就用这个参数指定位图数据在文件映射对象中的偏移量;

.DLL命令 SetBitmapBits, , "gdi32", "SetBitmapBits"
    .参数 hbmp, 整数型, , 指向要设置的位图的句柄
    .参数 cBytes, 整数型, , 指定参数lpBits指向的数组的字节数
    .参数 lpBits, 整数型, , 指向字节类型数组的指针。该数组中包含了指定位图的颜色数据

.DLL命令 StretchBlt, , "gdi32", "StretchBlt"
    .参数 目标设备场景, 整数型
    .参数 目标位置横坐标, 整数型
    .参数 目标位置纵坐标, 整数型
    .参数 目标图像宽, 整数型
    .参数 目标图像高, 整数型
    .参数 源设备场景, 整数型
    .参数 源位置横坐标, 整数型
    .参数 源位置纵坐标, 整数型
    .参数 源图像宽, 整数型
    .参数 源图像高, 整数型
    .参数 光栅运算, 整数型

.DLL命令 SelectObject, 整数型, "gdi32", "SelectObject", , 每个设备场景都可能有选入其中的图形对象。其中包括位图、刷子、字体、画笔以及区域等等。一次选入设备场景的只能有一个对象。选定的对象会在设备场景的绘图操作中使用。例如，当前选定的画笔决定了在设备场景中描绘的线段颜色及样式  与以前选入设备场景的相同hObject类型的一个对象的句柄，零表示出错。如选定的对象是一个区域（Region），结果就是下列常数之一：SIMPLEREGION， ;    COMPLEXREGION 或 NULLREGION 对区域进行描述， GDI_ERROR 表示出错
    .参数 设备场景句柄, 整数型, , 一个设备场景的句柄
    .参数 对象句柄, 整数型, , 一个画笔、位图、刷子、字体或区域的句柄;

.DLL命令 DeleteDC, 整数型, "gdi32", "DeleteDC", , 删除专用设备场景或信息场景，释放所有相关窗口资源。不要将它用于GetDC函数取回的设备场景  执行成功则为非零，失败则为零
    .参数 设备场景句柄, 整数型, , 将要删除的设备场景  在vb里使用不要将它用于由vb hdc属性获取的设备场景句柄;

.DLL命令 DeleteObject, 整数型, "gdi32", "DeleteObject", , 用这个函数删除GDI对象，比如画笔、刷子、字体、位图、区域以及调色板等等。对象使用的所有系统资源都会被释放  非零表示成功，零表示失败
    .参数 对象句柄, 整数型, , 一个GDI对象的句柄;

.DLL命令 BitBlt, 整数型, "gdi32", "BitBlt", , 将一幅位图从一个设备场景复制到另一个。源和目标DC相互间必须兼容  非零表示成功，零表示失败。会设置GetLastError
    .参数 目标设备场景, 整数型, , 目标设备场景
    .参数 目标横坐标, 整数型, , 对目标DC中目标矩形左上角位置进行描述的那个点。用目标DC的逻辑坐标表示
    .参数 目标纵坐标, 整数型, , 同上
    .参数 传输图像宽度, 整数型, , 欲传输图象的宽度和高度
    .参数 传输图像高度, 整数型, , 同上
    .参数 源设备场景, 整数型, , 源设备场景。如光栅运算未指定源，则应设为0
    .参数 源横坐标, 整数型, , 对源DC中源矩形左上角位置进行描述的那个点。用源DC的逻辑坐标表示
    .参数 源纵坐标, 整数型, , 同上
    .参数 光栅运算方式, 整数型, , 传输过程要执行的光栅运算;