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

admin

                               
登录/注册后可看大图

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

[@强化大师界面]
#say
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\

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

[@强化大师界面0]
#say
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\
[@开始强化0]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND -
;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
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\
[@开始强化1]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND -
;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
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\
[@开始强化2]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND -
;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
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\
[@开始强化3]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND -
;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
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\
[@开始强化4]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND -
;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
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\
[@开始强化5]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND -
;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
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\
[@开始强化6]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND -
;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
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\
[@开始强化7]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND -
;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
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\
[@开始强化8]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND -
;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
\ \
\
\
\ \ \ \ \ \ \ \ \ \ \
               \ \
   \ \
                \ \
　　　　　　　　{装备名:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\
[@开始强化9]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法升级
break

#IF
CHECKCUSTOMITEMPROGRESSBARVALUE -1 0 0 < 10
#ACT
GAMEDIAMOND -
;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 错误：（）的切割属性还没开启，请佩戴法宝自动开启。
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
\ \
\
\
\
\ \ \ \ \ \ \ \ \ \ \ \ \ \ \ \
　　{装备:/SCOLOR=251}{装备:/SCOLOR=251}\ \
　　　　　　　　{强化所需费用:积分/SCOLOR=249}\



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

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

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

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

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



[@开始转移]
#if
CHECKGAMEDIAMOND ?
#elseact
messagebox 你积分不足无法转移
break

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

#IF
#act
SetUpgradeItem 2

#IF
CHECKCUSTOMITEMPROGRESSBAR -1 0
#ELSEACT
messagebox 错误：（）的法宝没有觉醒。
GOTO @转移大师界面
break

#if
#ACT
GAMEDIAMOND -
SetUpgradeItem 2
;//修改2武器进度
CHANGECUSTOMITEMPROGRESSBARVALUE -1 0 0 =
CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 =
;CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 1 =
;CHANGECUSTOMITEMPROGRESSBARVALUE -1 1 0 =
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 [系统]：传承成功，已将（）上的切割值属性传承至（）上。
UpDateBoxItem 1
UpDateBoxItem 2
ReturnBoxItem 1
ReturnBoxItem 2
GOTO @转移大师界面
break


来源：网络
免责声明：如果侵犯了您的权益，请联系站长，我们会及时删除侵权内容，谢谢合作！