【汇编】简单的方法实现“取变量数据地址”

1185384801

核心实现代码如下（其实非常简单，懂的人都可以不用下载附件）（我英化了核心库，所以有些命令看起来是没有的，但其实复制到易语言中就可以实现转为中文）：警告，下面命令中的通用型是不可复制的！！

  

子程序名	返回值类型	公开	备 注
取变量地址	整数型
参数名	类 型	参考	可空	数组	备 注
变量	通用型

变量名	类 型	静态	数组	备 注
数据类型	整数型

数据类型 ＝ 取通用类型 (变量)
.if (数据类型 ＝ 0)
MachineCode ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' mov eax,[eax]
' leave
' retn 0x0004
.if (数据类型 ＝ 1)
MachineCode ({ 139, 69, 8, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' leave
' retn 0x0004
.if (数据类型 ＝ 2)
MachineCode ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' mov eax,[eax]
' leave
' retn 0x0004
.if (数据类型 ＝ 3)
MachineCode ({ 139, 69, 8, 139, 0, 131, 192, 8, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' mov eax,[eax]
' Add eax,8
' leave
' retn 0x0004
.if (数据类型 ＝ 5)
MachineCode ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' mov eax,[eax]
' leave
' retn 0x0004
return (0)

子程序名	返回值类型	公开	备 注
取通用类型	整数型		0.自定义类型 1.数值类型 2.文本型 3.字节集 4.数组 5.函数指针
参数名	类 型	参考	可空	数组	备 注
数据	通用型

变量名	类 型	静态	数组	备 注
m	整数型
c	整数型

MachineCode ({ 139, 69, 8, 137, 69, 252, 80 })
.if (IsBadReadPtr (m, 4) ≠ 0)
return (1)
MachineCode ({ 88, 139, 0, 137, 69, 248 })
.if (c ≠ 1)
c ＝ GlobalSize (m)
.ife (c ＝ 0)
c ＝ GetBinElement (pbin (m, 3), 3, )
.ife (c ＝ 5461846 或 c ＝ 15042901)
return (5)
return (2)

return (0)

c ＝ GlobalSize (m)
.if (c ≠ 0)
MachineCode ({ 139, 69, 252, 139, 64, 4, 137, 69, 252 })
c ＝ c － 8
.ife (m ＝ c)
return (3)
return (4)

return (3)

.版本 2<br /> <br /> .子程序 取变量地址, 整数型<br /> .参数 变量, 通用型, 参考<br /> .局部变量 数据类型, 整数型<br /> <br /> 数据类型 ＝ 取通用类型 (变量)<br /> .if (数据类型 ＝ 0)<br />     MachineCode ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })<br />     ' mov eax,[ebp+8]<br />     ' mov eax,[eax]<br />     ' leave<br />     ' retn 0x0004<br /> .如果真结束<br /> .if (数据类型 ＝ 1)<br />     MachineCode ({ 139, 69, 8, 201, 194, 4, 0 })<br />     ' mov eax,[ebp+8]<br />     ' leave<br />     ' retn 0x0004<br /> .如果真结束<br /> .if (数据类型 ＝ 2)<br />     MachineCode ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })<br />     ' mov eax,[ebp+8]<br />     ' mov eax,[eax]<br />     ' leave<br />     ' retn 0x0004<br /> .如果真结束<br /> .if (数据类型 ＝ 3)<br />     MachineCode ({ 139, 69, 8, 139, 0, 131, 192, 8, 201, 194, 4, 0 })<br />     ' mov eax,[ebp+8]<br />     ' mov eax,[eax]<br />     ' Add eax,8<br />     ' leave<br />     ' retn 0x0004<br /> .如果真结束<br /> .if (数据类型 ＝ 5)<br />     MachineCode ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })<br />     ' mov eax,[ebp+8]<br />     ' mov eax,[eax]<br />     ' leave<br />     ' retn 0x0004<br /> .如果真结束<br /> return (0)<br /> <br /> .子程序 取通用类型, 整数型, , 0.自定义类型 1.数值类型 2.文本型 3.字节集 4.数组 5.函数指针<br /> .参数 数据, 通用型<br /> .局部变量 m, 整数型<br /> .局部变量 c, 整数型<br /> <br /> MachineCode ({ 139, 69, 8, 137, 69, 252, 80 })<br /> .if (IsBadReadPtr (m, 4) ≠ 0)<br />     return (1)<br /> .如果真结束<br /> MachineCode ({ 88, 139, 0, 137, 69, 248 })<br /> .if (c ≠ 1)<br />     c ＝ GlobalSize (m)<br />     .ife (c ＝ 0)<br />         c ＝ GetBinElement (pbin (m, 3), 3, )<br />         .ife (c ＝ 5461846 或 c ＝ 15042901)<br />             return (5)<br />         .否则<br />             return (2)<br />         .如果结束<br /> <br />     .否则<br />         return (0)<br />     .如果结束<br /> <br /> .如果真结束<br /> c ＝ GlobalSize (m)<br /> .if (c ≠ 0)<br />     MachineCode ({ 139, 69, 252, 139, 64, 4, 137, 69, 252 })<br />     c ＝ c － 8<br />     .ife (m ＝ c)<br />         return (3)<br />     .否则<br />         return (4)<br />     .如果结束<br /> <br /> .如果真结束<br /> return (3)

  

子程序名	返回值类型	公开	备 注
取变量地址	整数型
参数名	类 型	参考	可空	数组	备 注
变量	通用型

变量名	类 型	静态	数组	备 注
数据类型	整数型

数据类型 ＝ 取通用类型 (变量)
如果真 (数据类型 ＝ 0)
置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' mov eax,[eax]
' leave
' retn 0x0004
如果真 (数据类型 ＝ 1)
置入代码 ({ 139, 69, 8, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' leave
' retn 0x0004
如果真 (数据类型 ＝ 2)
置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' mov eax,[eax]
' leave
' retn 0x0004
如果真 (数据类型 ＝ 3)
置入代码 ({ 139, 69, 8, 139, 0, 131, 192, 8, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' mov eax,[eax]
' Add eax,8
' leave
' retn 0x0004
如果真 (数据类型 ＝ 5)
置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })
' mov eax,[ebp+8]
' mov eax,[eax]
' leave
' retn 0x0004
返回 (0)

子程序名	返回值类型	公开	备 注
取通用类型	整数型		0.自定义类型 1.数值类型 2.文本型 3.字节集 4.数组 5.函数指针
参数名	类 型	参考	可空	数组	备 注
数据	通用型

变量名	类 型	静态	数组	备 注
m	整数型
c	整数型

置入代码 ({ 139, 69, 8, 137, 69, 252, 80 })
如果真 (IsBadReadPtr (m, 4) ≠ 0)
返回 (1)
置入代码 ({ 88, 139, 0, 137, 69, 248 })
如果真 (c ≠ 1)
c ＝ GlobalSize (m)
如果 (c ＝ 0)
c ＝ 取字节集数据 (指针到字节集 (m, 3), 3, )
如果 (c ＝ 5461846 或 c ＝ 15042901)
返回 (5)
返回 (2)

返回 (0)

c ＝ GlobalSize (m)
如果真 (c ≠ 0)
置入代码 ({ 139, 69, 252, 139, 64, 4, 137, 69, 252 })
c ＝ c － 8
如果 (m ＝ c)
返回 (3)
返回 (4)

返回 (3)

.版本 2<br /> <br /> .子程序 取变量地址, 整数型<br /> .参数 变量, 通用型, 参考<br /> .局部变量 数据类型, 整数型<br /> <br /> 数据类型 ＝ 取通用类型 (变量)<br /> .如果真 (数据类型 ＝ 0)<br />     置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })<br />     ' mov eax,[ebp+8]<br />     ' mov eax,[eax]<br />     ' leave<br />     ' retn 0x0004<br /> .如果真结束<br /> .如果真 (数据类型 ＝ 1)<br />     置入代码 ({ 139, 69, 8, 201, 194, 4, 0 })<br />     ' mov eax,[ebp+8]<br />     ' leave<br />     ' retn 0x0004<br /> .如果真结束<br /> .如果真 (数据类型 ＝ 2)<br />     置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })<br />     ' mov eax,[ebp+8]<br />     ' mov eax,[eax]<br />     ' leave<br />     ' retn 0x0004<br /> .如果真结束<br /> .如果真 (数据类型 ＝ 3)<br />     置入代码 ({ 139, 69, 8, 139, 0, 131, 192, 8, 201, 194, 4, 0 })<br />     ' mov eax,[ebp+8]<br />     ' mov eax,[eax]<br />     ' Add eax,8<br />     ' leave<br />     ' retn 0x0004<br /> .如果真结束<br /> .如果真 (数据类型 ＝ 5)<br />     置入代码 ({ 139, 69, 8, 139, 0, 201, 194, 4, 0 })<br />     ' mov eax,[ebp+8]<br />     ' mov eax,[eax]<br />     ' leave<br />     ' retn 0x0004<br /> .如果真结束<br /> 返回 (0)<br /> <br /> .子程序 取通用类型, 整数型, , 0.自定义类型 1.数值类型 2.文本型 3.字节集 4.数组 5.函数指针<br /> .参数 数据, 通用型<br /> .局部变量 m, 整数型<br /> .局部变量 c, 整数型<br /> <br /> 置入代码 ({ 139, 69, 8, 137, 69, 252, 80 })<br /> .如果真 (IsBadReadPtr (m, 4) ≠ 0)<br />     返回 (1)<br /> .如果真结束<br /> 置入代码 ({ 88, 139, 0, 137, 69, 248 })<br /> .如果真 (c ≠ 1)<br />     c ＝ GlobalSize (m)<br />     .如果 (c ＝ 0)<br />         c ＝ 取字节集数据 (指针到字节集 (m, 3), 3, )<br />         .如果 (c ＝ 5461846 或 c ＝ 15042901)<br />             返回 (5)<br />         .否则<br />             返回 (2)<br />         .如果结束<br /> <br />     .否则<br />         返回 (0)<br />     .如果结束<br /> <br /> .如果真结束<br /> c ＝ GlobalSize (m)<br /> .如果真 (c ≠ 0)<br />     置入代码 ({ 139, 69, 252, 139, 64, 4, 137, 69, 252 })<br />     c ＝ c － 8<br />     .如果 (m ＝ c)<br />         返回 (3)<br />     .否则<br />         返回 (4)<br />     .如果结束<br /> <br /> .如果真结束<br /> 返回 (3)

回复下载： 取变量数据地址.e (6.24 KB, 下载次数: 162)

2019-10-2 15:05 上传

点击文件名下载附件

wolfpack

不明觉厉...................

shen2017

看见就看见看见

秦王嬴政

★ 不能载入支持库“辅助调试支持库1.5版”，其文件名为“Krnlnex.fne”，
数字签名为“{A00B8D30-A5AB-4dfe-9546-9E636E711B75}”，
请确认易语言中是否安装了此支持库。

秦王嬴政

真tm"简单"

a3960382663

取十六进制文本

帝爵

。。。。。。。。。

小码人

非常不错，mark下

cml1990

必顶必顶  

jy258369