最新版PPS 影音V2.7.0.1515官方原版自动安装，au3脚本
最新版PPS 影音V2.7.0.1515官方原版自动安装，au3脚本;PPS 影音V2.7.0.1515官方正式原版安装#region ---Au3Recorder generated code Start ---
Opt("WinWaitDelay",100)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
Run('PPS 影音V2.7.0.1515.exe')
Sleep(500)
_WinWaitActivate("PPS影音 V2.7.0.1515 正式版","选中你想要安装的组件，并取消勾选你不希望")
WinActivate("PPS影音 V2.7.0.1515 正式版","选中你想要安装的组件，并取消勾选你不希望")
WinWaitActive("PPS影音 V2.7.0.1515 正式版","选中你想要安装的组件，并取消勾选你不希望")
MouseClick("left",227,301,1)
Sleep(500)
MouseClick("left",435,365,1)
WinActivate("PPS影音 V2.7.0.1515 正式版","< 上一步(&P)")
WinWaitActive("PPS影音 V2.7.0.1515 正式版","< 上一步(&P)")
MouseMove(77,141)
MouseDown("left")
MouseMove(70,142)
MouseUp("left")
Send("d")
MouseClick("left",64,218,1)
MouseClick("left",64,244,1)
MouseClick("left",230,194,1)
MouseClick("left",230,219,1)
MouseClick("left",436,365,1)
Sleep(300)
MouseClick("left",437,366,1)
WinWait("PPS影音 V2.7.0.1515 正式版","关闭(&L)")
WinActivate("PPS影音 V2.7.0.1515 正式版","关闭(&L)")
WinWaitActive("PPS影音 V2.7.0.1515 正式版","关闭(&L)")
MouseClick("left",76,133,1)
MouseClick("left",236,134,1)
MouseClick("left",76,186,1)
MouseClick("left",76,208,1)
MouseClick("left",76,230,1)
MouseClick("left",76,252,1)
MouseClick("left",533,366,1)
FileDelete(@AppDataDir & "\Microsoft\Internet Explorer\Quick Launch\PPS影音.lnk")
Sleep(20000)
$file='C:\Program Files\PPSGame\unppsgame.exe'
If Not FileExists($file) Then Exit
Run($file)
If WinWait("卸载 PPS游戏") Then
WinActivate("卸载 PPS游戏")
WinWaitActive("卸载 PPS游戏")
MouseClick("left",122,96,1)
winWait("卸载 PPS游戏", "是否清空账户信息？")
WinActivate("卸载 PPS游戏", "是否清空账户信息？")
WinWaitActive("卸载 PPS游戏", "是否清空账户信息？")
MouseClick("left",48,97,1)
winWait("卸载 PPS游戏", "提交")
WinActivate("卸载 PPS游戏", "提交")
WinWaitActive("卸载 PPS游戏", "提交")
MouseClick("left",364,368,1)
winWait("卸载 PPS游戏", "已成功地从您的计算机卸载")
WinActivate("卸载 PPS游戏", "已成功地从您的计算机卸载")
WinWaitActive("卸载 PPS游戏", "已成功地从您的计算机卸载")
MouseClick("left",139,97,1)
EndIf
#region --- Internal functions Au3Recorder Start ---
Func _WinWaitActivate($title,$text,$timeout=0)
WinWait($title,$text,$timeout)
If Not WinActive($title,$text) Then WinActivate($title,$text)
WinWaitActive($title,$text,$timeout)
EndFunc
#endregion --- Internal functions Au3Recorder End ---
#endregion --- Au3Recorder generated code End ---
FileSetAttrib(@ProgramsDir & "\PPS 影音.lnk", "-R-S", 1)
FileSetAttrib(@ProgramsCommonDir & "\PPS 影音.lnk", "-R-S", 1)
FileDelete(@ProgramsDir & "\PPS 影音.lnk");删除当前用户中的
FileDelete(@ProgramsCommonDir & "\PPS 影音.lnk");删除所有用户中的
FileDelete("C:\Documents and Settings\All Users\「开始」菜单\PPS影音.lnk");删除所有用户中的
Sleep(20000)
;不管你选还是不选安装pps游戏，它都会强制给你安装上的，所以附带了下面的卸载脚本
;PPS游戏卸载
#region ---Au3Recorder generated code Start ---
Opt("WinWaitDelay",100)
Opt("WinDetectHiddenText",1)
Opt("MouseCoordMode",0)
$file='C:\Program Files\PPSGame\unppsgame.exe'
If Not FileExists($file) Then Exit
Run($file)
If WinWait("卸载 PPS游戏") Then
WinActivate("卸载 PPS游戏")
WinWaitActive("卸载 PPS游戏")
MouseClick("left",122,96,1)
winWait("卸载 PPS游戏", "是否清空账户信息？")
WinActivate("卸载 PPS游戏", "是否清空账户信息？")
WinWaitActive("卸载 PPS游戏", "是否清空账户信息？")
MouseClick("left",48,97,1)
winWait("卸载 PPS游戏", "提交")
WinActivate("卸载 PPS游戏", "提交")
WinWaitActive("卸载 PPS游戏", "提交")
MouseClick("left",364,368,1)
winWait("卸载 PPS游戏", "已成功地从您的计算机卸载")
WinActivate("卸载 PPS游戏", "已成功地从您的计算机卸载")
WinWaitActive("卸载 PPS游戏", "已成功地从您的计算机卸载")
MouseClick("left",139,97,1)
EndIf
#region --- Internal functions Au3Recorder Start ---
#endregion --- Internal functions Au3Recorder End ---
#endregion --- Au3Recorder generated code End ---
感觉代码冗长，处理方式一般！ 不管你选还是不选安装pps游戏，它都会强制给你安装上的，所以附带了下面的卸载脚本
这个安装结束后直接杀进程即可！不需要这么麻烦！2345的PPS安装包不包含游戏，你可以去下载看看。 mouseclick支持各种电脑的分辨率安装吗？ 回复 3# chishingchan
2345的不给结算了、、、 。。。。。。。。。。。。。。。。。。。。。。。。。。 回复chishingchan
2345的不给结算了、、、
dncsk 发表于 2013-3-7 18:18 http://www.autoitx.com/images/common/back.gif
送一个官方自动安装版给你！不含垃圾的。
http://update.ppstream.com/product/ppstreamplayer/2.7.0.1499/ppstreamsetup-update120814.exe 精神上支持一下 鼠标操作太多了，能用函数去完成就好了！ mouseclick支持各种电脑的分辨率安装吗？
m765555 发表于 2013-2-25 13:16 http://www.autoitx.com/images/common/back.gif
我也有这种困惑, 分辨率不同的时候你的脚本就没用了. 代码很长啊
页:
[1]