一.知识点:

DEC对字符型变量操作命令。
MOV命令做了一些改进。

[@Main]
#ACT
MOV S1 GameOfMir引擎M2
MOV S2 GameOfMir引擎M2
DEC S1 GameOfMir引擎 ;删除S1中的“GameOfMir引擎”字符串
DEC S2 1 3 ;删除S2中的第1至第3个字符串 这个要注意,一个汉字是2个字节长度,不要删除半个汉字的情况,否则会乱码。

结果 S1=M2
S2=引擎M2

二.配套脚本

[@main]
#IF
#ACT
OPENMERCHANTBIGDLG 1 747 1 4 0 -50 0
#SAY
<><ImgEx:1:621:622:623:453:-9/@exit> \  \
 <十二生肖/SCOLOR=154> <New~~!/SCOLOR=249>\
<>  <欢迎您来到/SCOLOR=251> {◆<$SERVERNAME>◆/AUTOCOLOR=209,253,254,252,215,95,252,247}     <荐~:生肖之力.获得十二生肖触发超强属性!!/SCOLOR=254>\
<Img:746:1:20:4>\\
<>  <提升二级生肖介绍:/SCOLOR=251><付费方式一:/SCOLOR=249><1级生肖*1个  500000元宝   幸运石*1颗/SCOLOR=250>   \
<>  <提升二级生肖介绍:/SCOLOR=251><免费方式二:/SCOLOR=249><1级生肖*2个  幸运石*2颗 /SCOLOR=250>    \ \
<Img:746:1:20:4>\\
<>  <提升三级生肖介绍:/SCOLOR=251><付费方式一:/SCOLOR=249><2级生肖*1个  1000000元宝  幸运石*2颗/SCOLOR=250>   \
<>  <提升三级生肖介绍:/SCOLOR=251><免费方式二:/SCOLOR=249><2级生肖*2个  幸运石*3颗/SCOLOR=250>    \ 
<Img:746:1:20:4>\ \
 \<如果选择付费方式一,随意放入一个生肖即可→/SCOLOR=70> \
<如果选择免费方式二,需要放入同级两个生肖→/SCOLOR=70>     
<>        <ITEMBOX:1:1:751:0:-23:40:40:100,101,102,103,104,105,106,107,108,109,110,111:只允许放入生肖装备>        
<>        <ITEMBOX:2:1:751:0:-23:40:40:100,101,102,103,104,105,106,107,108,109,110,111:只允许放入生肖装备>   \  \ 
<Img:746:1:20:4>\ 
      「<锻造付费升级方式一/@选择升级方式一>」               「<锻造免费升级方式二/@选择升级方式二>」\
<Img:746:1:20:4>\ 

 

[@itemintobox1]
#IF
checkcontainstext <$boxitem[1].name> 完美
#act
returnboxitem 1
messagebox 你不能放入3级完美生肖
break


[@itemintobox2]
#IF
checkcontainstext <$boxitem[2].name> 完美
#act
returnboxitem 2
messagebox 你不能放入3级完美生肖
break


[@选择升级方式一]
#if
not checkboxitemcount 1
not checkboxitemcount 2
#act
messagebox 你需要放入对应生肖才能升级
break

#if
checkcontainstext <$boxitem[1].name> 「普通」
#act
mov n$升级生肖放入框的编号  1
goto @1级普通生肖升2级生肖
break


#if
checkcontainstext <$boxitem[2].name> 「普通」
#act
mov n$升级生肖放入框的编号  2
goto @1级普通生肖升2级生肖
break


#if
checkcontainstext <$boxitem[1].name> 「精品」
#act
mov n$升级生肖放入框的编号  1
goto @2级普通生肖升3级生肖
break


#if
checkcontainstext <$boxitem[2].name> 「精品」
#act
mov n$升级生肖放入框的编号  2
goto @2级普通生肖升3级生肖
break

[@2级普通生肖升3级生肖]
#if
not checkgamegold ? 1000000
#ACT
messagebox 你没有100W元宝,无法升级
break

#if
not checkitem 幸运石  2
#ACT
messagebox 你没有幸运石2块,无法升级
break

#IF
#ACT
setupgradeitem <$str(n$升级生肖放入框的编号)>

#IF
checkgamegold ? 1000000
checkitem 幸运石  2
#ACT
take 幸运石  2
gamegold - 1000000

;子鼠「普通」
mov s$升级生肖名字  <$boxitem[<$str(n$升级生肖放入框的编号)>].name>
dec s$升级生肖名字 「精品」
inc s$升级生肖名字 「完美」
give <$str(s$升级生肖名字)> 1
delboxitem <$str(n$升级生肖放入框的编号)>
sendmsg 0 250 0 》》系统提示:恭喜【<$USERNAME>】成功升级出【<$str(s$升级生肖名字)>】生肖装备
sendmsg 0 250 0 》》系统提示:恭喜【<$USERNAME>】成功升级出【<$str(s$升级生肖名字)>】生肖装备
break

[@1级普通生肖升2级生肖]
#if
not checkgamegold ? 500000
#ACT
messagebox 你没有50W元宝,无法升级
break

#if
not checkitem 幸运石  1
#ACT
messagebox 你没有幸运石1块,无法升级
break

#IF
#ACT
setupgradeitem <$str(n$升级生肖放入框的编号)>

#IF
checkgamegold ? 500000
checkitem 幸运石  1
#ACT
take 幸运石  1
gamegold - 500000

;子鼠「普通」
mov s$升级生肖名字  <$boxitem[<$str(n$升级生肖放入框的编号)>].name>
dec s$升级生肖名字 「普通」
inc s$升级生肖名字 「精品」
give <$str(s$升级生肖名字)> 1
delboxitem <$str(n$升级生肖放入框的编号)>
sendmsg 0 250 0 》》系统提示:恭喜【<$USERNAME>】成功升级出【<$str(s$升级生肖名字)>】生肖装备
sendmsg 0 250 0 》》系统提示:恭喜【<$USERNAME>】成功升级出【<$str(s$升级生肖名字)>】生肖装备
break

 

 

 

评论提问