Here is my source of old Perfect World bot, written on Delphi. I've attached only two pas with Main lib and inject functions. The code isn't optimized, 'coz this version was written for tests. Now it useless for direct bot creation, but if someone wants to check out... check it :)
Some inject Functions:
Code:procedure Call_PickItem(aPParams: PParams); stdcall;
procedure Call_SelectMonster(MonID: PParams);stdcall;
procedure Call_Fly(); stdcall;
procedure Call_NPCTalk(NPCID: PParams); stdcall;
procedure Call_PetCall(PetNumber: PParams); stdcall;
procedure Call_PetRemove(WithoutParam: PParams); stdcall;
procedure Call_PetSkill(aPParams: PParams); stdcall;
procedure Call_PetAttack(MonID: PParams); stdcall;
procedure Call_Skill(SkillID: PParams); stdcall;
procedure Call_ItemsUse(Items: PParams); stdcall;
procedure Call_Attack(TargetID: PParams); stdcall;
procedure Call_CharStop(); stdcall;
procedure Call_SellerRemove(); stdcall;
procedure Call_Jump(); stdcall;
procedure Call_ItemSell(aPParams: PParams); stdcall;
procedure Call_ItemBuy(aPParams: PParams); stdcall;
procedure Call_Walk(aPParams:PParams); Stdcall;
procedure Call_Meditation(); stdcall;
procedure Call_PrivateMsg(MsgParam: PParams); stdcall;
procedure Call_LocalMsg(MsgParam: PParams); stdcall;
procedure Call_FullStop(buff: Pointer); stdcall;
