易语言数运算伪编译源码

系统结构:CALL_ASM,字节集还原,调用API,创建窗口,WindProc,WinMov,GetModuleHandleA,GetProcAddress,FreeLibrary,GetModuleHandle,CreateWindowEx,SetWindowLong,CallWindowProc,RegisterClass,ShowWindow,UpdateWindow,DefWindowProc,GetStockObject,LoadCursor,GetMessage,TranslateMessage,DispatchMessage,UnregisterClass,GetWindowRect,ScreenToClient,GetParent,MoveWindow,OpenProcess,GetProcessImageFileNameA,PostQuitMessage,SendMessageA,SendMessage,MessageBoxA,

======窗口程序集1
           |  |
           |  |------ _按钮1_被单击
           |  |
           |  |------ _按钮2_被单击
           |  |
           |  |------ _按钮3_被单击
  ======程序集1
           |  |
           |  |------ _启动子程序
           |  |
           |  |------ CALL_ASM
           |  |
           |  |------ 字节集还原
           |  |
           |  |------ 调用API
           |  |
           |  |
======创建窗口
           |  |
           |  |------ 创建窗口
           |  |
           |  |------ WindProc
           |  |
           |  |------ WinMov
           |  |
           |  |
======调用的Dll
           |  |
           |  |---[dll]------   GetModuleHandleA
           |  |
           |  |---[dll]------   GetProcAddress
           |  |
           |  |---[dll]------   FreeLibrary
           |  |
           |  |---[dll]------   GetModuleHandle
           |  |
           |  |---[dll]------   CreateWindowEx
           |  |
           |  |---[dll]------   SetWindowLong
           |  |
           |  |---[dll]------   CallWindowProc
           |  |
           |  |---[dll]------   RegisterClass
           |  |
           |  |---[dll]------   ShowWindow
           |  |
           |  |---[dll]------   UpdateWindow
           |  |
           |  |---[dll]------   DefWindowProc
           |  |
           |  |---[dll]------   GetStockObject
           |  |
           |  |---[dll]------   LoadCursor
           |  |
           |  |---[dll]------   GetMessage
           |  |
           |  |---[dll]------   TranslateMessage
           |  |
           |  |---[dll]------   DispatchMessage
           |  |
           |  |---[dll]------   UnregisterClass
           |  |
           |  |---[dll]------   GetWindowRect
           |  |
           |  |---[dll]------   ScreenToClient
           |  |
           |  |---[dll]------   GetParent
           |  |
           |  |---[dll]------   MoveWindow
           |  |
           |  |---[dll]------   OpenProcess
           |  |
           |  |---[dll]------   GetProcessImageFileNameA
           |  |
           |  |---[dll]------   PostQuitMessage
           |  |
           |  |---[dll]------   SendMessageA
           |  |
           |  |---[dll]------   SendMessage
           |  |
           |  |---[dll]------   MessageBoxA

  

调用的DLL命令:

.DLL命令 GetModuleHandleA, 整数型, "kernel32", "GetModuleHandleA", , 获取一个应用程序或动态链接库的模块句柄  如执行成功成功，则返回模块句柄。零表示失败。会设置GetLastError
    .参数 模块名, 文本型, , 指定模块名，这通常是与模块的文件名相同的一个名字。例如，NOTEPAD.EXE程序的模块文件名就叫作NOTEPAD

.DLL命令 GetProcAddress, 整数型, "kernel32", "GetProcAddress"
    .参数 hModule, 整数型
    .参数 lpProcName, 文本型

.DLL命令 FreeLibrary, 逻辑型, "kernel32", "FreeLibrary"
    .参数 库句柄, 整数型

.DLL命令 GetModuleHandle, 整数型, "kernel32", "GetModuleHandleA"
    .参数 lpModuleName

.DLL命令 CreateWindowEx, 整数型, "user32", "CreateWindowExA", , 创建窗口
    .参数 dwExStyle, 整数型, , 扩展样式
    .参数 lpClassName, 文本型, , 类名
    .参数 lpWindowName, 文本型, , 窗口标题
    .参数 dwStyle, 整数型, , 窗口样式
    .参数 x, 整数型, , 左边位置
    .参数 y, 整数型, , 顶边位置
    .参数 nWidth, 整数型, , 宽度
    .参数 nHeight, 整数型, , 高度
    .参数 hWndParent, 整数型, , 父窗口句柄
    .参数 hMenu, 整数型, , null参见CreateWindow
    .参数 hInstance, 整数型, , 实例句柄
    .参数 lpParam, 整数型, , null参见CreateWindow

.DLL命令 SetWindowLong, 整数型, , "SetWindowLongA", 公开
    .参数 hWnd, 整数型
    .参数 nIndex, 整数型
    .参数 dwNewLong, 子程序指针

.DLL命令 CallWindowProc, 整数型, "user32.dll", "CallWindowProcA", 公开, LRESULT WINAPI CallWindowProc
    .参数 lpPrevWndFunc, , , WNDPROC lpPrevWndFunc ,
    .参数 hWnd, 整数型, , HWND hWnd ,
    .参数 Msg, 整数型, , UINT Msg ,
    .参数 wParam, 整数型, , WPARAM wParam ,
    .参数 lParam, 整数型, , LPARAM lParam ,

.DLL命令 RegisterClass, 整数型, "user32.dll", "RegisterClassA", , 注册窗口类
    .参数 Class, WNDCLASS, 传址, 窗口的类结构

.DLL命令 ShowWindow, 整数型, "user32.dll", "ShowWindow"
    .参数 hwnd, 整数型
    .参数 nCmdShow, 整数型

.DLL命令 UpdateWindow, 整数型, "user32.dll", "UpdateWindow"
    .参数 hwnd, 整数型

.DLL命令 DefWindowProc, 整数型, "user32.dll", "DefWindowProcA"
    .参数 hwnd, 整数型
    .参数 wMsg, 整数型
    .参数 wParam, 整数型
    .参数 lParam, 整数型

.DLL命令 GetStockObject, 整数型
    .参数 fnObject

.DLL命令 LoadCursor, 整数型, "user32.dll", "LoadCursorA", 公开, HCURSOR WINAPI LoadCursor
    .参数 hInstance, 整数型, , HINSTANCE hInstance ,
    .参数 lpCursorName, 整数型, , LPCTSTR lpCursorName ,

.DLL命令 GetMessage, 整数型, "user32.dll", "GetMessageA"
    .参数 lpMsg, MSG, 传址
    .参数 hwnd, 整数型
    .参数 wMsgFilterMin, 整数型
    .参数 wMsgFilterMax, 整数型

.DLL命令 TranslateMessage, 整数型, "user32.dll", "TranslateMessage"
    .参数 lpMsg, MSG, 传址

.DLL命令 DispatchMessage, 整数型, "user32.dll", "DispatchMessageA"
    .参数 lpMsg, MSG, 传址

.DLL命令 UnregisterClass, 整数型, "user32.dll", "UnregisterClassA"
    .参数 Class, 文本型
    .参数 句柄, 整数型

.DLL命令 GetWindowRect, 整数型
    .参数 hw
    .参数 rect, RECT

.DLL命令 ScreenToClient, 整数型
    .参数 hw
    .参数 pt, POINTAPI

.DLL命令 GetParent, 整数型
    .参数 hw

.DLL命令 MoveWindow, 整数型
    .参数 hw
    .参数 x
    .参数 y
    .参数 w
    .参数 h
    .参数 f

.DLL命令 OpenProcess, 整数型, "kernel32.dll", "OpenProcess", , 进程操作
    .参数 dwDesiredAccess, 整数型
    .参数 bInheritHandle, 逻辑型, , 是否继承
    .参数 dwProcessId, 整数型

.DLL命令 GetProcessImageFileNameA, 整数型, "psapi.dll"
    .参数 hp
    .参数 pn, 文本型
    .参数 lp

.DLL命令 PostQuitMessage, , "user32.dll", "PostQuitMessage"
    .参数 nExitCode, 整数型

.DLL命令 SendMessageA, 整数型, "user32.dll", "SendMessageA", 公开, LRESULT WINAPI SendMessage
    .参数 hWnd, 整数型, , HWND hWnd ,
    .参数 Msg, 整数型, , UINT Msg ,
    .参数 wParam, 整数型, , WPARAM wParam ,
    .参数 lParam, 文本型, , LPARAM lParam ,

.DLL命令 SendMessage, 整数型, "user32.dll", "SendMessageA", 公开, LRESULT WINAPI SendMessage
    .参数 hWnd, 整数型, , HWND hWnd ,
    .参数 Msg, 整数型, , UINT Msg ,
    .参数 wParam, 整数型, , WPARAM wParam ,
    .参数 lParam, 整数型, , LPARAM lParam ,

.DLL命令 MessageBoxA, 整数型
    .参数 hw
    .参数 str, 文本型
    .参数 cp, 文本型
    .参数 tp