收版本
网络安全
传奇开区版本定制开区加Q:1116114 200M带宽=热门服务器=限时秒杀 点击赞助此处文字位(#3) 点击赞助此处文字位(#4) 泰=山=服=务=器=打=死=退=款
点击赞助此处文字位(#6) 点击赞助此处文字位(#7) 游戏服务器¥71元/年☆改版本神器 香港免备案服务器¥65元/年 点击赞助此处文字位(#109)
 .齐天大圣 . 单职业迷失 迷失元素◆爆率高◆一切靠打◆长期耐玩 ‖   一个福利怪直接起飞   ‖ 领先市场全新给力版本
╲ 热血战神 ╱ 单职业神器 新版耐玩,光柱满屏,终极必爆,经典品牌 新年、、爆爆爆爆爆爆爆不完 领先市场全新给力版本
★成神之路★ 单职业专属 吊打所有专属●内容丰富●装备无限爆 超高爆率メ散人称霸メ等级好升メ 领先市场全新给力版本
部分体验推荐
版本名称 版本类型 版本介绍 版本说明 游戏网站
【绝迹禁区】 【单职业专属】 超多限时,刀刀光柱,激情耐玩 领先市场全新给力版本 进入游戏
【龙战玄黄】 【三职业火龙】 白嫖毕业,赞助可打,跨年巨作,超爽的PK 领先市场全新给力版本 进入游戏
【无限杀戮】 【单职业专属】 万能融合,专属成长,黑暗之力,无限杀戮 领先市场全新给力版本 进入游戏
【听雪楼专属】 【单职业专属】 超多限时,刀刀光柱,激情耐玩 领先市场全新给力版本 进入游戏
【变速狂刀】 【复古无限刀】 不变态★不秒杀★找回当年的感觉 领先市场全新给力版本 进入游戏
【王者迷失】 【单职业迷失】 上岸第一刀,先斩意中人,终极全都爆 领先市场全新给力版本 进入游戏
【青云传奇】 【三职业复古】 一切靠打★货币全爆★职业神器★散人为王 领先市场全新给力版本 进入游戏
【完美大极品】 【单职业大极品】 切割·吸血·攻速·全靠鉴定·散人追梦 领先市场全新给力版本 进入游戏
【终极复古】 【战神三职业】 装备材料爆率真实,天书、魂骨、藏宝箱 领先市场全新给力版本 进入游戏
查看: 5615|回复: 0

[传奇脚本]GOM/GEE传奇脚本装备鉴定大师脚本例子

[复制链接]

4506

主题

-5

回帖

6万

积分

管理员

积分
65207
QQ
发表于 2025-2-7 12:10:05 | 显示全部楼层 |阅读模式
[@main]
#IF
#Act
MOV S$衣服名称 <$DRESS>
MOV S$武器名称 <$WEAPON>
MOV S$头盔名称 <$HELMET>
MOV S$项链名称 <$NECKLACE>
MOV S$左手名称 <$ARMRING_R>
MOV S$右手名称 <$ARMRING_L>
MOV S$左戒名称 <$RING_R>
MOV S$右戒名称 <$RING_L>
MOV S$靴子名称 <$BOOTS>
MOV S$腰带名称 <$BELT>
MOV S$勋章名称 <$RIGHTHAND>
MOV S$宝石名称 <$CHARM>
MOV S$法宝名称 <$HORSE>
MOV S$斗笠名称 <$HAT>
MOV S$盾牌名称 <$SHIELD>
MOV S$魂珠名称 <$DRUM>
MOV S$战鼓名称 <$BUJUK>
MOV S$时装名称 <$SDRESS>
MOV S$衣服名称A <$DRESS>
MOV S$武器名称A <$WEAPON>
MOV S$头盔名称A <$HELMET>
MOV S$项链名称A <$NECKLACE>
MOV S$左手名称A <$ARMRING_R>
MOV S$右手名称A <$ARMRING_L>
MOV S$左戒名称A <$RING_R>
MOV S$右戒名称A <$RING_L>
MOV S$靴子名称A <$BOOTS>
MOV S$腰带名称A <$BELT>
MOV S$勋章名称A <$RIGHTHAND>
MOV S$宝石名称A <$CHARM>
MOV S$法宝名称A <$HORSE>
MOV S$斗笠名称A <$HAT>
MOV S$盾牌名称A <$SHIELD>
MOV S$魂珠名称A <$DRUM>
MOV S$战鼓名称A <$BUJUK>
MOV S$时装名称A <$SDRESS>
SetStringBlank <$STR(S$衣服名称)> 20 1
SetStringBlank <$STR(S$武器名称)> 20 1
SetStringBlank <$STR(S$头盔名称)> 20 1
SetStringBlank <$STR(S$项链名称)> 20 1
SetStringBlank <$STR(S$左手名称)> 20 1
SetStringBlank <$STR(S$右手名称)> 20 1
SetStringBlank <$STR(S$左戒名称)> 20 1
SetStringBlank <$STR(S$右戒名称)> 20 1
SetStringBlank <$STR(S$靴子名称)> 20 1
SetStringBlank <$STR(S$腰带名称)> 20 1
SetStringBlank <$STR(S$勋章名称)> 20 1
SetStringBlank <$STR(S$宝石名称)> 20 1
SetStringBlank <$STR(S$法宝名称)> 20 1
SetStringBlank <$STR(S$斗笠名称)> 20 1
SetStringBlank <$STR(S$盾牌名称)> 20 1
SetStringBlank <$STR(S$魂珠名称)> 20 1
SetStringBlank <$STR(S$战鼓名称)> 20 1
SetStringBlank <$STR(S$时装名称)> 20 1
OPENMERCHANTBIGDLG 43 505 1 0 2 26 1 411 2
#say
  <[头盔]/SCOLOR=70> <鉴定/@头盔改造>:{<$STR(S$头盔名称)>/SCOLOR=254}<[项链]/SCOLOR=70> <鉴定/@项链改造>:{<$STR(S$项链名称)>/SCOLOR=254}\
  <[左手]/SCOLOR=70> <鉴定/@左手改造>:{<$STR(S$左手名称)>/SCOLOR=254}<[右手]/SCOLOR=70> <鉴定/@右手改造>:{<$STR(S$右手名称)>/SCOLOR=254}\
  <[左戒]/SCOLOR=70> <鉴定/@左戒改造>:{<$STR(S$左戒名称)>/SCOLOR=254}<[右戒]/SCOLOR=70> <鉴定/@右戒改造>:{<$STR(S$右戒名称)>/SCOLOR=254}\
  <[腰带]/SCOLOR=70> <鉴定/@腰带改造>:{<$STR(S$腰带名称)>/SCOLOR=254}<[靴子]/SCOLOR=70> <鉴定/@靴子改造>:{<$STR(S$靴子名称)>/SCOLOR=254}\ \
  <[勋章]/SCOLOR=70> <鉴定/@勋章改造>:{<$STR(S$勋章名称)>/SCOLOR=254}<[斗笠]/SCOLOR=70> <鉴定/@斗笠改造>:{<$STR(S$斗笠名称)>/SCOLOR=254}\
  <[战鼓]/SCOLOR=70> <鉴定/@战鼓改造>:{<$STR(S$战鼓名称)>/SCOLOR=254}<[宝石]/SCOLOR=70> <鉴定/@宝石改造>:{<$STR(S$宝石名称)>/SCOLOR=254}\
  <[盾牌]/SCOLOR=70> <鉴定/@盾牌改造>:{<$STR(S$盾牌名称)>/SCOLOR=254}<[盾牌]/SCOLOR=70> <鉴定/@盾牌改造>:{<$STR(S$盾牌名称)>/SCOLOR=254}\
  <[武器]/SCOLOR=22> <鉴定/@武器改造>:{<$STR(S$武器名称)>/SCOLOR=254}<[衣服]/SCOLOR=22> <鉴定/@衣服改造>:{<$STR(S$衣服名称)>/SCOLOR=254}\ \
<>    <品质顺序→/SCOLOR=254><初级/SCOLOR=151>→<极品/SCOLOR=222>→<绝品/SCOLOR=70>→<远古/SCOLOR=253>→<神话/SCOLOR=254>→<至尊/SCOLOR=249>  <[转移]/SCOLOR=249><≮鉴定转移≯|254#鉴定后属性可以转移/@转换属性>  \
<>    <鉴定说明:首饰和特殊装备每次收取/SCOLOR=7><鉴定宝石/SCOLOR=249><1个,/SCOLOR=254><剑甲收取5个。/SCOLOR=254>\ \
<>         <≮买鉴定宝石*10≯|254#收取1000积分^253#给与10个鉴定宝石/@购买啦>\
[@购买啦]
#IF
CHECKGAMEGIRD > 999
#act
GAMEGIRD – 1000
give 鉴定宝石 10
MESSAGEBOX \\成功购买鉴定宝石10个!!
break
#ELSEACT
MESSAGEBOX \\对不起\\你的背包可能不足1000积分!!
break
[@鉴定神石啊]
#IF
#ACT
OPENMERCHANTBIGDLG 43 505 1 0 2 26 1 411 2
#SAY
<————————————————————-/AUTOCOLOR=7>\
<>                      <鉴定宝石回收中心/SCOLOR=253>\
;<————————————————————-/AUTOCOLOR=7>\
;<> <回收项目1:/SCOLOR=19><王者首饰回收: /SCOLOR=242><每个回收1个鉴定宝石/SCOLOR=243>   <一键回收|254#即点即收/@分解啊1>\
<————————————————————-/AUTOCOLOR=7>\
<> <回收项目1:/SCOLOR=20><风云首饰回收: /SCOLOR=242><每个回收1个鉴定宝石/SCOLOR=243>   <一键回收|254#即点即收/@分解啊2>\
<————————————————————-/AUTOCOLOR=7>\
<> <回收项目2:/SCOLOR=21><火龙剑甲回收: /SCOLOR=242><每个回收1个鉴定宝石/SCOLOR=243>   <一键回收|254#即点即收/@分解啊3>\
<————————————————————-/AUTOCOLOR=7>\
<> <回收项目3:/SCOLOR=21><冰龙剑甲回收: /SCOLOR=242><每个回收5个鉴定宝石/SCOLOR=243>   <一键回收|254#即点即收/@分解啊4>\
<————————————————————-/AUTOCOLOR=7>\
<> <回收项目4:/SCOLOR=21><王者剑甲回收: /SCOLOR=242><每个回收10个鉴定宝石/SCOLOR=243>   <一键回收|254#即点即收/@分解啊5>\
<————————————————————–/SCOLOR=70>\
<> <鉴定宝石除了boss爆出,也可以通过高级装备回收获得。/SCOLOR=254> \
[@分解啊5]
#IF
#ACT
MOV N57 0
MOV N$宝石7 0
MOV N$统计数量 0
MOV N$统计宝石 0
#IF
CHECKLEVELEX > 1
#ACT
TakeBagItem 王者神剑|王者神甲|王者神衣 46 0 0 0 0 N57 1
#if
LARGE N57 0
#ACT
MUL N$宝石7 10 <$STR(N57)>
#IF
#act
inc N$统计数量 <$STR(N57)>
inc N$统计宝石 <$STR(N$宝石7)>
#IF
LARGE N$统计数量 0
#ACT
give 鉴定宝石 <$STR(N$统计宝石)>
GuildNoticeMsg 0 70 玩家『<$USERNAME>』通过高级回收(<$STR(N$统计数量)>)件装备,获得<$STR(N$统计宝石)>个鉴定宝石!!
BREAK
#ELSEACT
MESSAGEBOX \\您的背包已经没有需要回收的物品!!!
BREAK
[@分解啊4]
#IF
#ACT
MOV N56 0
MOV N$宝石6 0
MOV N$统计数量 0
MOV N$统计宝石 0
#IF
CHECKLEVELEX > 1
#ACT
TakeBagItem 冰龙神剑|冰龙神甲|冰龙神衣 46 0 0 0 0 N56 1
#if
LARGE N56 0
#ACT
MUL N$宝石6 5 <$STR(N56)>
#IF
#act
inc N$统计数量 <$STR(N56)>
inc N$统计宝石 <$STR(N$宝石6)>
#IF
LARGE N$统计数量 0
#ACT
give 鉴定宝石 <$STR(N$统计宝石)>
GuildNoticeMsg 0 70 玩家『<$USERNAME>』通过高级回收(<$STR(N$统计数量)>)件装备,获得<$STR(N$统计宝石)>个鉴定宝石!!
BREAK
#ELSEACT
MESSAGEBOX \\您的背包已经没有需要回收的物品!!!
BREAK
[@分解啊3]
#IF
#ACT
MOV N55 0
MOV N$宝石5 0
MOV N$统计数量 0
MOV N$统计宝石 0
#IF
CHECKLEVELEX > 1
#ACT
TakeBagItem 火龙神剑|火龙神甲|火龙神衣 46 0 0 0 0 N55 1
#if
LARGE N55 0
#ACT
MUL N$宝石5 1 <$STR(N55)>
#IF
#act
inc N$统计数量 <$STR(N55)>
inc N$统计宝石 <$STR(N$宝石5)>
#IF
LARGE N$统计数量 0
#ACT
give 鉴定宝石 <$STR(N$统计宝石)>
GuildNoticeMsg 0 70 玩家『<$USERNAME>』通过高级回收(<$STR(N$统计数量)>)件装备,获得<$STR(N$统计宝石)>个鉴定宝石!!
BREAK
#ELSEACT
MESSAGEBOX \\您的背包已经没有需要回收的物品!!!
BREAK
[@分解啊2]
#IF
#ACT
MOV N54 0
MOV N$宝石4 0
MOV N$统计数量 0
MOV N$统计宝石 0
#IF
CHECKLEVELEX > 1
#ACT
TakeBagItem 风云神盔|风云神链|风云神镯|风云神戒|风云神带|风云神靴 46 0 0 0 0 N54 1
#if
LARGE N54 0
#ACT
MUL N$宝石4 1 <$STR(N54)>
#IF
#act
inc N$统计数量 <$STR(N54)>
inc N$统计宝石 <$STR(N$宝石4)>
#IF
LARGE N$统计数量 0
#ACT
give 鉴定宝石 <$STR(N$统计宝石)>
GuildNoticeMsg 0 70 玩家『<$USERNAME>』通过高级回收(<$STR(N$统计数量)>)件装备,获得<$STR(N$统计宝石)>个鉴定宝石!!
BREAK
#ELSEACT
MESSAGEBOX \\您的背包已经没有需要回收的物品!!!
BREAK
[@分解啊1]
#IF
#ACT
MOV N53 0
MOV N$宝石3 0
MOV N$统计数量 0
MOV N$统计宝石 0
#IF
CHECKLEVELEX > 1
#ACT
TakeBagItem 王者神盔|王者神链|王者神镯|王者神戒|王者神带|王者神靴 46 0 0 0 0 N53 1
#if
LARGE N53 0
#ACT
MUL N$宝石3 1 <$STR(N53)>
#IF
#act
inc N$统计数量 <$STR(N53)>
inc N$统计宝石 <$STR(N$宝石3)>
#IF
LARGE N$统计数量 0
#ACT
give 鉴定宝石 <$STR(N$统计宝石)>
GuildNoticeMsg 0 70 玩家『<$USERNAME>』通过高级回收(<$STR(N$统计数量)>)件装备,获得<$STR(N$统计宝石)>个鉴定宝石!!
BREAK
#ELSEACT
MESSAGEBOX \\您的背包已经没有需要回收的物品!!!
BREAK
[@转换属性]
#IF
#Act
mov  <$STR(N$附属字段1)>
mov  <$STR(N$附属字段2)>
OPENMERCHANTBIGDLG 43 505 1 0 2 26 1 411 2
#say
\ \ \
     <鉴定转移/SCOLOR=249> <支持所有鉴定的装备/SCOLOR=254> <【天罡火龙感谢一路有您!】/SCOLOR=239>\
\
<……………………………………………………………………………………/SCOLOR=249>\
< /SCOLOR=253>\
< /SCOLOR=253>\
< /SCOLOR=250>\
\
<                          ><【/SCOLOR=249><点击开始转移|254#手续费20金币/@转移开始><】/SCOLOR=249>\
<注意.继承属性的装备不管是否有属性.都会覆盖原有的属性值./SCOLOR=250> \ \
<有偿使用/SCOLOR=250><,武器转移武器-衣服转移衣服-项链转移项链。/SCOLOR=249>\
<金币充值比例1元=1金币。/SCOLOR=254>\
[@转移开始]
#IF
not checkGold 20
#ACT
ReturnBoxItem 6
ReturnBoxItem 7
MESSAGEBOX \\手续费需要20金币!\\手续费需要20金币!\\手续费需要20金币!\\手续费需要20金币!
BREAK
#IF
not equal <$STR(N$附属字段1)> <$STR(N$附属字段2)>
#ACT
ReturnBoxItem 6
ReturnBoxItem 7
MESSAGEBOX \\只能转换相同类型装备!比如戒指转换戒指!
CLOSE
BREAK
#IF
not CheckBoxItemCount 6
#act
MESSAGEBOX \\\请先放入有属性的装备!
CLOSE
BREAK
#IF
not CheckBoxItemCount 7
#act
MESSAGEBOX \\\请后放入无属性的装备!
CLOSE
BREAK
#IF
not CHECKTEXTLIST ..\QuestDiary\鉴定转移装备.txt <$BOXITEM[6].NAME>
#ACT
MESSAGEBOX \\\不可放入的装备!
CLOSE
BREAK
#IF
#act
SetUpgradeItem 6
CHANGECUSTOMITEMVALUE -1 0 = 0
CHANGECUSTOMITEMVALUE -1 1 = 0
CHANGECUSTOMITEMVALUE -1 2 = 0
CHANGECUSTOMITEMVALUE -1 3 = 0
CHANGECUSTOMITEMVALUE -1 4 = 0
CHANGECUSTOMITEMVALUE -1 5 = 0
CHANGECUSTOMITEMVALUE -1 6 = 0
CHANGECUSTOMITEMVALUE -1 7 = 0
CHANGECUSTOMITEMVALUE -1 8 = 0
CHANGECUSTOMITEMVALUE -1 9 = 0
CHANGECUSTOMITEMTEXT -1
#IF
#ACT
UpDateBoxItem 6
ReturnBoxItem 6
SetUpgradeItem 7
#IF
#ACT
CHANGECUSTOMITEMTEXT -1 <$STR(S$自定义文本内容)>
CHANGECUSTOMITEMTEXTCOLOR -1 <$STR(S$自定义文本颜色)>
CHANGECUSTOMITEMVALUE -1 1 = <$STR(S$自定义属性值1)>
CHANGECUSTOMITEMABIL -1 1 0 <$STR(S$自定义属性值颜色1)>
CHANGECUSTOMITEMABIL -1 1 1 <$STR(S$自定义属性类型1)>
CHANGECUSTOMITEMABIL -1 1 2 1
CHANGECUSTOMITEMABIL -1 2 0 <$STR(S$自定义属性值颜色2)>
CHANGECUSTOMITEMABIL -1 2 1 <$STR(S$自定义属性类型2)>
CHANGECUSTOMITEMABIL -1 2 2 2
CHANGECUSTOMITEMVALUE -1 2 = <$STR(S$自定义属性值2)>
CHANGECUSTOMITEMABIL -1 4 0 <$STR(S$自定义属性值颜色3)>
CHANGECUSTOMITEMABIL -1 4 1 <$STR(S$自定义属性类型3)>
CHANGECUSTOMITEMABIL -1 4 2 5
CHANGECUSTOMITEMABIL -1 4 3 0
CHANGECUSTOMITEMVALUE -1 4 = <$STR(S$自定义属性值3)>
take 金币 20
MESSAGEBOX \\装备转移成功!
#IF
#ACT
UpDateBoxItem 7
ReturnBoxItem 7
BREAK
[@ItemIntoBox7]
#IF
not CheckBoxItemCount 6
#act
ReturnBoxItem 7
MESSAGEBOX \\\请先放入有属性的装备!
CLOSE
BREAK
#IF
#ACT
mov  <$STR(N$附属字段2)> <$BOXITEM[7].STDMODE>
BREAK
[@ItemIntoBox6]
#IF
not checkGold 100
#ACT
ReturnBoxItem 6
ReturnBoxItem 7
MESSAGEBOX \\手续费需要100金币!\\手续费需要100金币!\\手续费需要100金币!\\手续费需要100金币!
BREAK
#IF
not CHECKTEXTLIST ..\QuestDiary\鉴定转移装备.txt <$BOXITEM[6].NAME>
#ACT
MESSAGEBOX \\\不可放入的装备!
CLOSE
BREAK
#IF
equal <$BOXITEM[6].CUSTOMTEXT>
#ACT
ReturnBoxItem 6
MESSAGEBOX \\\您的物品都没有鉴定过怎么转移呢?
CLOSE
BREAK
#IF
#ACT
mov  <$STR(N$附属字段1)> <$BOXITEM[6].STDMODE>
mov <$STR(S$自定义文本内容)> <$BOXITEM[6].CUSTOMTEXT>
mov <$STR(S$自定义文本颜色)> <$BOXITEM[6].CUSTOMTEXTCOLOR>
mov <$STR(S$自定义属性值1)> <$BOXITEM[6].CUSTOMVALUE.VALUE2>
mov <$STR(S$自定义属性值2)> <$BOXITEM[6].CUSTOMVALUE.VALUE3>
mov <$STR(S$自定义属性值3)> <$BOXITEM[6].CUSTOMVALUE.VALUE5>
mov <$STR(S$自定义属性值颜色1)> <$BOXITEM[6].CUSTOMVALUE.COLOR2>
mov <$STR(S$自定义属性值颜色2)> <$BOXITEM[6].CUSTOMVALUE.COLOR3>
mov <$STR(S$自定义属性值颜色3)> <$BOXITEM[6].CUSTOMVALUE.COLOR5>
mov <$STR(S$自定义属性类型1)> <$BOXITEM[6].CUSTOMVALUE.TYPE2>
mov <$STR(S$自定义属性类型2)> <$BOXITEM[6].CUSTOMVALUE.TYPE3>
mov <$STR(S$自定义属性类型3)> <$BOXITEM[6].CUSTOMVALUE.TYPE5>
[@头盔改造]
#IF
NOT CHECKUSEITEM 4
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 4 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 4 249
CHANGECUSTOMITEMVALUE 4 1 = 6
CHANGECUSTOMITEMABIL 4 1 0 249
CHANGECUSTOMITEMABIL 4 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 4 1 2 1
CHANGECUSTOMITEMABIL 4 2 0 249
CHANGECUSTOMITEMABIL 4 2 1 6
CHANGECUSTOMITEMABIL 4 2 2 2
CHANGECUSTOMITEMVALUE 4 2 = 21
CHANGECUSTOMITEMABIL 4 4 0 249
CHANGECUSTOMITEMABIL 4 4 1 17
CHANGECUSTOMITEMABIL 4 4 2 5
CHANGECUSTOMITEMABIL 4 4 3 0
CHANGECUSTOMITEMVALUE 4 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 4 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 4 254
CHANGECUSTOMITEMVALUE 4 1 = 5
CHANGECUSTOMITEMABIL 4 1 0 254
CHANGECUSTOMITEMABIL 4 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 4 1 2 1
CHANGECUSTOMITEMABIL 4 2 0 254
CHANGECUSTOMITEMABIL 4 2 1 6
CHANGECUSTOMITEMABIL 4 2 2 2
CHANGECUSTOMITEMVALUE 4 2 = 15
CHANGECUSTOMITEMABIL 4 4 0 254
CHANGECUSTOMITEMABIL 4 4 1 17
CHANGECUSTOMITEMABIL 4 4 2 5
CHANGECUSTOMITEMABIL 4 4 3 0
CHANGECUSTOMITEMVALUE 4 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 4 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 4 253
CHANGECUSTOMITEMVALUE 4 1 = 4
CHANGECUSTOMITEMABIL 4 1 0 253
CHANGECUSTOMITEMABIL 4 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 4 1 2 1
CHANGECUSTOMITEMABIL 4 2 0 253
CHANGECUSTOMITEMABIL 4 2 1 6
CHANGECUSTOMITEMABIL 4 2 2 2
CHANGECUSTOMITEMVALUE 4 2 = 10
CHANGECUSTOMITEMABIL 4 4 0 253
CHANGECUSTOMITEMABIL 4 4 1 17
CHANGECUSTOMITEMABIL 4 4 2 5
CHANGECUSTOMITEMABIL 4 4 3 0
CHANGECUSTOMITEMVALUE 4 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 4 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 4 70
CHANGECUSTOMITEMVALUE 4 1 = 3
CHANGECUSTOMITEMABIL 4 1 0 70
CHANGECUSTOMITEMABIL 4 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 4 1 2 1
CHANGECUSTOMITEMABIL 4 2 0 70
CHANGECUSTOMITEMABIL 4 2 1 6
CHANGECUSTOMITEMABIL 4 2 2 2
CHANGECUSTOMITEMVALUE 4 2 = 6
CHANGECUSTOMITEMABIL 4 4 0 70
CHANGECUSTOMITEMABIL 4 4 1 17
CHANGECUSTOMITEMABIL 4 4 2 5
CHANGECUSTOMITEMABIL 4 4 3 0
CHANGECUSTOMITEMVALUE 4 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 4 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 4 222
CHANGECUSTOMITEMVALUE 4 1 = 2
CHANGECUSTOMITEMABIL 4 1 0 222
CHANGECUSTOMITEMABIL 4 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 4 1 2 1
CHANGECUSTOMITEMABIL 4 2 0 222
CHANGECUSTOMITEMABIL 4 2 1 6
CHANGECUSTOMITEMABIL 4 2 2 2
CHANGECUSTOMITEMVALUE 4 2 = 3
CHANGECUSTOMITEMABIL 4 4 0 222
CHANGECUSTOMITEMABIL 4 4 1 17
CHANGECUSTOMITEMABIL 4 4 2 5
CHANGECUSTOMITEMABIL 4 4 3 0
CHANGECUSTOMITEMVALUE 4 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 4 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 4 151
CHANGECUSTOMITEMVALUE 4 1 = 1
CHANGECUSTOMITEMABIL 4 1 0 151
CHANGECUSTOMITEMABIL 4 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 4 1 2 1
CHANGECUSTOMITEMABIL 4 2 0 151
CHANGECUSTOMITEMABIL 4 2 1 6
CHANGECUSTOMITEMABIL 4 2 2 2
CHANGECUSTOMITEMVALUE 4 2 = 1
CHANGECUSTOMITEMABIL 4 4 0 151
CHANGECUSTOMITEMABIL 4 4 1 17
CHANGECUSTOMITEMABIL 4 4 2 5
CHANGECUSTOMITEMABIL 4 4 3 0
CHANGECUSTOMITEMVALUE 4 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@靴子改造]
#IF
NOT CHECKUSEITEM 11
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 11 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 11 249
CHANGECUSTOMITEMVALUE 11 1 = 6
CHANGECUSTOMITEMABIL 11 1 0 249
CHANGECUSTOMITEMABIL 11 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 11 1 2 1
CHANGECUSTOMITEMABIL 11 2 0 249
CHANGECUSTOMITEMABIL 11 2 1 6
CHANGECUSTOMITEMABIL 11 2 2 2
CHANGECUSTOMITEMVALUE 11 2 = 21
CHANGECUSTOMITEMABIL 11 4 0 249
CHANGECUSTOMITEMABIL 11 4 1 17
CHANGECUSTOMITEMABIL 11 4 2 5
CHANGECUSTOMITEMABIL 11 4 3 0
CHANGECUSTOMITEMVALUE 11 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 11 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 11 254
CHANGECUSTOMITEMVALUE 11 1 = 5
CHANGECUSTOMITEMABIL 11 1 0 254
CHANGECUSTOMITEMABIL 11 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 11 1 2 1
CHANGECUSTOMITEMABIL 11 2 0 254
CHANGECUSTOMITEMABIL 11 2 1 6
CHANGECUSTOMITEMABIL 11 2 2 2
CHANGECUSTOMITEMVALUE 11 2 = 15
CHANGECUSTOMITEMABIL 11 4 0 254
CHANGECUSTOMITEMABIL 11 4 1 17
CHANGECUSTOMITEMABIL 11 4 2 5
CHANGECUSTOMITEMABIL 11 4 3 0
CHANGECUSTOMITEMVALUE 11 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 11 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 11 253
CHANGECUSTOMITEMVALUE 11 1 = 4
CHANGECUSTOMITEMABIL 11 1 0 253
CHANGECUSTOMITEMABIL 11 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 11 1 2 1
CHANGECUSTOMITEMABIL 11 2 0 253
CHANGECUSTOMITEMABIL 11 2 1 6
CHANGECUSTOMITEMABIL 11 2 2 2
CHANGECUSTOMITEMVALUE 11 2 = 10
CHANGECUSTOMITEMABIL 11 4 0 253
CHANGECUSTOMITEMABIL 11 4 1 17
CHANGECUSTOMITEMABIL 11 4 2 5
CHANGECUSTOMITEMABIL 11 4 3 0
CHANGECUSTOMITEMVALUE 11 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 11 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 11 70
CHANGECUSTOMITEMVALUE 11 1 = 3
CHANGECUSTOMITEMABIL 11 1 0 70
CHANGECUSTOMITEMABIL 11 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 11 1 2 1
CHANGECUSTOMITEMABIL 11 2 0 70
CHANGECUSTOMITEMABIL 11 2 1 6
CHANGECUSTOMITEMABIL 11 2 2 2
CHANGECUSTOMITEMVALUE 11 2 = 6
CHANGECUSTOMITEMABIL 11 4 0 70
CHANGECUSTOMITEMABIL 11 4 1 17
CHANGECUSTOMITEMABIL 11 4 2 5
CHANGECUSTOMITEMABIL 11 4 3 0
CHANGECUSTOMITEMVALUE 11 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 11 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 11 222
CHANGECUSTOMITEMVALUE 11 1 = 2
CHANGECUSTOMITEMABIL 11 1 0 222
CHANGECUSTOMITEMABIL 11 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 11 1 2 1
CHANGECUSTOMITEMABIL 11 2 0 222
CHANGECUSTOMITEMABIL 11 2 1 6
CHANGECUSTOMITEMABIL 11 2 2 2
CHANGECUSTOMITEMVALUE 11 2 = 3
CHANGECUSTOMITEMABIL 11 4 0 222
CHANGECUSTOMITEMABIL 11 4 1 17
CHANGECUSTOMITEMABIL 11 4 2 5
CHANGECUSTOMITEMABIL 11 4 3 0
CHANGECUSTOMITEMVALUE 11 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 11 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 11 151
CHANGECUSTOMITEMVALUE 11 1 = 1
CHANGECUSTOMITEMABIL 11 1 0 151
CHANGECUSTOMITEMABIL 11 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 11 1 2 1
CHANGECUSTOMITEMABIL 11 2 0 151
CHANGECUSTOMITEMABIL 11 2 1 6
CHANGECUSTOMITEMABIL 11 2 2 2
CHANGECUSTOMITEMVALUE 11 2 = 1
CHANGECUSTOMITEMABIL 11 4 0 151
CHANGECUSTOMITEMABIL 11 4 1 17
CHANGECUSTOMITEMABIL 11 4 2 5
CHANGECUSTOMITEMABIL 11 4 3 0
CHANGECUSTOMITEMVALUE 11 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@腰带改造]
#IF
NOT CHECKUSEITEM 10
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 10 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 10 249
CHANGECUSTOMITEMVALUE 10 1 = 6
CHANGECUSTOMITEMABIL 10 1 0 249
CHANGECUSTOMITEMABIL 10 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 10 1 2 1
CHANGECUSTOMITEMABIL 10 2 0 249
CHANGECUSTOMITEMABIL 10 2 1 6
CHANGECUSTOMITEMABIL 10 2 2 2
CHANGECUSTOMITEMVALUE 10 2 = 21
CHANGECUSTOMITEMABIL 10 4 0 249
CHANGECUSTOMITEMABIL 10 4 1 17
CHANGECUSTOMITEMABIL 10 4 2 5
CHANGECUSTOMITEMABIL 10 4 3 0
CHANGECUSTOMITEMVALUE 10 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 10 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 10 254
CHANGECUSTOMITEMVALUE 10 1 = 5
CHANGECUSTOMITEMABIL 10 1 0 254
CHANGECUSTOMITEMABIL 10 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 10 1 2 1
CHANGECUSTOMITEMABIL 10 2 0 254
CHANGECUSTOMITEMABIL 10 2 1 6
CHANGECUSTOMITEMABIL 10 2 2 2
CHANGECUSTOMITEMVALUE 10 2 = 15
CHANGECUSTOMITEMABIL 10 4 0 254
CHANGECUSTOMITEMABIL 10 4 1 17
CHANGECUSTOMITEMABIL 10 4 2 5
CHANGECUSTOMITEMABIL 10 4 3 0
CHANGECUSTOMITEMVALUE 10 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 10 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 10 253
CHANGECUSTOMITEMVALUE 10 1 = 4
CHANGECUSTOMITEMABIL 10 1 0 253
CHANGECUSTOMITEMABIL 10 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 10 1 2 1
CHANGECUSTOMITEMABIL 10 2 0 253
CHANGECUSTOMITEMABIL 10 2 1 6
CHANGECUSTOMITEMABIL 10 2 2 2
CHANGECUSTOMITEMVALUE 10 2 = 10
CHANGECUSTOMITEMABIL 10 4 0 253
CHANGECUSTOMITEMABIL 10 4 1 17
CHANGECUSTOMITEMABIL 10 4 2 5
CHANGECUSTOMITEMABIL 10 4 3 0
CHANGECUSTOMITEMVALUE 10 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 10 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 10 70
CHANGECUSTOMITEMVALUE 10 1 = 3
CHANGECUSTOMITEMABIL 10 1 0 70
CHANGECUSTOMITEMABIL 10 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 10 1 2 1
CHANGECUSTOMITEMABIL 10 2 0 70
CHANGECUSTOMITEMABIL 10 2 1 6
CHANGECUSTOMITEMABIL 10 2 2 2
CHANGECUSTOMITEMVALUE 10 2 = 6
CHANGECUSTOMITEMABIL 10 4 0 70
CHANGECUSTOMITEMABIL 10 4 1 17
CHANGECUSTOMITEMABIL 10 4 2 5
CHANGECUSTOMITEMABIL 10 4 3 0
CHANGECUSTOMITEMVALUE 10 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 10 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 10 222
CHANGECUSTOMITEMVALUE 10 1 = 2
CHANGECUSTOMITEMABIL 10 1 0 222
CHANGECUSTOMITEMABIL 10 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 10 1 2 1
CHANGECUSTOMITEMABIL 10 2 0 222
CHANGECUSTOMITEMABIL 10 2 1 6
CHANGECUSTOMITEMABIL 10 2 2 2
CHANGECUSTOMITEMVALUE 10 2 = 3
CHANGECUSTOMITEMABIL 10 4 0 222
CHANGECUSTOMITEMABIL 10 4 1 17
CHANGECUSTOMITEMABIL 10 4 2 5
CHANGECUSTOMITEMABIL 10 4 3 0
CHANGECUSTOMITEMVALUE 10 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 10 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 10 151
CHANGECUSTOMITEMVALUE 10 1 = 1
CHANGECUSTOMITEMABIL 10 1 0 151
CHANGECUSTOMITEMABIL 10 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 10 1 2 1
CHANGECUSTOMITEMABIL 10 2 0 151
CHANGECUSTOMITEMABIL 10 2 1 6
CHANGECUSTOMITEMABIL 10 2 2 2
CHANGECUSTOMITEMVALUE 10 2 = 1
CHANGECUSTOMITEMABIL 10 4 0 151
CHANGECUSTOMITEMABIL 10 4 1 17
CHANGECUSTOMITEMABIL 10 4 2 5
CHANGECUSTOMITEMABIL 10 4 3 0
CHANGECUSTOMITEMVALUE 10 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@右戒改造]
#IF
NOT CHECKUSEITEM 7
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 7 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 7 249
CHANGECUSTOMITEMVALUE 7 1 = 6
CHANGECUSTOMITEMABIL 7 1 0 249
CHANGECUSTOMITEMABIL 7 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 7 1 2 1
CHANGECUSTOMITEMABIL 7 2 0 249
CHANGECUSTOMITEMABIL 7 2 1 6
CHANGECUSTOMITEMABIL 7 2 2 2
CHANGECUSTOMITEMVALUE 7 2 = 21
CHANGECUSTOMITEMABIL 7 4 0 249
CHANGECUSTOMITEMABIL 7 4 1 17
CHANGECUSTOMITEMABIL 7 4 2 5
CHANGECUSTOMITEMABIL 7 4 3 0
CHANGECUSTOMITEMVALUE 7 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 7 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 7 254
CHANGECUSTOMITEMVALUE 7 1 = 5
CHANGECUSTOMITEMABIL 7 1 0 254
CHANGECUSTOMITEMABIL 7 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 7 1 2 1
CHANGECUSTOMITEMABIL 7 2 0 254
CHANGECUSTOMITEMABIL 7 2 1 6
CHANGECUSTOMITEMABIL 7 2 2 2
CHANGECUSTOMITEMVALUE 7 2 = 15
CHANGECUSTOMITEMABIL 7 4 0 254
CHANGECUSTOMITEMABIL 7 4 1 17
CHANGECUSTOMITEMABIL 7 4 2 5
CHANGECUSTOMITEMABIL 7 4 3 0
CHANGECUSTOMITEMVALUE 7 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 7 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 7 253
CHANGECUSTOMITEMVALUE 7 1 = 4
CHANGECUSTOMITEMABIL 7 1 0 253
CHANGECUSTOMITEMABIL 7 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 7 1 2 1
CHANGECUSTOMITEMABIL 7 2 0 253
CHANGECUSTOMITEMABIL 7 2 1 6
CHANGECUSTOMITEMABIL 7 2 2 2
CHANGECUSTOMITEMVALUE 7 2 = 10
CHANGECUSTOMITEMABIL 7 4 0 253
CHANGECUSTOMITEMABIL 7 4 1 17
CHANGECUSTOMITEMABIL 7 4 2 5
CHANGECUSTOMITEMABIL 7 4 3 0
CHANGECUSTOMITEMVALUE 7 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 7 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 7 70
CHANGECUSTOMITEMVALUE 7 1 = 3
CHANGECUSTOMITEMABIL 7 1 0 70
CHANGECUSTOMITEMABIL 7 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 7 1 2 1
CHANGECUSTOMITEMABIL 7 2 0 70
CHANGECUSTOMITEMABIL 7 2 1 6
CHANGECUSTOMITEMABIL 7 2 2 2
CHANGECUSTOMITEMVALUE 7 2 = 6
CHANGECUSTOMITEMABIL 7 4 0 70
CHANGECUSTOMITEMABIL 7 4 1 17
CHANGECUSTOMITEMABIL 7 4 2 5
CHANGECUSTOMITEMABIL 7 4 3 0
CHANGECUSTOMITEMVALUE 7 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 7 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 7 222
CHANGECUSTOMITEMVALUE 7 1 = 2
CHANGECUSTOMITEMABIL 7 1 0 222
CHANGECUSTOMITEMABIL 7 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 7 1 2 1
CHANGECUSTOMITEMABIL 7 2 0 222
CHANGECUSTOMITEMABIL 7 2 1 6
CHANGECUSTOMITEMABIL 7 2 2 2
CHANGECUSTOMITEMVALUE 7 2 = 3
CHANGECUSTOMITEMABIL 7 4 0 222
CHANGECUSTOMITEMABIL 7 4 1 17
CHANGECUSTOMITEMABIL 7 4 2 5
CHANGECUSTOMITEMABIL 7 4 3 0
CHANGECUSTOMITEMVALUE 7 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 7 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 7 151
CHANGECUSTOMITEMVALUE 7 1 = 1
CHANGECUSTOMITEMABIL 7 1 0 151
CHANGECUSTOMITEMABIL 7 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 7 1 2 1
CHANGECUSTOMITEMABIL 7 2 0 151
CHANGECUSTOMITEMABIL 7 2 1 6
CHANGECUSTOMITEMABIL 7 2 2 2
CHANGECUSTOMITEMVALUE 7 2 = 1
CHANGECUSTOMITEMABIL 7 4 0 151
CHANGECUSTOMITEMABIL 7 4 1 17
CHANGECUSTOMITEMABIL 7 4 2 5
CHANGECUSTOMITEMABIL 7 4 3 0
CHANGECUSTOMITEMVALUE 7 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@左戒改造]
#IF
NOT CHECKUSEITEM 8
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 8 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 8 249
CHANGECUSTOMITEMVALUE 8 1 = 6
CHANGECUSTOMITEMABIL 8 1 0 249
CHANGECUSTOMITEMABIL 8 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 8 1 2 1
CHANGECUSTOMITEMABIL 8 2 0 249
CHANGECUSTOMITEMABIL 8 2 1 6
CHANGECUSTOMITEMABIL 8 2 2 2
CHANGECUSTOMITEMVALUE 8 2 = 21
CHANGECUSTOMITEMABIL 8 4 0 249
CHANGECUSTOMITEMABIL 8 4 1 17
CHANGECUSTOMITEMABIL 8 4 2 5
CHANGECUSTOMITEMABIL 8 4 3 0
CHANGECUSTOMITEMVALUE 8 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 8 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 8 254
CHANGECUSTOMITEMVALUE 8 1 = 5
CHANGECUSTOMITEMABIL 8 1 0 254
CHANGECUSTOMITEMABIL 8 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 8 1 2 1
CHANGECUSTOMITEMABIL 8 2 0 254
CHANGECUSTOMITEMABIL 8 2 1 6
CHANGECUSTOMITEMABIL 8 2 2 2
CHANGECUSTOMITEMVALUE 8 2 = 15
CHANGECUSTOMITEMABIL 8 4 0 254
CHANGECUSTOMITEMABIL 8 4 1 17
CHANGECUSTOMITEMABIL 8 4 2 5
CHANGECUSTOMITEMABIL 8 4 3 0
CHANGECUSTOMITEMVALUE 8 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 8 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 8 253
CHANGECUSTOMITEMVALUE 8 1 = 4
CHANGECUSTOMITEMABIL 8 1 0 253
CHANGECUSTOMITEMABIL 8 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 8 1 2 1
CHANGECUSTOMITEMABIL 8 2 0 253
CHANGECUSTOMITEMABIL 8 2 1 6
CHANGECUSTOMITEMABIL 8 2 2 2
CHANGECUSTOMITEMVALUE 8 2 = 10
CHANGECUSTOMITEMABIL 8 4 0 253
CHANGECUSTOMITEMABIL 8 4 1 17
CHANGECUSTOMITEMABIL 8 4 2 5
CHANGECUSTOMITEMABIL 8 4 3 0
CHANGECUSTOMITEMVALUE 8 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 8 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 8 70
CHANGECUSTOMITEMVALUE 8 1 = 3
CHANGECUSTOMITEMABIL 8 1 0 70
CHANGECUSTOMITEMABIL 8 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 8 1 2 1
CHANGECUSTOMITEMABIL 8 2 0 70
CHANGECUSTOMITEMABIL 8 2 1 6
CHANGECUSTOMITEMABIL 8 2 2 2
CHANGECUSTOMITEMVALUE 8 2 = 6
CHANGECUSTOMITEMABIL 8 4 0 70
CHANGECUSTOMITEMABIL 8 4 1 17
CHANGECUSTOMITEMABIL 8 4 2 5
CHANGECUSTOMITEMABIL 8 4 3 0
CHANGECUSTOMITEMVALUE 8 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 8 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 8 222
CHANGECUSTOMITEMVALUE 8 1 = 2
CHANGECUSTOMITEMABIL 8 1 0 222
CHANGECUSTOMITEMABIL 8 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 8 1 2 1
CHANGECUSTOMITEMABIL 8 2 0 222
CHANGECUSTOMITEMABIL 8 2 1 6
CHANGECUSTOMITEMABIL 8 2 2 2
CHANGECUSTOMITEMVALUE 8 2 = 3
CHANGECUSTOMITEMABIL 8 4 0 222
CHANGECUSTOMITEMABIL 8 4 1 17
CHANGECUSTOMITEMABIL 8 4 2 5
CHANGECUSTOMITEMABIL 8 4 3 0
CHANGECUSTOMITEMVALUE 8 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 8 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 8 151
CHANGECUSTOMITEMVALUE 8 1 = 1
CHANGECUSTOMITEMABIL 8 1 0 151
CHANGECUSTOMITEMABIL 8 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 8 1 2 1
CHANGECUSTOMITEMABIL 8 2 0 151
CHANGECUSTOMITEMABIL 8 2 1 6
CHANGECUSTOMITEMABIL 8 2 2 2
CHANGECUSTOMITEMVALUE 8 2 = 1
CHANGECUSTOMITEMABIL 8 4 0 151
CHANGECUSTOMITEMABIL 8 4 1 17
CHANGECUSTOMITEMABIL 8 4 2 5
CHANGECUSTOMITEMABIL 8 4 3 0
CHANGECUSTOMITEMVALUE 8 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@左手改造]
#IF
NOT CHECKUSEITEM 6
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 6 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 6 249
CHANGECUSTOMITEMVALUE 6 1 = 6
CHANGECUSTOMITEMABIL 6 1 0 249
CHANGECUSTOMITEMABIL 6 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 6 1 2 1
CHANGECUSTOMITEMABIL 6 2 0 249
CHANGECUSTOMITEMABIL 6 2 1 6
CHANGECUSTOMITEMABIL 6 2 2 2
CHANGECUSTOMITEMVALUE 6 2 = 21
CHANGECUSTOMITEMABIL 6 4 0 249
CHANGECUSTOMITEMABIL 6 4 1 17
CHANGECUSTOMITEMABIL 6 4 2 5
CHANGECUSTOMITEMABIL 6 4 3 0
CHANGECUSTOMITEMVALUE 6 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 6 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 6 254
CHANGECUSTOMITEMVALUE 6 1 = 5
CHANGECUSTOMITEMABIL 6 1 0 254
CHANGECUSTOMITEMABIL 6 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 6 1 2 1
CHANGECUSTOMITEMABIL 6 2 0 254
CHANGECUSTOMITEMABIL 6 2 1 6
CHANGECUSTOMITEMABIL 6 2 2 2
CHANGECUSTOMITEMVALUE 6 2 = 15
CHANGECUSTOMITEMABIL 6 4 0 254
CHANGECUSTOMITEMABIL 6 4 1 17
CHANGECUSTOMITEMABIL 6 4 2 5
CHANGECUSTOMITEMABIL 6 4 3 0
CHANGECUSTOMITEMVALUE 6 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 6 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 6 253
CHANGECUSTOMITEMVALUE 6 1 = 4
CHANGECUSTOMITEMABIL 6 1 0 253
CHANGECUSTOMITEMABIL 6 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 6 1 2 1
CHANGECUSTOMITEMABIL 6 2 0 253
CHANGECUSTOMITEMABIL 6 2 1 6
CHANGECUSTOMITEMABIL 6 2 2 2
CHANGECUSTOMITEMVALUE 6 2 = 10
CHANGECUSTOMITEMABIL 6 4 0 253
CHANGECUSTOMITEMABIL 6 4 1 17
CHANGECUSTOMITEMABIL 6 4 2 5
CHANGECUSTOMITEMABIL 6 4 3 0
CHANGECUSTOMITEMVALUE 6 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 6 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 6 70
CHANGECUSTOMITEMVALUE 6 1 = 3
CHANGECUSTOMITEMABIL 6 1 0 70
CHANGECUSTOMITEMABIL 6 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 6 1 2 1
CHANGECUSTOMITEMABIL 6 2 0 70
CHANGECUSTOMITEMABIL 6 2 1 6
CHANGECUSTOMITEMABIL 6 2 2 2
CHANGECUSTOMITEMVALUE 6 2 = 6
CHANGECUSTOMITEMABIL 6 4 0 70
CHANGECUSTOMITEMABIL 6 4 1 17
CHANGECUSTOMITEMABIL 6 4 2 5
CHANGECUSTOMITEMABIL 6 4 3 0
CHANGECUSTOMITEMVALUE 6 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 6 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 6 222
CHANGECUSTOMITEMVALUE 6 1 = 2
CHANGECUSTOMITEMABIL 6 1 0 222
CHANGECUSTOMITEMABIL 6 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 6 1 2 1
CHANGECUSTOMITEMABIL 6 2 0 222
CHANGECUSTOMITEMABIL 6 2 1 6
CHANGECUSTOMITEMABIL 6 2 2 2
CHANGECUSTOMITEMVALUE 6 2 = 3
CHANGECUSTOMITEMABIL 6 4 0 222
CHANGECUSTOMITEMABIL 6 4 1 17
CHANGECUSTOMITEMABIL 6 4 2 5
CHANGECUSTOMITEMABIL 6 4 3 0
CHANGECUSTOMITEMVALUE 6 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 6 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 6 151
CHANGECUSTOMITEMVALUE 6 1 = 1
CHANGECUSTOMITEMABIL 6 1 0 151
CHANGECUSTOMITEMABIL 6 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 6 1 2 1
CHANGECUSTOMITEMABIL 6 2 0 151
CHANGECUSTOMITEMABIL 6 2 1 6
CHANGECUSTOMITEMABIL 6 2 2 2
CHANGECUSTOMITEMVALUE 6 2 = 1
CHANGECUSTOMITEMABIL 6 4 0 151
CHANGECUSTOMITEMABIL 6 4 1 17
CHANGECUSTOMITEMABIL 6 4 2 5
CHANGECUSTOMITEMABIL 6 4 3 0
CHANGECUSTOMITEMVALUE 6 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@右手改造]
#IF
NOT CHECKUSEITEM 5
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 5 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 5 249
CHANGECUSTOMITEMVALUE 5 1 = 6
CHANGECUSTOMITEMABIL 5 1 0 249
CHANGECUSTOMITEMABIL 5 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 5 1 2 1
CHANGECUSTOMITEMABIL 5 2 0 249
CHANGECUSTOMITEMABIL 5 2 1 6
CHANGECUSTOMITEMABIL 5 2 2 2
CHANGECUSTOMITEMVALUE 5 2 = 21
CHANGECUSTOMITEMABIL 5 4 0 249
CHANGECUSTOMITEMABIL 5 4 1 17
CHANGECUSTOMITEMABIL 5 4 2 5
CHANGECUSTOMITEMABIL 5 4 3 0
CHANGECUSTOMITEMVALUE 5 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 5 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 5 254
CHANGECUSTOMITEMVALUE 5 1 = 5
CHANGECUSTOMITEMABIL 5 1 0 254
CHANGECUSTOMITEMABIL 5 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 5 1 2 1
CHANGECUSTOMITEMABIL 5 2 0 254
CHANGECUSTOMITEMABIL 5 2 1 6
CHANGECUSTOMITEMABIL 5 2 2 2
CHANGECUSTOMITEMVALUE 5 2 = 15
CHANGECUSTOMITEMABIL 5 4 0 254
CHANGECUSTOMITEMABIL 5 4 1 17
CHANGECUSTOMITEMABIL 5 4 2 5
CHANGECUSTOMITEMABIL 5 4 3 0
CHANGECUSTOMITEMVALUE 5 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 5 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 5 253
CHANGECUSTOMITEMVALUE 5 1 = 4
CHANGECUSTOMITEMABIL 5 1 0 253
CHANGECUSTOMITEMABIL 5 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 5 1 2 1
CHANGECUSTOMITEMABIL 5 2 0 253
CHANGECUSTOMITEMABIL 5 2 1 6
CHANGECUSTOMITEMABIL 5 2 2 2
CHANGECUSTOMITEMVALUE 5 2 = 10
CHANGECUSTOMITEMABIL 5 4 0 253
CHANGECUSTOMITEMABIL 5 4 1 17
CHANGECUSTOMITEMABIL 5 4 2 5
CHANGECUSTOMITEMABIL 5 4 3 0
CHANGECUSTOMITEMVALUE 5 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 5 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 5 70
CHANGECUSTOMITEMVALUE 5 1 = 3
CHANGECUSTOMITEMABIL 5 1 0 70
CHANGECUSTOMITEMABIL 5 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 5 1 2 1
CHANGECUSTOMITEMABIL 5 2 0 70
CHANGECUSTOMITEMABIL 5 2 1 6
CHANGECUSTOMITEMABIL 5 2 2 2
CHANGECUSTOMITEMVALUE 5 2 = 6
CHANGECUSTOMITEMABIL 5 4 0 70
CHANGECUSTOMITEMABIL 5 4 1 17
CHANGECUSTOMITEMABIL 5 4 2 5
CHANGECUSTOMITEMABIL 5 4 3 0
CHANGECUSTOMITEMVALUE 5 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 5 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 5 222
CHANGECUSTOMITEMVALUE 5 1 = 2
CHANGECUSTOMITEMABIL 5 1 0 222
CHANGECUSTOMITEMABIL 5 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 5 1 2 1
CHANGECUSTOMITEMABIL 5 2 0 222
CHANGECUSTOMITEMABIL 5 2 1 6
CHANGECUSTOMITEMABIL 5 2 2 2
CHANGECUSTOMITEMVALUE 5 2 = 3
CHANGECUSTOMITEMABIL 5 4 0 222
CHANGECUSTOMITEMABIL 5 4 1 17
CHANGECUSTOMITEMABIL 5 4 2 5
CHANGECUSTOMITEMABIL 5 4 3 0
CHANGECUSTOMITEMVALUE 5 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 5 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 5 151
CHANGECUSTOMITEMVALUE 5 1 = 1
CHANGECUSTOMITEMABIL 5 1 0 151
CHANGECUSTOMITEMABIL 5 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 5 1 2 1
CHANGECUSTOMITEMABIL 5 2 0 151
CHANGECUSTOMITEMABIL 5 2 1 6
CHANGECUSTOMITEMABIL 5 2 2 2
CHANGECUSTOMITEMVALUE 5 2 = 1
CHANGECUSTOMITEMABIL 5 4 0 151
CHANGECUSTOMITEMABIL 5 4 1 17
CHANGECUSTOMITEMABIL 5 4 2 5
CHANGECUSTOMITEMABIL 5 4 3 0
CHANGECUSTOMITEMVALUE 5 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@项链改造]
#IF
NOT CHECKUSEITEM 3
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 3 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 3 249
CHANGECUSTOMITEMVALUE 3 1 = 6
CHANGECUSTOMITEMABIL 3 1 0 249
CHANGECUSTOMITEMABIL 3 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 3 1 2 1
CHANGECUSTOMITEMABIL 3 2 0 249
CHANGECUSTOMITEMABIL 3 2 1 6
CHANGECUSTOMITEMABIL 3 2 2 2
CHANGECUSTOMITEMVALUE 3 2 = 21
CHANGECUSTOMITEMABIL 3 4 0 249
CHANGECUSTOMITEMABIL 3 4 1 17
CHANGECUSTOMITEMABIL 3 4 2 5
CHANGECUSTOMITEMABIL 3 4 3 0
CHANGECUSTOMITEMVALUE 3 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 3 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 3 254
CHANGECUSTOMITEMVALUE 3 1 = 5
CHANGECUSTOMITEMABIL 3 1 0 254
CHANGECUSTOMITEMABIL 3 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 3 1 2 1
CHANGECUSTOMITEMABIL 3 2 0 254
CHANGECUSTOMITEMABIL 3 2 1 6
CHANGECUSTOMITEMABIL 3 2 2 2
CHANGECUSTOMITEMVALUE 3 2 = 15
CHANGECUSTOMITEMABIL 3 4 0 254
CHANGECUSTOMITEMABIL 3 4 1 17
CHANGECUSTOMITEMABIL 3 4 2 5
CHANGECUSTOMITEMABIL 3 4 3 0
CHANGECUSTOMITEMVALUE 3 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 3 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 3 253
CHANGECUSTOMITEMVALUE 3 1 = 4
CHANGECUSTOMITEMABIL 3 1 0 253
CHANGECUSTOMITEMABIL 3 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 3 1 2 1
CHANGECUSTOMITEMABIL 3 2 0 253
CHANGECUSTOMITEMABIL 3 2 1 6
CHANGECUSTOMITEMABIL 3 2 2 2
CHANGECUSTOMITEMVALUE 3 2 = 10
CHANGECUSTOMITEMABIL 3 4 0 253
CHANGECUSTOMITEMABIL 3 4 1 17
CHANGECUSTOMITEMABIL 3 4 2 5
CHANGECUSTOMITEMABIL 3 4 3 0
CHANGECUSTOMITEMVALUE 3 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 3 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 3 70
CHANGECUSTOMITEMVALUE 3 1 = 3
CHANGECUSTOMITEMABIL 3 1 0 70
CHANGECUSTOMITEMABIL 3 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 3 1 2 1
CHANGECUSTOMITEMABIL 3 2 0 70
CHANGECUSTOMITEMABIL 3 2 1 6
CHANGECUSTOMITEMABIL 3 2 2 2
CHANGECUSTOMITEMVALUE 3 2 = 6
CHANGECUSTOMITEMABIL 3 4 0 70
CHANGECUSTOMITEMABIL 3 4 1 17
CHANGECUSTOMITEMABIL 3 4 2 5
CHANGECUSTOMITEMABIL 3 4 3 0
CHANGECUSTOMITEMVALUE 3 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 3 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 3 222
CHANGECUSTOMITEMVALUE 3 1 = 2
CHANGECUSTOMITEMABIL 3 1 0 222
CHANGECUSTOMITEMABIL 3 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 3 1 2 1
CHANGECUSTOMITEMABIL 3 2 0 222
CHANGECUSTOMITEMABIL 3 2 1 6
CHANGECUSTOMITEMABIL 3 2 2 2
CHANGECUSTOMITEMVALUE 3 2 = 3
CHANGECUSTOMITEMABIL 3 4 0 222
CHANGECUSTOMITEMABIL 3 4 1 17
CHANGECUSTOMITEMABIL 3 4 2 5
CHANGECUSTOMITEMABIL 3 4 3 0
CHANGECUSTOMITEMVALUE 3 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 3 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 3 151
CHANGECUSTOMITEMVALUE 3 1 = 1
CHANGECUSTOMITEMABIL 3 1 0 151
CHANGECUSTOMITEMABIL 3 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 3 1 2 1
CHANGECUSTOMITEMABIL 3 2 0 151
CHANGECUSTOMITEMABIL 3 2 1 6
CHANGECUSTOMITEMABIL 3 2 2 2
CHANGECUSTOMITEMVALUE 3 2 = 1
CHANGECUSTOMITEMABIL 3 4 0 151
CHANGECUSTOMITEMABIL 3 4 1 17
CHANGECUSTOMITEMABIL 3 4 2 5
CHANGECUSTOMITEMABIL 3 4 3 0
CHANGECUSTOMITEMVALUE 3 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@勋章改造]
#IF
NOT CHECKUSEITEM 2
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 2 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 2 249
CHANGECUSTOMITEMVALUE 2 1 = 6
CHANGECUSTOMITEMABIL 2 1 0 249
CHANGECUSTOMITEMABIL 2 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 2 1 2 1
CHANGECUSTOMITEMABIL 2 2 0 249
CHANGECUSTOMITEMABIL 2 2 1 6
CHANGECUSTOMITEMABIL 2 2 2 2
CHANGECUSTOMITEMVALUE 2 2 = 21
CHANGECUSTOMITEMABIL 2 4 0 249
CHANGECUSTOMITEMABIL 2 4 1 17
CHANGECUSTOMITEMABIL 2 4 2 5
CHANGECUSTOMITEMABIL 2 4 3 0
CHANGECUSTOMITEMVALUE 2 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 2 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 2 254
CHANGECUSTOMITEMVALUE 2 1 = 5
CHANGECUSTOMITEMABIL 2 1 0 254
CHANGECUSTOMITEMABIL 2 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 2 1 2 1
CHANGECUSTOMITEMABIL 2 2 0 254
CHANGECUSTOMITEMABIL 2 2 1 6
CHANGECUSTOMITEMABIL 2 2 2 2
CHANGECUSTOMITEMVALUE 2 2 = 15
CHANGECUSTOMITEMABIL 2 4 0 254
CHANGECUSTOMITEMABIL 2 4 1 17
CHANGECUSTOMITEMABIL 2 4 2 5
CHANGECUSTOMITEMABIL 2 4 3 0
CHANGECUSTOMITEMVALUE 2 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 2 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 2 253
CHANGECUSTOMITEMVALUE 2 1 = 4
CHANGECUSTOMITEMABIL 2 1 0 253
CHANGECUSTOMITEMABIL 2 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 2 1 2 1
CHANGECUSTOMITEMABIL 2 2 0 253
CHANGECUSTOMITEMABIL 2 2 1 6
CHANGECUSTOMITEMABIL 2 2 2 2
CHANGECUSTOMITEMVALUE 2 2 = 10
CHANGECUSTOMITEMABIL 2 4 0 253
CHANGECUSTOMITEMABIL 2 4 1 17
CHANGECUSTOMITEMABIL 2 4 2 5
CHANGECUSTOMITEMABIL 2 4 3 0
CHANGECUSTOMITEMVALUE 2 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 2 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 2 70
CHANGECUSTOMITEMVALUE 2 1 = 3
CHANGECUSTOMITEMABIL 2 1 0 70
CHANGECUSTOMITEMABIL 2 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 2 1 2 1
CHANGECUSTOMITEMABIL 2 2 0 70
CHANGECUSTOMITEMABIL 2 2 1 6
CHANGECUSTOMITEMABIL 2 2 2 2
CHANGECUSTOMITEMVALUE 2 2 = 6
CHANGECUSTOMITEMABIL 2 4 0 70
CHANGECUSTOMITEMABIL 2 4 1 17
CHANGECUSTOMITEMABIL 2 4 2 5
CHANGECUSTOMITEMABIL 2 4 3 0
CHANGECUSTOMITEMVALUE 2 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 2 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 2 222
CHANGECUSTOMITEMVALUE 2 1 = 2
CHANGECUSTOMITEMABIL 2 1 0 222
CHANGECUSTOMITEMABIL 2 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 2 1 2 1
CHANGECUSTOMITEMABIL 2 2 0 222
CHANGECUSTOMITEMABIL 2 2 1 6
CHANGECUSTOMITEMABIL 2 2 2 2
CHANGECUSTOMITEMVALUE 2 2 = 3
CHANGECUSTOMITEMABIL 2 4 0 222
CHANGECUSTOMITEMABIL 2 4 1 17
CHANGECUSTOMITEMABIL 2 4 2 5
CHANGECUSTOMITEMABIL 2 4 3 0
CHANGECUSTOMITEMVALUE 2 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 2 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 2 151
CHANGECUSTOMITEMVALUE 2 1 = 1
CHANGECUSTOMITEMABIL 2 1 0 151
CHANGECUSTOMITEMABIL 2 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 2 1 2 1
CHANGECUSTOMITEMABIL 2 2 0 151
CHANGECUSTOMITEMABIL 2 2 1 6
CHANGECUSTOMITEMABIL 2 2 2 2
CHANGECUSTOMITEMVALUE 2 2 = 1
CHANGECUSTOMITEMABIL 2 4 0 151
CHANGECUSTOMITEMABIL 2 4 1 17
CHANGECUSTOMITEMABIL 2 4 2 5
CHANGECUSTOMITEMABIL 2 4 3 0
CHANGECUSTOMITEMVALUE 2 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@宝石改造]
#IF
NOT CHECKUSEITEM 12
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 12 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 12 249
CHANGECUSTOMITEMVALUE 12 1 = 6
CHANGECUSTOMITEMABIL 12 1 0 249
CHANGECUSTOMITEMABIL 12 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 12 1 2 1
CHANGECUSTOMITEMABIL 12 2 0 249
CHANGECUSTOMITEMABIL 12 2 1 6
CHANGECUSTOMITEMABIL 12 2 2 2
CHANGECUSTOMITEMVALUE 12 2 = 21
CHANGECUSTOMITEMABIL 12 4 0 249
CHANGECUSTOMITEMABIL 12 4 1 17
CHANGECUSTOMITEMABIL 12 4 2 5
CHANGECUSTOMITEMABIL 12 4 3 0
CHANGECUSTOMITEMVALUE 12 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 12 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 12 254
CHANGECUSTOMITEMVALUE 12 1 = 5
CHANGECUSTOMITEMABIL 12 1 0 254
CHANGECUSTOMITEMABIL 12 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 12 1 2 1
CHANGECUSTOMITEMABIL 12 2 0 254
CHANGECUSTOMITEMABIL 12 2 1 6
CHANGECUSTOMITEMABIL 12 2 2 2
CHANGECUSTOMITEMVALUE 12 2 = 15
CHANGECUSTOMITEMABIL 12 4 0 254
CHANGECUSTOMITEMABIL 12 4 1 17
CHANGECUSTOMITEMABIL 12 4 2 5
CHANGECUSTOMITEMABIL 12 4 3 0
CHANGECUSTOMITEMVALUE 12 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 12 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 12 253
CHANGECUSTOMITEMVALUE 12 1 = 4
CHANGECUSTOMITEMABIL 12 1 0 253
CHANGECUSTOMITEMABIL 12 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 12 1 2 1
CHANGECUSTOMITEMABIL 12 2 0 253
CHANGECUSTOMITEMABIL 12 2 1 6
CHANGECUSTOMITEMABIL 12 2 2 2
CHANGECUSTOMITEMVALUE 12 2 = 10
CHANGECUSTOMITEMABIL 12 4 0 253
CHANGECUSTOMITEMABIL 12 4 1 17
CHANGECUSTOMITEMABIL 12 4 2 5
CHANGECUSTOMITEMABIL 12 4 3 0
CHANGECUSTOMITEMVALUE 12 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 12 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 12 70
CHANGECUSTOMITEMVALUE 12 1 = 3
CHANGECUSTOMITEMABIL 12 1 0 70
CHANGECUSTOMITEMABIL 12 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 12 1 2 1
CHANGECUSTOMITEMABIL 12 2 0 70
CHANGECUSTOMITEMABIL 12 2 1 6
CHANGECUSTOMITEMABIL 12 2 2 2
CHANGECUSTOMITEMVALUE 12 2 = 6
CHANGECUSTOMITEMABIL 12 4 0 70
CHANGECUSTOMITEMABIL 12 4 1 17
CHANGECUSTOMITEMABIL 12 4 2 5
CHANGECUSTOMITEMABIL 12 4 3 0
CHANGECUSTOMITEMVALUE 12 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 12 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 12 222
CHANGECUSTOMITEMVALUE 12 1 = 2
CHANGECUSTOMITEMABIL 12 1 0 222
CHANGECUSTOMITEMABIL 12 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 12 1 2 1
CHANGECUSTOMITEMABIL 12 2 0 222
CHANGECUSTOMITEMABIL 12 2 1 6
CHANGECUSTOMITEMABIL 12 2 2 2
CHANGECUSTOMITEMVALUE 12 2 = 3
CHANGECUSTOMITEMABIL 12 4 0 222
CHANGECUSTOMITEMABIL 12 4 1 17
CHANGECUSTOMITEMABIL 12 4 2 5
CHANGECUSTOMITEMABIL 12 4 3 0
CHANGECUSTOMITEMVALUE 12 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 12 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 12 151
CHANGECUSTOMITEMVALUE 12 1 = 1
CHANGECUSTOMITEMABIL 12 1 0 151
CHANGECUSTOMITEMABIL 12 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 12 1 2 1
CHANGECUSTOMITEMABIL 12 2 0 151
CHANGECUSTOMITEMABIL 12 2 1 6
CHANGECUSTOMITEMABIL 12 2 2 2
CHANGECUSTOMITEMVALUE 12 2 = 1
CHANGECUSTOMITEMABIL 12 4 0 151
CHANGECUSTOMITEMABIL 12 4 1 17
CHANGECUSTOMITEMABIL 12 4 2 5
CHANGECUSTOMITEMABIL 12 4 3 0
CHANGECUSTOMITEMVALUE 12 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@法宝改造]
#IF
NOT CHECKUSEITEM 15
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 15 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 15 249
CHANGECUSTOMITEMVALUE 15 1 = 6
CHANGECUSTOMITEMABIL 15 1 0 249
CHANGECUSTOMITEMABIL 15 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 15 1 2 1
CHANGECUSTOMITEMABIL 15 2 0 249
CHANGECUSTOMITEMABIL 15 2 1 6
CHANGECUSTOMITEMABIL 15 2 2 2
CHANGECUSTOMITEMVALUE 15 2 = 21
CHANGECUSTOMITEMABIL 15 4 0 249
CHANGECUSTOMITEMABIL 15 4 1 17
CHANGECUSTOMITEMABIL 15 4 2 5
CHANGECUSTOMITEMABIL 15 4 3 0
CHANGECUSTOMITEMVALUE 15 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 15 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 15 254
CHANGECUSTOMITEMVALUE 15 1 = 5
CHANGECUSTOMITEMABIL 15 1 0 254
CHANGECUSTOMITEMABIL 15 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 15 1 2 1
CHANGECUSTOMITEMABIL 15 2 0 254
CHANGECUSTOMITEMABIL 15 2 1 6
CHANGECUSTOMITEMABIL 15 2 2 2
CHANGECUSTOMITEMVALUE 15 2 = 15
CHANGECUSTOMITEMABIL 15 4 0 254
CHANGECUSTOMITEMABIL 15 4 1 17
CHANGECUSTOMITEMABIL 15 4 2 5
CHANGECUSTOMITEMABIL 15 4 3 0
CHANGECUSTOMITEMVALUE 15 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 15 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 15 253
CHANGECUSTOMITEMVALUE 15 1 = 4
CHANGECUSTOMITEMABIL 15 1 0 253
CHANGECUSTOMITEMABIL 15 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 15 1 2 1
CHANGECUSTOMITEMABIL 15 2 0 253
CHANGECUSTOMITEMABIL 15 2 1 6
CHANGECUSTOMITEMABIL 15 2 2 2
CHANGECUSTOMITEMVALUE 15 2 = 10
CHANGECUSTOMITEMABIL 15 4 0 253
CHANGECUSTOMITEMABIL 15 4 1 17
CHANGECUSTOMITEMABIL 15 4 2 5
CHANGECUSTOMITEMABIL 15 4 3 0
CHANGECUSTOMITEMVALUE 15 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 15 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 15 70
CHANGECUSTOMITEMVALUE 15 1 = 3
CHANGECUSTOMITEMABIL 15 1 0 70
CHANGECUSTOMITEMABIL 15 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 15 1 2 1
CHANGECUSTOMITEMABIL 15 2 0 70
CHANGECUSTOMITEMABIL 15 2 1 6
CHANGECUSTOMITEMABIL 15 2 2 2
CHANGECUSTOMITEMVALUE 15 2 = 6
CHANGECUSTOMITEMABIL 15 4 0 70
CHANGECUSTOMITEMABIL 15 4 1 17
CHANGECUSTOMITEMABIL 15 4 2 5
CHANGECUSTOMITEMABIL 15 4 3 0
CHANGECUSTOMITEMVALUE 15 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 15 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 15 222
CHANGECUSTOMITEMVALUE 15 1 = 2
CHANGECUSTOMITEMABIL 15 1 0 222
CHANGECUSTOMITEMABIL 15 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 15 1 2 1
CHANGECUSTOMITEMABIL 15 2 0 222
CHANGECUSTOMITEMABIL 15 2 1 6
CHANGECUSTOMITEMABIL 15 2 2 2
CHANGECUSTOMITEMVALUE 15 2 = 3
CHANGECUSTOMITEMABIL 15 4 0 222
CHANGECUSTOMITEMABIL 15 4 1 17
CHANGECUSTOMITEMABIL 15 4 2 5
CHANGECUSTOMITEMABIL 15 4 3 0
CHANGECUSTOMITEMVALUE 15 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 15 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 15 151
CHANGECUSTOMITEMVALUE 15 1 = 1
CHANGECUSTOMITEMABIL 15 1 0 151
CHANGECUSTOMITEMABIL 15 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 15 1 2 1
CHANGECUSTOMITEMABIL 15 2 0 151
CHANGECUSTOMITEMABIL 15 2 1 6
CHANGECUSTOMITEMABIL 15 2 2 2
CHANGECUSTOMITEMVALUE 15 2 = 1
CHANGECUSTOMITEMABIL 15 4 0 151
CHANGECUSTOMITEMABIL 15 4 1 17
CHANGECUSTOMITEMABIL 15 4 2 5
CHANGECUSTOMITEMABIL 15 4 3 0
CHANGECUSTOMITEMVALUE 15 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@魂珠改造]
#IF
NOT CHECKUSEITEM 14
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 50
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 14 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 14 249
CHANGECUSTOMITEMVALUE 14 1 = 6
CHANGECUSTOMITEMABIL 14 1 0 249
CHANGECUSTOMITEMABIL 14 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 14 1 2 1
CHANGECUSTOMITEMABIL 14 2 0 249
CHANGECUSTOMITEMABIL 14 2 1 6
CHANGECUSTOMITEMABIL 14 2 2 2
CHANGECUSTOMITEMVALUE 14 2 = 21
CHANGECUSTOMITEMABIL 14 4 0 249
CHANGECUSTOMITEMABIL 14 4 1 17
CHANGECUSTOMITEMABIL 14 4 2 5
CHANGECUSTOMITEMABIL 14 4 3 0
CHANGECUSTOMITEMVALUE 14 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 40
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 14 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 14 254
CHANGECUSTOMITEMVALUE 14 1 = 5
CHANGECUSTOMITEMABIL 14 1 0 254
CHANGECUSTOMITEMABIL 14 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 14 1 2 1
CHANGECUSTOMITEMABIL 14 2 0 254
CHANGECUSTOMITEMABIL 14 2 1 6
CHANGECUSTOMITEMABIL 14 2 2 2
CHANGECUSTOMITEMVALUE 14 2 = 15
CHANGECUSTOMITEMABIL 14 4 0 254
CHANGECUSTOMITEMABIL 14 4 1 17
CHANGECUSTOMITEMABIL 14 4 2 5
CHANGECUSTOMITEMABIL 14 4 3 0
CHANGECUSTOMITEMVALUE 14 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 20
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 14 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 14 253
CHANGECUSTOMITEMVALUE 14 1 = 4
CHANGECUSTOMITEMABIL 14 1 0 253
CHANGECUSTOMITEMABIL 14 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 14 1 2 1
CHANGECUSTOMITEMABIL 14 2 0 253
CHANGECUSTOMITEMABIL 14 2 1 6
CHANGECUSTOMITEMABIL 14 2 2 2
CHANGECUSTOMITEMVALUE 14 2 = 10
CHANGECUSTOMITEMABIL 14 4 0 253
CHANGECUSTOMITEMABIL 14 4 1 17
CHANGECUSTOMITEMABIL 14 4 2 5
CHANGECUSTOMITEMABIL 14 4 3 0
CHANGECUSTOMITEMVALUE 14 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 14 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 14 70
CHANGECUSTOMITEMVALUE 14 1 = 3
CHANGECUSTOMITEMABIL 14 1 0 70
CHANGECUSTOMITEMABIL 14 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 14 1 2 1
CHANGECUSTOMITEMABIL 14 2 0 70
CHANGECUSTOMITEMABIL 14 2 1 6
CHANGECUSTOMITEMABIL 14 2 2 2
CHANGECUSTOMITEMVALUE 14 2 = 6
CHANGECUSTOMITEMABIL 14 4 0 70
CHANGECUSTOMITEMABIL 14 4 1 17
CHANGECUSTOMITEMABIL 14 4 2 5
CHANGECUSTOMITEMABIL 14 4 3 0
CHANGECUSTOMITEMVALUE 14 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 14 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 14 222
CHANGECUSTOMITEMVALUE 14 1 = 2
CHANGECUSTOMITEMABIL 14 1 0 222
CHANGECUSTOMITEMABIL 14 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 14 1 2 1
CHANGECUSTOMITEMABIL 14 2 0 222
CHANGECUSTOMITEMABIL 14 2 1 6
CHANGECUSTOMITEMABIL 14 2 2 2
CHANGECUSTOMITEMVALUE 14 2 = 3
CHANGECUSTOMITEMABIL 14 4 0 222
CHANGECUSTOMITEMABIL 14 4 1 17
CHANGECUSTOMITEMABIL 14 4 2 5
CHANGECUSTOMITEMABIL 14 4 3 0
CHANGECUSTOMITEMVALUE 14 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 14 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 14 151
CHANGECUSTOMITEMVALUE 14 1 = 1
CHANGECUSTOMITEMABIL 14 1 0 151
CHANGECUSTOMITEMABIL 14 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 14 1 2 1
CHANGECUSTOMITEMABIL 14 2 0 151
CHANGECUSTOMITEMABIL 14 2 1 6
CHANGECUSTOMITEMABIL 14 2 2 2
CHANGECUSTOMITEMVALUE 14 2 = 1
CHANGECUSTOMITEMABIL 14 4 0 151
CHANGECUSTOMITEMABIL 14 4 1 17
CHANGECUSTOMITEMABIL 14 4 2 5
CHANGECUSTOMITEMABIL 14 4 3 0
CHANGECUSTOMITEMVALUE 14 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@斗笠改造]
#IF
NOT CHECKUSEITEM 13
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 13 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 13 249
CHANGECUSTOMITEMVALUE 13 1 = 6
CHANGECUSTOMITEMABIL 13 1 0 249
CHANGECUSTOMITEMABIL 13 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 13 1 2 1
CHANGECUSTOMITEMABIL 13 2 0 249
CHANGECUSTOMITEMABIL 13 2 1 6
CHANGECUSTOMITEMABIL 13 2 2 2
CHANGECUSTOMITEMVALUE 13 2 = 21
CHANGECUSTOMITEMABIL 13 4 0 249
CHANGECUSTOMITEMABIL 13 4 1 17
CHANGECUSTOMITEMABIL 13 4 2 5
CHANGECUSTOMITEMABIL 13 4 3 0
CHANGECUSTOMITEMVALUE 13 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 13 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 13 254
CHANGECUSTOMITEMVALUE 13 1 = 5
CHANGECUSTOMITEMABIL 13 1 0 254
CHANGECUSTOMITEMABIL 13 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 13 1 2 1
CHANGECUSTOMITEMABIL 13 2 0 254
CHANGECUSTOMITEMABIL 13 2 1 6
CHANGECUSTOMITEMABIL 13 2 2 2
CHANGECUSTOMITEMVALUE 13 2 = 15
CHANGECUSTOMITEMABIL 13 4 0 254
CHANGECUSTOMITEMABIL 13 4 1 17
CHANGECUSTOMITEMABIL 13 4 2 5
CHANGECUSTOMITEMABIL 13 4 3 0
CHANGECUSTOMITEMVALUE 13 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 13 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 13 253
CHANGECUSTOMITEMVALUE 13 1 = 4
CHANGECUSTOMITEMABIL 13 1 0 253
CHANGECUSTOMITEMABIL 13 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 13 1 2 1
CHANGECUSTOMITEMABIL 13 2 0 253
CHANGECUSTOMITEMABIL 13 2 1 6
CHANGECUSTOMITEMABIL 13 2 2 2
CHANGECUSTOMITEMVALUE 13 2 = 10
CHANGECUSTOMITEMABIL 13 4 0 253
CHANGECUSTOMITEMABIL 13 4 1 17
CHANGECUSTOMITEMABIL 13 4 2 5
CHANGECUSTOMITEMABIL 13 4 3 0
CHANGECUSTOMITEMVALUE 13 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 13 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 13 70
CHANGECUSTOMITEMVALUE 13 1 = 3
CHANGECUSTOMITEMABIL 13 1 0 70
CHANGECUSTOMITEMABIL 13 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 13 1 2 1
CHANGECUSTOMITEMABIL 13 2 0 70
CHANGECUSTOMITEMABIL 13 2 1 6
CHANGECUSTOMITEMABIL 13 2 2 2
CHANGECUSTOMITEMVALUE 13 2 = 6
CHANGECUSTOMITEMABIL 13 4 0 70
CHANGECUSTOMITEMABIL 13 4 1 17
CHANGECUSTOMITEMABIL 13 4 2 5
CHANGECUSTOMITEMABIL 13 4 3 0
CHANGECUSTOMITEMVALUE 13 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 13 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 13 222
CHANGECUSTOMITEMVALUE 13 1 = 2
CHANGECUSTOMITEMABIL 13 1 0 222
CHANGECUSTOMITEMABIL 13 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 13 1 2 1
CHANGECUSTOMITEMABIL 13 2 0 222
CHANGECUSTOMITEMABIL 13 2 1 6
CHANGECUSTOMITEMABIL 13 2 2 2
CHANGECUSTOMITEMVALUE 13 2 = 3
CHANGECUSTOMITEMABIL 13 4 0 222
CHANGECUSTOMITEMABIL 13 4 1 17
CHANGECUSTOMITEMABIL 13 4 2 5
CHANGECUSTOMITEMABIL 13 4 3 0
CHANGECUSTOMITEMVALUE 13 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 13 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 13 151
CHANGECUSTOMITEMVALUE 13 1 = 1
CHANGECUSTOMITEMABIL 13 1 0 151
CHANGECUSTOMITEMABIL 13 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 13 1 2 1
CHANGECUSTOMITEMABIL 13 2 0 151
CHANGECUSTOMITEMABIL 13 2 1 6
CHANGECUSTOMITEMABIL 13 2 2 2
CHANGECUSTOMITEMVALUE 13 2 = 1
CHANGECUSTOMITEMABIL 13 4 0 151
CHANGECUSTOMITEMABIL 13 4 1 17
CHANGECUSTOMITEMABIL 13 4 2 5
CHANGECUSTOMITEMABIL 13 4 3 0
CHANGECUSTOMITEMVALUE 13 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@盾牌改造]
#IF
NOT CHECKUSEITEM 16
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 30
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 16 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 16 249
CHANGECUSTOMITEMVALUE 16 1 = 6
CHANGECUSTOMITEMABIL 16 1 0 249
CHANGECUSTOMITEMABIL 16 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 16 1 2 1
CHANGECUSTOMITEMABIL 16 2 0 249
CHANGECUSTOMITEMABIL 16 2 1 6
CHANGECUSTOMITEMABIL 16 2 2 2
CHANGECUSTOMITEMVALUE 16 2 = 21
CHANGECUSTOMITEMABIL 16 4 0 249
CHANGECUSTOMITEMABIL 16 4 1 17
CHANGECUSTOMITEMABIL 16 4 2 5
CHANGECUSTOMITEMABIL 16 4 3 0
CHANGECUSTOMITEMVALUE 16 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 20
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 16 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 16 254
CHANGECUSTOMITEMVALUE 16 1 = 5
CHANGECUSTOMITEMABIL 16 1 0 254
CHANGECUSTOMITEMABIL 16 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 16 1 2 1
CHANGECUSTOMITEMABIL 16 2 0 254
CHANGECUSTOMITEMABIL 16 2 1 6
CHANGECUSTOMITEMABIL 16 2 2 2
CHANGECUSTOMITEMVALUE 16 2 = 15
CHANGECUSTOMITEMABIL 16 4 0 254
CHANGECUSTOMITEMABIL 16 4 1 17
CHANGECUSTOMITEMABIL 16 4 2 5
CHANGECUSTOMITEMABIL 16 4 3 0
CHANGECUSTOMITEMVALUE 16 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 16 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 16 253
CHANGECUSTOMITEMVALUE 16 1 = 4
CHANGECUSTOMITEMABIL 16 1 0 253
CHANGECUSTOMITEMABIL 16 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 16 1 2 1
CHANGECUSTOMITEMABIL 16 2 0 253
CHANGECUSTOMITEMABIL 16 2 1 6
CHANGECUSTOMITEMABIL 16 2 2 2
CHANGECUSTOMITEMVALUE 16 2 = 10
CHANGECUSTOMITEMABIL 16 4 0 253
CHANGECUSTOMITEMABIL 16 4 1 17
CHANGECUSTOMITEMABIL 16 4 2 5
CHANGECUSTOMITEMABIL 16 4 3 0
CHANGECUSTOMITEMVALUE 16 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 16 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 16 70
CHANGECUSTOMITEMVALUE 16 1 = 3
CHANGECUSTOMITEMABIL 16 1 0 70
CHANGECUSTOMITEMABIL 16 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 16 1 2 1
CHANGECUSTOMITEMABIL 16 2 0 70
CHANGECUSTOMITEMABIL 16 2 1 6
CHANGECUSTOMITEMABIL 16 2 2 2
CHANGECUSTOMITEMVALUE 16 2 = 6
CHANGECUSTOMITEMABIL 16 4 0 70
CHANGECUSTOMITEMABIL 16 4 1 17
CHANGECUSTOMITEMABIL 16 4 2 5
CHANGECUSTOMITEMABIL 16 4 3 0
CHANGECUSTOMITEMVALUE 16 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 16 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 16 222
CHANGECUSTOMITEMVALUE 16 1 = 2
CHANGECUSTOMITEMABIL 16 1 0 222
CHANGECUSTOMITEMABIL 16 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 16 1 2 1
CHANGECUSTOMITEMABIL 16 2 0 222
CHANGECUSTOMITEMABIL 16 2 1 6
CHANGECUSTOMITEMABIL 16 2 2 2
CHANGECUSTOMITEMVALUE 16 2 = 3
CHANGECUSTOMITEMABIL 16 4 0 222
CHANGECUSTOMITEMABIL 16 4 1 17
CHANGECUSTOMITEMABIL 16 4 2 5
CHANGECUSTOMITEMABIL 16 4 3 0
CHANGECUSTOMITEMVALUE 16 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 16 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 16 151
CHANGECUSTOMITEMVALUE 16 1 = 1
CHANGECUSTOMITEMABIL 16 1 0 151
CHANGECUSTOMITEMABIL 16 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 16 1 2 1
CHANGECUSTOMITEMABIL 16 2 0 151
CHANGECUSTOMITEMABIL 16 2 1 6
CHANGECUSTOMITEMABIL 16 2 2 2
CHANGECUSTOMITEMVALUE 16 2 = 1
CHANGECUSTOMITEMABIL 16 4 0 151
CHANGECUSTOMITEMABIL 16 4 1 17
CHANGECUSTOMITEMABIL 16 4 2 5
CHANGECUSTOMITEMABIL 16 4 3 0
CHANGECUSTOMITEMVALUE 16 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@战鼓改造]
#IF
NOT CHECKUSEITEM 9
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 180
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 9 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 9 249
CHANGECUSTOMITEMVALUE 9 1 = 6
CHANGECUSTOMITEMABIL 9 1 0 249
CHANGECUSTOMITEMABIL 9 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 9 1 2 1
CHANGECUSTOMITEMABIL 9 2 0 249
CHANGECUSTOMITEMABIL 9 2 1 6
CHANGECUSTOMITEMABIL 9 2 2 2
CHANGECUSTOMITEMVALUE 9 2 = 21
CHANGECUSTOMITEMABIL 9 4 0 249
CHANGECUSTOMITEMABIL 9 4 1 17
CHANGECUSTOMITEMABIL 9 4 2 5
CHANGECUSTOMITEMABIL 9 4 3 0
CHANGECUSTOMITEMVALUE 9 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 70
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 9 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 9 254
CHANGECUSTOMITEMVALUE 9 1 = 5
CHANGECUSTOMITEMABIL 9 1 0 254
CHANGECUSTOMITEMABIL 9 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 9 1 2 1
CHANGECUSTOMITEMABIL 9 2 0 254
CHANGECUSTOMITEMABIL 9 2 1 6
CHANGECUSTOMITEMABIL 9 2 2 2
CHANGECUSTOMITEMVALUE 9 2 = 15
CHANGECUSTOMITEMABIL 9 4 0 254
CHANGECUSTOMITEMABIL 9 4 1 17
CHANGECUSTOMITEMABIL 9 4 2 5
CHANGECUSTOMITEMABIL 9 4 3 0
CHANGECUSTOMITEMVALUE 9 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 15
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 9 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 9 253
CHANGECUSTOMITEMVALUE 9 1 = 4
CHANGECUSTOMITEMABIL 9 1 0 253
CHANGECUSTOMITEMABIL 9 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 9 1 2 1
CHANGECUSTOMITEMABIL 9 2 0 253
CHANGECUSTOMITEMABIL 9 2 1 6
CHANGECUSTOMITEMABIL 9 2 2 2
CHANGECUSTOMITEMVALUE 9 2 = 10
CHANGECUSTOMITEMABIL 9 4 0 253
CHANGECUSTOMITEMABIL 9 4 1 17
CHANGECUSTOMITEMABIL 9 4 2 5
CHANGECUSTOMITEMABIL 9 4 3 0
CHANGECUSTOMITEMVALUE 9 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 9 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 9 70
CHANGECUSTOMITEMVALUE 9 1 = 3
CHANGECUSTOMITEMABIL 9 1 0 70
CHANGECUSTOMITEMABIL 9 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 9 1 2 1
CHANGECUSTOMITEMABIL 9 2 0 70
CHANGECUSTOMITEMABIL 9 2 1 6
CHANGECUSTOMITEMABIL 9 2 2 2
CHANGECUSTOMITEMVALUE 9 2 = 6
CHANGECUSTOMITEMABIL 9 4 0 70
CHANGECUSTOMITEMABIL 9 4 1 17
CHANGECUSTOMITEMABIL 9 4 2 5
CHANGECUSTOMITEMABIL 9 4 3 0
CHANGECUSTOMITEMVALUE 9 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 9 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 9 222
CHANGECUSTOMITEMVALUE 9 1 = 2
CHANGECUSTOMITEMABIL 9 1 0 222
CHANGECUSTOMITEMABIL 9 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 9 1 2 1
CHANGECUSTOMITEMABIL 9 2 0 222
CHANGECUSTOMITEMABIL 9 2 1 6
CHANGECUSTOMITEMABIL 9 2 2 2
CHANGECUSTOMITEMVALUE 9 2 = 3
CHANGECUSTOMITEMABIL 9 4 0 222
CHANGECUSTOMITEMABIL 9 4 1 17
CHANGECUSTOMITEMABIL 9 4 2 5
CHANGECUSTOMITEMABIL 9 4 3 0
CHANGECUSTOMITEMVALUE 9 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 9 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 9 151
CHANGECUSTOMITEMVALUE 9 1 = 1
CHANGECUSTOMITEMABIL 9 1 0 151
CHANGECUSTOMITEMABIL 9 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 9 1 2 1
CHANGECUSTOMITEMABIL 9 2 0 151
CHANGECUSTOMITEMABIL 9 2 1 6
CHANGECUSTOMITEMABIL 9 2 2 2
CHANGECUSTOMITEMVALUE 9 2 = 1
CHANGECUSTOMITEMABIL 9 4 0 151
CHANGECUSTOMITEMABIL 9 4 1 17
CHANGECUSTOMITEMABIL 9 4 2 5
CHANGECUSTOMITEMABIL 9 4 3 0
CHANGECUSTOMITEMVALUE 9 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
;========〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
;========〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
;========〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓
[@时装改造]
#IF
NOT CHECKUSEITEM 17
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 17 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 17 249
CHANGECUSTOMITEMVALUE 17 1 = 6
CHANGECUSTOMITEMABIL 17 1 0 249
CHANGECUSTOMITEMABIL 17 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 17 1 2 1
CHANGECUSTOMITEMABIL 17 2 0 249
CHANGECUSTOMITEMABIL 17 2 1 6
CHANGECUSTOMITEMABIL 17 2 2 2
CHANGECUSTOMITEMVALUE 17 2 = 21
CHANGECUSTOMITEMABIL 17 4 0 249
CHANGECUSTOMITEMABIL 17 4 1 17
CHANGECUSTOMITEMABIL 17 4 2 5
CHANGECUSTOMITEMABIL 17 4 3 0
CHANGECUSTOMITEMVALUE 17 4 = 100
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 17 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 17 254
CHANGECUSTOMITEMVALUE 17 1 = 5
CHANGECUSTOMITEMABIL 17 1 0 254
CHANGECUSTOMITEMABIL 17 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 17 1 2 1
CHANGECUSTOMITEMABIL 17 2 0 254
CHANGECUSTOMITEMABIL 17 2 1 6
CHANGECUSTOMITEMABIL 17 2 2 2
CHANGECUSTOMITEMVALUE 17 2 = 15
CHANGECUSTOMITEMABIL 17 4 0 254
CHANGECUSTOMITEMABIL 17 4 1 17
CHANGECUSTOMITEMABIL 17 4 2 5
CHANGECUSTOMITEMABIL 17 4 3 0
CHANGECUSTOMITEMVALUE 17 4 = 60
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 17 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 17 253
CHANGECUSTOMITEMVALUE 17 1 = 4
CHANGECUSTOMITEMABIL 17 1 0 253
CHANGECUSTOMITEMABIL 17 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 17 1 2 1
CHANGECUSTOMITEMABIL 17 2 0 253
CHANGECUSTOMITEMABIL 17 2 1 6
CHANGECUSTOMITEMABIL 17 2 2 2
CHANGECUSTOMITEMVALUE 17 2 = 10
CHANGECUSTOMITEMABIL 17 4 0 253
CHANGECUSTOMITEMABIL 17 4 1 17
CHANGECUSTOMITEMABIL 17 4 2 5
CHANGECUSTOMITEMABIL 17 4 3 0
CHANGECUSTOMITEMVALUE 17 4 = 45
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 17 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 17 70
CHANGECUSTOMITEMVALUE 17 1 = 3
CHANGECUSTOMITEMABIL 17 1 0 70
CHANGECUSTOMITEMABIL 17 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 17 1 2 1
CHANGECUSTOMITEMABIL 17 2 0 70
CHANGECUSTOMITEMABIL 17 2 1 6
CHANGECUSTOMITEMABIL 17 2 2 2
CHANGECUSTOMITEMVALUE 17 2 = 6
CHANGECUSTOMITEMABIL 17 4 0 70
CHANGECUSTOMITEMABIL 17 4 1 17
CHANGECUSTOMITEMABIL 17 4 2 5
CHANGECUSTOMITEMABIL 17 4 3 0
CHANGECUSTOMITEMVALUE 17 4 = 30
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 17 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 17 222
CHANGECUSTOMITEMVALUE 17 1 = 2
CHANGECUSTOMITEMABIL 17 1 0 222
CHANGECUSTOMITEMABIL 17 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 17 1 2 1
CHANGECUSTOMITEMABIL 17 2 0 222
CHANGECUSTOMITEMABIL 17 2 1 6
CHANGECUSTOMITEMABIL 17 2 2 2
CHANGECUSTOMITEMVALUE 17 2 = 3
CHANGECUSTOMITEMABIL 17 4 0 222
CHANGECUSTOMITEMABIL 17 4 1 17
CHANGECUSTOMITEMABIL 17 4 2 5
CHANGECUSTOMITEMABIL 17 4 3 0
CHANGECUSTOMITEMVALUE 17 4 = 20
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 1
#ACT
MOV S11 0
take 鉴定宝石 1
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 17 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 17 151
CHANGECUSTOMITEMVALUE 17 1 = 1
CHANGECUSTOMITEMABIL 17 1 0 151
CHANGECUSTOMITEMABIL 17 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 17 1 2 1
CHANGECUSTOMITEMABIL 17 2 0 151
CHANGECUSTOMITEMABIL 17 2 1 6
CHANGECUSTOMITEMABIL 17 2 2 2
CHANGECUSTOMITEMVALUE 17 2 = 1
CHANGECUSTOMITEMABIL 17 4 0 151
CHANGECUSTOMITEMABIL 17 4 1 17
CHANGECUSTOMITEMABIL 17 4 2 5
CHANGECUSTOMITEMABIL 17 4 3 0
CHANGECUSTOMITEMVALUE 17 4 = 10
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
[@衣服改造]
#IF
NOT CHECKUSEITEM 0
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 10
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 0 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 0 249
CHANGECUSTOMITEMVALUE 0 1 = 15
CHANGECUSTOMITEMABIL 0 1 0 249
CHANGECUSTOMITEMABIL 0 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 0 1 2 1
CHANGECUSTOMITEMABIL 0 2 0 249
CHANGECUSTOMITEMABIL 0 2 1 6
CHANGECUSTOMITEMABIL 0 2 2 2
CHANGECUSTOMITEMVALUE 0 2 = 120
CHANGECUSTOMITEMABIL 0 4 0 249
CHANGECUSTOMITEMABIL 0 4 1 17
CHANGECUSTOMITEMABIL 0 4 2 5
CHANGECUSTOMITEMABIL 0 4 3 0
CHANGECUSTOMITEMVALUE 0 4 = 350
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 0 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 0 254
CHANGECUSTOMITEMVALUE 0 1 = 10
CHANGECUSTOMITEMABIL 0 1 0 254
CHANGECUSTOMITEMABIL 0 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 0 1 2 1
CHANGECUSTOMITEMABIL 0 2 0 254
CHANGECUSTOMITEMABIL 0 2 1 6
CHANGECUSTOMITEMABIL 0 2 2 2
CHANGECUSTOMITEMVALUE 0 2 = 80
CHANGECUSTOMITEMABIL 0 4 0 254
CHANGECUSTOMITEMABIL 0 4 1 17
CHANGECUSTOMITEMABIL 0 4 2 5
CHANGECUSTOMITEMABIL 0 4 3 0
CHANGECUSTOMITEMVALUE 0 4 = 210
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 0 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 0 253
CHANGECUSTOMITEMVALUE 0 1 = 8
CHANGECUSTOMITEMABIL 0 1 0 253
CHANGECUSTOMITEMABIL 0 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 0 1 2 1
CHANGECUSTOMITEMABIL 0 2 0 253
CHANGECUSTOMITEMABIL 0 2 1 6
CHANGECUSTOMITEMABIL 0 2 2 2
CHANGECUSTOMITEMVALUE 0 2 = 60
CHANGECUSTOMITEMABIL 0 4 0 253
CHANGECUSTOMITEMABIL 0 4 1 17
CHANGECUSTOMITEMABIL 0 4 2 5
CHANGECUSTOMITEMABIL 0 4 3 0
CHANGECUSTOMITEMVALUE 0 4 = 160
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 0 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 0 70
CHANGECUSTOMITEMVALUE 0 1 = 6
CHANGECUSTOMITEMABIL 0 1 0 70
CHANGECUSTOMITEMABIL 0 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 0 1 2 1
CHANGECUSTOMITEMABIL 0 2 0 70
CHANGECUSTOMITEMABIL 0 2 1 6
CHANGECUSTOMITEMABIL 0 2 2 2
CHANGECUSTOMITEMVALUE 0 2 = 45
CHANGECUSTOMITEMABIL 0 4 0 70
CHANGECUSTOMITEMABIL 0 4 1 17
CHANGECUSTOMITEMABIL 0 4 2 5
CHANGECUSTOMITEMABIL 0 4 3 0
CHANGECUSTOMITEMVALUE 0 4 = 120
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 0 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 0 222
CHANGECUSTOMITEMVALUE 0 1 = 4
CHANGECUSTOMITEMABIL 0 1 0 222
CHANGECUSTOMITEMABIL 0 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 0 1 2 1
CHANGECUSTOMITEMABIL 0 2 0 222
CHANGECUSTOMITEMABIL 0 2 1 6
CHANGECUSTOMITEMABIL 0 2 2 2
CHANGECUSTOMITEMVALUE 0 2 = 30
CHANGECUSTOMITEMABIL 0 4 0 222
CHANGECUSTOMITEMABIL 0 4 1 17
CHANGECUSTOMITEMABIL 0 4 2 5
CHANGECUSTOMITEMABIL 0 4 3 0
CHANGECUSTOMITEMVALUE 0 4 = 80
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 0 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 0 151
CHANGECUSTOMITEMVALUE 0 1 = 2
CHANGECUSTOMITEMABIL 0 1 0 151
CHANGECUSTOMITEMABIL 0 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 0 1 2 1
CHANGECUSTOMITEMABIL 0 2 0 151
CHANGECUSTOMITEMABIL 0 2 1 6
CHANGECUSTOMITEMABIL 0 2 2 2
CHANGECUSTOMITEMVALUE 0 2 = 15
CHANGECUSTOMITEMABIL 0 4 0 151
CHANGECUSTOMITEMABIL 0 4 1 17
CHANGECUSTOMITEMABIL 0 4 2 5
CHANGECUSTOMITEMABIL 0 4 3 0
CHANGECUSTOMITEMVALUE 0 4 = 40
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石*5\\    2.鉴定宝石请用高级装备回收获得!!
break
[@武器改造]
#IF
NOT CHECKUSEITEM 1
#ACT
MESSAGEBOX \\这地方带装备了么?
break
#IF
random 20
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 1 鉴定品质:[至尊]
CHANGECUSTOMITEMTEXTCOLOR 1 249
CHANGECUSTOMITEMVALUE 1 1 = 15
CHANGECUSTOMITEMABIL 1 1 0 249
CHANGECUSTOMITEMABIL 1 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 1 1 2 1
CHANGECUSTOMITEMABIL 1 2 0 249
CHANGECUSTOMITEMABIL 1 2 1 6
CHANGECUSTOMITEMABIL 1 2 2 2
CHANGECUSTOMITEMVALUE 1 2 = 120
CHANGECUSTOMITEMABIL 1 4 0 249
CHANGECUSTOMITEMABIL 1 4 1 17
CHANGECUSTOMITEMABIL 1 4 2 5
CHANGECUSTOMITEMABIL 1 4 3 0
CHANGECUSTOMITEMVALUE 1 4 = 350
MESSAGEBOX \\装备鉴定成功,鉴定品质:[至尊]
break
#IF
random 10
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 1 鉴定品质:[神话]
CHANGECUSTOMITEMTEXTCOLOR 1 254
CHANGECUSTOMITEMVALUE 1 1 = 10
CHANGECUSTOMITEMABIL 1 1 0 254
CHANGECUSTOMITEMABIL 1 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 1 1 2 1
CHANGECUSTOMITEMABIL 1 2 0 254
CHANGECUSTOMITEMABIL 1 2 1 6
CHANGECUSTOMITEMABIL 1 2 2 2
CHANGECUSTOMITEMVALUE 1 2 = 80
CHANGECUSTOMITEMABIL 1 4 0 254
CHANGECUSTOMITEMABIL 1 4 1 17
CHANGECUSTOMITEMABIL 1 4 2 5
CHANGECUSTOMITEMABIL 1 4 3 0
CHANGECUSTOMITEMVALUE 1 4 = 210
MESSAGEBOX \\装备鉴定成功,鉴定品质:[神话]
break
#IF
random 5
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 1 鉴定品质:[远古]
CHANGECUSTOMITEMTEXTCOLOR 1 253
CHANGECUSTOMITEMVALUE 1 1 = 8
CHANGECUSTOMITEMABIL 1 1 0 253
CHANGECUSTOMITEMABIL 1 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 1 1 2 1
CHANGECUSTOMITEMABIL 1 2 0 253
CHANGECUSTOMITEMABIL 1 2 1 6
CHANGECUSTOMITEMABIL 1 2 2 2
CHANGECUSTOMITEMVALUE 1 2 = 60
CHANGECUSTOMITEMABIL 1 4 0 253
CHANGECUSTOMITEMABIL 1 4 1 17
CHANGECUSTOMITEMABIL 1 4 2 5
CHANGECUSTOMITEMABIL 1 4 3 0
CHANGECUSTOMITEMVALUE 1 4 = 160
MESSAGEBOX \\装备鉴定成功,鉴定品质:[远古]
break
#IF
random 2
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 1 鉴定品质:[绝品]
CHANGECUSTOMITEMTEXTCOLOR 1 70
CHANGECUSTOMITEMVALUE 1 1 = 6
CHANGECUSTOMITEMABIL 1 1 0 70
CHANGECUSTOMITEMABIL 1 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 1 1 2 1
CHANGECUSTOMITEMABIL 1 2 0 70
CHANGECUSTOMITEMABIL 1 2 1 6
CHANGECUSTOMITEMABIL 1 2 2 2
CHANGECUSTOMITEMVALUE 1 2 = 45
CHANGECUSTOMITEMABIL 1 4 0 70
CHANGECUSTOMITEMABIL 1 4 1 17
CHANGECUSTOMITEMABIL 1 4 2 5
CHANGECUSTOMITEMABIL 1 4 3 0
CHANGECUSTOMITEMVALUE 1 4 = 120
MESSAGEBOX \\装备鉴定成功,鉴定品质:[绝品]
break
#IF
random 1
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 1 鉴定品质:[极品]
CHANGECUSTOMITEMTEXTCOLOR 1 222
CHANGECUSTOMITEMVALUE 1 1 = 4
CHANGECUSTOMITEMABIL 1 1 0 222
CHANGECUSTOMITEMABIL 1 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 1 1 2 1
CHANGECUSTOMITEMABIL 1 2 0 222
CHANGECUSTOMITEMABIL 1 2 1 6
CHANGECUSTOMITEMABIL 1 2 2 2
CHANGECUSTOMITEMVALUE 1 2 = 30
CHANGECUSTOMITEMABIL 1 4 0 222
CHANGECUSTOMITEMABIL 1 4 1 17
CHANGECUSTOMITEMABIL 1 4 2 5
CHANGECUSTOMITEMABIL 1 4 3 0
CHANGECUSTOMITEMVALUE 1 4 = 80
MESSAGEBOX \\装备鉴定成功,鉴定品质:[极品]
break
#IF
checkitem 鉴定宝石 5
#ACT
MOV S11 0
take 鉴定宝石 5
GetRandomText ..\QuestDiary\数据文件\升级抽取\位置二抽取.txt S11
CHANGECUSTOMITEMTEXT 1 鉴定品质:[初级]
CHANGECUSTOMITEMTEXTCOLOR 1 151
CHANGECUSTOMITEMVALUE 1 1 = 2
CHANGECUSTOMITEMABIL 1 1 0 151
CHANGECUSTOMITEMABIL 1 1 1 <$STR(S11)>
CHANGECUSTOMITEMABIL 1 1 2 1
CHANGECUSTOMITEMABIL 1 2 0 151
CHANGECUSTOMITEMABIL 1 2 1 6
CHANGECUSTOMITEMABIL 1 2 2 2
CHANGECUSTOMITEMVALUE 1 2 = 15
CHANGECUSTOMITEMABIL 1 4 0 151
CHANGECUSTOMITEMABIL 1 4 1 17
CHANGECUSTOMITEMABIL 1 4 2 5
CHANGECUSTOMITEMABIL 1 4 3 0
CHANGECUSTOMITEMVALUE 1 4 = 40
MESSAGEBOX \\装备鉴定成功,鉴定品质:[初级]
break
#ELSEACT
MESSAGEBOX \\升级失败:原因如下\\    1.你没有鉴定宝石\\    2.鉴定宝石请用高级装备回收获得!!
break
温馨提示:

如需运营或商用本站资源,请在下载源码后联系版权方进行授权,本站不参与任何运营游戏相关活动,仅供从业者交流技术使用.对于因后续运营游戏产生的版权纠纷,与本站无关。


郑重声明:本站所有资源仅供用户本地电脑学习源代码的内含设计思想和原理,禁止任何其他用途!→ 详情点击查看
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

QQ在线咨询
咨询客服
87599992
QQ群交流
834337883
快速回复 返回顶部 返回列表