再送一个卖物的CALL吧

能手yj

打开NPC对话框
procedure NPCcall(p:pcallor);stdcall;                        p为指针型，是NPC的ID
var
  eax1: DWORD;
  address:Pointer;
begin
  address:=Pointer($00583220);
    eax1 := p^
  asm
    pushad
        mov eax,[$008f207c]
        push eax1
        mov ecx,[eax+$20]
        add ecx,$000000ec
        call address
    popad
  end;
end;


type

  Tcallor = packed record
    AX,bX,cX: DWORD;                          ax 为物品ID，BX为物品的在包裹的位置，CX为卖出的个数
  end;
  Pcallor = ^Tcallor;
卖物
procedure maiCall(p: pcallor); Stdcall;
var
addres:pointer;

begin

      addres:=pointer($005a5fc0);
      asm
          pushad
          push p
          push 1
          call addres
          add esp,8
          popad
      end;
end;

能手yj

Tcallor = packed record
    AX,bX,cX: DWORD;                          ax 为物品ID，BX为物品的在包裹的位置，CX为卖出的个数
  end;
  Pcallor = ^Tcallor
这是自定义参数P的来源。内包括三个参数上面写得够清楚的了。也不看清楚。希望4数不要乱更正。学点汇编再来

蓝雨

留个脚印证明自己还活着