[Gm版本库]传奇脚本系列-妙手神笔

[@Main]
#IF
#ACT
OpenBigDialogBox -1
#SAY
　　　　　　　　╭─────────────────────╮\
　　　　　<Img:9:0:1:-1><欢迎来到/SCOLOR=250><Img:9:0:1:-1><唐伯虎·點秋香/SCOLOR=248><Img:9:0:1:-1><妙手神笔/SCOLOR=253><Img:9:0:1:-1><装备鉴定/SCOLOR=70><Img:9:0:1:-1>\
　　　　　　　　╰─────────────────────╯\
┌─────────────────────────────────────┐\
<Img:5:0:1:-1><容我自我介绍一下：我就是天赋异禀、风华绝代、玉树临风、战无不败、上能顶天/SCOLOR=250><Img:5:0:1:-1>\
<│下能穿地的一个..............工匠而已...............但是你别小看我的能力哦 │/SCOLOR=70>\
<Img:5:0:1:-1><我能帮你100%鉴定出最高属性的物品.直接点说就是我能把你的装备提高属性/SCOLOR=248>     <Img:5:0:1:-1>\
<│最高可以鉴定出10-20的属性.鉴定出来的装备属性全部提升.懒人打宝PK必备       │/SCOLOR=249>\
<Img:5:0:1:-1><攻击、魔法、道术以及防御和魔御.<鉴定过的装备最多能鉴定5次/SCOLOR=253>               <Img:5:0:1:-1>\
└─────────────────────────────────────┘\
　　　　　　┌──────────────────────────┐\
　　　　　　<Img:6:0:1:-1><下面我就简单说一下鉴定要求/SCOLOR=250>：<鉴定 需要 文房四宝 1件/SCOLOR=249><Img:6:0:1:-1>\
　　　　　　└──────────────────────────┘\

　　　　　　┌────┐                      　　　　　┌────┐\
　　　　　　│<开始鉴定/@神圣鉴定>│                      　　　　　│<关闭窗口[url=]/@exit>│\[/url]
　　　　　　└────┘                      　　　　　└────┘\



[@神圣鉴定]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<*/SCOLOR=58>鉴定<[/SCOLOR=254><武  器/@武器><]/SCOLOR=254>  <当前穿戴/SCOLOR=250>：<$WEAPON> \
<*/SCOLOR=58>鉴定<[/SCOLOR=254><铠  甲/@铠甲><]/SCOLOR=254>  <当前穿戴/SCOLOR=239>：<$DRESS> \
<*/SCOLOR=58>鉴定<[/SCOLOR=254><头  盔/@头盔><]/SCOLOR=254>  <当前穿戴/SCOLOR=239>：<$HELMET>\
<*/SCOLOR=58>鉴定<[/SCOLOR=254><项  链/@项链><]/SCOLOR=254>  <当前穿戴/SCOLOR=250>：<$NECKLACE>\
<*/SCOLOR=58>鉴定<[/SCOLOR=254><左手镯/@左手镯><]/SCOLOR=254>  <当前穿戴/SCOLOR=250>：<$ARMRING_L>\
<*/SCOLOR=58>鉴定<[/SCOLOR=254><右手镯/@右手镯><]/SCOLOR=254>  <当前穿戴/SCOLOR=250>：<$ARMRING_R>\
<*/SCOLOR=58>鉴定<[/SCOLOR=254><左戒指/@左戒指><]/SCOLOR=254>  <当前穿戴/SCOLOR=250>：<$RING_L>\
<*/SCOLOR=58>鉴定<[/SCOLOR=254><右戒指/@右戒指><]/SCOLOR=254>  <当前穿戴/SCOLOR=250>：<$RING_R>\
<*/SCOLOR=58>鉴定<[/SCOLOR=254><勋  章/@勋章><]/SCOLOR=254>  <当前穿戴/SCOLOR=239>：<$RIGHTHAND>\
<*/SCOLOR=58>鉴定<[/SCOLOR=254><腰  带/@腰带><]/SCOLOR=254>  <当前穿戴/SCOLOR=239>：<$BELT>\
<*/SCOLOR=58>鉴定<[/SCOLOR=254><靴  子/@靴子><]/SCOLOR=254>  <当前穿戴/SCOLOR=239>：<$BOOTS>\
<*/SCOLOR=58>鉴定<[/SCOLOR=254><宝  石/@宝石><]/SCOLOR=254>  <当前穿戴/SCOLOR=239>：<$CHARM>\ \ \ \ \
　　　　　　　　　　　 <【/SCOLOR=218><返回[url=]/@main[/url]><】/SCOLOR=218><【/SCOLOR=22><关闭[url=]/@exit[/url]><】/SCOLOR=22>\ \
;=================================================================================
[@右戒指]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @右戒指A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@右戒指A]
#IF
CHECKUSEITEM 8
#ACT
GOTO @右戒指1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@右戒指1]
#IF
CHECKITEMADDVALUE 8 9 < 5
#ACT
GOTO @右戒指2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的右戒指已经鉴定过.不能再鉴定.
BREAK
[@右戒指2]
#IF
#ACT
MOvR N88 10 20 30
TAKE 文房四宝 1
Gmexecute Supermake 8 2 <$STR(N88)>
Gmexecute Supermake 8 3 <$STR(N88)>
Gmexecute Supermake 8 4 <$STR(N88)>
UPGRADEITEMEX 8 9 0 1 0
GOTO @右戒指提示
BREAK
[@右戒指提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$RING_R>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$RING_R>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@左戒指]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @左戒指A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@左戒指A]
#IF
CHECKUSEITEM 7
#ACT
GOTO @左戒指1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@左戒指1]
#IF
CHECKITEMADDVALUE 7 9 < 5
#ACT
GOTO @左戒指2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的左戒指已经鉴定过.不能再鉴定.
BREAK
[@左戒指2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 7 2 <$STR(N88)>
Gmexecute Supermake 7 3 <$STR(N88)>
Gmexecute Supermake 7 4 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 7 9 0 1 0
GOTO @左戒指提示
BREAK
[@左戒指提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$RING_L>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$RING_L>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@右手镯]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @右手镯A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@右手镯A]
#IF
CHECKUSEITEM 6
#ACT
GOTO @右手镯1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@右手镯1]
#IF
CHECKITEMADDVALUE 6 9 < 5
#ACT
GOTO @右手镯2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的右手镯已经鉴定过.不能再鉴定.
BREAK
[@右手镯2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 6 2 <$STR(N88)>
Gmexecute Supermake 6 3 <$STR(N88)>
Gmexecute Supermake 6 4 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 6 9 0 1 0
GOTO @右手镯提示
BREAK
[@右手镯提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$ARMRING_R>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$ARMRING_R>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@左手镯]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @左手镯A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@左手镯A]
#IF
CHECKUSEITEM 5
#ACT
GOTO @左手镯1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@左手镯1]
#IF
CHECKITEMADDVALUE 5 9 < 5
#ACT
GOTO @左手镯2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的左手镯已经鉴定过.不能再鉴定.
BREAK
[@左手镯2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 5 2 <$STR(N88)>
Gmexecute Supermake 5 3 <$STR(N88)>
Gmexecute Supermake 5 4 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 5 9 0 1 0
GOTO @左手镯提示
BREAK
[@左手镯提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$ARMRING_L>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$ARMRING_L>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@项链]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @项链A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@项链A]
#IF
CHECKUSEITEM 3
#ACT
GOTO @项链1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@项链1]
#IF
CHECKITEMADDVALUE 3 9 < 5
#ACT
GOTO @项链2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的项链已经鉴定过.不能再鉴定.
BREAK
[@项链2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 3 2 <$STR(N88)>
Gmexecute Supermake 3 3 <$STR(N88)>
Gmexecute Supermake 3 4 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 3 9 0 1 0
GOTO @项链提示
BREAK
[@项链提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$NECKLACE>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$NECKLACE>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@勋章]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @勋章A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@勋章A]
#IF
CHECKUSEITEM 2
#ACT
GOTO @勋章1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@勋章1]
#IF
CHECKITEMADDVALUE 2 9 < 5
#ACT
GOTO @勋章2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的勋章已经鉴定过.不能再鉴定.
BREAK
[@勋章2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 2 0 <$STR(N88)>
Gmexecute Supermake 2 1 <$STR(N88)>
Gmexecute Supermake 2 2 <$STR(N88)>
Gmexecute Supermake 2 3 <$STR(N88)>
Gmexecute Supermake 2 4 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 2 9 0 1 0
GOTO @勋章提示
BREAK
[@勋章提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$RIGHTHAND>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$RIGHTHAND>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@宝石]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @宝石A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@宝石A]
#IF
CHECKUSEITEM 12
#ACT
GOTO @宝石1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@宝石1]
#IF
CHECKITEMADDVALUE 12 9 < 5
#ACT
GOTO @宝石2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的宝石已经鉴定过.不能再鉴定.
BREAK
[@宝石2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 12 0 <$STR(N88)>
Gmexecute Supermake 12 1 <$STR(N88)>
Gmexecute Supermake 12 2 <$STR(N88)>
Gmexecute Supermake 12 3 <$STR(N88)>
Gmexecute Supermake 12 4 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 12 9 0 1 0
GOTO @宝石提示
BREAK
[@宝石提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$CHARM>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$CHARM>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@靴子]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @靴子A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@靴子A]
#IF
CHECKUSEITEM 11
#ACT
GOTO @靴子1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@靴子1]
#IF
CHECKITEMADDVALUE 11 9 < 5
#ACT
GOTO @靴子2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的靴子已经鉴定过.不能再鉴定.
BREAK
[@靴子2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 11 0 <$STR(N88)>
Gmexecute Supermake 11 1 <$STR(N88)>
Gmexecute Supermake 11 2 <$STR(N88)>
Gmexecute Supermake 11 3 <$STR(N88)>
Gmexecute Supermake 11 4 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 11 9 0 1 0
GOTO @靴子提示
BREAK
[@靴子提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$BOOTS>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$BOOTS>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@腰带]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @腰带A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@腰带A]
#IF
CHECKUSEITEM 10
#ACT
GOTO @腰带1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@腰带1]
#IF
CHECKITEMADDVALUE 10 9 < 5
#ACT
GOTO @腰带2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的腰带已经鉴定过.不能再鉴定.
BREAK
[@腰带2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 10 0 <$STR(N88)>
Gmexecute Supermake 10 1 <$STR(N88)>
Gmexecute Supermake 10 2 <$STR(N88)>
Gmexecute Supermake 10 3 <$STR(N88)>
Gmexecute Supermake 10 4 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 10 9 0 1 0
GOTO @腰带提示
BREAK
[@腰带提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$BELT>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$BELT>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@头盔]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @头盔A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@头盔A]
#IF
CHECKUSEITEM 4
#ACT
GOTO @头盔1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@头盔1]
#IF
CHECKITEMADDVALUE 4 9 < 5
#ACT
GOTO @头盔2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的头盔已经鉴定过.不能再鉴定.
BREAK
[@头盔2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 4 0 <$STR(N88)>
Gmexecute Supermake 4 1 <$STR(N88)>
Gmexecute Supermake 4 2 <$STR(N88)>
Gmexecute Supermake 4 3 <$STR(N88)>
Gmexecute Supermake 4 4 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 4 9 0 1 0
GOTO @头盔提示
BREAK
[@头盔提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$HELMET>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$HELMET>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@铠甲]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @铠甲A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@铠甲A]
#IF
CHECKUSEITEM 0
#ACT
GOTO @铠甲1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@铠甲1]
#IF
CHECKITEMADDVALUE 0 9 < 5
#ACT
GOTO @铠甲2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的铠甲已经鉴定过.不能再鉴定.
BREAK
[@铠甲2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 0 0 <$STR(N88)>
Gmexecute Supermake 0 1 <$STR(N88)>
Gmexecute Supermake 0 2 <$STR(N88)>
Gmexecute Supermake 0 3 <$STR(N88)>
Gmexecute Supermake 0 4 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 0 9 0 1 0
GOTO @铠甲提示
BREAK
[@铠甲提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$DRESS>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$DRESS>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================
[@武器]
#IF
CheckItem 文房四宝 1
#ACT
GOTO @武器A
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】您没有文房四宝！
BREAK
[@武器A]
#IF
CHECKUSEITEM 1
#ACT
GOTO @武器1
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】请把需要鉴定的装备穿在身上
BREAK
[@武器1]
#IF
CHECKITEMADDVALUE 1 9 < 5
#ACT
GOTO @武器2
BREAK
#ELSEACT
MESSAGEBOX 【操作失败】你的武器已经鉴定过.不能再鉴定.
BREAK
[@武器2]
#IF
#ACT
MOvR N88 10 20 30
Gmexecute Supermake 1 0 <$STR(N88)>
Gmexecute Supermake 1 1 <$STR(N88)>
Gmexecute Supermake 1 2 <$STR(N88)>
TAKE 文房四宝 1
UPGRADEITEMEX 1 9 0 1 0
GOTO @武器提示
BREAK
[@武器提示]
　                                        <Img:7:0:-2:-20/@Exit>\ \
<★/SCOLOR=254><鉴定成功！/SCOLOR=149>       【<返回/@神圣鉴定>】\ \
<提示：/SCOLOR=253>[<$WEAPON>]全属性增加了[<$STR(N88)>]点
#ACT
GuildNoticeMsg 251 219 【玩家[%s]鬼斧神工[<$WEAPON>]全属性增加了[<$STR(N88)>]点】
BREAK
;=================================================================================