求免费恶魔喊话器，请指导我使用。292分！！
VBS jsjg，jsjiage，jyjg，jyjiage，zdljg，zdljiage，mhjg，mhjiage，hmjg，hmjiage
VBS jszjg，jszjiage，jyzjg，jyzjiage，zdlzjg，zdlzjiage，mhzxjg，mhzxjiage，hmzxjg，hmzxjiage
VBS lhjg，lhjiage，ojg，ojiage，gxjg，gxjiage，sxjg，sxjiage，fzjg，fzjiage
VBS zzjg，zzjiage，cjqsjg，cjqsjiage，宗加格
//声明变量
UserVar jsjg=1减去伤害低价。
UserVar jyjg=1体验低级价格。
UserVar zdljg=5战斗力低级价格。
UserVar mhjg=3妖魂的价格。
UserVar hmjg=7魔术魔术的价格。
UserVar jszjg=15减伤中级的价格。
UserVar jyzjg=15经验中级价格。
用户var zdlzjg = 60战力中级的价格。
UserVar mhzxjg=90妖魂之心的价格。
UserVar hmzxjg=120魔心的价格。
UserVar lhjg=60灵魂的价格
用户var ojg =婴儿型20 o的价格。
UserVar gxjg=6孤星的价格。
UserVar sxjg=6两颗星的价格。
UserVar fzjg=15法猪价格。
UserVar zzjg=15战猪的价格。
UserVar cjqsjg=7沙飞的价格。
VBS TP(0)= " 1js 1 ":TP(1)= " 2jyx 1 ":TP(2)= " 3zdx 5 ":TP(3)= " 4mh 4 ":TP(4)= " 5hm 8 ":TP(5)= " 6jsz 15 "
VBS TP(6)= " 7jyz 15 ":TP(7)= " 8zdz 60 ":TP(8)= " 9 mhzx 100 ":TP(9)= " 10 hmzx 120 ":TP(10)= " 11lh 70 ":TP(11)= " 120
VBS TP(12)= " 13gx 5 ":TP(13)= " 14sx 5 ":TP(14)= " 15fz 14 ":TP(15)= " 16zz 14 ":TP(16)= " 65438
//初始化变量，其中X为区域左侧，Y为区域左侧，bx为区域底部，by为区域底部，S为图片数量。
UserVar str1= "法官沙飞7双防22猪18双孤星8战力+1/5 "，请输入自动呼喊1的句子。
user var str 2 =“1号摊位旁边卖东西的人的速度，不考虑不收的东西的价格”，请输入自动喊话的第二句话。
UserVar str3= "法官骑士沙飞7双防22猪18双孤星8战力+1/5 "请输入自动呼喊第三句。
UserVar str4= "请快点把东西穿上，时间不等人，没收好的东西价格不算。"请输入第四句自动喊话。
UserVar str5= "这是自动喊话的第五句话"。请输入第五句自动喊话。
UserVar Yanshi=5000两个口号之间的等待时间，1秒就是1000。
//* * * * * * * * * * * * * * * * * * * * * * * * * * * * * *
延迟4000
雷姆开始大叫。
按键13 1
延迟300
SayExpression str1
按键13 1
延偃师
Gosub检查交易。
按键13 1
延迟300
SayExpression str2
按键13 1
Gosub检查交易。
延偃师
按键13 1
延迟300
SayExpression str3
按键13 1
Gosub检查交易。
延迟大宴时
雷姆在下一轮抛售前等待半分钟。
后藤开始大叫
EndScript
子程序开始
Gosub计算项目的数量。
延迟100
Gosub输入价格
延迟100
Gosub事务等待
返回程序开始。
Sub，检查是否有交易。
VBScall查找pic (0，0，1024，768，"...\ myphoto \ business.bmp "，0.9，x，y)。
如果x & gt=0且y & gt=0
延迟300
移到443，446
延迟500
左键点击1
延迟2000年
Gosub检测并释放项目。
延迟500
Gosub计划开始
EndIf
EndIf
返回检查是否有任何交易。
Sub检测并释放物品。
VBS i=0
VBS a = 0 : x = 51 : y = 264
VBS s=0
对于12
雷姆开始检测和摆放物品。
如果我& gt=6
转到检测，放置项目结束。
EndIf
IfColor x，y，80808，2
延迟2000年
VBS i=i+1
Goto开始检测并放置物品。
其他
VBS x=x+34
VBS i=0
VBS a=a+1
如果a=5
VBS x = 51 : y = 264+34
EndIf
EndIf
结束
物品放置结束的Rem检测。
Return检测并放置项目。
Sub检测交易是否被提前终止。
IfColor 125，144，896c6，2
IfColor 149，141，896c6，2
后藤，交易还没结束。
其他
后藤开始大叫
EndIf
其他
后藤开始大叫
EndIf
雷，交易还没结束。
Return检测事务是否被提前终止。
Sub计算项目的数量
VBS i=0
Gosub检测事务是否被提前终止。
对于17
VBS a = 0:x = 34:y = 247:bx = 294:by = 347
VBS s=0
延迟100
当a = 0时
//如果变量A等于0，循环执行下面的命令。
延迟10
VBSCall findpic(x，y，bx，by，"..“我的照片”。tp(i)和amp".bmp "，0.9，x，y)
//区域地图查找
如果x & gt=0且y & gt=0
//延迟1000
//移动到x，y
//延迟1000
//移动到247，294
//延迟3000
x = x + 34 : by = y + 34
//在区域左侧添加1。这里34指的是画面的宽度，是自己改的。
s = s + 1
//如果找到图片，数量加1。
雷姆线
延迟10
VBSCall findpic(x，y，bx，by，"..“我的照片”。tp(i)和amp".骨形态发生蛋白”，0.9，linex，liney)
//这是在同一行中再次查找。
如果linex & gt=0且liney & gt=0
//延迟1000
//MoveTo linex，liney
//延迟1000
//移动到247，294
//延迟3000
x = linex + 34
//在区域左侧添加1。
s = s + 1
//数量加1
转到行
//返回同一行，再次搜索。
其他
//否则
x = 34 : y = y + 34 : by = 347
//左侧初始为0，顶部加1初始化区域底部。
EndIf
其他
//如果没有找到图片。
a = 1
//变量A是1(退出循环)
EndIf
结束时间
Gosub计算价格
//VBS call messagebox(" * * * Found " &；标准普尔。“个”&；“TP(& amp；我& amp”)”& amp" &图片" & amptp(i)和amp" ")
VBS i=i+1
//弹出结果
结束
Return计算项目的数量。
子计算价格
//计算价格
如果i=0
日之= "降低低级石头伤害"
VBS jsjiage=(jsjg*s)
//VBS call messagebox(" Total " &；jsjiage & amp“女士”)
ElseIf i=1
日之= "体验低级石"
VBS jyjiage=jyjg*s
//VBS call messagebox(" Total " &；jyjiage & amp“女士”)
ElseIf i=2
日之=“有战斗力的低级石头”
VBS zdljiage=zdljg*s
//VBS call messagebox(" Total " &；zdljiage & amp“女士”)
ElseIf i=3
日之= "鬼魂"
VBS mhjiage=mhjg*s
//VBS call messagebox(" Total " &；mhjiage & amp“女士”)
ElseIf i=4
Rizhi= "magic "
VBS hmjiage=(hmjg*s)
//VBS call messagebox(" Total " &；hmjiage & amp“女士”)
ElseIf i=5
日之= "减伤中级石"
VBS jszjiage=jszjg*s
ElseIf i=6
日之= "历练中级石"
VBS jyzjiage=jyzjg*s
ElseIf i=7
日之=“中等战斗力的石头”
VBS zdlzjiage=zdlzjg*s
ElseIf i=8
Rizhi=“魔鬼的灵魂之心”
VBS mhzxjiage=mhzxjg*s
ElseIf i=9
日之= "魔心"
VBS hmzxjiage=hmzxjg*s
ElseIf i=10
日治=“灵魂”
VBS lhjiage=lhjg*s
//VBS call messagebox(" Total " &；洛迦格& amp“女士”)
ElseIf i=11
Rizhi =型婴儿"
VBS·奥贾格=ojg*s
ElseIf i=12
Rizhi= "孤星"
VBS gxjiage=gxjg*s
ElseIf i=13
Rizhi= "双星"
VBS sxjiage=sxjg*s
ElseIf i=14
Rizhi= "法国猪"
VBS fzjiage=fzjg*s
ElseIf i=15
日治=“战猪”
VBS zzjiage=zzjg*s
ElseIf i=16
日志= "沙飞"
VBS cjqsjiage=cjqsjg*s
VBS宗加格=0
VBS宗加格=(js Jia ge+jyjia ge+zdljia ge+mhjia ge+hmjia ge+jszjia ge+jyzjia ge+mhzxjia ge+hmzxjia ge+lhjia ge+ojia ge+gxjia ge+sxjia ge+fzjia ge+zzjia ge+cjqsjia ge)
//VBS call messagebox(" Total " &；宗加阁& amp“女士”)
其他
VBS宗加格=0
EndIf
Return计算价格
子投入价格
移动到200，410
延迟1000
Gosub检测事务是否被提前终止。
左键点击1
延迟100
Gosub检测事务是否被提前终止。
左键点击1
延迟1000
SayString宗加阁
延迟1000
Rem输入毫秒
移动到263，415
延迟1000
Gosub检测事务是否被提前终止。
左键点击1
延迟100
Gosub检测事务是否被提前终止。
左键点击1
延迟500
IfColor 263，415，8ccfde，2
转到输入毫秒
其他
移动到136，513
延迟500
Gosub检测事务是否被提前终止。
左键点击1
延迟300
EndIf
返回输入价格
等待子交易
jsq=0
Rem等待事务处理。
如果jsq & gt=20
移动到205，515
延迟1000
Gosub检测事务是否被提前终止。
左键点击1
延迟300
后藤，对方不交易
EndIf
IfColor 233，494，a5f62，2
延迟1000
jsq=jsq+1
Goto等待交易。
其他
EndIf
雷姆，对方不交易。
返回交易等待