魔域脚本源码
1. 80分悬赏！魔域的脚本怎么使用
魔域中脚本变量大全
变量名称 说明
<$USERNAME> 人物名称
<$GUILDNAME> 行会名称
<$RANKNAME> 行变量名称 说明
<$USERNAME> 人物名称
<$GUILDNAME> 行会名称
<$RANKNAME> 行会职位名称
<$LEVEL> 等级
<$HP> 生命值
<$AC> 防御力
<$MAXAC> 最高防御力
<$MAC> 魔法防御力
<$MAXMAC> 最高魔法防御力
<$DC> 物理攻击力
<$MAXDC> 最高物理攻击力
<$MC> 魔法力
<$MAXMC> 最高魔法力
<$SC> 道术
<$MAXSC> 最高道术
<$EXP> 当前经验值
<$MAXEXP> 升级经验值
<$PKPOINT> PK点数
<$CREDITPOINT> 声望点数
<$GOLDCOUNT> 金币数量
<$GAMEGOLD> 游戏币数
<$GAMEPOINT> 游戏点数
<$HW> 腕力
<$MAXHW> 最高腕力
<$BW> 背包重量
<$MAXBW> 最高背包重量
<$WW
文:魔域私服工具 发表时间:2008-2-4 21:04:57
101 0 【对话内容】 对话框的提示部分，内容自己添加（也就是介绍累的）
102 0 【内容】 【ID】 点【内容】后执行 【id】里面的命令ID为 acction里面的
103 0 【参数】【ID】 弹出需要输入文字的对话框【参数】：【代码】【执行ID】
代码解释：10，导师经验；15 ，军团命名
104 0 【三位数字代码】 好像是系统执行的代码，具体代码含义暂时不了解
121 0 1 2 系统随即选择一个id_next 还是id_nextfail 的执行，后面的数值越大几率越小 大概几率就是 1/后面的数值
122 0 【ID】 从param随即选择一个，注意：ID 2个一组，一组需要相同 【id】里面的命令ID为 acction里面的
123 【参数】 时间 数值 时间判断 【参数】data=0 是年月日时分到年月日时分；data=1 是月日时分到月日时分；
data=2 是日时分到日时分；data=3 是星期时分到星期时分；data=4 是几点几分到几点几分
data=5 每【数值】分钟 到 每数值分钟之间
举例： data 3 param 4 00:01 4 23:59 到星期四开始
124 1067 结婚
125 2011 【内容】 GM提示
126 0 【对话内容】 只有确定的对话框，内容自己添加
213 1900 【对话内容】 拍卖
216 1900 1 拍卖完毕，关闭窗口
312 0 坐标 效果 例如：1000 846 513 pet31
501 【物品ID】 开礼包
502 【物品ID】 给予 data 里面的物品 ID自己找
507 0 物品ID 物品ID 数量 收回【物品ID】物品 【数量】个
508 0 1 0 50 判断空位，第一位数字代表几个空位，最后一个代表类型
50，技能栏；52，幻兽背包；
510 【物品ID】0 1 0 0 0 0 0 0 50 50 0 0 给予 data 里面的物品 ID自己找，param物品附加的属性
701 0 50 500000 250000 建立军团，50代表等级，中间代表钱数，后面的不知道
702 0 解散军团
717 0 member_title = 【数值】 老大名字1，军团长；2，帮主；3，教主 ；4，会长
723 0 【参数/数值】 数值军团等级；+=1 增加军团等级
801 0 dropitem 【物品ID】 删除物品
0 dropmoney 【数值】 删除金钱
802 0 check/learn 【技能ID】 check检查幻兽技能，learn学习技能
1001 0 【具体条件】 主要是对人物操作，判断符号有 <;=;+=;== 格式【参数】 【符号】 【具体数值】 部分参数：
money 金币；e_money 磨石；exp 经验；level 等级；nobility_rank爵位；tutor_level 导师等级；
tutor_exp 导师经验；student_exp 学员经验；rankshow 军团荣誉；exploit 功勋；
maxlifepercent 健康状态（估计就是HP值）
1003 0 地图代码 X坐标 Y坐标 传送阵，传送到param的地图坐标上
1004 0 地图代码 X坐标 Y坐标 %user_map_id %user_map_x %user_map_y 表示玩家回程的坐标
1010 【数值】 【具体内容】 【数值】：2000 系统公告；2005 个人的；
1005 0 style. 【1-8】 染发的 具体颜色 由数字1-8决定，自己研究去把
1020 0 check/learn 【技能ID】 check检查人物技能，learn学习技能
1024 0 离婚
1026 0 好像是强制离婚
1025 0 判断是否有配偶
1027 0 self 【FF07-1】 使用后的外管效果【】里面的自己研究 other65，FF07-1 等等了，自己研究吧懒得写了
1029 0 play sound/trap.wav 0 0 1 声音调用
1051 0 导师经验提取完毕
1080 1006 【命令行】 命令行，有参数 new，begintime reset
1081 3568 begintime reset 同上，具体什么条件由 data决定，判断公式由 param 决定 两者的区别还没找出来
new
1046 【数字】 各种窗口，一般对应102后面的，数字代表类型
1 商店窗口；5，下达任务；6，未接任务；7，我的任务；8，已接任务
13 孵化所 ；14 死亡的幻兽和必要的宝石招魂 ；15 强化幻兽和；16 幻兽仓库
21，参与拍卖；22，拍卖；23，锻造（灵魂宝石）；24，锻造（魔魂宝石）；25，锻造（幻魔宝石）
27，拍卖仓库；28，鉴定；29 幻兽进化界面；30，重塑幻兽；31 幻兽洗天赋；
44，环保练功；47，注入宝石；49，高级锻造
4001 0 22 30150 600 0 格式解释：状态代码 技能效果百分比 持续时间（单位秒） 这个不清楚
效果百分比： 数值-30100 比如 30150 - 30100 就是 50，效果增加 50%
状态代码：22 伤害力 ；52 经验增加 ； 47 闪避增加 ； 48 XP恢复速度；49 获得金钱；50
2006 0 0 0 8700 168 231 1001100 10011 0 幽影巫王 刷怪，前面是怪物的属性
2008 0 8700 name 幽影巫王 == 0 检查某地图 怪物 数量
2009 0 8700 10011 0 幽影巫王
文:魔域私服工具 发表时间:2008-2-4 21:04:57
负重力
<$MAXWW> 最高负重
<$HUNGER> 饥饿程度
<$LOGINTIME> 登录时间
<$LOGINLONG> 登录时长
<$DRESS> 衣服
<$WEAPON> 武器
<$RIGHTHAND> 蜡烛
<$HELMET> 头盔
<$NECKLACE> 项链
<$RING_R> 右戒指
<$RING_L> 右戒指
<$ARMRING_R> 右手镯
<$ARMRING_L> 左手镯
<$BUJUK> 护身符
<$BELT> 腰带
<$BOOTS> 鞋子
<$CHARM> 宝石
<$CASTLENAME> 沙城名称
服务器信息
变量名称
说 明
<$SERVERNAME> 服务器名字
<$SERVERIP> 服务器IP地址
<$WEBSITE> 游戏网址
<$BBSSITE> 论坛网址
<$CLIENTDOWNLOAD> 客户端程序下载地址
<$QQ> 联系QQ号
<$PHONE> 联系电话号码
<$BANKACCOUNT0> 银行帐号信息
<$BANKACCOUNT1> 银行帐号信息
<$BANKACCOUNT2> 银行帐号信息
<$BANKACCOUNT3> 银行帐号信息
<$BANKACCOUNT4> 银行帐号信息
<$BANKACCOUNT5> 银行帐号信息
<$BANKACCOUNT6> 银行帐号信息
<$BANKACCOUNT7> 银行帐号信息
<$BANKACCOUNT8> 银行帐号信息
<$BANKACCOUNT9> 银行帐号信息
<$GAMEGOLDNAME> 游戏币名称
<$USERCOUNT> 在线人数
<$DATETIME> 当前日期时间
<$GAMEGOLDNAME> 游戏币名称
<$HIGHLEVELINFO> 最高等人物信息
<$HIGHPKINFO> 最高PK点数人物信息
<$HIGHDCINFO> 最高攻击力人物信息
<$HIGHMCINFO> 最高魔法力人物信息
<$HIGHSCINFO> 最高道术人物信息
会职位名称
<$LEVEL> 等级
<$HP> 生命值
<$AC> 防御力
<$MAXAC> 最高防御力
<$MAC> 魔法防御力
<$MAXMAC> 最高魔法防御力
<$DC> 物理攻击力
<$MAXDC> 最高物理攻击力
<$MC> 魔法力
<$MAXMC> 最高魔法力
<$SC> 道术
<$MAXSC> 最高道术
<$EXP> 当前经验值
<$MAXEXP> 升级经验值
<$PKPOINT> PK点数
<$CREDITPOINT> 声望点数
<$GOLDCOUNT> 金币数量
<$GAMEGOLD> 游戏币数
<$GAMEPOINT> 游戏点数
<$HW> 腕力
<$MAXHW> 最高腕力
<$BW> 背包重量
<$MAXBW> 最高背包重量
<$WW> 负重力
<$MAXWW> 最高负重
<$HUNGER> 饥饿程度
<$LOGINTIME> 登录时间
<$LOGINLONG> 登录时长
<$DRESS> 衣服
<$WEAPON> 武器
<$RIGHTHAND> 蜡烛
<$HELMET> 头盔
<$NECKLACE> 项链
<$RING_R> 右戒指
<$RING_L> 右戒指
<$ARMRING_R> 右手镯
<$ARMRING_L> 左手镯
<$BUJUK> 护身符
<$BELT> 腰带
<$BOOTS> 鞋子
<$CHARM> 宝石
<$CASTLENAME> 沙城名称
服务器信息
变量名称
说 明
<$SERVERNAME> 服务器名字
<$SERVERIP> 服务器IP地址
<$WEBSITE> 游戏网址
<$BBSSITE> 论坛网址
<$CLIENTDOWNLOAD> 客户端程序下载地址
<$QQ> 联系QQ号
<$PHONE> 联系电话号码
<$BANKACCOUNT0> 银行帐号信息
<$BANKACCOUNT1> 银行帐号信息
<$BANKACCOUNT2> 银行帐号信息
<$BANKACCOUNT3> 银行帐号信息
<$BANKACCOUNT4> 银行帐号信息
<$BANKACCOUNT5> 银行帐号信息
<$BANKACCOUNT6> 银行帐号信息
<$BANKACCOUNT7> 银行帐号信息
<$BANKACCOUNT8> 银行帐号信息
<$BANKACCOUNT9> 银行帐号信息
<$GAMEGOLDNAME> 游戏币名称
<$USERCOUNT> 在线人数
<$DATETIME> 当前日期时间
<$GAMEGOLDNAME> 游戏币名称
<$HIGHLEVELINFO> 最高等人物信息
<$HIGHPKINFO> 最高PK点数人物信息
<$HIGHDCINFO> 最高攻击力人物信息
<$HIGHMCINFO> 最高魔法力人物信息
<$HIGHSCINFO> 最高道术人物信息
2. 魔域自动刷怪的脚本，要免费的
UserVardcs=15"打怪次数循环"
UserVarszg=5"随机找怪循环"
LockMouse
jici=0
moli=0
FindPic213,89,714,708,"Attachment:21.bmp",0.9,X,Y
IfX>0AndY>0Then
MoveToX+6,Y+6
Delay200
LeftDown1
Delay20
LeftUp1
Delay240
EndIf
Remshouguai
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
MoveTointX+4,intY+10
Delay250
LeftDown1
Delay20
LeftUp1
Delay20
LeftDown1
Delay20
LeftUp1
Delay20
Delay2100
Calldaguai()
else
Callsuijishouguai()
EndIf
Subsuijishouguai()
Ifjici=szgThen
Delay500
KeyDown"1",1
Delay20
KeyUp"1",1
Delay20
jici=0
EndIf
Remcxv
skipsub=int(8*Rnd+1)
Ifskipsub>8Then
Gotocxv
EndIf
Ifskipsub=1Then
jici=jici+1
Callas1()
EndIf
Ifskipsub=2Then
jici=jici+1
Callas2()
EndIf
Ifskipsub=3Then
jici=jici+1
Callas3()
EndIf
Ifskipsub=4Then
jici=jici+1
Callas4()
EndIf
Ifskipsub=5Then
jici=jici+1
Callas5()
EndIf
Ifskipsub=6Then
jici=jici+1
Callas6()
EndIf
Ifskipsub=7Then
jici=jici+1
Callas7()
EndIf
Ifskipsub=8Then
jici=jici+1
Callas8()
EndIf
EndSub
Subas1()
MoveTo522,246
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo522,246
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas2()
MoveTo526,352
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo526,352
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas3()
MoveTo525,444
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo525,444
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas4()
MoveTo681,455
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo681,455
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas5()
MoveTo859,450
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo859,450
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas6()
MoveTo862,317
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo862,317
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas7()
MoveTo816,224
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo816,224
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subas8()
MoveTo671,194
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
EndIf
MoveTo671,194
Delay20
LeftDown1
Delay20
LeftUp1
Delay1350
FindColor213,89,1174,608,"0303B8",intX,intY
IfintX>0AndintY>0Then
Gotoshouguai
Else
Callsuijishouguai()
EndIf
EndSub
Subdaguai()
MoveTo688,330
Fordcs
KeyDown"F3",1
Delay20
KeyUp"F3",1
Delay200
Next
MoveToX+4,Y+4
Delay20
LeftDown1
Delay20
LeftUp1
Delay1500
jici=0
moli=moli+1
Ifmoli=30Then
Calljialan()
EndIf
Gotoshouguai
EndSub
Subjialan()
Delay100
KeyDown"3",1
Delay20
KeyUp"3",1
Delay20
Delay100
moli=0
Gotoshouguai
EndSub
附件
3. 魔域自动交易（按键精灵脚本）
没有物品宝宝存仓库,有的可以自己增加一下.
VBS dim tp(16),a,x,y,linex,liney,bx,by,s,i,jsq
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,zongjiage
//声明变量
UserVar jsjg=1 减伤害低级的价格
UserVar jyjg=1 经验低级的价格
UserVar zdljg=5 战斗力低级的价格
UserVar mhjg=3 魔魂的价格
UserVar hmjg=7 幻魔的价格
UserVar jszjg=15 减伤害中级的价格
UserVar jyzjg=15 经验中级的价格
UserVar zdlzjg=60 战斗力中级的价格
UserVar mhzxjg=90 魔魂之心的价格
UserVar hmzxjg=120 幻魔之心的价格
UserVar lhjg=60 灵魂的价格
UserVar ojg=20 O型宝宝的价格
UserVar gxjg=6 孤星的价格
UserVar sxjg=6 双星的价格
UserVar fzjg=15 法猪的价格
UserVar zzjg=15 战猪的价格
UserVar cjqsjg=7 莎菲的价格
VBS tp(0)="1js1":tp(1)="2jyx1":tp(2)="3zdx5":tp(3)="4mh4":tp(4)="5hm8":tp(5)="6jsz15"
VBS tp(6)="7jyz15":tp(7)="8zdz60":tp(8)="9mhzx100":tp(9)="10hmzx120":tp(10)="11lh70":tp(11)="12o20"
VBS tp(12)="13gx5":tp(13)="14sx5":tp(14)="15fz14":tp(15)="16zz14":tp(16)="17cjqs7"
//初始化变量，x是区域左边、y是区域左边、bx是区域下边、by是区域下边，s是图片数量
UserVar str1="收裁决骑士莎菲7 双防22 猪18 双孤星8 战斗力+1/5" 请输入自动叫喊的第1句话
UserVar str2="人在【一】号摊位旁边卖的速度,不收的东西放上去价格全部不计" 请输入自动叫喊的第2句话
UserVar str3="收裁决骑士莎菲7 双防22 猪18 双孤星8 战斗力+1/5" 请输入自动叫喊的第3句话
UserVar str4="请速度放上东西,时间不等人,不收的东西放上去价格全部不计" 请输入自动叫喊的第4句话
UserVar str5="这是自动喊的第5句话" 请输入自动叫喊的第5句话
UserVar Yanshi=5000 两句喊话之间的等待时间，1秒钟是1000
//****************设置结束*****************
Delay 4000
Rem 开始喊话
KeyPress 13 1
Delay 300
SayExpression str1
KeyPress 13 1
Delay Yanshi
Gosub 检查有没有交易
KeyPress 13 1
Delay 300
SayExpression str2
KeyPress 13 1
Gosub 检查有没有交易
Delay Yanshi
KeyPress 13 1
Delay 300
SayExpression str3
KeyPress 13 1
Gosub 检查有没有交易
Delay DaYanshi
Rem 等待半分钟后，进行下一轮叫卖
Goto 开始喊话
EndScript
Sub 程序开始
Gosub 计算物品数量
Delay 100
Gosub 输入价钱
Delay 100
Gosub 交易等待
Return 程序开始
Sub 检查有没有交易
VBSCall findpic(0,0,1024,768,"..myphoto商贸.bmp",0.9,x,y)
If x>=0 and y>=0
Delay 300
MoveTo 443,446
Delay 500
LeftClick 1
Delay 2000
Gosub 检测放物品
Delay 500
Gosub 程序开始
EndIf
EndIf
Return 检查有没有交易
Sub 检测放物品
VBS i=0
VBS a = 0 : x = 51 : y = 264
VBS s=0
For 12
Rem 开始检测放物品
If i>=6
Goto 检测放物品结束
EndIf
IfColor x,y,80808,2
Delay 2000
VBS i=i+1
Goto 开始检测放物品
Else
VBS x=x+34
VBS i=0
VBS a=a+1
If a=5
VBS x = 51 : y = 264+34
EndIf
EndIf
EndFor
Rem 检测放物品结束
Return 检测放物品
Sub 检测交易有没有被提前结束
IfColor 125,144,896c6,2
IfColor 149,141,896c6,2
Goto 交易没被结束
Else
Goto 开始喊话
EndIf
Else
Goto 开始喊话
EndIf
Rem 交易没被结束
Return 检测交易有没有被提前结束
Sub 计算物品数量
VBS i=0
Gosub 检测交易有没有被提前结束
For 17
VBS a = 0 : x = 34 : y = 247 : bx = 294 : by = 347
VBS s=0
Delay 100
While a = 0
//如果变量a等于0，则循环执行下面命令
Delay 10
VBSCall findpic(x,y,bx,by,"..myphoto"&tp(i)&".bmp",0.9,x,y)
//区域找图
If x>=0 and y>=0
//Delay 1000
//MoveTo x,y
//Delay 1000
//MoveTo 247,294
//Delay 3000
x = x + 34 : by = y + 34
//区域左边加1。这里的34指的是图片的宽度，自改
s = s + 1
//如果找到图片在数量上加1
Rem line
Delay 10
VBSCall findpic(x,y,bx,by,"..myphoto"&tp(i)&".bmp",0.9,linex,liney)
//这是是在同一行再查找
If linex>=0 and liney>=0
//Delay 1000
//MoveTo linex,liney
//Delay 1000
//MoveTo 247,294
//Delay 3000
x = linex + 34
//区域左边加1
s = s + 1
//数量加1
Goto line
//返回同一行再查找
Else
//否则
x = 34 : y = y + 34 : by = 347
//左边初始为0，上边加1，初始化区域下边
EndIf
Else
//如果没有找到图片
a = 1
//变量a为1（退出循环）
EndIf
EndWhile
Gosub 计算价格
// VBSCall messagebox("共找到 " & s & " 个"&"tp("&i&") "&"相同图片" & tp(i) & " ")
VBS i=i+1
//弹出结果
EndFor
Return 计算物品数量
Sub 计算价格
//《计算价格》
If i=0
Ri="减伤害低级石头"
VBS jsjiage=(jsjg*s)
//VBSCall messagebox("合计 " & jsjiage & " MS")
ElseIf i=1
Ri="经验低级石头"
VBS jyjiage=jyjg*s
//VBSCall messagebox("合计 " & jyjiage & " MS")
ElseIf i=2
Ri="战斗力低级石头"
VBS zdljiage=zdljg*s
//VBSCall messagebox("合计 " & zdljiage & " MS")
ElseIf i=3
Ri="魔魂"
VBS mhjiage=mhjg*s
//VBSCall messagebox("合计 " & mhjiage & " MS")
ElseIf i=4
Ri="幻魔"
VBS hmjiage=(hmjg*s)
//VBSCall messagebox("合计 " & hmjiage & " MS")
ElseIf i=5
Ri="减伤害中级石头"
VBS jszjiage=jszjg*s
ElseIf i=6
Ri="经验中级石头"
VBS jyzjiage=jyzjg*s
ElseIf i=7
Ri="战斗力中级石头"
VBS zdlzjiage=zdlzjg*s
ElseIf i=8
Ri="魔魂之心"
VBS mhzxjiage=mhzxjg*s
ElseIf i=9
Ri="幻魔之心"
VBS hmzxjiage=hmzxjg*s
ElseIf i=10
Ri="灵魂"
VBS lhjiage=lhjg*s
//VBSCall messagebox("合计 " & lhjiage & " MS")
ElseIf i=11
Ri="O型宝宝"
VBS ojiage=ojg*s
ElseIf i=12
Ri="孤星"
VBS gxjiage=gxjg*s
ElseIf i=13
Ri="双星"
VBS sxjiage=sxjg*s
ElseIf i=14
Ri="法猪"
VBS fzjiage=fzjg*s
ElseIf i=15
Ri="战猪"
VBS zzjiage=zzjg*s
ElseIf i=16
Ri="莎菲"
VBS cjqsjiage=cjqsjg*s
VBS zongjiage=0
VBS zongjiage=(jsjiage+jyjiage+zdljiage+mhjiage+hmjiage+jszjiage+jyzjiage+zdlzjiage+mhzxjiage+hmzxjiage+lhjiage+ojiage+gxjiage+sxjiage+fzjiage+zzjiage+cjqsjiage)
//VBSCall messagebox("合计 " & zongjiage & " MS")
Else
VBS zongjiage=0
EndIf
Return 计算价格
Sub 输入价钱
MoveTo 200,410
Delay 1000
Gosub 检测交易有没有被提前结束
LeftClick 1
Delay 100
Gosub 检测交易有没有被提前结束
LeftClick 1
Delay 1000
SayString zongjiage
Delay 1000
Rem 输入ms
MoveTo 263,415
Delay 1000
Gosub 检测交易有没有被提前结束
LeftClick 1
Delay 100
Gosub 检测交易有没有被提前结束
LeftClick 1
Delay 500
IfColor 263,415,8ccfde,2
Goto 输入ms
Else
MoveTo 136,513
Delay 500
Gosub 检测交易有没有被提前结束
LeftClick 1
Delay 300
EndIf
Return 输入价钱
Sub 交易等待
jsq=0
Rem 等待交易
If jsq>=20
MoveTo 205,515
Delay 1000
Gosub 检测交易有没有被提前结束
LeftClick 1
Delay 300
Goto 对方不交易
EndIf
IfColor 233,494,a5f62,2
Delay 1000
jsq=jsq+1
Goto 等待交易
Else
EndIf
Rem 对方不交易
Return 交易等待
4. 魔域自动打怪脚本
按键精灵
Rem start
While true // 或者 for 9999
VBS x=x+50
VBSCall FindColorEx(60,160,780,600,"0303B8",1,1,x,y)
//区域模煳找色 60,160,780,600为区域范围 "FFFFFF"为颜色 1为查找方式(中间向外) 1为模煳值 x,y为找到颜色后的坐标变量
If x>60 and y>160
//如果找到颜色 比如找到颜色就会赋值给坐标变量 通过判断坐标变量可以知道有没有找到怪
MoveTo x+12,y+20
//把鼠标移动到该色的坐标 如果找的是怪名字或血条 可能移动不到怪身上 这时就要用鼠标偏移 如：MoveTo x+10 y+10
Delay 50
//延时
LeftClick 5 //左键单击进行攻击
VBS y=y+50
VBS x=100
Goto start
Endif // 少了一句
EndIf
Delay 5000 //延时5秒
EndWhile // endfor
5. 跪求魔域12星座自动辅助脚本！！！免费的那种！！
下载一个，按键精灵
VBS dim x,y
//先定义变量
VBSCall GetCursorPos(x,y)
//获得当前的鼠标位置并保存在变量x,y中
VBSCall yans=GetPixelColor(x,y)
//得出当前鼠标的位置的颜色
WaitKey key
TracePrint "用户按下的键是：" & key
Rem 练功中
IfColor x,y,yans,1
MoveTo x,y
Else
EndIf
//进行鼠标复位
KeyPress key
Goto 练功中
//循环运行,脚本到此结束,精简吧!
6. 用按键精灵在魔域里进行后台快速幻化的脚本是什么
估计你没有先获取句柄吧，先用窗口命令再用后台插件结合使用才行
获取句柄常用有三种
Hwnd
=
Plugin.Window.Foreground()//当前窗口获取
Hwnd
=
Plugin.Window.MousePoint()//鼠标位置获取
Hwnd
=
Plugin.Window.Search("记事本")//标题模糊查找获取
返回值：Hwnd是按键精灵默认的参数，你可以改，可以不改，一旦改全部得改