【vb精品源码栏目提醒】:网学会员为广大网友收集整理了,按键精灵DNF秒拍卖源码 - 其它资料,希望对大家有所帮助!
//〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓UserVar 联系作者方式DropListQQ:410561049:0查看版本号:1 0 联系作者方式UserVar 注册码请输入注册码请勿更改 请输入注册码请勿更改UserVar 网 络 速 度 _ 拍 DropList网 络 速 度 快 速 :0网 络 速 度 中 速 :1网 络 速 度 慢速:20 请选择您的网络速度UserVar 自动收取邮件_拍DropList自动收取邮件:0无需自动收取:10 是否自动收取邮件UserVar 收件截图_拍DropList收取邮件后截图存盘D:盘:0不用截图:10 收取邮件是否截图UserVar 上架拍卖行_拍DropList自动上架拍卖品:0不用上架拍卖品:1 0 是否要上架拍卖品UserVar 上架的种类_拍DropList只上架材料栏物品:0上架所有种类的物品:10 请选择要上架的种类UserVar 先后顺序_拍DropList先收邮件和上架后再秒拍卖行:0先秒拍卖行后再收邮件和上架:10 请选择先后顺序UserVar 选择功能_拍DropList单开秒拍卖行可以兼职摆摊:0双开一秒一防掉:1双开一秒一防掉上架拍卖品收邮件:2双开只防掉:3单开只防掉:40 请选择您要的功能UserVar 输入法设置方式DropList自动设置输入法短语:0手动设置输入短语:1 0 请选择输入法设置方式请勿更改UserVar 识 别功 能_拍DropList开 启 识别 功能 准确 率提 高:0关 闭 识别 功 能 速 度上升:10 请选择是否开启识别功能UserVar 屏 幕显 示_拍DropList秒 拍 屏幕 显示 挂机 不建 议使 用:0不 用 显 示 速 度上升:10 请选择是否显示屏幕提示UserVar 记录行情_拍DropList记录拍卖行行情D:盘:0不用记录拍卖行行情:10 请选择是否记录拍卖行行情UserVar 秒拍截图_拍DropList秒拍成功后截图存盘D:盘:0不用截图:10 请选择秒拍成功后是否截图UserVar 防掉线_拍DropList10 分钟:1015 分钟:155 分钟:50 请选择多少分钟进行一次防掉线处理//UserVar 处理方式_拍DropList音乐提醒:0全部下线:1关闭电脑:2停止辅助:30出错的处理方式Dim o L T R B a w d s c u iDim X_拍 Y_拍 X_竞 Y_竞 X_输 Y_输 单价_拍 总价_拍 数量_拍 名 搜 键 拍,实际竞拍金额Dimenv 环境变量名_记录_行情 环境变量名_记录_拍 环境变量名_记录_竞 组合数组_竞拍 屏幕显示样式_竞拍 ScreenH 屏幕间距_竞拍 显示名称_竞拍 显示总价_竞拍 显示数量_竞拍 显示单价_竞拍 显示标价_竞拍 竞拍金额_竞 竞拍 轮_竞拍 种_竞拍 笔_竞拍 秒拍_截图 收件_截图 使用次数 01 使用次数 02Dim wpsl10Dim wpdj10Dim sjsl10Dim 搜索名500Dim 一口价500Dim 竞拍价500Dim 竞拍数量500Dim 上架一口价500Dim 上架竞拍价500Dim 上架的数量500版本号 DNF 秒拍卖行永久版 F2.4-GRBNNA01 --- 请把版本号记下和作者联系。
If 联系作者方式 1 ThenMessageBox 版本号EndScriptEnd If//〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓Sub 记录_拍Call Plugin.File.WriteFileExD:DNF 拍卖行明细拍 Date .txt 环境变量名_记录_拍End SubSub 记录_行情Call Plugin.File.WriteFileExD:DNF 拍卖行明细行情 Date .txt 环境变量名_记录_行情End SubSub 移动窗口_拍 ScreenW Plugin.Sys.GetScRX //Msgbox 获得屏幕分辨率宽度: ScreenW ScreenH Plugin.Sys.GetScRY //Msgbox 获得屏幕分辨率高度: ScreenH Dev Plugin.Sys.GetScDep //Msgbox 获得屏幕色深度颜色质量: Dev Path Plugin.Sys.GetDir0 //Msgbox 获得路径: Path xitong Plugin.Sys.GetOSType //MessageBox 您的操作系统版本是: xitong If 选择功能_拍 0 Then Call 单开 Call 单开出错 ElseIf 选择功能_拍 1 Then MsgBox 请把鼠标移动到要秒拍卖行的游戏窗口,vbLf并点击激活后再按确认关闭我。
vbInformation注意:你选择的是“一秒一摆功能” Call 双开 Call 双开出错 ElseIf 选择功能_拍 2 Then MsgBox 请把鼠标移动到要秒拍卖行的游戏窗口,vbLf并点击激活后再按确认关闭我。
vbInformation注意:你选择的是“一秒一摆上架拍卖行收邮件功能” Call 双开 Call 双开出错 ElseIf 选择功能_拍 3 Then Call 双开 Call 双开出错 Hwnd Hwnd_1P Call 得到边框大小 Call 防掉线处理_拍 Hwnd Hwnd_2P Call 得到边框大小 Call 防掉线处理_拍 防掉线时间_拍 Now i0 While i0 Call 双开掉线警报 If DateDiffn 防掉线时间_拍 Now 防掉线_拍 Then Hwnd Hwnd_1P Call 得到边框大小 Call 防掉线处理_拍 Hwnd Hwnd_2P Call 得到边框大小 Call 防掉线处理_拍 防掉线时间_拍 Now End If Delay yanshi_10000 WendElseIf 选择功能_拍 4 Then Call 单开 Call 单开出错 Call 得到边框大小 Call 防掉线处理_拍 防掉线时间_拍 Now i0 While i0 Call 单开掉线警报 If DateDiffn 防掉线时间_拍 Now 防掉线_拍 Then 防掉线时间_拍 Now Call 防掉线处理_拍 End If Delay yanshi_10000 WendEnd IfEnd SubSub 单开Hwnd Plugin.Window.Find地下城与勇士 地下城与勇士 Call Plugin.Window.ActiveHwnd Delay 100 sRect Plugin.Window.GetWindowRectHwnd MyArray SplitsRect L ClngMyArray0: T ClngMyArray1 R ClngMyArray2: B ClngMyArray3 组合数组_竞拍 joinMyArray End SubSub 双开HwndEx Plugin.Window.Search地下城与勇士MyArray2 SplitHwndEx Hwnd_1P ClngMyArray20: Hwnd_2P ClngMyArray21Delay yanshi_100//MessageBox Hwnd_1PHwnd_2PEnd SubSub 单开出错If Hwnd 0 Then MsgBox 没检测到 DNF 游戏窗口,vbLf请确认开启游戏后再开辅助。
vbCritical你选择的功能是单开EndScriptEnd IfEnd SubSub 双开出错If Hwnd_1P 0 or Hwnd_2P 0 Then MsgBox 游戏窗口不对所选功能的数量,vbLf请更正后再次尝试。
vbCritical你选择的功能是双开EndScriptEnd IfEnd SubSub 单开掉线警报sWindow Plugin.Window.IsWindowHwndIf sWindow 0 Then Call 掉线处理方式End IfEnd SubSub 双开掉线警报sWindow1 Plugin.Window.IsWindowHwnd_1PIf sWindow1 0 Then Call 掉线处理方式End IfsWindow2 Plugin.Window.IsWindowHwnd_2PIf sWindow2 0 Then Call 掉线处理方式End IfEnd SubSub 掉线处理方式Call Plugin.Media.Vol99For 5 Call Plugin.Media.PlayC:WINDOWSMediaWindows XP 启动.wav Delay yanshi_3000NextCall Plugin.Media.StopEndScriptEnd SubSub 得到边框大小 Call Plugin.Window.ActiveHwnd Delay 100 sRect Plugin.Window.GetWindowRectHwnd MyArray SplitsRect L ClngMyArray0: T ClngMyArray1 R ClngMyArray2: B ClngMyArray3 组合数组_竞拍 joinMyArray End SubSub 执行选择功能_拍 If 选择功能_拍 0 Then Call 单开掉线警报 Call 防掉线处理_拍 Call 打开社区菜单_拍 Call 上架拍卖品_拍ElseIf 选择功能_拍 1 Then Call 双开掉线警报 Hwnd Hwnd_2P Call 双开掉线警报 Delay yanshi_100 Call 得到边框大小 Call 防掉线处理_拍 Hwnd Hwnd_1P Call 双开掉线警报 Delay yanshi_100 Call 得到边框大小 Call 防掉线处理_拍ElseIf 选择功能_拍 2 Then Call 双开掉线警报 Hwnd Hwnd_2P Call 双开掉线警报 Delay yanshi_100 Call 得到边框大小 Call 防掉线处理_拍
上一篇:
【精品】vc++上位机程序
下一篇:
4种小菜缓解孕妈咪不适