传奇私服脚本宝石镶嵌 详细

[@main]
#IF
#SAY
<>                                                        〖<关闭/@exit>〗\
<ITEMBOX:1:-1:-1:167:110:36:36:*:目前此功能开放强化首饰,需要三件同等级的首饰,强化一个+1的,最高可强化+10,>\
<ITEMBOX:2:-1:-1:142:148:36:36:*:目前此功能开放强化首饰,需要三件同等级的首饰,强化一个+1的,最高可强化+10,>\
<ITEMBOX:3:-1:-1:195:132:36:36:*:目前此功能开放强化首饰,需要三件同等级的首饰,强化一个+1的,最高可强化+10,>\
<Img:1:38:140:310/@开始合成>\
#ACT
OPENMERCHANTBIGDLG 38 0 1 4 0 0 1 495 10
break
[@ItemIntoBox1]
#IF
NOT CHECKTEXTLIST ..\QuestDiary\数据文件\可合成的装备列表.txt <$BOXITEM[1].NAME>
#ACT
ReturnBoxItem 1
MESSAGEBOX 此物品不可以合成。
break

[@ItemIntoBox2]
#IF
NOT CHECKTEXTLIST ..\QuestDiary\数据文件\可合成的装备列表.txt <$BOXITEM[2].NAME>
#ACT
ReturnBoxItem 2
MESSAGEBOX 此物品不可以合成。
break

[@ItemIntoBox3]
#IF
NOT CHECKTEXTLIST ..\QuestDiary\数据文件\可合成的装备列表.txt <$BOXITEM[3].NAME>
#ACT
ReturnBoxItem 3
MESSAGEBOX 此物品不可以合成。
break

[@开始合成]
#IF
Equal <$BOXITEM[1].NAME_G> 
#ACT
MESSAGEBOX 装备框一缺少装备，无法合成。
break
#IF
Equal <$BOXITEM[2].NAME_G> 
#ACT
MESSAGEBOX 装备框二缺少装备，无法合成。
break
#IF
Equal <$BOXITEM[3].NAME_G> 
#ACT
MESSAGEBOX 装备框三缺少装备，无法合成。
break
#IF
NOT Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
#ACT
MESSAGEBOX 装备框一内的装备与装备框二内的装备不同，不能合成。
break
#IF
NOT Equal <$BOXITEM[1].NAME_G> <$BOXITEM[3].NAME_G>
#ACT
MESSAGEBOX 装备框一内的装备与装备框三内的装备不同，不能合成。
break
#IF
NOT Equal <$BOXITEM[2].NAME_G> <$BOXITEM[1].NAME_G>
#ACT
MESSAGEBOX 装备框二内的装备与装备框一内的装备不同，不能合成。
break
#IF
NOT Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
#ACT
MESSAGEBOX 装备框二内的装备与装备框三内的装备不同，不能合成。
break
#IF
NOT Equal <$BOXITEM[3].NAME_G> <$BOXITEM[1].NAME_G>
#ACT
MESSAGEBOX 装备框三内的装备与装备框一内的装备不同，不能合成。
break
#IF
NOT Equal <$BOXITEM[3].NAME_G> <$BOXITEM[2].NAME_G>
#ACT
MESSAGEBOX 装备框三内的装备与装备框二内的装备不同，不能合成。
break
#IF
CheckContainsText <$BOXITEM[1].NAME_G> +10
#ACT
MESSAGEBOX 装备最高只能合成到+10。
break
#IF
Equal <$BOXITEM[1].STDMODE> 5
#ACT
goto @武器合成
break
#IF
Equal <$BOXITEM[1].STDMODE> 6
#ACT
goto @武器合成
break
#IF
NOT Equal <$BOXITEM[1].STDMODE> 5
#ACT
goto @其他合成
break
#IF
NOT Equal <$BOXITEM[1].STDMODE> 6
#ACT
goto @其他合成
break

[@其他合成]
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
NOT CheckContainsText <$BOXITEM[1].NAME_G> +
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
ChangeItemNAME -1 <$BOXITEM[1].NAME>+1
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 2
CHANGEITEMADDVALUE -1 4 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +1
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +1
ChangeItemName -1 <$BOXITEM[1].NAME>+2
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 2
CHANGEITEMADDVALUE -1 4 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +2
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +2
ChangeItemName -1 <$BOXITEM[1].NAME>+3
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 2
CHANGEITEMADDVALUE -1 4 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +3
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +3
ChangeItemName -1 <$BOXITEM[1].NAME>+4
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 2
CHANGEITEMADDVALUE -1 4 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +4
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +4
ChangeItemName -1 <$BOXITEM[1].NAME>+5
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 2
CHANGEITEMADDVALUE -1 4 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +5
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +5
ChangeItemName -1 <$BOXITEM[1].NAME>+6
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 2
CHANGEITEMADDVALUE -1 4 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +6
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +6
ChangeItemName -1 <$BOXITEM[1].NAME>+7
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 2
CHANGEITEMADDVALUE -1 4 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +7
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +7
ChangeItemName -1 <$BOXITEM[1].NAME>+8
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 2
CHANGEITEMADDVALUE -1 4 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +8
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +8
ChangeItemName -1 <$BOXITEM[1].NAME>+9
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 2
CHANGEITEMADDVALUE -1 4 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +9
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +9
ChangeItemName -1 <$BOXITEM[1].NAME>+10
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 2
CHANGEITEMADDVALUE -1 4 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break


















[@武器合成]
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
NOT CheckContainsText <$BOXITEM[1].NAME_G> +
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
ChangeItemNAME -1 <$BOXITEM[1].NAME>+1
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 1
CHANGEITEMADDVALUE -1 5 + 2
CHANGEITEMADDVALUE -1 7 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +1
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +1
ChangeItemName -1 <$BOXITEM[1].NAME>+2
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 1
CHANGEITEMADDVALUE -1 5 + 2
CHANGEITEMADDVALUE -1 7 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +2
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +2
ChangeItemName -1 <$BOXITEM[1].NAME>+3
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 1
CHANGEITEMADDVALUE -1 5 + 2
CHANGEITEMADDVALUE -1 7 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +3
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +3
ChangeItemName -1 <$BOXITEM[1].NAME>+4
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 1
CHANGEITEMADDVALUE -1 5 + 2
CHANGEITEMADDVALUE -1 7 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +4
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +4
ChangeItemName -1 <$BOXITEM[1].NAME>+5
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 1
CHANGEITEMADDVALUE -1 5 + 2
CHANGEITEMADDVALUE -1 7 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +5
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +5
ChangeItemName -1 <$BOXITEM[1].NAME>+6
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 1
CHANGEITEMADDVALUE -1 5 + 2
CHANGEITEMADDVALUE -1 7 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +6
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +6
ChangeItemName -1 <$BOXITEM[1].NAME>+7
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 1
CHANGEITEMADDVALUE -1 5 + 2
CHANGEITEMADDVALUE -1 7 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +7
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +7
ChangeItemName -1 <$BOXITEM[1].NAME>+8
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 1
CHANGEITEMADDVALUE -1 5 + 2
CHANGEITEMADDVALUE -1 7 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +8
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +8
ChangeItemName -1 <$BOXITEM[1].NAME>+9
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 1
CHANGEITEMADDVALUE -1 5 + 2
CHANGEITEMADDVALUE -1 7 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break
#IF
Equal <$BOXITEM[1].NAME_G> <$BOXITEM[2].NAME_G>
Equal <$BOXITEM[2].NAME_G> <$BOXITEM[3].NAME_G>
CheckContainsText <$BOXITEM[1].NAME_G> +9
#ACT
DELBOXITEM 2
DELBOXITEM 3
SetUpgradeItem 1
DEC <$BOXITEM[1].NAME_G> +9
ChangeItemName -1 <$BOXITEM[1].NAME>+10
CHANGEITEMADDVALUE -1 0 + 2 
CHANGEITEMADDVALUE -1 1 + 2
CHANGEITEMADDVALUE -1 2 + 2
CHANGEITEMADDVALUE -1 3 + 1
CHANGEITEMADDVALUE -1 5 + 2
CHANGEITEMADDVALUE -1 7 + 2
UpDateBoxItem 1
SHOWPROGRESSBARDLG 5 @合成成功 正在合成,进度%d%... 1 @合成中断
break