找传奇、传世资源到传世资源站!

[彩虹脚本] 彩虹穿戴附加属性脚本,仅供参考

2020.5.20 技术教程 746 编辑

仅供参考,不可直接使用。需要版本配套才能用
这个脚本还有前置脚本,用于判断玩家是否是双击换带装备,脚本执行两次
前置脚本防止玩家通过刷标签导致引擎假死,就不分享
这是一个去年的旧版本,给大家作为一个参考

 

 

[@属性中心]
{
;P0-P55 临时属性
;P60 觉醒等级SEAL 觉醒 10 = 1 11=2 12=3 13=4
;M0 百分比的临时属性 >0 代表启用
;P99 按点数增加的临时属性 >0 代表启用
;D0 幸运压制等级
;----------------------------------------------------------------------------宝券属性类型-Begin-已停用--2019-10-12
;增加镇魔属性,该脚本已停用
;增加自主套装搭配激活压制,缴械,幸运压制。
;第二版 P0-P59 预留临时属性
;第二版 P60-70 百分比属性
;第二版 P71 缴械等级
;第二版 P72 幸运压制
;第二版 P73 麻痹等级 $HUMAN(麻痹等级) 1级=0*1 2级=0*2 3=0*3 4=1*3 5=1*3 6=2*3 7=3*3 其他BUFF同算法
;第二版 P74 冰冻等级 -
;第二版 P75 施毒等级 -
;[100]-[150] 各类封号属性,除魔属性等。
;
;
;

;-------------------------------根据数据库SHAPE增加的单件装备威力-------------已停用--2019-10-12
#IF
CHECKLEVELEX > 0
#ACT
CLEARVAR P0 99
CLEARVAR M0 10
CLEARVAR D0 10
RESTPROVISIONALABIL
MOV S1 50|1,防御
MOV S2 51|3,魔防
MOV S3 52|5,攻击
MOV S4 53|7,魔法
MOV S5 54|9,道术
MOV S6 55|10,生命
MOV S7 56|20,吸血
MOV S8 57|46,暴击
MOV S9 58|22,反射
;----------------------------------------------------------------------------常规装备属性位置-Begin-
#IF
!EQUAL $USEITEMMAKEINDEX(0) -
LARGE $ITEMINFO[$USEITEMMAKEINDEX(0)].JEWEL(1).SHAPE 49
SMALL $ITEMINFO[$USEITEMMAKEINDEX(0)].JEWEL(1).SHAPE 59
#ACT
INC P99 1
MOV P80 $ITEMINFO[$USEITEMMAKEINDEX(0)].JEWEL(1).SHAPE
DEC P80 49
MOV S80 S
INC S80 $STR(P80)
MOV S80 $STR(<$STR(S80)>)
GETVALIDSTR $STR(S80) | S81 S82
GETVALIDSTR $STR(S82) , S82 S83
MOV P81 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(0)].JEWEL(2).SHAPE^100
MOV S85 P
INC S85 $STR(S82)
INC $STR(S85) $STR(P81)

#IF
!EQUAL $USEITEMMAKEINDEX(1) -
LARGE $ITEMINFO[$USEITEMMAKEINDEX(1)].JEWEL(1).SHAPE 49
SMALL $ITEMINFO[$USEITEMMAKEINDEX(1)].JEWEL(1).SHAPE 59
#ACT
INC P99 1
MOV P80 $ITEMINFO[$USEITEMMAKEINDEX(1)].JEWEL(1).SHAPE
DEC P80 49
MOV S80 S
INC S80 $STR(P80)
MOV S80 $STR(<$STR(S80)>)
GETVALIDSTR $STR(S80) | S81 S82
GETVALIDSTR $STR(S82) , S82 S83
MOV P81 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(1)].JEWEL(2).SHAPE^100
MOV S85 P
INC S85 $STR(S82)
INC $STR(S85) $STR(P81)

#IF
!EQUAL $USEITEMMAKEINDEX(3) -
LARGE $ITEMINFO[$USEITEMMAKEINDEX(3)].JEWEL(1).SHAPE 49
SMALL $ITEMINFO[$USEITEMMAKEINDEX(3)].JEWEL(1).SHAPE 59
#ACT
INC P99 1
MOV P80 $ITEMINFO[$USEITEMMAKEINDEX(3)].JEWEL(1).SHAPE
DEC P80 49
MOV S80 S
INC S80 $STR(P80)
MOV S80 $STR(<$STR(S80)>)
GETVALIDSTR $STR(S80) | S81 S82
GETVALIDSTR $STR(S82) , S82 S83
MOV P81 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(3)].JEWEL(2).SHAPE^100
MOV S85 P
INC S85 $STR(S82)
INC $STR(S85) $STR(P81)

#IF
!EQUAL $USEITEMMAKEINDEX(4) -
LARGE $ITEMINFO[$USEITEMMAKEINDEX(4)].JEWEL(1).SHAPE 49
SMALL $ITEMINFO[$USEITEMMAKEINDEX(4)].JEWEL(1).SHAPE 59
#ACT
INC P99 1
MOV P80 $ITEMINFO[$USEITEMMAKEINDEX(4)].JEWEL(1).SHAPE
DEC P80 49
MOV S80 S
INC S80 $STR(P80)
MOV S80 $STR(<$STR(S80)>)
GETVALIDSTR $STR(S80) | S81 S82
GETVALIDSTR $STR(S82) , S82 S83
MOV P81 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(4)].JEWEL(2).SHAPE^100
MOV S85 P
INC S85 $STR(S82)
INC $STR(S85) $STR(P81)

#IF
!EQUAL $USEITEMMAKEINDEX(5) -
LARGE $ITEMINFO[$USEITEMMAKEINDEX(5)].JEWEL(1).SHAPE 49
SMALL $ITEMINFO[$USEITEMMAKEINDEX(5)].JEWEL(1).SHAPE 59
#ACT
INC P99 1
MOV P80 $ITEMINFO[$USEITEMMAKEINDEX(5)].JEWEL(1).SHAPE
DEC P80 49
MOV S80 S
INC S80 $STR(P80)
MOV S80 $STR(<$STR(S80)>)
GETVALIDSTR $STR(S80) | S81 S82
GETVALIDSTR $STR(S82) , S82 S83
MOV P81 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(5)].JEWEL(2).SHAPE^100
MOV S85 P
INC S85 $STR(S82)
INC $STR(S85) $STR(P81)

#IF
!EQUAL $USEITEMMAKEINDEX(6) -
LARGE $ITEMINFO[$USEITEMMAKEINDEX(6)].JEWEL(1).SHAPE 49
SMALL $ITEMINFO[$USEITEMMAKEINDEX(6)].JEWEL(1).SHAPE 59
#ACT
INC P99 1
MOV P80 $ITEMINFO[$USEITEMMAKEINDEX(6)].JEWEL(1).SHAPE
DEC P80 49
MOV S80 S
INC S80 $STR(P80)
MOV S80 $STR(<$STR(S80)>)
GETVALIDSTR $STR(S80) | S81 S82
GETVALIDSTR $STR(S82) , S82 S83
MOV P81 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(6)].JEWEL(2).SHAPE^100
MOV S85 P
INC S85 $STR(S82)
INC $STR(S85) $STR(P81)

#IF
!EQUAL $USEITEMMAKEINDEX(7) -
LARGE $ITEMINFO[$USEITEMMAKEINDEX(7)].JEWEL(1).SHAPE 49
SMALL $ITEMINFO[$USEITEMMAKEINDEX(7)].JEWEL(1).SHAPE 59
#ACT
INC P99 1
MOV P80 $ITEMINFO[$USEITEMMAKEINDEX(7)].JEWEL(1).SHAPE
DEC P80 49
MOV S80 S
INC S80 $STR(P80)
MOV S80 $STR(<$STR(S80)>)
GETVALIDSTR $STR(S80) | S81 S82
GETVALIDSTR $STR(S82) , S82 S83
MOV P81 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(7)].JEWEL(2).SHAPE^100
MOV S85 P
INC S85 $STR(S82)
INC $STR(S85) $STR(P81)

#IF
!EQUAL $USEITEMMAKEINDEX(8) -
LARGE $ITEMINFO[$USEITEMMAKEINDEX(8)].JEWEL(1).SHAPE 49
SMALL $ITEMINFO[$USEITEMMAKEINDEX(8)].JEWEL(1).SHAPE 59
#ACT
INC P99 1
MOV P80 $ITEMINFO[$USEITEMMAKEINDEX(8)].JEWEL(1).SHAPE
DEC P80 49
MOV S80 S
INC S80 $STR(P80)
MOV S80 $STR(<$STR(S80)>)
GETVALIDSTR $STR(S80) | S81 S82
GETVALIDSTR $STR(S82) , S82 S83
MOV P81 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(8)].JEWEL(2).SHAPE^100
MOV S85 P
INC S85 $STR(S82)
INC $STR(S85) $STR(P81)

#IF
!EQUAL $USEITEMMAKEINDEX(9) -
LARGE $ITEMINFO[$USEITEMMAKEINDEX(9)].JEWEL(1).SHAPE 49
SMALL $ITEMINFO[$USEITEMMAKEINDEX(9)].JEWEL(1).SHAPE 59
#ACT
INC P99 1
MOV P80 $ITEMINFO[$USEITEMMAKEINDEX(9)].JEWEL(1).SHAPE
DEC P80 49
MOV S80 S
INC S80 $STR(P80)
MOV S80 $STR(<$STR(S80)>)
GETVALIDSTR $STR(S80) | S81 S82
GETVALIDSTR $STR(S82) , S82 S83
MOV P81 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(9)].JEWEL(2).SHAPE^100
MOV S85 P
INC S85 $STR(S82)
INC $STR(S85) $STR(P81)

#IF
!EQUAL $USEITEMMAKEINDEX(10) -
LARGE $ITEMINFO[$USEITEMMAKEINDEX(10)].JEWEL(1).SHAPE 49
SMALL $ITEMINFO[$USEITEMMAKEINDEX(10)].JEWEL(1).SHAPE 59
#ACT
INC P99 1
MOV P80 $ITEMINFO[$USEITEMMAKEINDEX(10)].JEWEL(1).SHAPE
DEC P80 49
MOV S80 S
INC S80 $STR(P80)
MOV S80 $STR(<$STR(S80)>)
GETVALIDSTR $STR(S80) | S81 S82
GETVALIDSTR $STR(S82) , S82 S83
MOV P81 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(10)].JEWEL(2).SHAPE^100
MOV S85 P
INC S85 $STR(S82)
INC $STR(S85) $STR(P81)

;----------------------------------------------------------------------------常规装备属性位置-end-

#IF
CHECK [150] 1
EQUAL $JOBID 0
#ACT
INC P4 10
INC P5 10
INC P10 300

#IF
CHECK [150] 1
EQUAL $JOBID 1
#ACT
INC P6 10
INC P7 10
INC P10 180

#IF
CHECK [150] 1
EQUAL $JOBID 2
#ACT
INC P8 10
INC P9 10
INC P10 240

;----------------------------------------------------------------------------载入各种封号属性-end-
;除魔任务成就
#IF
CHECK [111] 1
#ACT
INC P99 1
INC P10 80

#IF
CHECK [112] 1
#ACT
INC P99 1
INC P23 3
INC P24 3
INC P25 3
INC P26 3
INC P27 3

#IF
CHECK [113] 1
#ACT
INC P99 1
MOV S85 468
MOV S86 579
COPYTEXT S85 $INC.$JOBID.1 1 S87
COPYTEXT S85 $INC.$JOBID.1 1 S88
MOV S89 P
INC S89 $STR(S87)
INC $STR(S89) 1
MOV S89 P
INC S89 $STR(S88)
INC $STR(S89) 2

#IF
CHECK [114] 1
#ACT
INC P99 1
INC P29 5

#IF
CHECK [115] 1
#ACT
INC P99 1
INC P22 15

#IF
CHECK [116] 1
#ACT
INC P99 1
INC P34 10

;---------------------------------------------------------会员封号属性----------------

#IF
CHECK [100] 1
#ACT
INC P99 1
INC M0 1
INC M1 5 ;生命值
INC P29 5
INC P30 5

#IF
CHECK [101] 1
#ACT
INC P99 1
INC M0 1
INC M1 5 ;生命值
INC P29 5
INC P30 5

#IF
CHECK [102] 1
#ACT
INC P99 1
INC M0 1
INC M1 5 ;生命值
INC P29 5
INC P30 5

;--------------------------------BUFF类属性------------------------------
#IF
LARGE D0 0
#ACT
CHANGEMODE 49 1 $STR(D0) 60
SENDMSG 5 幸运压制:[<$STR(D0)>]级!
#ELSEACT
CHANGEMODE 49 0

#IF
LARGE P99 0
#ACT
SetProvisionalAbil 0 = $STR(P0)
SetProvisionalAbil 1 = $STR(P1)
SetProvisionalAbil 2 = $STR(P2)
SetProvisionalAbil 3 = $STR(P3)
SetProvisionalAbil 4 = $STR(P4)
SetProvisionalAbil 5 = $STR(P5)
SetProvisionalAbil 6 = $STR(P6)
SetProvisionalAbil 7 = $STR(P7)
SetProvisionalAbil 8 = $STR(P8)
SetProvisionalAbil 9 = $STR(P9)
SetProvisionalAbil 10 = $STR(P10)
SetProvisionalAbil 11 = $STR(P11)
SetProvisionalAbil 12 = $STR(P12)
SetProvisionalAbil 13 = $STR(P13)
SetProvisionalAbil 14 = $STR(P14)
SetProvisionalAbil 15 = $STR(P15)
SetProvisionalAbil 16 = $STR(P16)
SetProvisionalAbil 17 = $STR(P17)
SetProvisionalAbil 18 = $STR(P18)
SetProvisionalAbil 19 = $STR(P19)
SetProvisionalAbil 20 = $STR(P20)
SetProvisionalAbil 21 = $STR(P21)
SetProvisionalAbil 22 = $STR(P22)
SetProvisionalAbil 23 = $STR(P23)
SetProvisionalAbil 24 = $STR(P24)
SetProvisionalAbil 25 = $STR(P25)
SetProvisionalAbil 26 = $STR(P26)
SetProvisionalAbil 27 = $STR(P27)
SetProvisionalAbil 28 = $STR(P28)
SetProvisionalAbil 29 = $STR(P29)
SetProvisionalAbil 30 = $STR(P30)
SetProvisionalAbil 31 = $STR(P31)
SetProvisionalAbil 32 = $STR(P32)
SetProvisionalAbil 33 = $STR(P33)
SetProvisionalAbil 34 = $STR(P34)
SetProvisionalAbil 35 = $STR(P35)
SetProvisionalAbil 36 = $STR(P36)
SetProvisionalAbil 37 = $STR(P37)
SetProvisionalAbil 38 = $STR(P38)
SetProvisionalAbil 39 = $STR(P39)
SetProvisionalAbil 40 = $STR(P40)
SetProvisionalAbil 41 = $STR(P41)
SetProvisionalAbil 42 = $STR(P42)
SetProvisionalAbil 43 = $STR(P43)
SetProvisionalAbil 44 = $STR(P44)
SetProvisionalAbil 45 = $STR(P45)
SetProvisionalAbil 46 = $STR(P46)
SetProvisionalAbil 47 = $STR(P47)
SetProvisionalAbil 48 = $STR(P48)
SetProvisionalAbil 49 = $STR(P49)
SetProvisionalAbil 50 = $STR(P50)
SetProvisionalAbil 51 = $STR(P51)
SetProvisionalAbil 52 = $STR(P52)
SetProvisionalAbil 53 = $STR(P53)

;----------------------------------------------------------
;M0 百分比是否启用
;M1 生命值
;M2 魔法值

#IF
LARGE M0 0
#ACT
SetProvisionalAbil 10 + $STR(M1) 1

;----------------------------------------------------------
;装备SEAL 觉醒等级:10=1,代表增加1*10的技能威力增强。
;
;
;
#IF
LARGE P99 0
#ACT
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(0)].SEAL^9
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(1)].SEAL^9
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(2)].SEAL^9
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(3)].SEAL^9
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(4)].SEAL^9
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(5)].SEAL^9
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(6)].SEAL^9
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(7)].SEAL^9
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(8)].SEAL^9
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(9)].SEAL^9
INC P60 $DEC^$ITEMINFO[$USEITEMMAKEINDEX(10)].SEAL^9

#IF
EQUAL $JOBID 0
LARGE P60 0
#ACT
MOV P61 $STR(P60)
MULT P61 10
INC P61 1000
SKILLPOWERPERMILL 攻杀剑法 = $STR(P61)
SKILLPOWERPERMILL 刺杀剑术 = $STR(P61)
SKILLPOWERPERMILL 半月弯刀 = $STR(P61)
SKILLPOWERPERMILL 烈火剑法 = $STR(P61)
SKILLPOWERPERMILL 野蛮冲撞 = $STR(P61)
SKILLPOWERPERMILL 残影刀法 = $STR(P61)
SKILLPOWERPERMILL 血影刀法 = $STR(P61)
SKILLPOWERPERMILL 护身真气 = $STR(P61)
SKILLPOWERPERMILL 抱月刀 = $STR(P61)
SKILLPOWERPERMILL 雷霆剑 = $STR(P61)
SKILLPOWERPERMILL 破击剑法 = $STR(P61)
SKILLPOWERPERMILL 破盾斩 = $STR(P61)
SKILLPOWERPERMILL 金刚护体 = $STR(P61)
SKILLPOWERPERMILL 突斩 = $STR(P61)
SKILLPOWERPERMILL 强化攻杀剑法 = $STR(P61)

#IF
EQUAL $JOBID 1
LARGE P60 0
#ACT
MOV P61 $STR(P60)
MULT P61 10
INC P61 1000
SKILLPOWERPERMILL 小火球 = $STR(P61)
SKILLPOWERPERMILL 地狱火焰 = $STR(P61)
SKILLPOWERPERMILL 疾光电影 = $STR(P61)
SKILLPOWERPERMILL 雷电术 = $STR(P61)
SKILLPOWERPERMILL 火墙 = $STR(P61)
SKILLPOWERPERMILL 魔法盾 = $STR(P61)
SKILLPOWERPERMILL 冰咆哮 = $STR(P61)
SKILLPOWERPERMILL 冰箭术 = $STR(P61)
SKILLPOWERPERMILL 抱月刀 = $STR(P61)
SKILLPOWERPERMILL 风火轮 = $STR(P61)
SKILLPOWERPERMILL 冰龙破 = $STR(P61)
SKILLPOWERPERMILL 玄冰刃 = $STR(P61)
SKILLPOWERPERMILL 五雷轰 = $STR(P61)
SKILLPOWERPERMILL 冰旋风 = $STR(P61)
SKILLPOWERPERMILL 狂龙紫电 = $STR(P61)
SKILLPOWERPERMILL 流星火雨 = $STR(P61)
SKILLPOWERPERMILL 强化火球术 = $STR(P61)

#IF
EQUAL $JOBID 2
LARGE P60 0
#ACT
MOV P61 $STR(P60)
MULT P61 10
INC P61 1000
SKILLPOWERPERMILL 治疗术 = $STR(P61)
SKILLPOWERPERMILL 灵魂道符 = $STR(P61)
SKILLPOWERPERMILL 幽灵盾 = $STR(P61)
SKILLPOWERPERMILL 神圣战甲术 = $STR(P61)
SKILLPOWERPERMILL 困魔咒 = $STR(P61)
SKILLPOWERPERMILL 骷髅召唤术 = $STR(P61)
SKILLPOWERPERMILL 隐身术 = $STR(P61)
SKILLPOWERPERMILL 集体隐身术 = $STR(P61)
SKILLPOWERPERMILL 群体治愈术 = $STR(P61)
SKILLPOWERPERMILL 召唤神兽 = $STR(P61)
SKILLPOWERPERMILL 狮子吼 = $STR(P61)
SKILLPOWERPERMILL 诅咒术 = $STR(P61)
SKILLPOWERPERMILL 赶尸 = $STR(P61)
SKILLPOWERPERMILL 替身法符 = $STR(P61)
SKILLPOWERPERMILL 灵魂墙 = $STR(P61)
SKILLPOWERPERMILL 神光术 = $STR(P61)
SKILLPOWERPERMILL 解毒术 = $STR(P61)
SKILLPOWERPERMILL 强化骷髅术 = $STR(P61)
SKILLPOWERPERMILL 幽冥火咒 = $STR(P61)
SKILLPOWERPERMILL 强化施毒术 = $STR(P61)
SKILLPOWERPERMILL 强化诅咒术 = $STR(P61)
BREAK

}

评论

发表评论必须先登陆, 您可以 登陆 或者 注册新账号 !


在线咨询: 问题反馈
客服QQ:174666394

有问题请留言,看到后及时答复