当前仓库属于暂停状态,部分功能使用受限,详情请查阅 仓库状态说明
4 Star 9 Fork 4

suxuss/DELPHI x96dbg Plugins SDK
暂停

加入 Gitee
与超过 1200万 开发者一起发现、参与优秀开源项目,私有仓库也完全免费 :)
免费加入
文件
克隆/下载
_scriptapi_assembler.pas 1.97 KB
一键复制 编辑 原始数据 按行查看 历史
unit _scriptapi_assembler;
{
Ported form _scriptapi_assembler.h x64 and x32 to Unit Delphi by Lonely
FixCode:https://gitee.com/suxuss/DELPHI-x96dbg-Plugins-SDK
}
interface
uses
Winapi.Windows,_plugins_type,bridgemain,bridgelist,_plugins;
{$I dbg.inc}
{$ifdef win64}
{SCRIPT_EXPORT} function Assemble(addr:duint; dest:Pbyte; size:PInteger; const instruction:PAChar):Boolean; cdecl; external x32DBG name '?Assemble@Assembler@Script@@YA_N_KPEAEPEAHPEBD@Z'; //dest[16]
{SCRIPT_EXPORT} function AssembleEx(addr:duint; dest:Pbyte; size:PInteger; const instruction:PAChar; error:PAChar):Boolean; cdecl; external x32DBG name '?AssembleEx@Assembler@Script@@YA_N_KPEAEPEAHPEBDPEAD@Z'; //dest[16], error[MAX_ERROR_SIZE]
{SCRIPT_EXPORT} function AssembleMem(addr:duint; const instruction:PAChar):Boolean; cdecl; external x32DBG name '?AssembleMem@Assembler@Script@@YA_N_KPEBD@Z';
{SCRIPT_EXPORT} function AssembleMemEx(addr:duint; const instruction:PAChar; size:PInteger; error:PAChar; fillnop:Boolean):Boolean; cdecl; external x32DBG name '?AssembleMemEx@Assembler@Script@@YA_N_KPEBDPEAHPEAD_N@Z'; //error[MAX_ERROR_SIZE]
{$else}
{SCRIPT_EXPORT} function Assemble(addr:duint; dest:Pbyte; size:PInteger; const instruction:PAChar):Boolean; cdecl; external x32DBG name '?Assemble@Assembler@Script@@YA_NKPAEPAHPBD@Z'; //dest[16]
{SCRIPT_EXPORT} function AssembleEx(addr:duint; dest:Pbyte; size:PInteger; const instruction:PAChar; error:PAChar):Boolean; cdecl; external x32DBG name '?AssembleEx@Assembler@Script@@YA_NKPAEPAHPBDPAD@Z'; //dest[16], error[MAX_ERROR_SIZE]
{SCRIPT_EXPORT} function AssembleMem(addr:duint; const instruction:PAChar):Boolean; cdecl; external x32DBG name '?AssembleMem@Assembler@Script@@YA_NKPBD@Z';
{SCRIPT_EXPORT} function AssembleMemEx(addr:duint; const instruction:PAChar; size:PInteger; error:PAChar; fillnop:Boolean):Boolean; cdecl; external x32DBG name '?AssembleMemEx@Assembler@Script@@YA_NKPBDPAHPAD_N@Z'; //error[MAX_ERROR_SIZE]
{$endif}
implementation
end.
Loading...
马建仓 AI 助手
尝试更多
代码解读
代码找茬
代码优化
Delphi
1
https://gitee.com/suxuss/DELPHI-x96dbg-Plugins-SDK.git
git@gitee.com:suxuss/DELPHI-x96dbg-Plugins-SDK.git
suxuss
DELPHI-x96dbg-Plugins-SDK
DELPHI x96dbg Plugins SDK
master

搜索帮助