传奇教程 GOM引擎冰雪城主NPC脚本，两个相同的生肖. 攻魔道随机1-4% 传奇脚本

[@main]
#IF
#Act
CloseBigDialogBox
#say
\ \  
<两个相同的生肖.  攻魔道随机1-4%/SCOLOR=250> \ \ \ \

\    <ITEMBOX:0:17:661:0:-31:76:76:16,48,22,100,101,102,103,104,105,106,107,108,109,110,111,7:请放入你要淬炼的生肖>     <开始淬炼/@火祭>    <ITEMBOX:6:17:661:0:-31:76:76:16,48,22,100,101,102,103,104,105,106,107,108,109,110,111,7:请放入祭品>       \  \







[@ItemIntoBox0]
#IF
EQUAL <$BOXITEM[0].NAME> 灵鼠献瑞
#act
mov S8 10
MOV S1 灵鼠献瑞
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 牛气冲天
#act
mov S8 11
MOV S1 牛气冲天
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 如虎添翼
#act
mov S8 12
MOV S1 如虎添翼
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 势若脱兔
#act
mov S8 13
MOV S1 势若脱兔
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 龙腾九天
#act
mov S8 14
MOV S1 龙腾九天
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 金蛇狂舞
#act
mov S8 15
MOV S1 金蛇狂舞
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 铁马金戈
#act
mov S8 16
MOV S1 铁马金戈
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 羊致清和
#act
mov S8 17
MOV S1 羊致清和
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 金猴纳福
#act
mov S8 18
MOV S1 金猴纳福
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 金鸡报晓
#act
mov S8 19
MOV S1 金鸡报晓
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 天狗守护
#act
mov S8 20
MOV S1 天狗守护
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 金猪如意
#act
mov S8 21
MOV S1 金猪如意
MOV S7 500
GOTO @火祭品
BREAK
ReturnBoxItem 5
MESSAGEBOX 操作失败！只允许放如相同的【生肖】
BREAK





[@ItemIntoBox6]
#IF
EQUAL <$BOXITEM[0].NAME> 灵鼠献瑞
EQUAL <$BOXITEM[6].NAME> 灵鼠献瑞
#act
mov S8 10
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 牛气冲天
EQUAL <$BOXITEM[6].NAME> 牛气冲天
#act
mov S8 11
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 如虎添翼
EQUAL <$BOXITEM[6].NAME> 如虎添翼
#act
mov S8 12
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 势若脱兔
EQUAL <$BOXITEM[6].NAME> 势若脱兔
#act
mov S8 13
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 龙腾九天
EQUAL <$BOXITEM[6].NAME> 龙腾九天
#act
mov S8 14
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 金蛇狂舞
EQUAL <$BOXITEM[6].NAME> 金蛇狂舞
#act
mov S8 15
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 铁马金戈
EQUAL <$BOXITEM[6].NAME> 铁马金戈
#act
mov S8 16
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 羊致清和
EQUAL <$BOXITEM[6].NAME> 羊致清和
#act
mov S8 17
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 金猴纳福
EQUAL <$BOXITEM[6].NAME> 金猴纳福
#act
mov S8 18
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 金鸡报晓
EQUAL <$BOXITEM[6].NAME> 金鸡报晓
#act
mov S8 19
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 天狗守护
EQUAL <$BOXITEM[6].NAME> 天狗守护
#act
mov S8 20
MOV S7 500
GOTO @火祭品
BREAK

#IF
EQUAL <$BOXITEM[0].NAME> 金猪如意
EQUAL <$BOXITEM[6].NAME> 金猪如意
#act
mov S8 21
MOV S7 500
GOTO @火祭品
BREAK
ReturnBoxItem 6
MESSAGEBOX 操作失败！只允许放如相同的【生肖】
BREAK





[@火祭品]
#IF
#Act
CloseBigDialogBox
#say
\ \  
<两个相同的生肖.  攻魔道随机1-4%/SCOLOR=250> \ \ \ \

\    <ITEMBOX:0:17:661:0:-31:76:76:16,48,22,100,101,102,103,104,105,106,107,108,109,110,111,7:请放入你要淬炼的生肖>     <开始淬炼/@火祭>    <ITEMBOX:6:17:661:0:-31:76:76:16,48,22,100,101,102,103,104,105,106,107,108,109,110,111,7:请放入祭品>       \  \





[@火祭]
#ACT
SetUpgradeItem 0

#IF
NOT EQUAL <$BOXITEM[0].NAME_G> <$BOXITEM[0].NAME>
#act
ReturnBoxItem 0
MESSAGEBOX 你放入的物品，已经火祭过了，不能在重复火祭!

#IF
CHECKGAMEGIRD > <$STR(S7)>
EQUAL <$BOXITEM[0].NAME> <$STR(S1)>
EQUAL <$BOXITEM[6].NAME> <$STR(S1)>
CheckContainsText <$BOXITEM[0].NAME> <$STR(S1)>
CheckContainsText <$BOXITEM[6].NAME> <$STR(S1)>
#act
DELBOXITEM 6
DELBOXITEM 7
DELAYGOTO 500 @升级祭品
BREAK
#ELSEACT
ReturnBoxItem 0
ReturnBoxItem 6
ReturnBoxItem 7
MESSAGEBOX 请放入相同的物品，或者灵符不足!
BREAK

[@升级祭品]
#ACT
MOVR S4 0 5
MOVR S5 0 5
MOVR S6 0 5
GAMEGIRD - <$STR(S7)>
ChangeItemName -1 真·<$STR(S1)>
CHANGECUSTOMITEMABIL -1 7 1 3 
CHANGECUSTOMITEMABIL -1 8 1 4
CHANGECUSTOMITEMABIL -1 9 1 5
CHANGECUSTOMITEMABIL -1 7 3 1
CHANGECUSTOMITEMABIL -1 8 3 1
CHANGECUSTOMITEMABIL -1 9 3 1
CHANGECUSTOMITEMABIL -1 7 2 7
CHANGECUSTOMITEMABIL -1 8 2 8
CHANGECUSTOMITEMABIL -1 9 2 9
CHANGECUSTOMITEMABIL -1 7 0 254
CHANGECUSTOMITEMABIL -1 8 0 254
CHANGECUSTOMITEMABIL -1 9 0 254
CHANGECUSTOMITEMVALUE -1 7 = <$STR(S4)>
CHANGECUSTOMITEMVALUE -1 8 = <$STR(S5)>
CHANGECUSTOMITEMVALUE -1 9 = <$STR(S6)>
UpDateBoxItem 0
ReturnBoxItem 0
break