配套脚本

NPC配置代码

天心新加\幸运项链 3 319 331 幸运项链 0 201 0

NPC脚本 

[@main]
#if
#act
openmerchantbigdlg 1 747 1 4 0 -50 0
#say
<><imgex:1:621:622:623:452:-10/@exit> \ 

 <幸运项链/scolor=154>\
<>  <欢迎您来到/scolor=251> {◆<$servername>◆/autocolor=209,253,254,252,215,95,252,247}   <荐~:幸运项链.提示幸运获得超高属性.更多元素!!/scolor=254>\
<img:746:1:40:4>\\

<1.项链幸运:/scolor=251><项链最高提升幸运(3)点 ,配合武器可达到本服最高(10)点/scolor=145>    \
<2.幸运提升:/scolor=251><项链提升至幸运(3)时,可随机增加项链(1)条元素属性!/scolor=147>  \
<img:746:1:40:4>\\

   <提升幸运 + 1/fcolor=150>  <详细说明:收费10000元宝  成功几率:50%/fcolor=147>  「<开始提升/@开始升级>」\
   <提升幸运 + 2/fcolor=149>  <详细说明:收费20000元宝  成功几率:30%/fcolor=145>  「<开始提升/@开始升级>」\
   <提升幸运 + 3/fcolor=151>  <详细说明:收费30000元宝  成功几率:10%/fcolor=155>  「<开始提升/@开始升级>」\
<img:746:1:40:4>\\
   <项链幸运重生/fcolor=151>    <清洗说明:收费50000元宝,可清洗到幸运+2/fcolor=103>「<幸运清洗/@重洗项链>」\
<img:746:1:40:4>\\

           <请放入要被转移的项链      请放入待转移的项链/scolor=70>\
                      ↓                 ↓   \ \
  转移项链→  →  →   <itembox:1:1:751:0:-13:40:40:19:放入要被转移出的项链>            <itembox:2:1:751:0:-13:40:40:19:放入预备转移的项链>          <√·免费幸运转移/@开始转移> \\

   <>                                                       <√·升级项链元素|
250#提升元素1-2级需要  20个魔龙之眼 失败几率50%
^250#提升元素2-3级需要   30个魔龙之眼  失败几率50%
^250#提升元素3-4级需要   40个魔龙之眼  失败几率50%
^250#提升元素4-5级需要   50个魔龙之眼  失败几率50%
^250#提升元素5-6级需要  100个魔龙之眼  失败几率50%
^250#提升元素6-7级需要  200个魔龙之眼  失败几率50%
^250#提升元素7-8级需要  400个魔龙之眼  失败几率50%
^250#提升元素8-9级需要  800个魔龙之眼  失败几率50%
^250#提升元素9-10级需要 幸运石20块  失败几率50%/@升级项链元素> 


[@升级项链元素]
#if
#act
mov  s$材料名字 
mov  n$材料数量 0
mov  n$升级机率 0 

#if
not checkuseitem 3
#act
messagebox 你身上没有佩戴对应的项链
break

#if
checknewitemvalue 3 0 = 0
checknewitemvalue 3 1 = 0
checknewitemvalue 3 2 = 0
checknewitemvalue 3 3 = 0
checknewitemvalue 3 4 = 0
checknewitemvalue 3 5 = 0
checknewitemvalue 3 6 = 0
#act
messagebox 你身上的项链没有元素属性,无法进升级
break

#or
checknewitemvalue 3 0 > 9
checknewitemvalue 3 1 > 9
checknewitemvalue 3 2 > 9
checknewitemvalue 3 3 > 9
checknewitemvalue 3 4 > 9
checknewitemvalue 3 5 > 9
checknewitemvalue 3 6 > 9
#act
messagebox 你身上的项链有元素属性超过10
break

#or
checknewitemvalue 3 0 = 1
checknewitemvalue 3 1 = 1
checknewitemvalue 3 2 = 1
checknewitemvalue 3 3 = 1
checknewitemvalue 3 4 = 1
checknewitemvalue 3 5 = 1
checknewitemvalue 3 6 = 1
#act
mov  s$材料名字 魔龙之眼
mov  n$材料数量 20
mov  n$升级机率  2

#or
checknewitemvalue 3 0 = 2
checknewitemvalue 3 1 = 2
checknewitemvalue 3 2 = 2
checknewitemvalue 3 3 = 2
checknewitemvalue 3 4 = 2
checknewitemvalue 3 5 = 2
checknewitemvalue 3 6 = 2
#act
mov  s$材料名字 魔龙之眼
mov  n$材料数量 30
mov  n$升级机率  3

#or
checknewitemvalue 3 0 = 3
checknewitemvalue 3 1 = 3
checknewitemvalue 3 2 = 3
checknewitemvalue 3 3 = 3
checknewitemvalue 3 4 = 3
checknewitemvalue 3 5 = 3
checknewitemvalue 3 6 = 3
#act
mov  s$材料名字 魔龙之眼
mov  n$材料数量 40
mov  n$升级机率  4


#or
checknewitemvalue 3 0 = 4
checknewitemvalue 3 1 = 4
checknewitemvalue 3 2 = 4
checknewitemvalue 3 3 = 4
checknewitemvalue 3 4 = 4
checknewitemvalue 3 5 = 4
checknewitemvalue 3 6 = 4
#act
mov  s$材料名字 魔龙之眼
mov  n$材料数量 50
mov  n$升级机率  4



#if
not checkitem <$str(s$材料名字)> <$str(n$材料数量)>
#act
messagebox 你的升级材料够<$str(s$材料名字)>-$str(s$材料数量)>
break

#if
random <$str(n$升级机率)>
#act
take <$str(s$材料名字)> <$str(n$材料数量)>
goto @升级项链元素属性第2步
break
#elseact
take <$str(s$材料名字)> <$str(n$材料数量)>
messagebox 升级失败,扣除<$str(s$材料名字)>-<$str(n$材料数量)>
break


[@升级项链元素属性第2步]
#or
checknewitemvalue 3 0 =  1
checknewitemvalue 3 0 > 1
#act
setnewitemvalue 3 0 + 1

#or
checknewitemvalue 3 1 =  1
checknewitemvalue 3 1 > 1
#act
setnewitemvalue 3 1 + 1


#or
checknewitemvalue 3 2 =  1
checknewitemvalue 3 2 > 1
#act
setnewitemvalue 3 2 + 1

#or
checknewitemvalue 3 3 =  1
checknewitemvalue 3 3 > 1
#act
setnewitemvalue 3 3 + 1


#or
checknewitemvalue 3 4 =  1
checknewitemvalue 3 4 > 1
#act
setnewitemvalue 3 4 + 1

#or
checknewitemvalue 3 5 =  1
checknewitemvalue 3 5 > 1
#act
setnewitemvalue 3 5 + 1

#or
checknewitemvalue 3 6 =  1
checknewitemvalue 3 6 > 1
#act
setnewitemvalue 3 6 + 1

#if
#act
sendmsg 0 253 0 >>>提示:玩家【<$USERNAME>】提升幸运元素属性完成
break 
[@itemintobox1]
#if
small <$boxitem[1].hmac> 3
#act
messagebox 你的项链幸运值不是+3,无法被转行
returnboxitem 1
break

[@开始转移]
#if
not checkboxitemcount 1
#act
messagebox 请在第一个框框中放入项链
break #if not checkboxitemcount 2
#act
messagebox 请在第二个框框中放入项链
break

#if
#act
setupgradeitem 2

#if
large <$boxitem[1].value1> 0 
;checknewitemvalue 3 0 < 11
#act
setnewitemvalue -1 0 = <$boxitem[1].value1>
changeitemaddvalue -1 1 = 3

#if
large <$boxitem[1].value2> 0 
#act
setnewitemvalue -1 1 = <$boxitem[1].value2>
changeitemaddvalue -1 1 = 3

#if
large <$boxitem[1].value3> 0 
#act
setnewitemvalue -1 2 = <$boxitem[1].value3>
changeitemaddvalue -1 1 = 3

#if
large <$boxitem[1].value4> 0 
#act
setnewitemvalue -1 3 = <$boxitem[1].value4>
changeitemaddvalue -1 1 = 3

#if
large <$boxitem[1].value5> 0 
#act
setnewitemvalue -1 4 = <$boxitem[1].value5>
changeitemaddvalue -1 1 = 3

#if
large <$boxitem[1].value6> 0 
#act
setnewitemvalue -1 5 = <$boxitem[1].value6>
changeitemaddvalue -1 1 = 3


#if
large <$boxitem[1].value7> 0 
#act
setnewitemvalue -1 6 = <$boxitem[1].value7>
changeitemaddvalue -1 1 = playmp3

;刷新到客户端
#or
large <$boxitem[1].value1> 0 
large <$boxitem[2].value1> 0 
large <$boxitem[3].value1> 0 
large <$boxitem[4].value1> 0 
large <$boxitem[5].value1> 0 
large <$boxitem[6].value1> 0 
large <$boxitem[7].value1> 0 
#act
updateboxitem 2
goto @清除原始项链属性
sendmsg 6 项链属性转移成功
break


[@清除原始项链属性]
#if
#act
setupgradeitem 1

#if
#act
changeitemaddvalue -1 1 = 0
setnewitemvalue -1 0 = 0
setnewitemvalue -1 1 = 0
setnewitemvalue -1 2 = 0
setnewitemvalue -1 3 = 0
setnewitemvalue -1 4 = 0
setnewitemvalue -1 5 = 0
setnewitemvalue -1 6 = 0

#if
#act
updateboxitem 1
sendmsg 6 原始项链属性清除成功
break








[@开始升级]
#if
not checkuseitem 3
#act
messagebox 您身上没佩戴项链
break


#if
checkitemaddvalue 3 1 > 2
#act
messagebox 您的项链幸运已经满级
break

#if
checkitemaddvalue 3 1 = 0
#act
mov n$项链升级需要元宝 10000
mov n$项链升级机率 2
goto @开始项链幸运升级2
break

#if
checkitemaddvalue 3 1 = 1
#act
mov n$项链升级需要元宝 20000
mov n$项链升级机率  3
goto @开始项链幸运升级2
break

#if
checkitemaddvalue 3 1 = 2
#act
mov n$项链升级需要元宝 30000
mov n$项链升级机率 10
goto @开始项链幸运升级2
break

[@开始项链幸运升级2]
#if
checkgamegold < n$项链升级需要元宝
#act
messagebox 你的元宝不足<$str(n$项链升级需要元宝)>,无法进行升级
break


#if
checkgamegold  ? n$项链升级需要元宝
;random n$项链升级机率
#act
gamegold - <$str(n$项链升级需要元宝)>
;upgradeitemex 物品位置(0-12) 属性位置(0-14) 成功机率(0-100) 点数机率(0-255) 是否破碎(0,1)
upgradeitemex 3 1 0 1 0
sendmsg 0 250 0 》》系统提示:【<$username>】成功提升幸运一点
goto @升级随机元素3
break
#elseact
gamegold - <$str(n$项链升级需要元宝)>
messagebox 升级失败,扣除对应的元宝
break



[@升级随机元素3]
#if
checkitemaddvalue 3 1 = 3
#act
movr p2 1 4
movr p3 4 7
movr p4 1 4
setnewitemvalue 3 <$str(p2)> + <$str(p4)>
setnewitemvalue 3 <$str(p3)> + <$str(p4)>
sendmsg 6 元素属性增加成功,随机增加了<$str(p4)>点
break


[@重洗项链]
#if
checkgamegold > 49999
checkitemaddvalue 3 1 > 2
#act
setnewitemvalue 3 0 = 0
setnewitemvalue 3 1 = 0
setnewitemvalue 3 2 = 0
setnewitemvalue 3 3= 0
setnewitemvalue 3 4 = 0
setnewitemvalue 3 5 = 0
setnewitemvalue 3 6 = 0
changeitemaddvalue 3 1 = 2
messagebox 提示:清洗成功
break
#elseact
messagebox 你当前没有5w元宝或者不是幸运3的项链,无法进行清除
break

评论提问