指针到小数

风度猫

用汇编命令
pop ebp
mov eax, dword ptr [esp+0x04]
mov eax, dword ptr [eax]
retn 0x0004

读小数能读的到
用指针到小数 缺取不到

指针到文本
指针到整数
都没问题,就小数型读不出来

笨来无一悟

整数转小数 这样就可以了

' __asm{
' mov eax,[ebp+8]
' leave
' ret 4
' }

凌哥

首先要确认你读取的“小数型”是多少字节，易语言里面的小数型是4字节的

7ian

MOV EAX,[EBP+8]  '{139,69,8}
MOV EDX,[EAX+4]  '{139,80,4}
MOV EAX,[EAX]  '{139,0}
LEAVE  '{201}
RETN 4  '{194,4,0}

风度猫

凌哥 发表于 2023-11-25 17:08
首先要确认你读取的“小数型”是多少字节，易语言里面的小数型是4字节的

这应该是4个字节吧

笨来无一悟

esp+0x04 换成 ebp+8 试试

笨来无一悟

吃饭回来敲来测试了一下 这样似乎可以

  

窗口程序集名	保 留	保 留	备 注
窗口程序集_启动窗口
变量名	类 型	数组	备 注
测试	小数型

子程序名	返回值类型	公开	备 注
__启动窗口_创建完毕

变量名	类 型	静态	数组	备 注
指针	整数型
哈哈哈	小数型

测试 ＝ 0.168
指针 ＝ 取变量数据地址 (测试)
哈哈哈 ＝ 小数 (指针)
调试输出 (哈哈哈)

子程序名	返回值类型	公开	备 注
小数	小数型
参数名	类 型	参考	可空	数组	备 注
指针	整数型

' __asm{
' mov EAX,[EBP+8]
' mov eax,[eax]
' pop ebp
' ret 4
' }
返回 (0)

i支持库列表	支持库注释
spec	特殊功能支持库

.版本 2<br /> .支持库 spec<br /> <br /> .程序集 窗口程序集_启动窗口<br /> .程序集变量 测试, 小数型<br /> <br /> .子程序 __启动窗口_创建完毕<br /> .局部变量 指针, 整数型<br /> .局部变量 哈哈哈, 小数型<br /> <br /> 测试 ＝ 0.168<br /> 指针 ＝ 取变量数据地址 (测试)<br /> 哈哈哈 ＝ 小数 (指针)<br /> 调试输出 (哈哈哈)<br /> <br /> .子程序 小数, 小数型<br /> .参数 指针, 整数型<br /> <br /> ' __asm{<br /> ' mov EAX,[EBP+8]<br /> ' mov eax,[eax]<br /> ' pop ebp<br /> ' ret 4<br /> ' }<br /> 返回 (0)

风度猫

笨来无一悟 发表于 2023-11-25 18:11
吃饭回来敲来测试了一下 这样似乎可以
[e=4].版本 2
.支持库 spec

不知道啥原因  找了很对汇编代码都不行  用api能读取到 用汇编始终读不到

dnxl

也就易语言用eax存小数，如果是delphi这样用直接报错，无效浮点数
正常是这样
mov eax,dword[ebp+8]
fld dword ptr[eax]
leave
ret 4

风度猫

笨来无一悟 发表于 2023-11-25 18:11
吃饭回来敲来测试了一下 这样似乎可以
[e=4].版本 2
.支持库 spec

现在mov eax, dword ptr [0x666555]
mov eax, dword ptr [eax+0x64]
mov eax, dword ptr [eax+0x44]
mov esp, ebp
pop ebp
ret  
汇编结果1123641779
我用api读结果如下
+64的地方是 548516808
548516808 +44 地方整数型是 1123641779  小数型是124.706444


汇编结果 整数型和  api整数型结果一样   
548516808+0x44  我用这个地址 下怎么取小数