GEE引擎脚本-装备洗炼
============================================
Gm版本库\装备洗炼 204 108 装备洗炼 0 10088 0
============================================
[@MAIN]
#IF
#ACT
OPENMERCHANTBIGDLG 58 299 1 4 0 -100 0 368 35 1
#SAY
<Img:9:58:290:-13/@exit>\
<ITEMBOX:0:58:303:60:121:15:15:10,5,19,26,23,24,15,64,62,30,16,90,65,51,63:请放入要强化的装备><ITEMBOX:1:58:303:227:122:15:15:41:请放入各类符纹,每次强化需要10张符纹！>\
<ImgEx:58:300:301:302:120:120|253#对洗炼属性不满意可放入材料重新洗炼/@升级>\
[@升级]
#IF
CheckBoxItemCount 0
CheckBoxItemCount 1 10
#ACT
GOTO @锻造
#ELSEACT
MessageBox 请放入需要强化的装备和材料,强化材料需要10个以上！
[@锻造]
#IF
random 10
#ACT
GOTO @锻造大
#ELSEACT
GOTO @锻造小
[@锻造小]
#IF
CheckItemNameColor boxitem1 201
#ACT
SetUpgradeItem 0
GOTO @锻造11
BREAK
#IF
CheckItemNameColor boxitem1 202
#ACT
GOTO @锻造22
BREAK
#IF
CheckItemNameColor boxitem1 203
#ACT
GOTO @锻造33
BREAK
#IF
CheckItemNameColor boxitem1 204
#ACT
GOTO @锻造44
BREAK
#IF
CheckItemNameColor boxitem1 205
#ACT
GOTO @锻造55
BREAK
#IF
CheckItemNameColor boxitem1 206
#ACT
GOTO @锻造66
BREAK
#IF
CheckItemNameColor boxitem1 207
#ACT
GOTO @锻造77
BREAK
#IF
CheckItemNameColor boxitem1 208
#ACT
GOTO @锻造88
BREAK
#IF
CheckItemNameColor boxitem1 209
#ACT
GOTO @锻造99
BREAK
#IF
#ACT
messagebox 提示：请不要放入无关材料。
BREAK
[@锻造11]
#IF
#ACT
SetUpgradeItem 0
SetCustomItemAbil boxitem0 1 0 249
SetCustomItemAbil boxitem0 1 1 3
SetCustomItemAbil boxitem0 1 2 1
SetCustomItemAbil boxitem0 1 3 0
MOVR N751 200
SetCustomItemValue boxitem0 1 = <$STR(N751)>
DelBoxItem 1 10
UpdateItem boxitem0
BREAK
[@锻造22]
#IF
#ACT
SetUpgradeItem 0
SetCustomItemAbil boxitem0 2 0 249
SetCustomItemAbil boxitem0 2 1 1
SetCustomItemAbil boxitem0 2 2 2
SetCustomItemAbil boxitem0 2 3 0
SetCustomItemAbil boxitem0 3 0 249
SetCustomItemAbil boxitem0 3 1 2
SetCustomItemAbil boxitem0 3 2 3
SetCustomItemAbil boxitem0 3 3 0
MOVR N751 200
MOVR N752 200
SetCustomItemValue boxitem0 2 = <$STR(N751)>
SetCustomItemValue boxitem0 3 = <$STR(N752)>
DelBoxItem 1 10
UpdateItem boxitem0
BREAK
[@锻造33]
#IF
#ACT
SetUpgradeItem 0
SetCustomItemAbil boxitem0 4 0 249
SetCustomItemAbil boxitem0 4 1 6
SetCustomItemAbil boxitem0 4 2 4
SetCustomItemAbil boxitem0 4 3 0
MOVR N751 10000 200000
SetCustomItemValue boxitem0 4 = <$STR(N751)>
DelBoxItem 1 10
UpdateItem boxitem0
BREAK
[@锻造44]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 3
SetNewItemValue boxitem0 0 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 1 10
[@锻造55]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 3
SetNewItemValue boxitem0 1 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 10
[@锻造66]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 3
SetNewItemValue boxitem0 2 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 1 10
[@锻造77]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 3
SetNewItemValue boxitem0 3 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 1 10
[@锻造88]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 3
SetNewItemValue boxitem0 4 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 1 10
[@锻造99]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 3
SetNewItemValue boxitem0 12 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 1 10
[@锻造大]
#IF
CheckItemNameColor boxitem1 201
#ACT
SetUpgradeItem 0
GOTO @锻造1
BREAK
#IF
CheckItemNameColor boxitem1 202
#ACT
GOTO @锻造2
BREAK
#IF
CheckItemNameColor boxitem1 203
#ACT
GOTO @锻造3
BREAK
#IF
CheckItemNameColor boxitem1 204
#ACT
GOTO @锻造4
BREAK
#IF
CheckItemNameColor boxitem1 205
#ACT
GOTO @锻造5
BREAK
#IF
CheckItemNameColor boxitem1 206
#ACT
GOTO @锻造6
BREAK
#IF
CheckItemNameColor boxitem1 207
#ACT
GOTO @锻造7
BREAK
#IF
CheckItemNameColor boxitem1 208
#ACT
GOTO @锻造8
BREAK
#IF
CheckItemNameColor boxitem1 209
#ACT
GOTO @锻造9
BREAK
#IF
#ACT
messagebox 提示：请不要放入无关材料。
BREAK
[@锻造1]
#IF
#ACT
SetUpgradeItem 0
SetCustomItemAbil boxitem0 1 0 249
SetCustomItemAbil boxitem0 1 1 3
SetCustomItemAbil boxitem0 1 2 1
SetCustomItemAbil boxitem0 1 3 0
MOVR N751 500
SetCustomItemValue boxitem0 1 = <$STR(N751)>
DelBoxItem 1 10
UpdateItem boxitem0
BREAK
[@锻造2]
#IF
#ACT
SetUpgradeItem 0
SetCustomItemAbil boxitem0 2 0 249
SetCustomItemAbil boxitem0 2 1 1
SetCustomItemAbil boxitem0 2 2 2
SetCustomItemAbil boxitem0 2 3 0
SetCustomItemAbil boxitem0 3 0 249
SetCustomItemAbil boxitem0 3 1 2
SetCustomItemAbil boxitem0 3 2 3
SetCustomItemAbil boxitem0 3 3 0
MOVR N751 500
MOVR N752 500
SetCustomItemValue boxitem0 2 = <$STR(N751)>
SetCustomItemValue boxitem0 3 = <$STR(N752)>
DelBoxItem 1 10
UpdateItem boxitem0
BREAK
[@锻造3]
#IF
#ACT
SetUpgradeItem 0
SetCustomItemAbil boxitem0 4 0 249
SetCustomItemAbil boxitem0 4 1 6
SetCustomItemAbil boxitem0 4 2 4
SetCustomItemAbil boxitem0 4 3 0
MOVR N751 10000 500000
SetCustomItemValue boxitem0 4 = <$STR(N751)>
DelBoxItem 1 10
UpdateItem boxitem0
BREAK
[@锻造4]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 5
SetNewItemValue boxitem0 0 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 1 10
[@锻造5]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 5
SetNewItemValue boxitem0 1 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 10
[@锻造6]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 5
SetNewItemValue boxitem0 2 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 1 10
[@锻造7]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 5
SetNewItemValue boxitem0 3 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 1 10
[@锻造8]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 5
SetNewItemValue boxitem0 4 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 1 10
[@锻造9]
#IF
NOT Equal <$BOXITEM[0].NAME>
#ACT
MOVR N750 5
SetNewItemValue boxitem0 12 = <$STR(N750)>
UpdateItem boxitem0
DelBoxItem 1 10
|
