AFT4神龙之魂升级脚本,完善.[加入妖士]

[@升级神龙]
{
\\
上古神龙之魂附有神龙的力量.\
传世勇士斩妖除魔必备之饰品.\
我这里为伟大的您提供神龙之魂的升级服务.\
<color=red 但是我能力有限,只能提升到8级.请不要怪我没能力噢!>\\
<color=red 每升一次要需要你提供给我10000元宝的好处费,要不我可不帮你!>\\
<提升神龙之魂/@升级神龙1>\

[@升级神龙1]
#ACT
checkitembox 请放入神龙之魂： 1 2008

[@getboxitem2008]
#IF
CHECKITEMID $CHECKBOXITEM.ItemExD
#ACT
MOV S10 $CHECKBOXITEM.ItemExD
MOV P73
#ELSEACT
break
#IF
!SMALL $ITEMSL.$STR(S10).6 8
#ACT
MESSAGEBOX 神龙之魂品级最高为8级。
BREAK
#IF
CHECKGAMEGOLD < 10000
#SAY
你的剩余的元宝不足，无法为你升级神龙之魂,你在骗我吗?
#ACT
BREAK

#IF
EQUAL $CHECKBOXITEM.NAME 神龙之魂1
#ACT
MOV S10 $CHECKBOXITEM.ItemExD
MOV P73
GOTO @战士神龙
BREAK
#IF
EQUAL $CHECKBOXITEM.NAME 神龙之魂2
#ACT
MOV S10 $CHECKBOXITEM.ItemExD
MOV P73
GOTO @法师神龙
BREAK
#IF
EQUAL $CHECKBOXITEM.NAME 神龙之魂3
#ACT
MOV S10 $CHECKBOXITEM.ItemExD
MOV P73
GOTO @道士神龙
BREAK
#IF
EQUAL $CHECKBOXITEM.NAME 神龙之魂4
#ACT
MOV S10 $CHECKBOXITEM.ItemExD
MOV P73
GOTO @妖士神龙
BREAK
#ELSEACT
MESSAGEBOX 你的放入的不是神龙之魂！
BREAK

[@战士神龙]
#IF
EQUAL $ITEMSL.$STR(S10).6 1
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 2
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 0
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 180
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 0 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 1 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 2
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 2
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 3
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 5
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 270
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 0 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 1 = 8
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 3
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 3
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 4
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 8
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 360
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 0 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 1 = 12
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 4
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 4
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 5
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 11
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 660
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 0 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 1 = 16
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 5
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 5
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 6
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 14
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 960
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 0 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 1 = 20
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 6
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 6
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 7
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 17
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 7
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 1260
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 0 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 1 = 24
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 7
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 7
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 7
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 8
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 23
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 11
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 1800
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 0 = 8
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 1 = 30
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 10
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 10
MESSAGEBOX 神龙之魂升级成功！
break

[@法师神龙]
#IF
EQUAL $ITEMSL.$STR(S10).6 1
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 2
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 0
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 60
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 10 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 11 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 2
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 2
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 3
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 5
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 90
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 10 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 11 = 8
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 3
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 3
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 4
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 8
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 120
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 10 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 11 = 10
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 4
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 4
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 5
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 11
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 220
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 10 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 11 = 14
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 5
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 5
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 6
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 14
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 320
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 10 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 11 = 18
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 6
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 6
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 7
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 17
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 7
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 420
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 10 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 11 = 22
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 7
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 7
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 7
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 8
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 23
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 10
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 13 = 600
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 0 = 8
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 1 = 28
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 10
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 10
MESSAGEBOX 神龙之魂升级成功！
break

[@道士神龙]
#IF
EQUAL $ITEMSL.$STR(S10).6 1
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 2
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 0
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 120
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 12 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 13 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 2
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 2
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 3
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 5
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 180
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 12 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 13 = 8
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 3
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 3
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 4
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 8
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 240
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 12 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 13 = 11
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 4
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 4
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 5
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 11
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 440
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 12 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 13 = 15
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 5
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 5
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 6
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 14
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 640
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 12 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 13 = 19
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 6
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 6
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 7
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 17
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 7
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 840
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 12 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 13 = 23
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 7
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 7
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 7
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 8
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 23
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 10
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 1200
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 12 = 8
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 13 = 29
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 10
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 10
MESSAGEBOX 神龙之魂升级成功！
break

[@妖士神龙]
#IF
EQUAL $ITEMSL.$STR(S10).6 1
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 2
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 0
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 120
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 89 = 1
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 90 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 2
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 2
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 2
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 3
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 5
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 13 = 180
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 89 = 2
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 90 = 8
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 3
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 3
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 3
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 4
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 8
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 240
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 89 = 3
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 90 = 11
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 4
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 4
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 4
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 5
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 11
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 440
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 89 = 4
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 90 = 15
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 5
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 5
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 5
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 6
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 14
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 640
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 89 = 5
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 90 = 19
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 6
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 6
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 6
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 7
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 17
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 7
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 840
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 89 = 6
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 90 = 23
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 7
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 7
MESSAGEBOX 神龙之魂升级成功！
break
#IF
EQUAL $ITEMSL.$STR(S10).6 7
CHECKGAMEGOLD > 10000
#ACT
GAMEGOLD - 10000
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 6 1 = 8
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 7 1 = 23
UPGRADEITEMEXD $CHECKBOXITEM.ItemExD 8 1 = 10
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 9 = 1200
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 89 = 8
UPGRADEUSERITEMEX $CHECKBOXITEM.ItemExD 90 = 29
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 2 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 3 = 10
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 4 = 1
UPGRADEITEMSL $CHECKBOXITEM.ItemExD 5 = 10
MESSAGEBOX 神龙之魂升级成功！
break

}