爬文看到有人写过 手痒就也用Autoit写一下 ================================================================ ;设定热键案pause可以暂停，ESC退出 Global $Paused HotKeySet("{PAUSE}", "TogglePause") HotKeySet("{ESC}", "Terminate") Func TogglePause() $Paused = NOT $Paused While $Paused sleep(100) ToolTip('脚本已被「暂停」',0,0) WEnd ToolTip("") EndFunc Func Terminate() Exit 0 EndFunc ;把暗黑的视窗拉到萤幕的左上方撷取颜色 WinActivate("d2loader-3","") WinMove("d2loader-3", "", 0, 0) $color = 040404 While $color = 040404 MouseClick("left", 409, 496, 1) $color=PixelGetColor ( 108 , 412 ) $color=Hex($color, 6) sleep (100) WEnd ================================================================ 撷取座标108,412,的颜色 判断他是不是黑色040404 如果是的话表示非完美宝石启动 则继续在409,496的座标点一下左键 延迟0.1秒继续 如果不是黑色的话则是完美宝石启动 就离开 缺点:如果频道上有人讲话有可能误判. 但是如果我判断是否为紫色的时候的颜色代码A420FC 却会出现程式错误 不晓得为什麽....... 另外...我的暗黑是用视窗化解析度800*600 用的布景主题不同 座标会需要微调 因为不同windows主题上方的工具列的高度会不一样 另外请问一下 autoit v3.2.12.1 他是说 AutoItSetOption ( "option" [, param] ) You may use Opt() as an alternative to AutoItSetOption(). 其中option的部份填上你要改的选项 然後param填你要的设定值 而 TrayIconDebug If enabled shows the current script line in the tray icon tip to help debugging. 0 = no debug information (default) 1 = show debug 有个选项是这个我想应该就是这个了 所以我加了以下这行 Opt("TrayIconDebug", 1) ;0=no info, 1=debug line info 理论上这样我的程式在执行的时候就能够显现出现在在执行那一行 可是并没有 请问有人知道该怎麽设定吗？ 我曾经在某一版有成功过 但是这一版怎麽用都不成功 不知道有人跟我一样吗? --

※ 发信站: 批踢踢实业坊(ptt.cc) ◆ From: 122.126.72.187