100分征VB间接内嵌汇编指令实现一些小功能的方案
需要封装成函数的一般方案,好像大约是用字节数组放对应汇编的二进制数组,再搞些copymemory啥的控制好输入输出啥的.
最简单和实用的(用于性能分析)的是这个求"CPU时间戳"的指令
inline unsigned __int64 GetCycleCount()
{
__asm RDTSC
}
或
inline unsigned __int64 GetCycleCount()
{
__asm _emit 0x0F
__asm _emit 0x31
}
复杂一点的比如这样一段pascal里的求字符串长度的汇编
Delphi(Pascal) code:
function StrLen(const Str: PChar): Cardinal; assembler;
asm
MOV EDX,EDI
MOV EDI,EAX
MOV ECX,0FFFFFFFFH
XOR AL,AL
REPNE SCASB
MOV EAX,0FFFFFFFEH
SUB EAX,ECX
MOV EDI,EDX
end;
最好果有对应源代码的啊,也别搞的像天书啊:)
找老马要。
回复内容太短了!
顶一把!
个人觉得这么做没有意思。
懂汇编，甚至Thunk的人难道不能用C/C++写么？
再说，thunk的代码要注意在 DEP/NX 处理器/操作系统上的兼容性。
顶一下，好好顶。。。。。。。。。。。。。。。。。。。
老马说的第一个东西我找到了下文,不过...
http://bycw2007.blog.163.com/blog/static/2411559920081131846745/
终于新的汇编类搞定了默认分类 2008-02-13 13:08:46 阅读1146 评论20 字号：大中小
此次完全使用词法分析,不在有缺少指令的问题了,而且语法完全是汇编语言了,�
相关问答：
想在warcraft3里进行写屏操作【如对战平台中的胜负提示信息】，效果就像游戏平台中一样，我试过在一窗口中写入文字，然后一直让窗口强制最前，虽然能实现文字显示，但是文字会不断闪烁，而且有不确定BUG，通过论坛搜 ......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' 读入所有字符到变量中 ......
怎么把已知的数据保存成xml文件，现在已知的数据是
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
xmlns:o=& ......
问题：
现在Access数据库中有两张表TableA和TableB
TableA中有记录如下:
字段1(Name) 字段2(Num)
A 3
A 4
B 6
... ......
