404 Not Found
The requested URL /sscq/gl/601139.html was not found on this server.
Apache/2.2.15 (CentOS) Server atApache Tomcat/7.0.59 - Error report HTTP Status 403 - type Status reportmessage description Access to the specified resource has been forbidden.Apache Tomcat/7.0.59你的位置：
蜀山传奇，新手脚本源码！（有部分问题求大神指教）
08:16:46 |
来源: 按键精灵资源站
// 首先打包dm.dll和RegDll.dll到附件,当然如果你还有其它(字库，图片等)也可以一并打包
// 这个need_ver作为本脚本需要使用的版本. 如果要换插件时，记得更改这个值.
need_ver = &3.1231B&
// 插件需要用到atl系统库,有些XP精简系统会把atl.dll精简掉. 为了防止注册失败，这里手动注册一下atl.dll
set ws=createobject(&Wscript.Shell&)
ws.run ®svr32 atl.dll /s&
set ws=nothing
// 释放附件&&&&&&&&&&&&&&&&&&&
// 这里选择c盘的test-_game作为插件的基本目录 也就是SetPath对应的目录。所以所有资源都释放在此目录.
PutAttachment &d:\test_game&,&*.*&
// 这里要用到RegDll来注册插件，所以必须释放到Plugin. 但是切记不能把dm.dll释放到Plugin.那会导致插件失效.
PutAttachment &.\Plugin& ,&RegDll.dll&
// 插件注册开始&&&&&&&&&&&&&&&&&&&
// 下面开始注册插件,先尝试用RegDll来注册.这里必须使用绝对路径。以免有别人把dm.dll释放在系统目录.造成版本错误.
Call Plugin.RegDll.Reg(&d:\test_game\dm.dll&)
// 这里判断是否注册成功
set dm = createobject(&dm.dmsoft&)
ver = dm.Ver()
if ver && need_ver then
// 先释放先前创建的dm
set dm = nothing
& &// 再尝试用regsvr32 来注册. 这里必须使用绝对路径。以免有别人把dm.dll释放在系统目录.造成版本错误.
set ws=createobject(&Wscript.Shell&)
ws.run ®svr32 d:\test_game\dm.dll /s&
set ws=nothing
Delay 1500&&
// 再判断插件是否注册成功
set dm = createobject(&dm.dmsoft&)
ver = dm.Ver()
if ver && need_ver then
// 这时，已经确认插件注册失败了。 弹出一些调试信息，以供分析.
messagebox &插件版本错误,当前使用的版本是:&&ver&&,插件所在目录是:&&dm.GetBasePath()
messagebox &请关闭程序,重新打开本程序再尝试&
& & endscript
// 插件注册结束&&&&&&&&&&&&&&&
Set dm = createobject(&dm.dmsoft&)
TracePrint dm.Ver()
dm.SetPath &d:\test_game&
hwnd = dm.GetMousePointWindow()
dm_ret = dm.BindWindow(hwnd, &gdi&, &windows&, &windows&, 0)
Delay 1500
这个是大漠绑定，懒的写直接复制的呵呵
dm_ret = dm.FindPic(0,0,,&日常.bmp|英雄岛.bmp|组队双倍.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
Delay 1500
dm_ret = dm.FindPic(0,0,,&副本闯关.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
Delay 1500
dm_ret = dm.FindPic(0,0,,&慈云寺.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+81, intY+123
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&单人挑战.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&战斗.bmp|战斗1.bmp|战斗2.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+10, intY+55
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&金须奴.bmp|金须奴1.bmp|守护铜像.bmp|战斗确定.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
Delay 1500
dm_ret = dm.FindPic(0,0,,&今日进入副本次数已满.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & Goto 去阵法
& & End If
这一段是副本的代码！！
Rem 去阵法
Delay 1500
dm_ret = dm.FindPic(0,0,,&日常.bmp|英雄岛.bmp|组队双倍.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
Delay 1500
dm_ret = dm.FindPic(0,0,,&阵法挑战.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
Delay 1500
dm_ret = dm.FindPic(0,0,,&45阵法.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+101, intY+84
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&阵图标志.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+46, intY+332
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&白虎旗.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&战斗确定.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&战斗.bmp|战斗1.bmp|战斗2.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+10, intY+55
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&阵图已满.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & Goto 去日常
这段是阵法的代码
Rem 去日常
Delay 1500
dm_ret = dm.FindPic(0,0,,&叉.bmp|叉1.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&任务按钮.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+30, intY+5
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&任务按钮.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+30, intY+5
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&任务叹号.bmp|任务问号.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+20, intY+40
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&任务按钮1.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+30, intY+5
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&师.bmp|衙.bmp|帮派.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+37, intY+18
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&任务按钮.bmp&,&.8,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX+30, intY+5
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&领取奖励.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
dm_ret = dm.FindPic(0,0,,&战斗确定.bmp|确认.bmp&,&.9,0,intX,intY)
If intX &= 0 and intY &= 0 Then
& & dm.moveto intX, intY
& & dm.leftclick
dm_ret = dm.UnBindWindow()
最后是日常任务和解绑
编出来了用是好用，可是有些知识没人教，论坛上查也查不到，查了3天了，都白搭了，呵呵
求个大神师傅指导：1，如何实现后台的绑定换区换号？网页游戏在后台绑定的情况下只要一换区就会绑定失败？那么换区换号是怎么实现的呢？
& && && && && && && && && &2，如何把这些不同的任务做成在设置里面可选的那样？
下载地址请访问原帖这是别人做的脚本，这样的选项怎么实现的呢？