完整的“武魂”脚本实例分享

BARVALUE 1 1 0 = 0
CHANGECUSTOMITEMPROGRESSBAR 1 0 1 武魂凌绝:
CHANGECUSTOMITEMPROGRESSBAR 1 1 1 武魂经验:
CHANGECUSTOMITEMPROGRESSBAR 1 0 2 151
CHANGECUSTOMITEMPROGRESSBAR 1 1 2 151
MESSAGEBOX 恭喜你突破成功！
#ELSEACT
MESSAGEBOX 当前武魂值不符合要求无法突破！
break

[@t23]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 22
CHECKCUSTOMITEMPROGRESSBARVALUE 1 1 0 = 9999999
#act
CHANGECUSTOMITEMPROGRESSBARVALUE 1 1 1 = 9999999
CHANGECUSTOMITEMPROGRESSBARVALUE 1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE 1 1 0 = 0
CHANGECUSTOMITEMPROGRESSBAR 1 0 1 武魂惊世:
CHANGECUSTOMITEMPROGRESSBAR 1 1 1 武魂经验:
CHANGECUSTOMITEMPROGRESSBAR 1 0 2 151
CHANGECUSTOMITEMPROGRESSBAR 1 1 2 151
MESSAGEBOX 恭喜你突破成功！
#ELSEACT
MESSAGEBOX 当前武魂值不符合要求无法突破！
break

[@t24]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 23
CHECKCUSTOMITEMPROGRESSBARVALUE 1 1 0 = 9999999
#act
CHANGECUSTOMITEMPROGRESSBARVALUE 1 1 1 = 9999999
CHANGECUSTOMITEMPROGRESSBARVALUE 1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE 1 1 0 = 0
CHANGECUSTOMITEMPROGRESSBAR 1 0 1 武魂御空:
CHANGECUSTOMITEMPROGRESSBAR 1 1 1 武魂经验:
CHANGECUSTOMITEMPROGRESSBAR 1 0 2 151
CHANGECUSTOMITEMPROGRESSBAR 1 1 2 151
MESSAGEBOX 恭喜你突破成功！
#ELSEACT
MESSAGEBOX 当前武魂值不符合要求无法突破！
break

[@t25]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 24
CHECKCUSTOMITEMPROGRESSBARVALUE 1 1 0 = 9999999
#act
CHANGECUSTOMITEMPROGRESSBARVALUE 1 1 1 = 9999999
CHANGECUSTOMITEMPROGRESSBARVALUE 1 0 0 + 1
CHANGECUSTOMITEMPROGRESSBARVALUE 1 1 0 = 0
CHANGECUSTOMITEMPROGRESSBAR 1 0 1 武魂混天:
CHANGECUSTOMITEMPROGRESSBAR 1 1 1 武魂经验:
CHANGECUSTOMITEMPROGRESSBAR 1 0 2 151
CHANGECUSTOMITEMPROGRESSBAR 1 1 2 151
MESSAGEBOX 恭喜你突破成功！
#ELSEACT
MESSAGEBOX 当前武魂值不符合要求无法突破！
break

D:\MirServer\Mir200\Envir\Market_Def\QFunction-0.txt

内容如下：

;==========杀怪增加武魂值

[@OnKillMob]
#IF
checkitem 土豪赞助令牌
CHECKCUSTOMITEMPROGRESSBAR 1 1
CheckKillMonName <$KILLMONNAME>
#act
CHANGECUSTOMITEMPROGRESSBARVALUE 1 1 0 + 50
SENDMSG 6 土豪赞助令牌加五倍,获得武魂经验:50!!
#ELSEACT
CHANGECUSTOMITEMPROGRESSBARVALUE 1 1 0 + 10

[@takeon1]
#IF
#ACT
#CALL [\嘟嘟制作\武器魂.txt] @武器武魂

\QuestDiary\嘟嘟制作\武器魂.txt

内容如下：

[@武器武魂]
{
#IF
CHECKCUSTOMITEMPROGRESSBAR 1 0
#act
#ELSEACT
CHANGECUSTOMITEMPROGRESSBAR 1 0 3 19
CHANGECUSTOMITEMPROGRESSBAR 1 1 3 19
CHANGECUSTOMITEMPROGRESSBAR 1 0 2 254
CHANGECUSTOMITEMPROGRESSBAR 1 1 2 254
CHANGECUSTOMITEMPROGRESSBAR 1 0 4 2
CHANGECUSTOMITEMPROGRESSBAR 1 1 4 2
CHANGECUSTOMITEMPROGRESSBAR 1 0 0 1
CHANGECUSTOMITEMPROGRESSBAR 1 1 0 1
CHANGECUSTOMITEMPROGRESSBAR 1 0 1 武魂零劫:
CHANGECUSTOMITEMPROGRESSBAR 1 1 1 武魂经验:
CHANGECUSTOMITEMPROGRESSBAR 1 0 2 254
CHANGECUSTOMITEMPROGRESSBAR 1 1 2 254
CHANGECUSTOMITEMPROGRESSBARVALUE 1 0 1 = 25
CHANGECUSTOMITEMPROGRESSBARVALUE 1 1 1 = 2000

#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 0
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[零劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 1
SetNewItemValue 1 1 + 1
SetNewItemValue 1 2 + 1
SetNewItemValue 1 3 + 1
SetNewItemValue 1 6 + 1
SetNewItemValue 1 9 + 1
SetNewItemValue 1 10 + 1
#elseact
goto @武器1
break

[@武器1]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 1
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[一劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 2
SetNewItemValue 1 1 + 2
SetNewItemValue 1 2 + 2
SetNewItemValue 1 3 + 2
SetNewItemValue 1 6 + 2
SetNewItemValue 1 9 + 2
SetNewItemValue 1 10 + 2
#elseact
goto @武器2
break

[@武器2]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 2
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[二劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 3
SetNewItemValue 1 1 + 3
SetNewItemValue 1 2 + 3
SetNewItemValue 1 3 + 3
SetNewItemValue 1 6 + 3
SetNewItemValue 1 9 + 3
SetNewItemValue 1 10 + 3
#elseact
goto @武器3
break

[@武器3]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 3
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[三劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 4
SetNewItemValue 1 1 + 4
SetNewItemValue 1 2 + 4
SetNewItemValue 1 3 + 4
SetNewItemValue 1 6 + 4
SetNewItemValue 1 9 + 4
SetNewItemValue 1 10 + 4
#elseact
goto @武器4
break

[@武器4]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 4
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[四劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 5
SetNewItemValue 1 1 + 5
SetNewItemValue 1 2 + 5
SetNewItemValue 1 3 + 5
SetNewItemValue 1 6 + 5
SetNewItemValue 1 9 + 5
SetNewItemValue 1 10 + 5
#elseact
goto @武器5
break

[@武器5]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 5
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[五劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 6
SetNewItemValue 1 1 + 6
SetNewItemValue 1 2 + 6
SetNewItemValue 1 3 + 6
SetNewItemValue 1 6 + 6
SetNewItemValue 1 9 + 6
SetNewItemValue 1 10 + 6
#elseact
goto @武器6
break

[@武器6]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 6
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[六劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 7
SetNewItemValue 1 1 + 7
SetNewItemValue 1 2 + 7
SetNewItemValue 1 3 + 7
SetNewItemValue 1 6 + 7
SetNewItemValue 1 9 + 7
SetNewItemValue 1 10 + 7
#elseact
goto @武器7
break

[@武器7]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 7
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[七劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 8
SetNewItemValue 1 1 + 8
SetNewItemValue 1 2 + 8
SetNewItemValue 1 3 + 8
SetNewItemValue 1 6 + 8
SetNewItemValue 1 9 + 8
SetNewItemValue 1 10 + 8
#elseact
goto @武器8
break

[@武器8]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 8
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[八劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 9
SetNewItemValue 1 1 + 9
SetNewItemValue 1 2 + 9
SetNewItemValue 1 3 + 9
SetNewItemValue 1 6 + 9
SetNewItemValue 1 9 + 9
SetNewItemValue 1 10 + 9
#elseact
goto @武器9
break

[@武器9]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 9
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[九劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 10
SetNewItemValue 1 1 + 10
SetNewItemValue 1 2 + 10
SetNewItemValue 1 3 + 10
SetNewItemValue 1 6 + 10
SetNewItemValue 1 9 + 10
SetNewItemValue 1 10 + 10
#elseact
goto @武器10
break

[@武器10]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 10
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[十劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 11
SetNewItemValue 1 1 + 11
SetNewItemValue 1 2 + 11
SetNewItemValue 1 3 + 11
SetNewItemValue 1 6 + 11
SetNewItemValue 1 9 + 11
SetNewItemValue 1 10 + 11
#elseact
goto @武器11
break

[@武器11]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 11
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[十一劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 12
SetNewItemValue 1 1 + 12
SetNewItemValue 1 2 + 12
SetNewItemValue 1 3 + 12
SetNewItemValue 1 6 + 12
SetNewItemValue 1 9 + 12
SetNewItemValue 1 10 + 12
#elseact
goto @武器12
break

[@武器12]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 12
#act
CHANGECUSTOMITEMTEXT 1 传奇永恒--[十二劫]
CHANGECUSTOMITEMTEXTCOLOR 1 215
SetNewItemValue 1 0 = 0
SetNewItemValue 1 1 = 0
SetNewItemValue 1 2 = 0
SetNewItemValue 1 3 = 0
SetNewItemValue 1 6 = 0
SetNewItemValue 1 9 = 0
SetNewItemValue 1 10 = 0
SetNewItemValue 1 0 + 13
SetNewItemValue 1 1 + 13
SetNewItemValue 1 2 + 13
SetNewItemValue 1 3 + 13
SetNewItemValue 1 6 + 13
SetNewItemValue 1 9 + 13
SetNewItemValue 1 10 + 13
#elseact
goto @武器13
break

[@武器13]
#if
CHECKCUSTOMITEMPROGRESSBARVALUE 1 0 0 = 13
#act
CHANGECUSTOMITEMTEXT