传奇GM版本库切割灌注脚本，GOM引擎一级切割几率秒怪1%血教程范例

趣游论坛 · 发表于 2019-10-2 11:34:56

[@切割灌注]
{
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用 0
goto @强化大师界面

[@强化大师界面]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用)>积分/SCOLOR=249}\

[@切一]
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用0 2000
goto @强化大师界面0

[@强化大师界面0]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化0><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用0)>积分/SCOLOR=249}\
[@开始强化0]
#if
CHECKGAMEDIAMOND ? <$Str(N$强化费用0)>
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND - <$Str(N$强化费用0)>
;CHANGECUSTOMITEMVALUE -1 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 + 1
SetItemBind -1 1
UpDateBoxItem 0
GOTO @ItemIntoBox0
Close
messagebox 法宝切割值升级成功
#ELSEACT
messagebox 法宝切割值升级成功
GOTO @ItemIntoBox0
Close
break

[@切二]
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用1 4000
goto @强化大师界面1

[@强化大师界面1]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化1><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用1)>积分/SCOLOR=249}\
[@开始强化1]
#if
CHECKGAMEDIAMOND ? <$Str(N$强化费用1)>
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND - <$Str(N$强化费用1)>
;CHANGECUSTOMITEMVALUE -1 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 + 1
SetItemBind -1 1
UpDateBoxItem 0
GOTO @ItemIntoBox0
Close
messagebox 法宝切割值升级成功
#ELSEACT
messagebox 法宝切割值升级成功
GOTO @ItemIntoBox0
Close
break

[@切三]
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用2 6000
goto @强化大师界面2

[@强化大师界面2]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化2><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用2)>积分/SCOLOR=249}\
[@开始强化2]
#if
CHECKGAMEDIAMOND ? <$Str(N$强化费用2)>
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND - <$Str(N$强化费用2)>
;CHANGECUSTOMITEMVALUE -1 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 + 1
SetItemBind -1 1
UpDateBoxItem 0
GOTO @ItemIntoBox0
Close
messagebox 法宝切割值升级成功
#ELSEACT
messagebox 法宝切割值升级成功
GOTO @ItemIntoBox0
Close
break

[@切四]
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用3 10000
goto @强化大师界面3

[@强化大师界面3]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化3><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用3)>积分/SCOLOR=249}\
[@开始强化3]
#if
CHECKGAMEDIAMOND ? <$Str(N$强化费用3)>
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND - <$Str(N$强化费用3)>
;CHANGECUSTOMITEMVALUE -1 0 + 2
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 + 2
SetItemBind -1 1
UpDateBoxItem 0
GOTO @ItemIntoBox0
Close
messagebox 法宝切割值升级成功
#ELSEACT
messagebox 法宝切割值升级成功
GOTO @ItemIntoBox0
Close
break

[@切五]
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用4 16000
goto @强化大师界面4

[@强化大师界面4]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化4><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用4)>积分/SCOLOR=249}\
[@开始强化4]
#if
CHECKGAMEDIAMOND ? <$Str(N$强化费用4)>
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND - <$Str(N$强化费用4)>
;CHANGECUSTOMITEMVALUE -1 0 + 2
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 + 2
SetItemBind -1 1
UpDateBoxItem 0
GOTO @ItemIntoBox0
Close
messagebox 法宝切割值升级成功
#ELSEACT
messagebox 法宝切割值升级成功
GOTO @ItemIntoBox0
Close
break

[@切六]
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用5 20000
goto @强化大师界面5

[@强化大师界面5]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化5><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用5)>积分/SCOLOR=249}\
[@开始强化5]
#if
CHECKGAMEDIAMOND ? <$Str(N$强化费用5)>
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND - <$Str(N$强化费用5)>
;CHANGECUSTOMITEMVALUE -1 0 + 2
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 + 2
SetItemBind -1 1
UpDateBoxItem 0
GOTO @ItemIntoBox0
Close
messagebox 法宝切割值升级成功
#ELSEACT
messagebox 法宝切割值升级成功
GOTO @ItemIntoBox0
Close
break

[@切七]
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用6 20000
goto @强化大师界面6

[@强化大师界面6]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化6><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用6)>积分/SCOLOR=249}\
[@开始强化6]
#if
CHECKGAMEDIAMOND ? <$Str(N$强化费用6)>
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND - <$Str(N$强化费用6)>
;CHANGECUSTOMITEMVALUE -1 0 + 3
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 + 3
SetItemBind -1 1
UpDateBoxItem 0
GOTO @ItemIntoBox0
Close
messagebox 法宝切割值升级成功
#ELSEACT
messagebox 法宝切割值升级成功
GOTO @ItemIntoBox0
Close
break

[@切八]
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用7 20000
goto @强化大师界面7

[@强化大师界面7]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化7><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用7)>积分/SCOLOR=249}\
[@开始强化7]
#if
CHECKGAMEDIAMOND ? <$Str(N$强化费用7)>
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND - <$Str(N$强化费用7)>
;CHANGECUSTOMITEMVALUE -1 0 + 3
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 + 3
SetItemBind -1 1
UpDateBoxItem 0
GOTO @ItemIntoBox0
Close
messagebox 法宝切割值升级成功
#ELSEACT
messagebox 法宝切割值升级成功
GOTO @ItemIntoBox0
Close
break

[@切九]
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用8 20000
goto @强化大师界面8

[@强化大师界面8]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化8><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用8)>积分/SCOLOR=249}\
[@开始强化8]
#if
CHECKGAMEDIAMOND ? <$Str(N$强化费用8)>
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND - <$Str(N$强化费用8)>
;CHANGECUSTOMITEMVALUE -1 0 + 3
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 + 3
SetItemBind -1 1
UpDateBoxItem 0
GOTO @ItemIntoBox0
Close
messagebox 法宝切割值升级成功
#ELSEACT
messagebox 法宝切割值升级成功
GOTO @ItemIntoBox0
Close
break

[@切十]
#act
OPENMERCHANTBIGDLG 6 82 1 4 -8 -18 1 320 20
mov N$强化费用9 40000
goto @强化大师界面9

[@强化大师界面9]
#say
\ \
<Img:84:6:30:340|250#一级切割几率秒怪1%血
^-^250#二级切割几率秒怪2%血
^-^250#三级切割几率秒怪3%血
^-^250#四级切割几率秒怪5%血
^-^250#五级切割几率秒怪7%血
^-^250#六级切割几率秒怪9%血
^-^250#七级切割几率秒怪12%血
^-^250#八级切割几率秒怪15%血
^-^250#九级切割几率秒怪18%血
^-^250#十级切割几率秒怪20%血/@开始强化9><Img:85:6:50:340/@转移>\
<ITEMBOX:0:6:86:130:28:44:44:28:请放入需要增加切割值的法宝>\
\ \ \ \ \ \ \ \ \ \ \
<>             <切割等级分为：10级/SCOLOR=250>\ \
<> <切割等级及切割装备越高切割几率越大;/SCOLOR=249><切割血量越高/SCOLOR=253>\ \
<>             <说明：一、二大陆怪物有效/SCOLOR=254>\ \
　　　　　　　　{装备名:<$BOXITEM[0].NAME_G>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$强化费用9)>积分/SCOLOR=249}\
[@开始强化9]
#if
CHECKGAMEDIAMOND ? <$Str(N$强化费用9)>
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND - <$Str(N$强化费用9)>
;CHANGECUSTOMITEMVALUE -1 0 + 2
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 + 2
SetItemBind -1 1
UpDateBoxItem 0
GOTO @ItemIntoBox0
Close
messagebox 法宝切割值升级成功
#ELSEACT
messagebox 法宝切割值升级成功
GOTO @ItemIntoBox0
Close
break

[@ItemIntoBox0]
#act
SetUpgradeItem 0
#IF
CHECKCUSTOMITEMPROGRESSBAR -1 0
#ACT
GOTO @切割灌注
#ELSEACT
messagebox 错误：（<$BOXITEM[0].NAME>）的切割属性还没开启，请佩戴法宝自动开启。
UNALLOWITEMINTOBOX
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0
#ACT
GOTO @切一
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 1
#ACT
GOTO @切二
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 2
#ACT
GOTO @切三
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 3
#ACT
GOTO @切四
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 4
#ACT
GOTO @切五
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 5
#ACT
GOTO @切六
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 6
#ACT
GOTO @切七
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 7
#ACT
GOTO @切八
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 8
#ACT
GOTO @切九
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 9
#ACT
GOTO @切十
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 10
#ACT
Close
messagebox 你的切割等级已满，无需再次升级！！！！！
break

[@转移]
#IF
#ACT
Close
OPENMERCHANTBIGDLG 6 83 1 4 -8 -18 1 320 20
mov N$转移费用 5000
goto @转移大师界面

[@转移大师界面]
#say
\ \
<Img:85:6:90:340/@开始转移>\
<ITEMBOX:1:6:86:130:28:44:44:28:请放入需要转移切割值的法宝>\
<ITEMBOX:2:6:86:130:154:44:44:28:请放入空属性的法宝>\
\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
　　{装备:<$BOXITEM[1].NAME>/SCOLOR=251}<→/SCOLOR=253>{装备:<$BOXITEM[2].NAME>/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:<$Str(N$转移费用)>积分/SCOLOR=249}\

[@ItemIntoBox1]
#act
SetUpgradeItem 1
#IF
CHECKCUSTOMITEMPROGRESSBAR -1 0
#ELSEACT
messagebox 错误：（<$BOXITEM[1].NAME>）的切割没有觉醒。
UNALLOWITEMINTOBOX
break
#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 > 0
#ELSEACT
messagebox 错误：（<$BOXITEM[1].NAME>）的切割等级为0，无需转移。
UNALLOWITEMINTOBOX
break

[@ItemIntoBox2]
#act
SetUpgradeItem 2
#IF
CompareText <$BOXITEM[1].NAME>
#ACT
messagebox 错误：请先在第一格放入需要转移切割值的法宝。
UNALLOWITEMINTOBOX
break
#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0
#ELSEACT
messagebox 错误：你放入等（<$BOXITEM[2].NAME>）不是空属性，请换一个空属性的法宝。
UNALLOWITEMINTOBOX
break
#IF
CHECKCUSTOMITEMPROGRESSBAR -1 0
#act
GOTO @转移大师界面
#ELSEACT
messagebox 错误：（<$BOXITEM[2].NAME>）的法宝没有觉醒。
UNALLOWITEMINTOBOX
break

[@ItemOutBox0]
#ACT
GOTO @切割灌注
break

[@ItemOutBox1]
#ACT
ReturnBoxItem 2
GOTO @转移大师界面
break

[@ItemOutBox2]
#ACT
GOTO @转移大师界面
break

[@开始转移]
#if
CHECKGAMEDIAMOND ? <$Str(N$转移费用)>
#elseact
messagebox 你积分不足无法转移
break

#act
SetUpgradeItem 1
#IF
CompareText <$BOXITEM[1].NAME>
#ACT
messagebox 错误：请在第１格放入需要转移切割值的法宝。
ReturnBoxItem 2
GOTO @转移大师界面
break
#IF
CompareText <$BOXITEM[2].NAME>
#ACT
messagebox 错误：请在第２格放入空属性的法宝。
ReturnBoxItem 1
GOTO @转移大师界面
break
#IF
CHECKCUSTOMITEMPROGRESSBAR -1 0
#ELSEACT
messagebox 错误：（<$BOXITEM[1].NAME>）的法宝没有觉醒。
GOTO @转移大师界面
break
#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 1 > 0
#ELSEACT
messagebox 错误：（<$BOXITEM[1].NAME>）的法宝切割等级为0，无需转移。
GOTO @转移大师界面
break

#IF
#act
SetUpgradeItem 2

#IF
CHECKCUSTOMITEMPROGRESSBAR -1 0
#ELSEACT
messagebox 错误：（<$BOXITEM[2].NAME>）的法宝没有觉醒。
GOTO @转移大师界面
break

#if
#ACT
GAMEDIAMOND - <$Str(N$转移费用)>
SetUpgradeItem 2
;//修改2武器进度
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = <$BOXITEM[1].PROGRESSBAR1.POSITION>
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 = <$BOXITEM[1].PROGRESSBAR2.POSITION>
;CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 1 = <$BOXITEM[1].PROGRESSBAR2.MAX>
;CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 = <$BOXITEM[1].PROGRESSBAR2.MAX>
SetItemBind -1 1
SetUpgradeItem 1
;//修改1武器进度
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 = 0
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 = 0
;CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 = 0
;CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 1 = 0
;//修改1武器属性
;CHANGECUSTOMITEMVALUE -1 0 = 0
SetItemBind -1 0
SENDMSG 6 [系统]：传承成功，已将（<$BOXITEM[1].NAME>）上的切割值属性传承至（<$BOXITEM[2].NAME>）上。
UpDateBoxItem 1
UpDateBoxItem 2
ReturnBoxItem 1
ReturnBoxItem 2
GOTO @转移大师界面
break

我命由我不由天 · 发表于 2019-10-2 11:34:58

无聊，来抢个沙发

天堂永恒 · 发表于 2019-10-2 13:43:44

这个贴可以，支持一下。

幸福如此 · 发表于 2019-10-2 14:14:05

路过的帮顶

杯水车薪 · 发表于 2019-10-2 15:30:21

路过的帮顶

豪杰 · 发表于 2019-10-2 18:20:01

众里寻他千百度，蓦然回首在这里！

发表于 2019-10-2 18:44:30

我是个凑数的。。。

黑白背影 · 发表于 2019-10-2 20:55:08

珍爱生命，果断回帖。

海边散步 · 发表于 2019-10-2 22:05:14

路过

学渣 · 发表于 2019-10-2 23:58:30

无论是不是沙发都得回复下

`设为首页收藏本站`

[传奇一键替换包]

[GOM引擎] 传奇GM版本库切割灌注脚本，GOM引擎一级切割几率秒怪1%血教程范例

灌水之王

活跃会员

突出贡献

优秀版主

荣誉管理

论坛元老

设为首页收藏本站 [传奇一键替换包]