天龙八部3什么脚本有自动接受组队邀请功能_百度知道
天龙八部3什么脚本有自动接受组队邀请功能
就是你一邀请，别人能秒进组的
队伍没人了能自动退组，返回挂机地点继续等待别人邀请最对的
我有更好的答案
采纳率：28%
来自团队：
此贴我删了
但是好像队伍没人自动退组的功能不能实现
大灰狼吧。。。。。
有啊！淘宝就有卖的，名字叫天龙伙伴
貌似不能刷完天外马自动回点啊
其他2条回答
为您推荐：
其他类似问题
天龙八部3的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。你的位置：
问道组队单开打怪脚本-新手参考
23:06:57 |
来源: 按键精灵资源站
本帖最后由 yewen170 于
23:12 编辑
呵呵，我回来了，原来的作品大家看看，呵呵，新手参考，老鸟多批评。
UserVar zxhc=DropList{&最小化窗口&:&0&|&不最小化窗口&:&1&}=0 &设置窗口切换方式&
UserVar yssss=350 &设置窗口切换延时（毫秒）&
UserVar 游戏_JK=2 &设置游戏几开&
UserVar bjj=DropList{&机箱&:&0&|&音响&:&1&}=1 &设置报警方式&
UserVar bjcish=5 &设置报警连续响几次&
UserVar BJ_延时=20 &设置报警后延时（秒）&
UserVar XL_宠物=0 &设置是否训练宠物&
UserVar TM_数量=180 &设置宠物多少时间训练一次&
UserVar TM_单位=DropList{&分&:&0&|&秒&:&1&}=0 &设置时间单位&
UserVar JX_判断=DropList{&是&:&0&|&否&:&1&}=1 &设置是否加血&
UserVar JX_比例=DropList{&80%&:&0&|&50%&:&1&|&20%&:&2&}=0 &设置加血比例&
UserVar int_TP=DropList{&是&:&0&|&否&:&1&}=1 &设置血少自动逃跑&
UserVar TP_比例=DropList{&50%&:&0&|&30%&:&1&}=0 &设置逃跑比例&
UserVar RWG_xuemo=DropList{&不作处理&:&0&|&报警&:&1&|&逃跑&:&2&}=0 &设置遇到血魔&
UserVar RWG_bbd=DropList{&不作处理&:&0&|&报警&:&1&|&逃跑&:&2&}=0 &设置遇到宝宝丹&
UserVar RWG_whzch=DropList{&不作处理&:&0&|&报警&:&1&|&逃跑&:&2&}=0 &设置遇到为虎作伥&
UserVar FS_刷怪=DropList{&单刷&:&0&|&组队&:&1&}=0 &设置刷怪方式(组队支持5人，最大3队）&
Gosub xiuzhengchuangkou
Dim int_rw_bz,int_rw_zy
int_rw_bz = Array(0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0)
/// p,几开
BJ_延时=BJ_延时*1000
//宠物训练
//窗口从0开始
//获得开始时间 Ks是毫秒单位
TM_开始 = Plugin.Sys.GetTime()
//解析时间单位
If TM_单位=0 Then
If TM_单位=1 Then
TM_现在 = Plugin.Sys.GetTime()
//获得程序运行现在的时间
VBS sjdfc=((TM_现在-TM_开始)/1000/tm)
//得到开始时间和现在时间的时间差
If TM_数量&sjdfc Then
//时间到了
dqfc1=dqfc2
If j&=1 Then
If j=1 Then
///下面这句是激活窗口
Call Plugin.Window.Active(MyArray(i))
Gosub 激活延时
//下面这句是还原窗口
Call Plugin.Window.Restore(MyArray(i))
//切换延时
Delay yssss
//鼠标移动到固定位置
Call 鼠标固定位置()
//***判，是否在移动
zdc1=GetPixelColor(10,257)
zdc3=GetPixelColor(760,122)
Call 人物状态子程序()
If PD_人物状态=0 Then
Gosub 遇到老君
//检测有没有要点击的任务
Call JCH_RW()
Call JCH_道道()
Call 宠物训练子程序()
Call 加血子程序()
If FS_刷怪=0 Then
Gosub 走动判定子程序
If FS_刷怪=1 Then
If i=0 or i=5 or i=10 Then
Gosub 走动判定子程序
Gosub 遇到老君
Call 人物状态子程序()
If PD_人物状态=1 Then
Gosub 遇到老君
Gosub 打怪状态判定子程序
If j=1 Then
Call Plugin.Window.Min(MyArray(i))
//循环控制&&
If i=j Then
//检测时间执行的命令赋初值
//当循环条件成立的时候，反复执行循环体
Sub 鼠标固定位置()
Call 防飘()
Call 防飘()
Sub 激活延时()
Sub JCH_道道()
FindColorEx 377,382,459,400,&F8B478&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
FindColorEx 368,417,460,432,&B868B0&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
FindColorEx 368,417,460,432,&C0FCE0&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
Call 防飘()
If w&180 and z&120 Then
LeftClick 1
Sub JCH_RW()
int_次数=0
Rem JCH_RW_信息
///点击任务信息
FindColorEx 320,242,452,373,&38C8E0&,0,0.8,intX,intY
If intX & 0 And intY & 0 Then
FindColorEx 309,250,464,373,&F0F4F0&,0,0.8,intX,intY
If intX & 0 And intY & 0 Then
FindColorEx 144,228,655,370,&50ECF8&,0,0.8,wxa,zya
If intX & 0 And intY & 0 Then
Call 防飘()
If w&150 and z&120 Then
LeftClick 1
Call JCH_道道()
int_次数=int_次数+1
If int_次数=4 Then
int_次数=0
Goto JCH_RW_信息
Sub 宠物训练()
int_点击计数=0
If TM_到了=1 Then
Rem XL_继续
Call 打开宠物()
Call 防飘()
LeftClick 1
int_点击计数=int_点击计数+1
//有没有到100
FindColorEx 315,283,320,295,&F8FCF8&,0,0.8,intX,intY
If intX & 0 And intY & 0 Then
If int_点击计数=6 Then
int_点击计数=0
Goto XL_继续
//有没参战
FindColorEx 208,294,223,309,&00C480&,0,0.7,intX,intY
If intX & 0 And intY & 0 Then
MoveTo 215, 301
LeftClick 1
Call 关闭宠物()
Sub 打开宠物()
Rem JCH_宠物开
FindColorEx 307,61,340,85,&38C8E0&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
KeyDown 18, 1
KeyPress 82, 1
KeyUp 18, 1
Goto JCH_宠物开
Sub 关闭宠物()
Rem JCH_宠物关
FindColorEx 307,61,340,85,&38C8E0&,0,0.9,intX,intY
If intX & 0 And intY & 0 Then
KeyDown 18, 1
KeyPress 82, 1
KeyUp 18, 1
Goto JCH_宠物关
Sub 走动时开攻击检测()
//***判是否开攻击力
FindColorEx 735,583,778,616,&00E0F8&,0,0.5,tX,tY
If tX&0 Then
KeyPress 27,1
//加血子程序
Sub 加血子程序()
//进行加血执行
If int_rw_bz（i）=1 Then
Rem 加血检测z
Call 防飘()
RightClick 1
int_rw_bz（i）=0
Sub 宠物训练子程序()
//是否进行宠物训练
If XL_宠物=1 Then
Call 宠物训练()
Sub 人物状态子程序()
//***判，不在打怪状态
PD_人物状态=0
FindColorEx 158,53,160,54,&00FCF8&,0,0.8,kX,kY
If kX&0 Then
//在打怪状态
PD_人物状态=1
PD_人物状态=0
Sub 走动判定子程序()
//检测有没有要点击的任务
Call JCH_RW()
Call 走动时开攻击检测()
zdc2=GetPixelColor(10,257)
zdc4=GetPixelColor(760,122)& &
If zdc1=zdc2 and zdc3=zdc4 Then
//***开始走动
KeyDown 18,1
KeyPress 90,1
KeyUp 18,1
If ZD_开始=0 Then
If zdc1=zdc2 or zdc3=zdc4 Then
//***开始走动
KeyDown 18,1
KeyPress 90,1
KeyUp 18,1
//***判，是否在移动
FindColorEx 10,570,42,582,&,0.7,intX,intY
If intX & 0 And intY & 0 Then
//***开始走动
KeyDown 18,1
KeyPress 90,1
KeyUp 18,1
Sub 打怪状态判定子程序()
//***判，是否进入打怪状态
FindColorEx 157,53,160,54,&00FCF8&,0,0.7,kX,kY
If kX&0 Then
& && &&&kX=0
& && &&&//
& && &&&//血魔
& && &&&If RWG_xuemo&0 Then
& && &&&Gosub 是否遇到血魔
& && &&&End If
& && &&&//宝宝丹
& && &&&If RWG_bbd&0 Then
& && &&&Call 是否遇到宝宝丹()
& && &&&End If
& && &&&//为虎作伥
& && &&&If RWG_whzch&0 Then
& && &&&Call 是否遇到为虎作伥()
& && &&&End If
& && &&&//***判，是否开自动了
& && &&&Gosub 开自动子程序
& && &&&//
& && &&&//打怪加血检测
& && &&&Call 加血检测()
& && &&&//逃跑
If int_TP=0 Then
If TP_比例=0 Then
FindColorEx 745,55,750,60,&,0.5,intX,intY
If intX & 0 And intY & 0 Then
Call 启动逃跑()
If TP_比例=1 Then
FindColorEx 735,55,740,60,&,0.5,intX,intY
If intX & 0 And intY & 0 Then
Call 启动逃跑()
& && &&&//
& && &&&//
Sub 启动逃跑()
Call JCH_RW()
//关闭自动打怪
//检测有没有处在不打怪状态
FindColorEx 690,397,728,430,&40FCF8&,0,0.6,intX,intY
If intX & 0 And intY & 0 Then
Call 关自动子程序()
Rem 执行逃跑
//执行逃跑
Call 防飘()
LeftClick 1
Call 鼠标固定位置()
//检测是否逃跑成功
FindColorEx 690,397,728,430,&40FCF8&,0,0.6,intX,intY
If intX & 0 And intY & 0 Then
int_zxtp=int_zxtp+1
If int_zxtp=6 Then
int_zxtp=0
//***判，是进入打怪状态
FindColorEx 157,53,160,54,&00FCF8&,0,0.7,kX,kY
If kX&0 Then
Goto 执行逃跑
int_zxtp=0
Sub 加血检测()
//设置是否加血
If JX_判断=0 Then
If JX_比例=0 Then
FindColorEx 764,57,766,59,&,0.6,intX,intY
If intX & 0 And intY & 0 Then
int_rw_bz（i）=0
int_rw_bz（i）=1
If JX_比例=1 Then
FindColorEx 745,57,747,59,&,0.6,intX,intY
If intX & 0 And intY & 0 Then
int_rw_bz（i）=0
int_rw_bz（i）=1
If JX_比例=2 Then
FindColorEx 723,57,725,59,&,0.6,intX,intY
If intX & 0 And intY & 0 Then
int_rw_bz（i）=0
int_rw_bz（i）=1
Sub 遇到老君()
& & //***判，是否遇到老君1
& & FindPic 164,24,596,467,&Attachment:\BJ_老君.bmp&,0.4,lX,lY
& & If lX & 0 And lY & 0 Then
& && &&&Call 报警()
& && &&&Gosub 老君延时
& & End If
& & //***判，是否遇到老君2
& & FindColorEx 448,256,458,259,&F8FC00&,0,0.6,kX,kY
& & If kX&0 Then
& && &&&kX=0
& && &&&Call 报警()
& && &&&Gosub 老君延时
& & End If
Sub 是否遇到血魔()
& & //判断是否遇到血魔
& & FindPic 9,104,330,441,&Attachment:\血魔.bmp&,0.4,lX,lY
& & If lX&0
& && &&&lX=0
& && &&&If RWG_xuemo=1 Then
& && &&&Call 报警()
& && &&&Gosub 老君延时
& && &&&End If
& && &&&If RWG_xuemo=2 Then
& && &&&Call 启动逃跑()
& && &&&End If
Sub 是否遇到宝宝丹()
& & //判断是否遇到血魔
& & FindPic 9,100,530,441,&Attachment:\RWG_宝宝丹.bmp&,0.4,lX,lY
& & If lX&0
& && &&&lX=0
& && &&&If RWG_bbd=1 Then
& && &&&Call 报警()
& && &&&Gosub 老君延时
& && &&&End If
& && &&&If RWG_bbd=2 Then
& && &&&Call 启动逃跑()
& && &&&End If
Sub 是否遇到为虎作伥()
& & //判断是否遇到血魔
& & FindPic 9,100,530,441,&Attachment:\RWG_为虎作伥.bmp&,0.4,lX,lY
& & If lX&0
& && &&&lX=0
& && &&&If RWG_whzch=1 Then
& && &&&Call 报警()
& && &&&Gosub 老君延时
& && &&&End If
& && &&&If RWG_whzch=2 Then
& && &&&Call 启动逃跑()
& && &&&End If
Sub 老君延时()
& & Delay BJ_延时
Sub 开自动子程序()
& & //***开自动
& & FindColorEx 342,165,378,175,&00E4F8&,0,0.8,kX,kY
& & If kX&0 Then
& & //第一次打怪(renwu
& & KeyDown 18,1
& & KeyPress 65,1
& & KeyUp 18,1
& & Delay 50
& & //第一次打怪(chongwu
& & KeyDown 18,1
& & KeyPress 65,1
& & KeyUp 18,1
& & Delay 50
& & //开自动
& & KeyDown 18,1
& & KeyPress 90,1
& & KeyUp 18,1
& & Delay 50
& & End If
Sub 关自动子程序()
& & //***关自动
& & FindColorEx 342,165,378,175,&00E4F8&,0,0.8,kX,kY
& & If kX&0 Then
& & //关自动
& & KeyDown 18,1
& & KeyPress 90,1
& & KeyUp 18,1
& & Delay 300
& && && && &
& & End If
If w&150 and z&120 Then
Xn = Plugin.Memory.Read32Bit(MyArray(i), &H12FB14)
Yn = Plugin.Memory.Read32Bit(MyArray(i), &H12FB18)
MoveR a , b
//***//***
Sub xiuzhengchuangkou()
& & //****************************修正窗口************************
& & //下面这句是遍历符合窗口标题(&成吉&)的句柄保存到数组(HwndEx)里
& & HwndEx =Plugin.Window.Search(&问道&)
& & //下面这句用于分割字符串,将横坐标和纵坐标分成两个字符串
& & MyArray = Split(HwndEx, &|&)
& & If UBound(MyArray)&=0
& && &&&i=0
& && &&&For UBound(MyArray)
& && && && &//下面这句将字符串转换成数值
& && && && &Clng(MyArray(i))
& && && && &a=MyArray(i)
& && && &&&Call Plugin.Window.Move(a,0,0)
& && && && &Delay 300
& && && && &i=i+1
& && &&&EndFor
//当循环条件成立的时候，反复执行循环体
Sub 报警()
& & If bjj=0
& && &&&Gosub 机箱报警
& && &&&Gosub 音乐报警
Sub 机箱报警()
& & For bjcish
& && &&&Beep
& && &&&Delay 188
& && &&&//这里的脚本可以循环bjcish次
& & EndFor
Sub 音乐报警()
& & For bjcish
& && &&&VBS strSoundFile = &C:\WINDOWS\Media\Windows XP 启动.wav&
& && &&&VBS Set objShell = CreateObject(&Wscript.Shell&)
& && &&&VBS strCommand = &sndrec32 /play /close & & chr(34) & strSoundFile & chr(34)
& && &&&VBS objShell.Run strCommand, 0, True
& && &&&Delay 2000
& && &&&//这里的脚本可以循环bjcish次
& & EndFor完美世界自己一个人怎么组队_百度知道
完美世界自己一个人怎么组队
我有更好的答案
会出现一个菜单，在菜单里有组队，点下那个人然后右键点击他的头像如果是组别人的话，点一下等待对方同意就行了，也可以按‘T’键。不知是否是你需要的答案，在邀请组队后面的空里输入你要邀请的人的名字
采纳率：50%
一个人就一个人了，还组什么队。。。你是问怎么和别人组队是吧
自己无法组自己.队伍人数大于1 才能称为队伍.自己 组 自己的话还是一个人 怎么能组呢.
你做队长吧别人组上 之后吧他们踢了 在看看队伍里是不是只有你自己一个人了
其他1条回答
为您推荐：
其他类似问题
您可能关注的内容
完美世界的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。传奇脚本 组队进图 全员触发倒计时_百度知道
传奇脚本 组队进图 全员触发倒计时
传奇脚本 组队进图 全员触发倒计时就是 都显示 还有 多少分回成 （副本剩余30秒回程）
一个小队的人都显示 或着是进入地图就倒计时也行 求高手给写一个 谢谢
组队进/@组队&
&lt！GROUPMAPMOVE
1 @火龙殿组队break [@单人]#if#actmapmove hld
sendmsg 0 英勇的%S进入了火龙殿，开展寻宝之旅.txt
写触发脚本，如下;1)例;QFunction-0，时间到后进入QFunction-0：在客户端快捷栏上方显示时间信息.txt 脚本示范：[@main]进入火龙殿里面30分钟后会自动传回到土城\你可以组队或者单人进去\ &Mir200\Envir\Market_Def&#92： SENDTIMEMSG 火龙殿任务还剩%s结束.;@单人&[@组队]#if#actsendmsg 0 英勇的%S率领队友进入了火龙殿，开展寻宝之旅.. 300 251 @触发测试 说明：300代表时间(秒) 251代表颜色 @触发测试 触发QFunction-0;MirServer\单人进&#47！SENDTIMEMSG 您在火龙殿的剩余时间%s……
@火龙殿单人 1 D:&#92NPC相关命令：功能.txt 指定的触发段格式：SENDTIMEMSG 消息内容 时间 字颜色 QF解发段 换地图是否不显示(0&#47
我是 hero的引擎 QF 加载失败
思路一样，看看脚本是否错误，或者查看喝hero的说明书
SENDTIMEMSG 您在火龙殿的剩余时间%s……
@火龙殿组队1 1主要是这不支持
这是hero引擎的，要多看说明书的习惯，这才是你最好的老师格式: SENDMSGWINDOWS 火龙殿任务还剩%s结束... 300 251 @触发测试功能: 时间到后进入QFunction-0.txt 指定的触发段,发消息给客户端显示'!'号图标格式: SENDMSGWINDOWS 时间 QF解发段例: SENDMSGWINDOWS 300 @HintWindow 说明: 300代表时间(秒) @HintWindow 触发QFunction-0.txt 功能: 关闭客户端'!'图标显示格式：CLOSEMSGWINDOWS
采纳率：38%
需要在Qmange中添加一个计时器
就是 都显示 还有 多少分回成 （副本剩余30秒回程）
为您推荐：
其他类似问题
您可能关注的内容
传奇脚本的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。}