五行元素清除淬炼脚本

传奇服务端

[@main]
无行元素我就不多说，是传奇骨灰都懂的！ \
请根据你的元素水晶选择你要熔炼的装备:\ \
<衣 服/@蓝色元素水晶100>    <勋 章/@蓝色元素水晶102>    <头 盔/@蓝色元素水晶104>    <腰 带/@蓝色元素水晶110>    <左手镯/@蓝色元素水晶106>    <左戒指/@蓝色元素水晶108>\ \
<武 器/@蓝色元素水晶101>    <宝 石/@蓝色元素水晶112>    <项 链/@蓝色元素水晶103>    <靴 子/@蓝色元素水晶111>    <右手镯/@蓝色元素水晶105>    <右戒指/@蓝色元素水晶107>\ \
<清除元素/@清除元素>

[@清除元素]
<注：元素清除后将无法恢复，请慎重操作> \ \
<清除衣服/@清除衣>  <清除勋章/@清除勋>  <清除头盔/@清除头>  <清除腰带/@清除腰>  <清除左手镯/@清除左手>  <清除左戒指/@清除左>\ \
<清除武器/@清除武>  <清除宝石/@清除宝>  <清除项链/@清除项>  <清除靴子/@清除靴>  <清除右手镯/@清除右手>  <清除右戒指/@清除右>\ \

[@清除项]
#act
SetNewItemValue 12 0 = 0
SetNewItemValue 12 1 = 0
SetNewItemValue 12 2 = 0
SetNewItemValue 12 3 = 0
SetNewItemValue 12 4 = 0
SetNewItemValue 12 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break

[@清除项]
#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
sendmsg 5 [清除完成]：您的装备元素已清除！
break


[@清除靴]
#act
SetNewItemValue 11 0 = 0
SetNewItemValue 11 1 = 0
SetNewItemValue 11 2 = 0
SetNewItemValue 11 3 = 0
SetNewItemValue 11 4 = 0
SetNewItemValue 11 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break



[@清除右]
#act
SetNewItemValue 7 0 = 0
SetNewItemValue 7 1 = 0
SetNewItemValue 7 2 = 0
SetNewItemValue 7 3 = 0
SetNewItemValue 7 4 = 0
SetNewItemValue 7 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break


[@清除左]
#act
SetNewItemValue 8 0 = 0
SetNewItemValue 8 1 = 0
SetNewItemValue 8 2 = 0
SetNewItemValue 8 3 = 0
SetNewItemValue 8 4 = 0
SetNewItemValue 8 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break

[@清除右手]
#act
SetNewItemValue 5 0 = 0
SetNewItemValue 5 1 = 0
SetNewItemValue 5 2 = 0
SetNewItemValue 5 3 = 0
SetNewItemValue 5 4 = 0
SetNewItemValue 5 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break

[@清除左手]
#act
SetNewItemValue 6 0 = 0
SetNewItemValue 6 1 = 0
SetNewItemValue 6 2 = 0
SetNewItemValue 6 3 = 0
SetNewItemValue 6 4 = 0
SetNewItemValue 6 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break

[@清除腰]
#act
SetNewItemValue 10 0 = 0
SetNewItemValue 10 1 = 0
SetNewItemValue 10 2 = 0
SetNewItemValue 10 3 = 0
SetNewItemValue 10 4 = 0
SetNewItemValue 10 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break

[@清除头]
#act
SetNewItemValue 4 0 = 0
SetNewItemValue 4 1 = 0
SetNewItemValue 4 2 = 0
SetNewItemValue 4 3 = 0
SetNewItemValue 4 4 = 0
SetNewItemValue 4 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break

[@清除武]
#act
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 4 = 0
SetNewItemValue 1 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break

[@清除勋]
#act
SetNewItemValue 2 0 = 0
SetNewItemValue 2 1 = 0
SetNewItemValue 2 2 = 0
SetNewItemValue 2 3 = 0
SetNewItemValue 2 4 = 0
SetNewItemValue 2 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break

[@清除衣]
#act
SetNewItemValue 0 0 = 0
SetNewItemValue 0 1 = 0
SetNewItemValue 0 2 = 0
SetNewItemValue 0 3 = 0
SetNewItemValue 0 4 = 0
SetNewItemValue 0 5 = 0
sendmsg 5 [清除完成]：您的装备元素已清除！
break

[@蓝色元素水晶100]
#ACT
MOV N1 0
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶101]
#ACT
MOV N1 1
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶102]
#ACT
MOV N1 2
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶103]
#ACT
MOV N1 3
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶104]
#ACT
MOV N1 4
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶105]
#ACT
MOV N1 5
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶106]
#ACT
MOV N1 6
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶107]
#ACT
MOV N1 7
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶108]
#ACT
MOV N1 8
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶110]
#ACT
MOV N1 10
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶111]
#ACT
MOV N1 11
MOV N2 0
GOTO @蓝色元素水晶1001

[@蓝色元素水晶112]
#ACT
MOV N1 12
MOV N2 0
GOTO @蓝色元素水晶1001


[@蓝色元素水晶1001]
#IF
CheckNewItemValue <$STR(N1)> 0 = 10
#ACT
INC N2 10
GOTO @蓝色元素水晶1002
BREAK

#IF
CheckNewItemValue <$STR(N1)> 0 = 9
#ACT
INC N2 9
GOTO @蓝色元素水晶1002
BREAK

#IF
CheckNewItemValue <$STR(N1)> 0 = 8
#ACT
INC N2 8
GOTO @蓝色元素水晶1002
BREAK

#IF
CheckNewItemValue <$STR(N1)> 0 = 7
#ACT
INC N2 7
GOTO @蓝色元素水晶1002
BREAK

#IF
CheckNewItemValue <$STR(N1)> 0 = 6
#ACT
INC N2 6
GOTO @蓝色元素水晶1002
BREAK

#IF
CheckNewItemValue <$STR(N1)> 0 = 5
#ACT
INC N2 5
GOTO @蓝色元素水晶1002
BREAK

#IF
CheckNewItemValue <$STR(N1)> 0 = 4
#ACT
INC N2 4
GOTO @蓝色元素水晶1002
BREAK

#IF
CheckNewItemValue <$STR(N1)> 0 = 3
#ACT
INC N2 3
GOTO @蓝色元素水晶1002
BREAK

#IF
CheckNewItemValue <$STR(N1)> 0 = 2
#ACT
INC N2 2
GOTO @蓝色元素水晶1002
BREAK

#IF
CheckNewItemValue <$STR(N1)> 0 = 1
#ACT
INC N2 1
GOTO @蓝色元素水晶1002
#ELSEACT
GOTO @蓝色元素水晶1002

[@蓝色元素水晶1002]
#IF
CheckNewItemValue <$STR(N1)> 1 = 10
#ACT
INC N2 10
GOTO @蓝色元素水晶1003
BREAK

#IF
CheckNewItemValue <$STR(N1)> 1 = 9
#ACT
INC N2 9
GOTO @蓝色元素水晶1003
BREAK

#IF
CheckNewItemValue <$STR(N1)> 1 = 8
#ACT
INC N2 8
GOTO @蓝色元素水晶1003
BREAK

#IF
CheckNewItemValue <$STR(N1)> 1 = 7
#ACT
INC N2 7
GOTO @蓝色元素水晶1003
BREAK

#IF
CheckNewItemValue <$STR(N1)> 1 = 6
#ACT
INC N2 6
GOTO @蓝色元素水晶1003
BREAK

#IF
CheckNewItemValue <$STR(N1)> 1 = 5
#ACT
INC N2 5
GOTO @蓝色元素水晶1003
BREAK

#IF
CheckNewItemValue <$STR(N1)> 1 = 4
#ACT
INC N2 4
GOTO @蓝色元素水晶1003
BREAK

#IF
CheckNewItemValue <$STR(N1)> 1 = 3
#ACT
INC N2 3
GOTO @蓝色元素水晶1003
BREAK

#IF
CheckNewItemValue <$STR(N1)> 1 = 2
#ACT
INC N2 2
GOTO @蓝色元素水晶1003
BREAK

#IF
CheckNewItemValue <$STR(N1)> 1 = 1
#ACT
INC N2 1
GOTO @蓝色元素水晶1003
#ELSEACT
GOTO @蓝色元素水晶1003

[@蓝色元素水晶1003]
#IF
CheckNewItemValue <$STR(N1)> 2 = 10
#ACT
INC N2 10
GOTO @蓝色元素水晶1004
BREAK

#IF
CheckNewItemValue <$STR(N1)> 2 = 9
#ACT
INC N2 9
GOTO @蓝色元素水晶1004
BREAK

#IF
CheckNewItemValue <$STR(N1)> 2 = 8
#ACT
INC N2 8
GOTO @蓝色元素水晶1004
BREAK

#IF
CheckNewItemValue <$STR(N1)> 2 = 7
#ACT
INC N2 7
GOTO @蓝色元素水晶1004
BREAK

#IF
CheckNewItemValue <$STR(N1)> 2 = 6
#ACT
INC N2 6
GOTO @蓝色元素水晶1004
BREAK

#IF
CheckNewItemValue <$STR(N1)> 2 = 5
#ACT
INC N2 5
GOTO @蓝色元素水晶1004
BREAK

#IF
CheckNewItemValue <$STR(N1)> 2 = 4
#ACT
INC N2 4
GOTO @蓝色元素水晶1004
BREAK

#IF
CheckNewItemValue <$STR(N1)> 2 = 3
#ACT
INC N2 3
GOTO @蓝色元素水晶1004
BREAK

#IF
CheckNewItemValue <$STR(N1)> 2 = 2
#ACT
INC N2 2
GOTO @蓝色元素水晶1004
BREAK

#IF
CheckNewItemValue <$STR(N1)> 2 = 1
#ACT
INC N2 1
GOTO @蓝色元素水晶1004
#ELSEACT
GOTO @蓝色元素水晶1004

[@蓝色元素水晶1004]
#IF
CheckNewItemValue <$STR(N1)> 3 = 10
#ACT
INC N2 10
GOTO @蓝色元素水晶1005
BREAK

#IF
CheckNewItemValue <$STR(N1)> 3 = 9
#ACT
INC N2 9
GOTO @蓝色元素水晶1005
BREAK

#IF
CheckNewItemValue <$STR(N1)> 3 = 8
#ACT
INC N2 8
GOTO @蓝色元素水晶1005
BREAK

#IF
CheckNewItemValue <$STR(N1)> 3 = 7
#ACT
INC N2 7
GOTO @蓝色元素水晶1005
BREAK

#IF
CheckNewItemValue <$STR(N1)> 3 = 6
#ACT
INC N2 6
GOTO @蓝色元素水晶1005
BREAK

#IF
CheckNewItemValue <$STR(N1)> 3 = 5
#ACT
INC N2 5
GOTO @蓝色元素水晶1005
BREAK

#IF
CheckNewItemValue <$STR(N1)> 3 = 4
#ACT
INC N2 4
GOTO @蓝色元素水晶1005
BREAK

#IF
CheckNewItemValue <$STR(N1)> 3 = 3
#ACT
INC N2 3
GOTO @蓝色元素水晶1005
BREAK

#IF
CheckNewItemValue <$STR(N1)> 3 = 2
#ACT
INC N2 2
GOTO @蓝色元素水晶1005
BREAK

#IF
CheckNewItemValue <$STR(N1)> 3 = 1
#ACT
INC N2 1
GOTO @蓝色元素水晶1005
#ELSEACT
GOTO @蓝色元素水晶1005

[@蓝色元素水晶1005]
#IF
CheckNewItemValue <$STR(N1)> 4 = 10
#ACT
INC N2 10
GOTO @蓝色元素水晶1006
BREAK

#IF
CheckNewItemValue <$STR(N1)> 4 = 9
#ACT
INC N2 9
GOTO @蓝色元素水晶1006
BREAK

#IF
CheckNewItemValue <$STR(N1)> 4 = 8
#ACT
INC N2 8
GOTO @蓝色元素水晶1006
BREAK

#IF
CheckNewItemValue <$STR(N1)> 4 = 7
#ACT
INC N2 7
GOTO @蓝色元素水晶1006
BREAK

#IF
CheckNewItemValue <$STR(N1)> 4 = 6
#ACT
INC N2 6
GOTO @蓝色元素水晶1006
BREAK

#IF
CheckNewItemValue <$STR(N1)> 4 = 5
#ACT
INC N2 5
GOTO @蓝色元素水晶1006
BREAK

#IF
CheckNewItemValue <$STR(N1)> 4 = 4
#ACT
INC N2 4
GOTO @蓝色元素水晶1006
BREAK

#IF
CheckNewItemValue <$STR(N1)> 4 = 3
#ACT
INC N2 3
GOTO @蓝色元素水晶1006
BREAK

#IF
CheckNewItemValue <$STR(N1)> 4 = 2
#ACT
INC N2 2
GOTO @蓝色元素水晶1006
BREAK

#IF
CheckNewItemValue <$STR(N1)> 4 = 1
#ACT
INC N2 1
GOTO @蓝色元素水晶1006
#ELSEACT
GOTO @蓝色元素水晶1006

[@蓝色元素水晶1006]
#IF
CheckNewItemValue <$STR(N1)> 5 = 10
#ACT
INC N2 10
GOTO @蓝色元素水晶1007
BREAK

#IF
CheckNewItemValue <$STR(N1)> 5 = 9
#ACT
INC N2 9
GOTO @蓝色元素水晶1007
BREAK

#IF
CheckNewItemValue <$STR(N1)> 5 = 8
#ACT
INC N2 8
GOTO @蓝色元素水晶1007
BREAK

#IF
CheckNewItemValue <$STR(N1)> 5 = 7
#ACT
INC N2 7
GOTO @蓝色元素水晶1007
BREAK

#IF
CheckNewItemValue <$STR(N1)> 5 = 6
#ACT
INC N2 6
GOTO @蓝色元素水晶1007
BREAK

#IF
CheckNewItemValue <$STR(N1)> 5 = 5
#ACT
INC N2 5
GOTO @蓝色元素水晶1007
BREAK

#IF
CheckNewItemValue <$STR(N1)> 5 = 4
#ACT
INC N2 4
GOTO @蓝色元素水晶1007
BREAK

#IF
CheckNewItemValue <$STR(N1)> 5 = 3
#ACT
INC N2 3
GOTO @蓝色元素水晶1007
BREAK

#IF
CheckNewItemValue <$STR(N1)> 5 = 2
#ACT
INC N2 2
GOTO @蓝色元素水晶1007
BREAK

#IF
CheckNewItemValue <$STR(N1)> 5 = 1
#ACT
INC N2 1
GOTO @蓝色元素水晶1007
#ELSEACT
GOTO @蓝色元素水晶1007

[@蓝色元素水晶1007]
#IF
CheckNewItemValue <$STR(N1)> 6 = 10
#ACT
INC N2 10
GOTO @蓝色元素水晶1008
BREAK

#IF
CheckNewItemValue <$STR(N1)> 6 = 9
#ACT
INC N2 9
GOTO @蓝色元素水晶1008
BREAK

#IF
CheckNewItemValue <$STR(N1)> 6 = 8
#ACT
INC N2 8
GOTO @蓝色元素水晶1008
BREAK

#IF
CheckNewItemValue <$STR(N1)> 6 = 7
#ACT
INC N2 7
GOTO @蓝色元素水晶1008
BREAK

#IF
CheckNewItemValue <$STR(N1)> 6 = 6
#ACT
INC N2 6
GOTO @蓝色元素水晶1008
BREAK

#IF
CheckNewItemValue <$STR(N1)> 6 = 5
#ACT
INC N2 5
GOTO @蓝色元素水晶1008
BREAK

#IF
CheckNewItemValue <$STR(N1)> 6 = 4
#ACT
INC N2 4
GOTO @蓝色元素水晶1008
BREAK

#IF
CheckNewItemValue <$STR(N1)> 6 = 3
#ACT
INC N2 3
GOTO @蓝色元素水晶1008
BREAK

#IF
CheckNewItemValue <$STR(N1)> 6 = 2
#ACT
INC N2 2
GOTO @蓝色元素水晶1008
BREAK

#IF
CheckNewItemValue <$STR(N1)> 6 = 1
#ACT
INC N2 1
GOTO @蓝色元素水晶1008
#ELSEACT
GOTO @蓝色元素水晶1008

[@蓝色元素水晶1008]
#IF
EQUAL N2 0
#ACT
GOTO @YIJI
#IF
EQUAL N2 1
#ACT
GOTO @ERJI
#IF
EQUAL N2 2
#ACT
GOTO @SAJI
BREAK
close
#IF
EQUAL N2 3
#ACT
GOTO @SIJI
BREAK
close
#IF
EQUAL N2 4
#ACT
GOTO @WUJI
BREAK
close
#IF
EQUAL N2 5
#ACT
GOTO @LUJI
BREAK
close
#IF
EQUAL N2 6
#ACT
GOTO @QIJI
BREAK
close
#IF
EQUAL N2 7
#ACT
GOTO @BAJI
BREAK
close
#IF
EQUAL N2 8
#ACT
GOTO @JUJI
BREAK
close
#IF
EQUAL N2 9
#ACT
GOTO @SHJI
BREAK
close
#IF
EQUAL N2 10
#ACT
GOTO @BNJ
BREAK
close

[@YIJI]
#IF
CHECKITEM 蓝色元素水晶 1
#ELSEACT
MESSAGEBOX 提示:请检查你的背包内是否有蓝色元素水晶.
close
#ACT
TAKE 蓝色元素水晶 1
GOTO @蓝色元素水晶1009
close

[@ERJI]
#IF
CHECKITEM 蓝色元素水晶 1
#ELSEACT
MESSAGEBOX 提示:请检查你的背包内是否有蓝色元素水晶.
close
#ACT
TAKE 蓝色元素水晶 1
GOTO @蓝色元素水晶1009
close

[@SAJI]
#IF
CHECKITEM 蓝色元素水晶 1
#ELSEACT
MESSAGEBOX 提示:请检查你的背包内是否有蓝色元素水晶.
close
#ACT
TAKE 蓝色元素水晶 1
GOTO @蓝色元素水晶1009
close

[@SIJI]
#IF
CHECKITEM 蓝色元素水晶 1
#ELSEACT
MESSAGEBOX 提示:请检查你的背包内是否有蓝色元素水晶.
close
#ACT
TAKE 蓝色元素水晶 1
GOTO @蓝色元素水晶1009
close

[@WUJI]
#IF
CHECKITEM 蓝色元素水晶 1
#ELSEACT
MESSAGEBOX 提示:请检查你的背包内是否有蓝色元素水晶.
close
#ACT
TAKE 蓝色元素水晶 1
GOTO @蓝色元素水晶1009
close

[@LUJI]
#IF
CHECKITEM 蓝色元素水晶 1
#ELSEACT
MESSAGEBOX 提示:请检查你的背包内是否有蓝色元素水晶.
close
#ACT
TAKE 蓝色元素水晶 1
GOTO @蓝色元素水晶1009
close

[@QIJI]
#IF
CHECKITEM 蓝色元素水晶 1
#ELSEACT
MESSAGEBOX 提示:请检查你的背包内是否有蓝色元素水晶.
close
#ACT
TAKE 蓝色元素水晶 1
GOTO @蓝色元素水晶1009
close

[@BAJI]
#IF
CHECKITEM 蓝色元素水晶 1
#ELSEACT
MESSAGEBOX 提示:请检查你的背包内是否有蓝色元素水晶.
close
#ACT
TAKE 蓝色元素水晶 1
GOTO @蓝色元素水晶1009
close


[@JUJI]
#IF
CHECKITEM 蓝色元素水晶 1
#ELSEACT
MESSAGEBOX 提示:请检查你的背包内是否有蓝色元素水晶.
close
#ACT
TAKE 蓝色元素水晶 1
GOTO @蓝色元素水晶1009
close


[@SHJI]
#IF
CHECKITEM 蓝色元素水晶 1
#ELSEACT
MESSAGEBOX 提示:请检查你的背包内是否有蓝色元素水晶.
close
#ACT
TAKE 蓝色元素水晶 1
GOTO @蓝色元素水晶1009
close

[@BNJ]
#ACT
MESSAGEBOX 提示:该装备熔炼属性已满.
close

[@蓝色元素水晶1009]
#IF
RANDOM 6
#ACT
SetNewItemValue <$STR(N1)> 0 + 1
MESSAGEBOX 提示:熔炼成功.
SetItemsLight <$STR(N1)> 1
BREAK

#IF
RANDOM 5
#ACT
SetNewItemValue <$STR(N1)> 1 + 1
MESSAGEBOX 提示:熔炼成功.
SetItemsLight <$STR(N1)> 1
BREAK

#IF
RANDOM 4
#ACT
SetNewItemValue <$STR(N1)> 2 + 1
MESSAGEBOX 提示:熔炼成功.
SetItemsLight <$STR(N1)> 1
BREAK

#IF
RANDOM 3
#ACT
SetNewItemValue <$STR(N1)> 3 + 1
MESSAGEBOX 提示:熔炼成功.
SetItemsLight <$STR(N1)> 1
BREAK

#IF
RANDOM 2
#ACT
SetNewItemValue <$STR(N1)> 4 + 1
MESSAGEBOX 提示:熔炼成功.
SetItemsLight <$STR(N1)> 1
BREAK

#IF
RANDOM 1
#ACT
SetNewItemValue <$STR(N1)> 5 + 1
MESSAGEBOX 提示:熔炼成功.
SetItemsLight <$STR(N1)> 1
BREAK