GEE引擎脚本-装备洗炼

GM版本库

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