qq农场外挂delphi源代码96783

qq农场外挂delphi源代码96783

ID:13954352

大小:75.50 KB

页数:32页

时间:2018-07-25

qq农场外挂delphi源代码96783_第1页
qq农场外挂delphi源代码96783_第2页
qq农场外挂delphi源代码96783_第3页
qq农场外挂delphi源代码96783_第4页
qq农场外挂delphi源代码96783_第5页
资源描述:

《qq农场外挂delphi源代码96783》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、QQ农场外挂Delphi源代码96783//QQ农场外挂源代码unitWebQQFunction;interfaceusesWindows,SysUtils,Classes,StdCtrls,IdBaseComponent,IdComponent,StrUtils,ExtCtrls,IdTCPConnection,IdTCPClient,IdHTTP,jpeg,IdAuthentication,IdHash,IdHashMessageDigest,PublicFunctions,IniFiles,Forms,ComCtrls,SHDocVw,Dialogs,Varia

2、nts,DateUtils;const//QQ校友农场Const_QQxyHost='happyfarm.xiaoyou.qq.com';//QQ空间农场Const_QQqzone='happyfarm.qzone.qq.com';//登录用的字符串Const_PostLoginInfo='u=%s&p=%s&verifycode=%s';Const_PostLoginStr='&aid=15000102&u1=http%3A%2F%2Fxiaoyou.qq.com%2Findex.php%3Fmod%3D'+'login&fp=&h=1&ptredirect=1&p

3、tlang=0&from_ui=1&dumy=1';//操作农场时,IdHTTPReferer的值通过GetFlaseVersion得到IdHTTPReferer的全部字串Const_Flase_Version='http://appimg.qq.com/happyfarm/module/';//FarmKey的形式Const_farmKey='farmTime=%d&farmKey=%s';//读取好友列表Const_FriendsRefresh='refresh=true&farmTime=%d&farmKey=%s';//自己ID,名字,时间,对方名称,

4、farmKeyConst_Action='farmKey=%s&fName=%s&ownerId=%d&farmTime=%d&tName=%s&place=%d';//Cookie的组成Const_Cookie='Cookie:appTips=1;pt2gguin=%s;uin=%s;skey=%s;ptcz=%s;pvid=%s;name=%s;schooltype=0;province=11;pst=%d;flv=10.0;';//升一级加多少经验CONST_OneLevelNum=200;//取FarmKey时,时间延后多少秒Const_DelayFarmTi

5、me=10;type//背包类型0仓库1商店2包裹TBagsType=(farm_Warehouse,farm_Goods,farm_Bag);//动作类型0偷取1杀虫2浇水3除草4收获//5松土6种植7全部卖出8购买种子//9查看消息10所有动作(在PostAction中没有实现义意,不作操作)TActionType=(Action_scrounge,Action_spraying,Action_water,Action_clearWeed,Action_harvest,Action_scarify,Action_planting,Action_Sale,Actio

6、n_SaleAll,Action_Buy,Action_getAllInfo,Action_ALL_OPP);varQQ_Cookie,VerifySession,farmKey,ConnHost,Cookie_pt2gguin,Cookie_uin,Cookie_skey,Cookie_ptcz,Cookie_pvid,Cookie_name,FlaseVersion:string;farmTime,Cookie_pst:int64;//服务器时间本地时间本地时间与服务器的时间差QQ_ServerTime,Loc_ServerTime,DelayedDpikeInt

7、:integer;//将本地时间转成QQ服务器时间functionDateTimeToServerTime(aDateTime:TDateTime):integer;functionPreprocess(aPassWord,aVerifyCode:string):string;//取得Flash版本通过GetFlaseVersion得到IdHTTPReferer的全部字串procedureGetFlaseVersion(varaStr:string);//取得验证码functionGetVerifyPic(aIdHTTP:TIdHTTP;varaIm

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。