仿官方神兵铸造完整脚本

神兵铸造-0.txt

[@main]

#IF

CheckLevelEx < 46 dedecms.com

#SAY

　　<color=green 亲爱的勇士，我有一批武器需要铸造，你愿意帮助我吗？>\

<color=green 我会给予你丰厚的回报哦！帮我铸造成功后，我还可以帮助你>\

<color=green 升级你的武器，有很大概率提升你的武器属性。>\

　　<color=red 注：等级达到46级才能参与此活动。>\

\

　　<color==gray 对不起，你的等级太低，无法参加活动。>

#ELSESAY

　　<color=green 亲爱的勇士，我有一批武器需要铸造，你愿意帮助我吗？>\

<color=green 我会给予你丰厚的回报哦！帮我铸造成功后，我还可以帮助你>\

dedecms.com

<color=green 升级你的武器，有很大概率提升你的武器属性。>\

　　<color=red 注：等级达到46级才能参与此活动。>\

\

dedecms.com

　　<进入铸造>            <活动规则

　　<提升武器属性

[@pgHelp]

　　<color=green 玩家在限定时间内鼠标点击相应的按钮则计算一点铸造值，>\

<color=green 直至100%铸造完成后完成任务。完成任务的玩家可以免费获得>\

<color=green 2000万经验奖励。（每天3次）完成任务时上交一个命运石可>\

<color=green 以铸造自己的武器，选择相应属性（攻击，道术，魔法）有概>\

<color=green 率成功属性+1。如果铸造失败，也可以获得15-20亿海量经验>\

<color=green 值！>\

\

\

　　<返回

dedecms.com

[@pgUpgWeapon]

#CALL [\功能\神兵铸造\武器升级.txt] @升级武器

[@pgPostEntry]

　　<color=green 每位玩家每天可以铸造3次。>\ dedecms.com

\

　　<开始新的铸造

dedecms.com

[@pgPostAgain]

#IF

CHECKVAR HUMAN 铸造次数 < 1

#ACT

CALCVAR HUMAN 铸造步骤 = 1

CALCVAR HUMAN 铸造次数 = 1

CALCVAR HUMAN 再做次数 = 3

break

#CALL [\功能\神兵铸造\铸造任务.txt] @铸造任务

#IF

CHECKVAR HUMAN 铸造次数 < 4

CHECKVAR HUMAN 铸造次数 > 0

#ACT

dedecms.com

CALCVAR HUMAN 铸造步骤 = 1

break dedecms.com

#CALL [\功能\神兵铸造\铸造任务.txt] @铸造任务

#ELSESAY

　　<color=green 对不起，你今天已经做满3次了，改天啦！>\ dedecms.com

\

　　<离开>

功能\神兵铸造\铸造任务.txt

[@铸造任务] dedecms.com

{

#IF

random 1

#ACT

movr P0 10

#IF

equal P0 0

#ACT

mov D0 1

mov D1 9

mov D2 7

mov D3 6

mov D4 10

mov D5 5 dedecms.com

mov D6 3 dedecms.com

mov D7 4

mov D8 8 dedecms.com

mov D9 2

#IF

equal P0 1

#ACT dedecms.com

mov D0 2

mov D1 3

mov D2 7

mov D3 9

mov D4 1

mov D5 5

mov D6 10

mov D7 8 dedecms.com

mov D8 4

mov D9 6

#IF dedecms.com

equal P0 2

#ACT

mov D0 3

mov D1 9

mov D2 6

mov D3 8

mov D4 2

mov D5 1

mov D6 10

mov D7 7

mov D8 5

mov D9 4

#IF

equal P0 3

#ACT

mov D0 4

mov D1 9

mov D2 3

mov D3 8

mov D4 2

dedecms.com

mov D5 1

mov D6 5

mov D7 7

mov D8 10

mov D9 6

#IF

equal P0 4

#ACT

dedecms.com

mov D0 5

mov D1 9

mov D2 3

mov D3 2

mov D4 10

mov D5 8 dedecms.com

mov D6 6

mov D7 7

mov D8 1

mov D9 4

#IF

equal P0 5

#ACT

mov D0 5

mov D1 9

mov D2 10

mov D3 8

mov D4 2 dedecms.com

mov D5 1

mov D6 4

mov D7 6

mov D8 3

mov D9 7

#IF

equal P0 6

#ACT

mov D0 6

mov D1 2

mov D2 3

mov D3 8

mov D4 4

mov D5 1

mov D6 5

mov D7 10

mov D8 7

mov D9 9

#IF

dedecms.com

equal P0 7

#ACT

mov D0 7

mov D1 9

mov D2 3

mov D3 10

mov D4 2

dedecms.com

mov D5 1 dedecms.com

mov D6 5

dedecms.com

mov D7 4

mov D8 8

mov D9 6

#IF

equal P0 8

#ACT

mov D0 8

mov D1 10

mov D2 3

mov D3 4

mov D4 2 dedecms.com

mov D5 1

dedecms.com

mov D6 7

dedecms.com

mov D7 6

mov D8 9

mov D9 5

#IF

equal P0 9

#ACT

mov D0 9

mov D1 4

dedecms.com

mov D2 3

mov D3 6 dedecms.com

mov D4 10

mov D5 1

mov D6 7

dedecms.com

mov D7 8

mov D8 2

mov D9 5 dedecms.com

#IF

random 1

#ACT dedecms.com

movr P1 10

#IF

equal P1 0

#ACT

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S0 $STR(D0)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S1 $STR(D1)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S2 $STR(D2)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S3 $STR(D3)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S4 $STR(D4)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S5 $STR(D5)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S6 $STR(D6)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S7 $STR(D7)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S8 $STR(D8)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S9 $STR(D9)

#IF

equal P1 1

#ACT

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S9 $STR(D0)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S1 $STR(D1)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S7 $STR(D2)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S3 $STR(D3)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S5 $STR(D4) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S4 $STR(D5)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S6 $STR(D6)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S0 $STR(D7)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S8 $STR(D8)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S2 $STR(D9)

#IF

equal P1 2

#ACT

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S3 $STR(D0)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S1 $STR(D1)

dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S8 $STR(D2)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S0 $STR(D3)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S7 $STR(D4)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S5 $STR(D5) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S6 $STR(D6) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S4 $STR(D7)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S9 $STR(D8) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S2 $STR(D9)

#IF

equal P1 3

dedecms.com

#ACT

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S4 $STR(D0)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S7 $STR(D1)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S2 $STR(D2)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S9 $STR(D3)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S0 $STR(D4)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S5 $STR(D5)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S6 $STR(D6)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S1 $STR(D7)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S8 $STR(D8)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S3 $STR(D9)

#IF

equal P1 4

#ACT

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S8 $STR(D0) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S1 $STR(D1)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S4 $STR(D2) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S9 $STR(D3) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S7 $STR(D4)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S5 $STR(D5)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S6 $STR(D6)

dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S2 $STR(D7)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S0 $STR(D8)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S3 $STR(D9)

#IF

equal P1 5

#ACT

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S5 $STR(D0) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S1 $STR(D1)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S9 $STR(D2)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S7 $STR(D3) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S4 $STR(D4)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S0 $STR(D5)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S6 $STR(D6)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S3 $STR(D7)

dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S2 $STR(D8)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S8 $STR(D9)

#IF

equal P1 6

#ACT

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S6 $STR(D0)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S1 $STR(D1)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S2 $STR(D2)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S9 $STR(D3)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S5 $STR(D4)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S4 $STR(D5) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S0 $STR(D6)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S7 $STR(D7)

dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S8 $STR(D8) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S3 $STR(D9)

#IF

equal P1 7

#ACT

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S7 $STR(D0)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S9 $STR(D1)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S2 $STR(D2)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S3 $STR(D3)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S8 $STR(D4)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S5 $STR(D5) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S6 $STR(D6)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S0 $STR(D7)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S4 $STR(D8)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S1 $STR(D9)

#IF

equal P1 8

#ACT dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S8 $STR(D0)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S7 $STR(D1)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S2 $STR(D2)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S5 $STR(D3)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S4 $STR(D4)

dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S3 $STR(D5) dedecms.com

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S9 $STR(D6)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S1 $STR(D7)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S0 $STR(D8)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S6 $STR(D9)

#IF

equal P1 9

dedecms.com

#ACT

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S2 $STR(D0)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S1 $STR(D1)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S0 $STR(D2)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S8 $STR(D3)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S4 $STR(D4)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S6 $STR(D5)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S9 $STR(D6)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S7 $STR(D7)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S3 $STR(D8)

ReadRandomStr ..\QuestDiary\读取\神兵铸造.txt S5 $STR(D9)

#IF dedecms.com

CHECKVAR HUMAN 铸造步骤 = 1

#ACT

MOV S10 加火

MOV S11 10%

#IF

CHECKVAR HUMAN 铸造步骤 = 2

#ACT

MOV S10 小锤

MOV S11 20%

#IF

CHECKVAR HUMAN 铸造步骤 = 3 dedecms.com

#ACT

MOV S10 大锤

MOV S11 30% dedecms.com

#IF

CHECKVAR HUMAN 铸造步骤 = 4

#ACT

MOV S10 轻锤

MOV S11 40% dedecms.com

#IF

CHECKVAR HUMAN 铸造步骤 = 5

#ACT

MOV S10 重锤

MOV S11 50%

#IF

CHECKVAR HUMAN 铸造步骤 = 6 dedecms.com

#ACT

MOV S10 淬火 dedecms.com

MOV S11 60%

#IF dedecms.com

CHECKVAR HUMAN 铸造步骤 = 7

#ACT

MOV S10 锻打

MOV S11 70%

#IF

CHECKVAR HUMAN 铸造步骤 = 8

#ACT

MOV S10 回炉

MOV S11 80%

#IF

CHECKVAR HUMAN 铸造步骤 = 9

#ACT

MOV S10 冷捶打

MOV S11 90%

#IF

CHECKVAR HUMAN 铸造步骤 = 10

#ACT dedecms.com

MOV S10 打磨

MOV S11 100%

#IF

random 1

#ACT

break

#SAY dedecms.com

　　{color=green 这是今天第<$HUMAN(铸造次数)>次铸造}\

dedecms.com

　　铸造小提示：{color=green <$STR(S10)>（完成度<$STR(S11)>）}\

\

\

\

　　{<$STR(S0)>/@pgPostStep&<$STR(S0)>}     {<$STR(S1)>/@pgPostStep&<$STR(S1)>} {<$STR(S2)>/@pgPostStep&<$STR(S2)>} {<$STR(S3)>/@pgPostStep&<$STR(S3)>} {<$STR(S4)>/@pgPostStep&<$STR(S4)>} \

　　{<$STR(S5)>/@pgPostStep&<$STR(S5)>}     {<$STR(S6)>/@pgPostStep&<$STR(S6)>} {<$STR(S7)>/@pgPostStep&<$STR(S7)>} {<$STR(S8)>/@pgPostStep&<$STR(S8)>} {<$STR(S9)>/@pgPostStep&<$STR(S9)>} \

\

　　<重做>      <返回

[@pgPostStep]

#IF

equal $SCRIPTPARAM(1) $STR(S10) dedecms.com

#ACT dedecms.com

goto @_chenggong

break

#ELSEACT

goto @_shibai

break

[@_chenggong]

#IF

CHECKVAR HUMAN 铸造步骤 < 10 dedecms.com

#ACT

CALCVAR HUMAN 铸造步骤 + 1 dedecms.com

goto @铸造任务

break

dedecms.com

#IF

CHECKVAR HUMAN 铸造步骤 = 10

#ACT

CHANGEEXP + 20000000

CALCVAR HUMAN 铸造次数 + 1 dedecms.com

CALCVAR HUMAN 再做次数 - 1

CALCVAR HUMAN 铸造机会 + 1

#IF

CHECKVAR HUMAN 再做次数 > 0

#ACT

break

#SAY

　　恭喜你，完成了一次铸造。获得<color=green 20000000>经验！\

　　{color=green 今天还可以再做<$HUMAN(再做次数)>次。}\

\

　　<继续铸造

#IF

dedecms.com

CHECKVAR HUMAN 再做次数 = 0 dedecms.com

#ACT

break

#SAY

　　恭喜你，完成了一次铸造。获得<color=green 20000000>经验！\ dedecms.com

\

　　<返回

[@_shibai]

#IF

random 1

#ACT

CALCVAR HUMAN 铸造次数 + 1

CALCVAR HUMAN 再做次数 - 1

#IF

CHECKVAR HUMAN 铸造次数 > 0

CHECKVAR HUMAN 铸造次数 < 4

#SAY

　　非常遗憾啊，失败了！\

　　{color=green 今天还可以再做<$HUMAN(再做次数)>次。}\

\

　　<继续铸造>

#IF

CHECKVAR HUMAN 铸造次数 = 4

dedecms.com

#SAY

\

非常遗憾啊，失败了。\

　　<返回>

}

功能\神兵铸造\武器升级.txt

[@升级武器] dedecms.com

{

#IF

CHECKVAR HUMAN 铸造机会 > 0

#SAY

dedecms.com

　　<color=green 给我一个命运石，我可以帮你提升以下属性，如果失败，>\ dedecms.com

<color=green 你也可以得到15-20亿经验奖励。>\

　　{color=red 你目前有<$HUMAN(铸造机会)>次提升机会}\

\ dedecms.com

　　<攻击>      <魔法>      <道术

\

　　<返回

#ACT

break dedecms.com

#ELSESAY

　　<color=green 给我一个命运石，我可以帮你提升以下属性，如果失败，>\

<color=green 你也可以得到15-20亿经验奖励。>\

　　<color=red 你目前没有提升机会>\

dedecms.com

\

　　<color=gray 攻击   魔法   道术>\

\

　　<返回

[@shengji_gongji]

#SAY

/

　　<color=green 你选择了：攻击>

#ACT

mov S12 攻击 dedecms.com

ShowSpotDlg 6 请放入武器  @shengjiwuqi

[@shengji_mofa]

#SAY

/

　　<color=green 你选择了：魔法>

#ACT

dedecms.com

mov S12 魔法

ShowSpotDlg 6 请放入武器  @shengjiwuqi

[@shengji_daoshu]

#SAY

/

　　<color=green 你选择了：道术>

#ACT

dedecms.com

mov S12 道术

ShowSpotDlg 6 请放入武器  @shengjiwuqi

[@shengjiwuqi] dedecms.com

#IF dedecms.com

random 1 dedecms.com

#ACT

mov P0 0

inc P0 $ITEMINFO[$PARAM(1)].VALUE(0)

inc P0 $ITEMINFO[$PARAM(1)].VALUE(1)

inc P0 $ITEMINFO[$PARAM(1)].VALUE(2)

inc P0 $ITEMINFO[$PARAM(1)].VALUE(3)

inc P0 $ITEMINFO[$PARAM(1)].VALUE(4)

inc P0 $ITEMINFO[$PARAM(1)].VALUE(5)

#IF

large P0 6

#ACT

break

#SAY

\\ dedecms.com

　　你已经拥有了世上最好的兵刃，好好珍惜它吧！\ dedecms.com

\

　　<离开/@exit>

#IF

equal $ITEMINFO[$PARAM(1)].NAME 命运

#ACT dedecms.com

break dedecms.com

#SAY

dedecms.com

　　命运的属性已注定，不能升级！\

\

　　<离开>

#IF

large $ITEMINFO[$PARAM(1)].STDMODE 4

dedecms.com

small $ITEMINFO[$PARAM(1)].STDMODE 7

#ACT

goto @可以升级

dedecms.com

break

#ELSESAY

　　这不是武器，无法进行武器升级锻造！\

\

　　<换把武器>

[@可以升级]

#IF

CHECKITEM 命运石 1

#ACT

break

goto @升级属性 dedecms.com

#ELSEACT

goto @没有命运石

break

[@没有命运石]

　　对不起，你包裹中没有<color=green 命运石>！\

dedecms.com

\

　　<离开>

[@升级属性]

#IF

random 15

#ACT

goto @升级成功 dedecms.com

#ELSEACT

movr P0 6

goto @升级失败

[@升级成功]

#IF dedecms.com

equal S12 攻击

#ACT

take 命运石 1

UPGRADEUSERITEM $PARAM(1) 1 + 1

CALCVAR HUMAN 铸造机会 - 1

break

#SAY

　　恭喜你，武器升级成功！\ dedecms.com

\

　　<离开>

#IF

equal S12 魔法

#ACT

take 命运石 1

UPGRADEUSERITEM $PARAM(1) 3 + 1

CALCVAR HUMAN 铸造机会 - 1

break

#SAY

　　恭喜你，武器升级成功！\ dedecms.com

\

　　<离开> dedecms.com

#IF

equal S12 道术 dedecms.com

#ACT

take 命运石 1 dedecms.com

UPGRADEUSERITEM $PARAM(1) 5 + 1

CALCVAR HUMAN 铸造机会 - 1

break

#SAY

　　恭喜你，武器升级成功！\

\

　　<离开>

[@升级失败] dedecms.com

#IF

equal P0 0 dedecms.com

#ACT

mov D0 15

mov P1 1500000000

#IF

equal P0 1

dedecms.com

#ACT

dedecms.com

mov D0 16

dedecms.com

mov P1 1600000000

#IF

equal P0 2

#ACT

mov D0 17

mov P1 1700000000

dedecms.com

#IF

equal P0 3

#ACT

mov D0 18

mov P1 1800000000

#IF

dedecms.com

equal P0 4

#ACT

mov D0 19

mov P1 1900000000

#IF

equal P0 5

#ACT

mov D0 20

mov P1 2000000000

#IF

random 1

#ACT

take 命运石 1 dedecms.com

CALCVAR HUMAN 铸造机会 - 1

CHANGEEXP + $STR(P1)

break dedecms.com

#SAY

　　很遗憾，这次升级失败了，但是奖励你{color=green <$STR(D0)>亿经验}。\

\

　　<返回>

[@huanwuqi]

#IF

equal S12 攻击

#ACT

goto @shengji_gongji

break

#IF

equal S12 魔法

#ACT

goto @shengji_mofa

break dedecms.com

#IF

equal S12 道术

#ACT

goto @shengji_daoshu

break

}

QuestDiary\读取\神兵铸造.txt

重锤

淬火

冷捶打

轻锤

加火

小锤

打磨

锻打

回炉

大锤 dedecms.com

早上8:00记得清理变量
dedecms.com