传世脚本 月光宝盒触发兽尊灵丹经验脚本

[@杀怪经验触发]

#IF

CHECKLEVELEX > 0

#ACT

MOV D49 0

MOV D50 0

MOV D51 0

MOV D52 0

MOV D53 0

MOV D54 0

MOV D55 0

MOV D56 0

MOV D57 0

MOV D58 0

MOV D59 0

#IF

CHECKLEVELEX > 0

#ACT

#ELSEACT

break

#IF

HAVEGUILD

#ACT

MOV D20 $PARAM(6)

DIV D20 1000

GuildExp $GUILDNAME + $STR(D20)

#IF

checkitem 月光宝盒(小) 1

#ACT

MOV D50 $PARAM(6)

DIV D50 10

MUL D50 6

MOV D51 4

#IF

checkitem 月光宝盒(大) 1

#ACT

MOV D50 $PARAM(6)

DIV D50 10

MUL D50 6

MOV D51 5

#IF

checkitem 兽尊灵丹(小) 1

#ACT

MOV D58 1

#IF

checkitem 兽尊灵丹(大) 1

#ACT

MOV D58 2

#IF

CHECKLEVELEX > 0

#ACT

#ELSEACT

break

#IF

SMALL D51 1

SMALL D58 1

#ACT

break

#IF

EQUAL D58 1

#ACT

MOV D59 $ItemExD.$ITEMMAKEINDE[兽尊灵丹(小)].0.4

#IF

EQUAL D58 2

#ACT

MOV D59 $ItemExD.$ITEMMAKEINDE[兽尊灵丹(大)].0.4

#IF

EQUAL D51 4

#ACT

MOV D55 $ItemExD.$ITEMMAKEINDE[月光宝盒(小)].0.4

#IF

EQUAL D51 5

#ACT

MOV D56 $ItemExD.$ITEMMAKEINDE[月光宝盒(大)].0.4

#IF

EQUAL D57 1

SMALL D52 2000000

#ACT

INC D52 $STR(D49)

#IF

EQUAL D57 2

SMALL D53 10000000

#ACT

INC D53 $STR(D49)

#IF

EQUAL D57 3

SMALL D54 50000000

#ACT

INC D54 $STR(D49)

#IF

EQUAL D51 4

SMALL D55 20000000

#ACT

INC D55 $STR(D50)

#IF

EQUAL D51 5

SMALL D56 100000000

#ACT

INC D56 $STR(D50)

#IF

EQUAL D58 1

SMALL D59 1000000

#ACT

INC D59 $PARAM(6)

#IF

EQUAL D58 2

SMALL D59 10000000

#ACT

INC D59 $PARAM(6)

#IF

CHECKLEVELEX > 0

#ACT

#ELSEACT

break

#IF

SMALL D59 1000000

EQUAL D58 1

#ACT

UpgradeItemExD $ITEMMAKEINDE[兽尊灵丹(小)] 0 4 + $PARAM(6)

SendMsg 5 兽尊灵丹成功吸收了<$PARAM(6)>经验。

#IF

LARGE D59 1000000

EQUAL D58 1

#ACT

UpgradeItemExD $ITEMMAKEINDE[兽尊灵丹(小)] 0 4 = 1000000

SendMsg 5 兽尊灵丹所储存的经验已满。

#IF

SMALL D59 10000000

EQUAL D58 2

#ACT

UpgradeItemExD $ITEMMAKEINDE[兽尊灵丹(大)] 0 4 + $PARAM(6)

SendMsg 5 兽尊灵丹成功吸收了<$PARAM(6)>经验。

#IF

LARGE D59 10000000

EQUAL D58 2

#ACT

UpgradeItemExD $ITEMMAKEINDE[兽尊灵丹(大)] 0 4 = 10000000

SendMsg 5 兽尊灵丹所储存的经验已满。

#IF,

SMALL D55 20000000

EQUAL D51 4

#ACT

UpgradeItemExD $ITEMMAKEINDE[月光宝盒(小)] 0 4 + $STR(D50)

SendMsg 5 月光宝盒(小)成功吸收了<$STR(D50)>经验。

#IF

LARGE D55 20000000

EQUAL D51 4

#ACT

UpgradeItemExD $ITEMMAKEINDE[月光宝盒(小)] 0 4 = 20000000

SendMsg 5 月光宝盒(小)所储存的经验已满。

#IF

SMALL D56 100000000

EQUAL D51 5

#ACT

UpgradeItemExD $ITEMMAKEINDE[月光宝盒(大)] 0 4 + $STR(D50)

SendMsg 5 月光宝盒(大)成功吸收了<$STR(D50)>经验。

#IF

LARGE D56 100000000

EQUAL D51 5

#ACT

UpgradeItemExD $ITEMMAKEINDE[月光宝盒(大)] 0 4 = 100000000

SendMsg 5 月光宝盒(大)所储存的经验已满。







[@经验增加触发]

#IF

LARGE D91 0

#ACT

MOV D91 0

break

#IF

CHECKLEVELEX > 0

#ACT

MOV P60 0

MOV P61 0

MOV P62 0

MOV P63 0

MOV P64 0

MOV P65 0

MOV P66 0

MOV P67 0

MOV P68 0

MOV P69 0

#IF

CHECKLEVELEX > 0

#ACT

#ELSEACT

break

#IF

checkitem 月光宝盒(小) 1

#ACT

MOV P60 $PARAM(5)

DIV P60 10

MUL P60 6

MOV P61 4

#IF

checkitem 月光宝盒(大) 1

#ACT

MOV P60 $PARAM(5)

DIV P60 10

MUL P60 6

MOV P61 5

#IF

checkitem 兽尊灵丹(小) 1

#ACT

MOV P68 1

#IF

checkitem 兽尊灵丹(大) 1

#ACT

MOV P68 2

#IF

CHECKLEVELEX > 0

#ACT

#ELSEACT

break

#IF

SMALL P61 1

SMALL P68 1

#ACT

break

#IF

EQUAL P68 1

#ACT

MOV P69 $ItemExD.$ITEMMAKEINDE[兽尊灵丹(小)].0.4

#IF

EQUAL P68 2

#ACT

MOV P69 $ItemExD.$ITEMMAKEINDE[兽尊灵丹(大)].0.4

#IF

EQUAL P61 4

#ACT

MOV P65 $ItemExD.$ITEMMAKEINDE[月光宝盒(小)].0.4

#IF

EQUAL P61 5

#ACT

MOV P66 $ItemExD.$ITEMMAKEINDE[月光宝盒(大)].0.4

#IF

EQUAL P61 4

SMALL P65 20000000

#ACT

INC P65 $STR(P60)

#IF

EQUAL P61 5

SMALL P66 100000000

#ACT

INC P66 $STR(P60)

#IF

EQUAL P68 1

SMALL P69 1000000

#ACT

INC P69 $PARAM(5)

#IF

EQUAL P68 2

SMALL P69 10000000

#ACT

INC P69 $PARAM(5)

#IF

CHECKLEVELEX > 0

#ACT

#ELSEACT

break

#IF

SMALL P69 1000000

EQUAL P68 1

#ACT

UpgradeItemExD $ITEMMAKEINDE[兽尊灵丹(小)] 0 4 + $PARAM(5)

SendMsg 5 兽尊灵丹成功吸收了<$PARAM(5)>经验。

#IF

LARGE P69 1000000

EQUAL P68 1

#ACT

UpgradeItemExD $ITEMMAKEINDE[兽尊灵丹(小)] 0 4 = 1000000

SendMsg 5 兽尊灵丹所储存的经验已满。

#IF

SMALL P69 10000000

EQUAL P68 2

#ACT

UpgradeItemExD $ITEMMAKEINDE[兽尊灵丹(大)] 0 4 + $PARAM(5)

SendMsg 5 兽尊灵丹成功吸收了<$PARAM(5)>经验。

#IF

LARGE P69 10000000

EQUAL P68 2

#ACT

UpgradeItemExD $ITEMMAKEINDE[兽尊灵丹(大)] 0 4 = 10000000

SendMsg 5 兽尊灵丹所储存的经验已满。

#IF

SMALL P65 20000000

EQUAL P61 4

#ACT

UpgradeItemExD $ITEMMAKEINDE[月光宝盒(小)] 0 4 + $STR(P60)

SendMsg 5 月光宝盒(小)成功吸收了<$STR(P60)>经验。

#IF

LARGE P65 20000000

EQUAL P61 4

#ACT

UpgradeItemExD $ITEMMAKEINDE[月光宝盒(小)] 0 4 = 20000000

SendMsg 5 月光宝盒(小)所储存的经验已满。

#IF

SMALL P66 100000000

EQUAL P61 5

#ACT

UpgradeItemExD $ITEMMAKEINDE[月光宝盒(大)] 0 4 + $STR(P60)

SendMsg 5 月光宝盒(大)成功吸收了<$STR(P60)>经验。

#IF

LARGE P66 100000000

EQUAL P61 5

#ACT

UpgradeItemExD $ITEMMAKEINDE[月光宝盒(大)] 0 4 = 100000000

SendMsg 5 月光宝盒(大)所储存的经验已满。





以上脚本放到功能脚本里
复制代码

强，我和我的小伙伴们都惊呆了！

我对楼主的敬仰犹如滔滔江水绵延不绝！

在这个版块混了这么久了，第一次看见这么给你的帖子！

好东西，学习学习！

楼主，你腾飞腾飞喊你回家吃饭！

系统居然说我是在灌水，我有吗？

楼上的说的很多！

楼主的头像能辟邪啊！

赞一个！