前些时间玩了一下三国风云游戏,因为每天基本上都会去重复的做一些事情,所以用QTP9.5 写一了下角本来实现自动化出兵扫羊,哈哈,手动扫一次羊至少得用半个小时吧(因为家里兵还蛮多的),自动化后,不到5分钟就完了,而且还是自动完成!今天我已经不玩此游戏了,share 出来给大家,希望对大家的自动测试–玩游戏有一定的帮助!以下为代码!
‘ 功能:主城出兵扫羊_数据集方式
strCityNameGloabal = datatable.GetSheet(1).GetParameter(1) ‘ 取当前要操作的城镇名
WaitHomePageLoad ‘ 等首页网页打开
ChooseCity strCityNameGloabal, strCityNameGloabal ‘ 选择相应城镇 , 并等待页面的出现
clickCityMapAndWaitWebLoad strCityNameGloabal ‘ 点击“城镇”,并等待 “中军账”出现
‘ 从excel表格中导入相应的出兵的 sheet 表到第二张表中
srcGSheet = datatable.GetSheet(1).GetParameter(2)
ImportTableFromXLS “出兵顺序表.xls”, srcGSheet
dispatchSoilderToTarget ‘ 从军营直接出兵
‘ 一个城镇出兵结束,并关掉页面,重新做下一个城市
Browser(“三国风云 – 旷世逸才”).Page(“三国风云 – 旷世逸才”).Sync
Browser(“三国风云 – 旷世逸才”).Close
wai