汇编基础类

啊冲

.版本 2
.支持库 spec

.程序集 程序集1
.程序集变量 OPcode, 文本型

.子程序 _启动子程序, 整数型, , 请在本子程序中放置易模块初始化代码


_临时子程序 ()  ' 在初始化代码执行完毕后调用测试代码
返回 (0)  ' 可以根据您的需要返回任意数值

.子程序 _临时子程序

' 本名称子程序用作测试程序用，仅在开发及调试环境中有效，编译发布程序前将被系统自动清空，请将所有用作测试的临时代码放在本子程序中。 ***注意不要修改本子程序的名称、参数及返回值类型。
调试输出 (到字节集 (“1”))

.子程序 Get_Result, 文本型, 公开
.局部变量 i, 整数型
.局部变量 AsmCode, 字节型, , "0"

AsmCode ＝ 取文本长度 (OPcode) ÷ 2 － 1
.变量循环首 (1, 取文本长度 (OPcode), 1, i)
    AsmCode ＝ 到字节 (取十六进制文本 (取文本中间 (OPcode, i × 2 ＋ 1, 2)))
.变量循环尾 ()
返回 (CallWindowProc (取变量地址 (AsmCode), 0, 0, 0, 0))

.子程序 Get_Code, 文本型, 公开

返回 (OPcode)

.子程序 Run_ASM, 整数型, 公开
.参数 pid, 整数型, 参考
.局部变量 i, 整数型
.局部变量 tmp_Addr, 整数型
.局部变量 RThwnd, 整数型
.局部变量 h, 整数型
.局部变量 AsmCode, 字节型, , "0"

.变量循环首 (1, 取数组下标 (OPcode, ), 1, i)
    AsmCode ＝ 到字节 (取文本中间 (OPcode, i × 2 ＋ 1, 2))
.变量循环尾 ()
h ＝ OpenProcess (#PROCESS_ALL_ACCESS, 0, pid)
tmp_Addr ＝ VirtualAllocEx (h, 0, 取数组下标 (AsmCode, ) ＋ 1, #MEM_COMMIT, #PAGE_EXECUTE_READWRITE)
WriteProcessMemory (h, tmp_Addr, 取变量数据地址 (AsmCode), 取数组下标 (AsmCode, ) ＋ 1, 0)
RThwnd ＝ CreateRemoteThread (h, 0, 0, tmp_Addr, 0, 0, 0)
VirtualFreeEx (h, tmp_Addr, 取数组下标 (AsmCode, ) ＋ 1, #MEM_RELEASE)
CloseHandle (RThwnd)
CloseHandle (h)
OPcode ＝ “”
返回 (0)

.子程序 Int2Hex, 文本型, , "高地位互换"
.参数 Value, 整数型, 参考
.参数 n, 整数型, 参考
.局部变量 tmp1, 文本型
.局部变量 tmp2, 文本型
.局部变量 i, 整数型

tmp1 ＝ 取文本右边 (“0000000” ＋ 取十六进制文本 (Value), n)
.变量循环首 (0, 取文本长度 (tmp1) ÷ 2 － 1, 1, i)
    tmp2 ＝ tmp2 ＋ 取文本中间 (tmp1, 取文本长度 (tmp1) － 1 － 2 × i, 2)
.变量循环尾 ()
返回 (tmp2)

.子程序 Leave, 整数型, 公开



.子程序 Pushad, 整数型, 公开

OPcode ＝ OPcode ＋ “60”

.子程序 Popad, 整数型, 公开

OPcode ＝ OPcode ＋ “61”

.子程序 Nop, 整数型, 公开

OPcode ＝ OPcode ＋ “90”

.子程序 Ret, 整数型, 公开

OPcode ＝ OPcode ＋ “C3”
返回 (0)

.子程序 RetA, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 IN_AL_DX, 整数型, 公开



.子程序 TEST_EAX_EAX, 整数型, 公开



.子程序 Add_EAX_EDX, 整数型, 公开



.子程序 Add_EBX_EAX, 整数型, 公开



.子程序 Add_EAX_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Add_EBX_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Add_EBP_DWORD_Ptr, 整数型
.参数 i, 整数型, 参考



.子程序 Add_EAX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Add_EBX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Add_ECX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Add_EDX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Add_ESI, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Add_ESP, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Call_EAX, 整数型, 公开

OPcode ＝ OPcode ＋ “FFD0”
返回 (0)

.子程序 Call_EBX, 整数型, 公开



.子程序 Call_ECX, 整数型, 公开



.子程序 Call_EDX, 整数型, 公开



.子程序 Call_ESI, 整数型, 公开



.子程序 Call_ESP, 整数型, 公开



.子程序 Call_EBP, 整数型, 公开



.子程序 Call_EDI, 整数型, 公开



.子程序 Call_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Call_DWORD_Ptr_EAX, 整数型, 公开



.子程序 Call_DWORD_Ptr_EBX, 整数型, 公开



.子程序 Cmp_EAX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Cmp_EAX_EDX, 整数型, 公开



.子程序 Cmp_EAX_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Cmp_DWORD_Ptr_EAX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Dec_EAX, 整数型, 公开



.子程序 Dec_EBX, 整数型, 公开



.子程序 Dec_ECX, 整数型, 公开



.子程序 Dec_EDX, 整数型, 公开



.子程序 Idiv_EAX, 整数型, 公开



.子程序 Idiv_EBX, 整数型, 公开



.子程序 Idiv_ECX, 整数型, 公开



.子程序 Idiv_EDX, 整数型, 公开



.子程序 Imul_EAX_EDX, 整数型, 公开



.子程序 Imul_EAX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 ImulB_EAX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Inc_EAX, 整数型, 公开



.子程序 Inc_EBX, 整数型, 公开



.子程序 Inc_ECX, 整数型, 公开



.子程序 Inc_EDX, 整数型, 公开



.子程序 Inc_EDI, 整数型, 公开



.子程序 Inc_ESI, 整数型, 公开



.子程序 Inc_DWORD_Ptr_EAX, 整数型, 公开



.子程序 Inc_DWORD_Ptr_EBX, 整数型, 公开



.子程序 Inc_DWORD_Ptr_ECX, 整数型, 公开



.子程序 Inc_DWORD_Ptr_EDX, 整数型, 公开



.子程序 JMP_EAX, 整数型, 公开



.子程序 Mov_DWORD_Ptr_EAX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EAX, 整数型, 公开
.参数 i, 整数型, 参考

OPcode ＝ OPcode ＝ OPcode ＋ “B8” ＋ Int2Hex (i, 8)
返回 (0)

.子程序 Mov_EBX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ECX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDX, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ESI, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ESP, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBP, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDI, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBX_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ECX_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EAX_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDX_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ESI_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ESP_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBP_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EAX_DWORD_Ptr_EAX, 整数型, 公开



.子程序 Mov_EAX_DWORD_Ptr_EBP, 整数型, 公开



.子程序 Mov_EAX_DWORD_Ptr_EBX, 整数型, 公开



.子程序 Mov_EAX_DWORD_Ptr_ECX, 整数型, 公开



.子程序 Mov_EAX_DWORD_Ptr_EDX, 整数型, 公开



.子程序 Mov_EAX_DWORD_Ptr_EDI, 整数型, 公开



.子程序 Mov_EAX_DWORD_Ptr_ESP, 整数型, 公开



.子程序 Mov_EAX_DWORD_Ptr_ESI, 整数型, 公开



.子程序 Mov_EAX_DWORD_Ptr_EAX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EAX_DWORD_Ptr_ESP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EAX_DWORD_Ptr_EBX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EAX_DWORD_Ptr_ECX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EAX_DWORD_Ptr_EDX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EAX_DWORD_Ptr_EDI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EAX_DWORD_Ptr_EBP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EAX_DWORD_Ptr_ESI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBX_DWORD_Ptr_EAX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBX_DWORD_Ptr_ESP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBX_DWORD_Ptr_EBX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBX_DWORD_Ptr_ECX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBX_DWORD_Ptr_EDX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBX_DWORD_Ptr_EDI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBX_DWORD_Ptr_EBP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBX_DWORD_Ptr_ESI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ECX_DWORD_Ptr_EAX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ECX_DWORD_Ptr_ESP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ECX_DWORD_Ptr_EBX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ECX_DWORD_Ptr_ECX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ECX_DWORD_Ptr_EDX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ECX_DWORD_Ptr_EDI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ECX_DWORD_Ptr_EBP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_ECX_DWORD_Ptr_ESI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDX_DWORD_Ptr_EAX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDX_DWORD_Ptr_ESP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDX_DWORD_Ptr_EBX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDX_DWORD_Ptr_ECX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDX_DWORD_Ptr_EDX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDX_DWORD_Ptr_EDI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDX_DWORD_Ptr_EBP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EDX_DWORD_Ptr_ESI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Mov_EBX_DWORD_Ptr_EAX, 整数型, 公开



.子程序 Mov_EBX_DWORD_Ptr_EBP, 整数型, 公开



.子程序 Mov_EBX_DWORD_Ptr_EBX, 整数型, 公开



.子程序 Mov_EBX_DWORD_Ptr_ECX, 整数型, 公开



.子程序 Mov_EBX_DWORD_Ptr_EDX, 整数型, 公开



.子程序 Mov_EBX_DWORD_Ptr_EDI, 整数型, 公开



.子程序 Mov_EBX_DWORD_Ptr_ESP, 整数型, 公开



.子程序 Mov_EBX_DWORD_Ptr_ESI, 整数型, 公开



.子程序 Mov_ECX_DWORD_Ptr_EAX, 整数型, 公开



.子程序 Mov_ECX_DWORD_Ptr_EBP, 整数型, 公开



.子程序 Mov_ECX_DWORD_Ptr_EBX, 整数型, 公开



.子程序 Mov_ECX_DWORD_Ptr_ECX, 整数型, 公开



.子程序 Mov_ECX_DWORD_Ptr_EDX, 整数型, 公开



.子程序 Mov_ECX_DWORD_Ptr_EDI, 整数型, 公开



.子程序 Mov_ECX_DWORD_Ptr_ESP, 整数型, 公开



.子程序 Mov_ECX_DWORD_Ptr_ESI, 整数型, 公开



.子程序 Mov_EDX_DWORD_Ptr_EAX, 整数型, 公开



.子程序 Mov_EDX_DWORD_Ptr_EBP, 整数型, 公开



.子程序 Mov_EDX_DWORD_Ptr_EBX, 整数型, 公开



.子程序 Mov_EDX_DWORD_Ptr_ECX, 整数型, 公开



.子程序 Mov_EDX_DWORD_Ptr_EDX, 整数型, 公开



.子程序 Mov_EDX_DWORD_Ptr_EDI, 整数型, 公开



.子程序 Mov_EDX_DWORD_Ptr_ESI, 整数型, 公开



.子程序 Mov_EDX_DWORD_Ptr_ESP, 整数型, 公开



.子程序 Mov_EAX_EBP, 整数型, 公开



.子程序 Mov_EAX_EBX, 整数型, 公开



.子程序 Mov_EAX_ECX, 整数型, 公开



.子程序 Mov_EAX_EDI, 整数型, 公开



.子程序 Mov_EAX_EDX, 整数型, 公开



.子程序 Mov_EAX_ESI, 整数型, 公开



.子程序 Mov_EAX_ESP, 整数型, 公开



.子程序 Mov_EBX_EBP, 整数型, 公开



.子程序 Mov_EBX_EAX, 整数型, 公开



.子程序 Mov_EBX_ECX, 整数型, 公开



.子程序 Mov_EBX_EDI, 整数型, 公开



.子程序 Mov_EBX_EDX, 整数型, 公开



.子程序 Mov_EBX_ESI, 整数型, 公开



.子程序 Mov_EBX_ESP, 整数型, 公开



.子程序 Mov_ECX_EBP, 整数型, 公开



.子程序 Mov_ECX_EAX, 整数型, 公开



.子程序 Mov_ECX_EBX, 整数型, 公开



.子程序 Mov_ECX_EDI, 整数型, 公开



.子程序 Mov_ECX_EDX, 整数型, 公开



.子程序 Mov_ECX_ESI, 整数型, 公开



.子程序 Mov_ECX_ESP, 整数型, 公开



.子程序 Mov_EDX_EBP, 整数型, 公开



.子程序 Mov_EDX_EBX, 整数型, 公开



.子程序 Mov_EDX_ECX, 整数型, 公开



.子程序 Mov_EDX_EDI, 整数型, 公开



.子程序 Mov_EDX_EAX, 整数型, 公开



.子程序 Mov_EDX_ESI, 整数型, 公开



.子程序 Mov_EDX_ESP, 整数型, 公开



.子程序 Mov_ESI_EBP, 整数型, 公开



.子程序 Mov_ESI_EBX, 整数型, 公开



.子程序 Mov_ESI_ECX, 整数型, 公开



.子程序 Mov_ESI_EDI, 整数型, 公开



.子程序 Mov_ESI_EAX, 整数型, 公开



.子程序 Mov_ESI_EDX, 整数型, 公开



.子程序 Mov_ESI_ESP, 整数型, 公开



.子程序 Mov_ESP_EBP, 整数型, 公开



.子程序 Mov_ESP_EBX, 整数型, 公开



.子程序 Mov_ESP_ECX, 整数型, 公开



.子程序 Mov_ESP_EDI, 整数型, 公开



.子程序 Mov_ESP_EAX, 整数型, 公开



.子程序 Mov_ESP_EDX, 整数型, 公开



.子程序 Mov_ESP_ESI, 整数型, 公开



.子程序 Mov_EDI_EBP, 整数型, 公开



.子程序 Mov_EDI_EAX, 整数型, 公开



.子程序 Mov_EDI_EBX, 整数型, 公开



.子程序 Mov_EDI_ECX, 整数型, 公开



.子程序 Mov_EDI_EDX, 整数型, 公开



.子程序 Mov_EDI_ESI, 整数型, 公开



.子程序 Mov_EDI_ESP, 整数型, 公开



.子程序 Mov_EBP_EDI, 整数型, 公开



.子程序 Mov_EBP_EAX, 整数型, 公开



.子程序 Mov_EBP_EBX, 整数型, 公开



.子程序 Mov_EBP_ECX, 整数型, 公开



.子程序 Mov_EBP_EDX, 整数型, 公开



.子程序 Mov_EBP_ESI, 整数型, 公开



.子程序 Mov_EBP_ESP, 整数型, 公开



.子程序 Push, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Push_DWORD_Ptr, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Push_EAX, 整数型, 公开



.子程序 Push_ECX, 整数型, 公开



.子程序 Push_EDX, 整数型, 公开



.子程序 Push_EBX, 整数型, 公开



.子程序 Push_ESP, 整数型, 公开



.子程序 Push_EBP, 整数型, 公开



.子程序 Push_ESI, 整数型, 公开



.子程序 Push_EDI, 整数型, 公开



.子程序 Lea_EAX_DWORD_Ptr_EAX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EAX_DWORD_Ptr_EBX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EAX_DWORD_Ptr_ECX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EAX_DWORD_Ptr_EDX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EAX_DWORD_Ptr_ESI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EAX_DWORD_Ptr_ESP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EAX_DWORD_Ptr_EBP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EAX_DWORD_Ptr_EDI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EBX_DWORD_Ptr_EAX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EBX_DWORD_Ptr_ESP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EBX_DWORD_Ptr_EBX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EBX_DWORD_Ptr_ECX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EBX_DWORD_Ptr_EDX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EBX_DWORD_Ptr_EDI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EBX_DWORD_Ptr_EBP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EBX_DWORD_Ptr_ESI_Add, 整数型
.参数 i, 整数型, 参考



.子程序 Lea_ECX_DWORD_Ptr_EAX_Add, 整数型
.参数 i, 整数型, 参考



.子程序 Lea_ECX_DWORD_Ptr_ESP_Add, 整数型
.参数 i, 整数型, 参考



.子程序 Lea_ECX_DWORD_Ptr_EBX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_ECX_DWORD_Ptr_ECX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_ECX_DWORD_Ptr_EDX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_ECX_DWORD_Ptr_EDI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_ECX_DWORD_Ptr_EBP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_ECX_DWORD_Ptr_ESI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EDX_DWORD_Ptr_EAX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EDX_DWORD_Ptr_ESP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EDX_DWORD_Ptr_EBX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EDX_DWORD_Ptr_ECX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EDX_DWORD_Ptr_EDX_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EDX_DWORD_Ptr_EDI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EDX_DWORD_Ptr_EBP_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Lea_EDX_DWORD_Ptr_ESI_Add, 整数型, 公开
.参数 i, 整数型, 参考



.子程序 Pop_EAX, 整数型, 公开



.子程序 Pop_EBX, 整数型, 公开



.子程序 Pop_ECX, 整数型, 公开



.子程序 Pop_EDX, 整数型, 公开



.子程序 Pop_ESI, 整数型, 公开



.子程序 Pop_ESP, 整数型, 公开



.子程序 Pop_EDI, 整数型, 公开



.子程序 Pop_EBP, 整数型, 公开


http://yunpan.cn/QXMC4yDVWWigf