天空 发表于 2024-2-26 03:44:08

NPC鉴定脚本

[@鉴定脚本]
{
#IF
#ACT
CloseBigDialogBox
#SAY
<> \ \ \
<>\
<> <ImgEx:1:34:35:34:0:-10/@武器鉴定>    <ImgEx:1:38:39:38:0:-10/@衣服鉴定>    <ImgEx:1:42:43:42:0:-10/@项链鉴定>    <ImgEx:1:40:41:40:0:-10/@头盔鉴定>\ \

<> <ImgEx:1:44:45:44:0:-5/@勋章鉴定>    <ImgEx:1:106:107:106:0:-5/@左手鉴定>    <ImgEx:1:108:109:108:0:-5/@右手鉴定>    <ImgEx:1:110:111:110:0:-5/@左戒鉴定>\ \

<> <ImgEx:1:235:236:235:0:0/@右戒鉴定>    <ImgEx:1:237:238:237:0:0/@腰带鉴定>    <ImgEx:1:239:240:239:0:0/@靴子鉴定>    <ImgEx:1:241:242:241:0:0/@血石鉴定>\ \
<> <IMG:37:1:-7:5>\
<每次鉴定收取/SCOLOR=250>：<5颗精炼石/SCOLOR=253>\
<随机分配，防御,魔御,攻击,魔法,道术,生命,法力 7种属性/SCOLOR=254>\
<前5种属性最高+10点为极品   血蓝最高+200为极品/SCOLOR=58>\






[@武器鉴定]
#if
CHECKUSEITEM 1
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 1
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！


[@衣服鉴定]
#if
CHECKUSEITEM 0
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 0
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！



[@头盔鉴定]
#if
CHECKUSEITEM 4
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 4
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！



[@项链鉴定]
#if
CHECKUSEITEM 3
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 3
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！




[@勋章鉴定]
#if
CHECKUSEITEM 2
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 2
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！





[@左手鉴定]
#if
CHECKUSEITEM 5
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 5
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！



[@右手鉴定]
#if
CHECKUSEITEM 6
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 6
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！



[@左戒鉴定]
#if
CHECKUSEITEM 7
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 7
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！




[@右戒鉴定]
#if
CHECKUSEITEM 8
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 8
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！






[@腰带鉴定]
#if
CHECKUSEITEM 10
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 10
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！





[@靴子鉴定]
#if
CHECKUSEITEM 11
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 11
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！






[@血石鉴定]
#if
CHECKUSEITEM 12
#elseact
messagebox 此位置没佩戴装备呢！
break

#if
CHECKITEM 精炼石 3
#ACT
take 精炼石 3
MOV N$装备位置 12
GOTO @开始跳转鉴定
break
#elseact
messagebox 你没有3颗精炼石！



























[@开始跳转鉴定]
#act
INC D0 1
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 0 = 0
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 1 = 0
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 2 = 0
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 3 = 0
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 4 = 0
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 5 = 0
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 6 = 0
SENDMSG 5 -------------洗炼结果-------------<$STR(D0)>


#if
RANDOM 2
#act
;数值
MOVR N$自定义属性数值1 0 11
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 0 = <$STR(N$自定义属性数值1)>
;颜色
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 0 0 253
;绑定属性类型
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 0 1 1
;是否显示同一行
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 0 2 0
;是否百分比
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 0 3 0
CHANGECUSTOMITEMTEXTCOLOR <$STR(N$装备位置)> 146
CHANGECUSTOMITEMTEXT <$STR(N$装备位置)> [鉴定属性]：
SENDUPGRADEITEM
SENDMSG 7 洗炼完成,你的装备获得：防御+<$STR(N$自定义属性数值1)>


#if
RANDOM 2
#act
;数值
MOVR N$自定义属性数值2 0 11
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 1 = <$STR(N$自定义属性数值2)>
;颜色
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 1 0 242
;绑定属性类型
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 1 1 2
;是否显示同一行
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 1 2 1
;是否百分比
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 1 3 0
CHANGECUSTOMITEMTEXTCOLOR <$STR(N$装备位置)> 146
CHANGECUSTOMITEMTEXT <$STR(N$装备位置)> [鉴定属性]：
SENDUPGRADEITEM
SENDMSG 7 洗炼完成,你的装备获得：魔御+<$STR(N$自定义属性数值2)>












#if
RANDOM 2
#act
;数值
MOVR N$自定义属性数值3 0 11
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 2 = <$STR(N$自定义属性数值3)>
;颜色
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 2 0 250
;绑定属性类型
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 2 1 3
;是否显示同一行
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 2 2 2
;是否百分比
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 2 3 0
CHANGECUSTOMITEMTEXTCOLOR <$STR(N$装备位置)> 146
CHANGECUSTOMITEMTEXT <$STR(N$装备位置)> [鉴定属性]：
SENDUPGRADEITEM
SENDMSG 7 洗炼完成,你的装备获得：攻击+<$STR(N$自定义属性数值3)>











#if
RANDOM 2
#act
;数值
MOVR N$自定义属性数值4 0 11
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 3 = <$STR(N$自定义属性数值4)>
;颜色
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 3 0 250
;绑定属性类型
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 3 1 4
;是否显示同一行
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 3 2 3
;是否百分比
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 3 3 0
CHANGECUSTOMITEMTEXTCOLOR <$STR(N$装备位置)> 146
CHANGECUSTOMITEMTEXT <$STR(N$装备位置)> [鉴定属性]：
SENDUPGRADEITEM
SENDMSG 7 洗炼完成,你的装备获得：魔法+<$STR(N$自定义属性数值4)>











#if
RANDOM 2
#act
;数值
MOVR N$自定义属性数值5 0 11
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 4 = <$STR(N$自定义属性数值5)>
;颜色
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 4 0 250
;绑定属性类型
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 4 1 5
;是否显示同一行
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 4 2 4
;是否百分比
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 4 3 0
CHANGECUSTOMITEMTEXTCOLOR <$STR(N$装备位置)> 146
CHANGECUSTOMITEMTEXT <$STR(N$装备位置)> [鉴定属性]：
SENDUPGRADEITEM
SENDMSG 7 洗炼完成,你的装备获得：道术+<$STR(N$自定义属性数值5)>














#if
RANDOM 2
#act
;数值
MOVR N$自定义属性数值6 0 200
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 5 = <$STR(N$自定义属性数值6)>
;颜色
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 5 0 21
;绑定属性类型
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 5 1 6
;是否显示同一行
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 5 2 5
;是否百分比
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 5 3 0
CHANGECUSTOMITEMTEXTCOLOR <$STR(N$装备位置)> 146
CHANGECUSTOMITEMTEXT <$STR(N$装备位置)> [鉴定属性]：
SENDUPGRADEITEM
SENDMSG 7 洗炼完成,你的装备获得：生命+<$STR(N$自定义属性数值6)>


#if
RANDOM 2
#act
;数值
MOVR N$自定义属性数值7 0 200
CHANGECUSTOMITEMVALUE <$STR(N$装备位置)> 6 = <$STR(N$自定义属性数值7)>
;颜色
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 6 0 254
;绑定属性类型
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 6 1 7
;是否显示同一行
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 6 2 6
;是否百分比
CHANGECUSTOMITEMABIL <$STR(N$装备位置)> 6 3 0
CHANGECUSTOMITEMTEXTCOLOR <$STR(N$装备位置)> 146
CHANGECUSTOMITEMTEXT <$STR(N$装备位置)> [鉴定属性]：
SENDUPGRADEITEM
SENDMSG 7 洗炼完成,你的装备获得：法力+<$STR(N$自定义属性数值7)>

}

用户安静 发表于 2024-2-26 03:44:08

楼上是GG还是MM啊？

s475671405 发表于 2024-2-26 04:10:34

楼主写的很经典！

胜友如云 发表于 2024-2-26 04:11:13

顶！顶！顶！

魔仙堡莉莉 发表于 2024-2-26 04:38:38

楼主加油，看好你哦！

果豆豆 发表于 2024-2-26 04:50:32

看了这么多帖子，第一次看到这么有深度了！

3295967095 发表于 2024-2-26 05:37:45

不是惊喜，是惊吓！

城南以南 发表于 2024-2-26 06:34:10

经典，收藏了！

hu18565338670 发表于 2024-2-26 07:57:35

楼主很有激情啊！

昆明市岩石科技 发表于 2024-2-26 08:29:34

楼主好聪明啊！

孔孔拉 发表于 2024-2-26 08:58:07

以后要跟楼主好好学习学习！

mousesf 发表于 2024-2-26 08:58:18

记得吃药！

卡姿兰黑眼圈 发表于 2024-2-26 10:53:05

这么经典的话只有楼主能想到！

只为情伤 发表于 2024-2-26 11:22:01

好无聊啊！

莪湜玎玎 发表于 2024-2-26 11:50:33

坚持回帖！
页: [1] 2
查看完整版本: NPC鉴定脚本