500pi-Legendm2装备淬炼随机属性功能脚本素材
2166
===========================================================
【注:帖子中的代码只显示了部分-如需完整代码请下载附件】
[@Mir2m2装备淬炼脚本NPC]
{
[@Mir2m2淬炼衣服]
#IF
CHECKLEVELEX < $(淬炼需要等级X0)
#ACT
MESSAGEBOX 对不起,您的等级不够$(淬炼需要等级X0),无法进行淬炼!
BREAK
#IF
CHECKGAMEGOLD < $(淬炼需要元宝X0)
#ACT
MESSAGEBOX 对不起,您元宝不足$(淬炼需要元宝X0)个!
BREAK
#IF
CHECKUSEITEM $(淬炼装备位置X0)
#ELSEACT
MESSAGEBOX 对不起,请将您的【衣服】佩戴在身上!
BREAK
#IF
CheckS传奇套装素材-传奇套装素材-tringLis传奇套装素材-传奇套装素材-t ..\Ques传奇套装素材-传奇套装素材-tDiary\Mir2m2装备淬炼配置(免费脚本群.347979)\Mir2m2装备淬炼列表.ini $(淬炼位置变量X0)
#ELSEACT
MESSAGEBOX 对不起,您的【$(淬炼位置变量X0)】不能进行淬炼!
BREAK
#IF
CheckI传奇套装素材-传奇套装素材-temAddValue $(淬炼装备位置X0) 0 ? $(淬炼最高点数X0)
CheckI传奇套装素材-传奇套装素材-temAddValue $(淬炼装备位置X0) 1 ? $(淬炼最高点数X0)
CheckI传奇套装素材-传奇套装素材-temAddValue $(淬炼装备位置X0) 2 ? $(淬炼最高点数X0)
CheckI传奇套装素材-传奇套装素材-temAddValue $(淬炼装备位置X0) 3 ? $(淬炼最高点数X0)
CheckI传奇套装素材-传奇套装素材-temAddValue $(淬炼装备位置X0) 4 ? $(淬炼最高点数X0)
#ACT
MESSAGEBOX 对不起,您的【$(淬炼位置变量X0)】附加属性已全部满$(淬炼最高点数X0)点,无法进行淬炼!
BREAK
#IF
CHECKLEVELEX > 0
#ACT
GAMEGOLD - $(淬炼需要元宝X0)
#IF
CHECKLEVELEX > 0
#ACT
MOV P6 $(淬炼成功几率X0)
#IF
EQUAL P6 0
#ACT
MOV P6 1
#ELSEACT
MOVR P6 $(淬炼成功几率X0)
#IF
EQUAL P6 0
#ACT
MOV P9 5
MOV P0 0
MOV P1 1
MOV P2 2
MOV P3 3
MOV P4 4
#ELSEACT
MOV P6 0
SENDMSG 6 对不起,您的【$(淬炼位置变量X0)】淬炼失败!
MESSAGEBOX 对不起,您的【$(淬炼位置变量X0)】淬炼失败!
BREAK
#IF
EQUAL P6 0
#ACT
MOVR P8 <$STR(P9)>
DEC P9 1
MOV S10 <$
INC S10 STR(P
INC S10 <$STR(P8)>
INC S10 >
MOV P7 <$STR(S10)>
#IF
EQUAL P6 0
CheckI传奇套装素材-传奇套装素材-temAddValue $(淬炼装备位置X0) <$STR(P7)> < $(淬炼最高点数X0)
#ACT
MOV P6 1
UPGRADEITEMEX $(淬炼装备位置X0) <$STR(P7)> 0 1 0
#IF
EQUAL P6 0
#ACT
MOV S10 <$
INC S10 STR(P
INC S10 <$STR(P9)>
INC S10 >
MOV P7 <$STR(S10)>
MOV P<$STR(P8)> <$STR(P7)>
#IF
EQUAL P6 0
#ACT
MOVR P8 <$STR(P9)>
DEC P9 1
MOV S10 <$
INC S10 STR(P
INC S10 <$STR(P8)>
INC S10 >
MOV P7 <$STR(S10)>
#IF
EQUAL P6 0
CheckI传奇套装素材-传奇套装素材-temAddValue $(淬炼装备位置X0) <$STR(P7)> < $(淬炼最高点数X0)
#ACT
MOV P6 1
UPGRADEITEMEX $(淬炼装备位置X0) <$STR(P7)> 0 1 0
#IF
EQUAL P6 0
#ACT
MOV S10 <$
INC S10 STR(P
INC S10 <$STR(P9)>
INC S10 >
MOV P7 <$STR(S10)>
MOV P<$STR(P8)> <$STR(P7)>
#IF
EQUAL P6 0
#ACT
MOVR P8 <$STR(P9)>
DEC P9 1
MOV S10 <$
INC S10 STR(P
INC S10 <$STR(P8)>
INC S10 >
MOV P7 <$STR(S10)>
#IF
EQUAL P6 0
CheckI传奇套装素材-传奇套装素材-temAddValue $(淬炼装备位置X0) <$STR(P7)> < $(淬炼最高点数X0)
#ACT
MOV P6 1
UPGRADEITEMEX $(淬炼装备位置X0) <$STR(P7)> 0 1 0
#IF
EQUAL P6 0
#ACT
MOV S10 <$
INC S10 STR(P
INC S10 <$STR(P9)>
INC S10 >
MOV P7 <$STR(S10)>
MOV P<$STR(P8)> <$STR(P7)>
#IF
EQUAL P6 0
#ACT
MOVR P8 <$STR(P9)>
DEC P9 1
MOV S10 <$
INC S10 STR(P
INC S10 <$STR(P8)>
INC S10 >
MOV P7 <$STR(S10)>
233333333333333 该会员没有填写今日想说内容. 22222222222222222222222222222222222 111111111111111111 阿斯顿撒大所大所大所 水电费第三方第三方 防守打法第三方 https://www.30gm.com/source/plugin/nciaer_facecomment/template/images/114.gif
还记得当年大明湖畔的大萝卜吗? https://www.30gm.com/source/plugin/nciaer_facecomment/template/images/130.gif
楼主你信不信再逼我我就充钱给你看!!!!
页:
[1]
2