设为首页 收藏本站
切换到宽版
VV Engine 官方中心»论坛 › 综合交流 › 脚本交流 › 装备洗练
返回列表 发新帖
查看: 72|回复: 3

[传统脚本] 装备洗练

[复制链接]
jz9005

25

主题

89

回帖

1323

积分

金牌会员

积分
1323
发表于 2026-6-5 10:28:16 | 显示全部楼层 |阅读模式
[@血炼]
#If
#Act
Getcustomitemprogressbarvalue 52 0 1 <$Str(n$现等级)>
#If
small N$现等级 30
#act
Messagebox \\提示：你的法宝还未达到满级！
Break

#IF
#ACT
MOV N900 1
;;SetNewItemValue 52 0 = 5
;;SetNewItemValue 52 1 = 5
;;SetNewItemValue 52 2 = 5
;;SetNewItemValue 52 3 = 5
;;SetNewItemValue 52 4 = 5
;;SetNewItemValue 52 5 = 5
;;SetNewItemValue 52 7 = 4
;;SetNewItemValue 52 11 = 4



#IF
Check [120] 1
#ACT
Mov S920 <已·锁/@锁定点击(120,暴击)>
INC N900 1
#ELSEACT
Mov S920 <未·锁{SCOLOR=250}/@锁定点击(120,暴击)>
#IF
Check [121] 1
#ACT
Mov S921 <已·锁/@锁定点击(121,攻伤)>
INC N900 1
#ELSEACT
Mov S921 <未·锁{SCOLOR=250}/@锁定点击(121,攻伤)>
#IF
Check [122] 1
#ACT
Mov S922 <已·锁/@锁定点击(122,物减)>
INC N900 1
#ELSEACT
Mov S922 <未·锁{SCOLOR=250}/@锁定点击(122,物减)>
#IF
Check [123] 1
#ACT
Mov S923 <已·锁/@锁定点击(123,魔减)>
INC N900 1
#ELSEACT
Mov S923 <未·锁{SCOLOR=250}/@锁定点击(123,魔减)>
#IF
Check [124] 1
#ACT
Mov S924 <已·锁/@锁定点击(124,忽视)>
INC N900 1
#ELSEACT
Mov S924 <未·锁{SCOLOR=250}/@锁定点击(124,忽视)>
#IF
Check [125] 1
#ACT
Mov S925 <已·锁/@锁定点击(125,反弹)>
INC N900 1
#ELSEACT
Mov S925 <未·锁{SCOLOR=250}/@锁定点击(125,反弹)>
#IF
Check [126] 1
#ACT
Mov S926 <已·锁/@锁定点击(126,体力)>
INC N900 1
#ELSEACT
Mov S926 <未·锁{SCOLOR=250}/@锁定点击(126,体力)>
#IF
Check [127] 1
#ACT
Mov S927 <已·锁/@锁定点击(127,暴抗)>
INC N900 1
#ELSEACT
Mov S927 <未·锁{SCOLOR=250}/@锁定点击(127,暴抗)>

#IF
#ACT
MOV M900 0
MOV M901 0
MOV M902 0
MOV M903 0
MOV M904 0
MOV M905 0
MOV M906 0
MOV M907 0
MOV S900 0
MOV S901 0
MOV S902 0
MOV S903 0
MOV S904 0
MOV S905 0
MOV S906 0
MOV S910 0
MOV S911 0
MOV S912 0
MOV S913 0
MOV S914 0
MOV S915 0
MOV S917 0
GOTO @血炼参数

[@血炼界面]
;#IF
;EQUAL <$STR(S910)> 8
;#ACT
;MOV S910 <8/FCOLOR=253>
;#IF
;EQUAL <$STR(S911)> 8
;#ACT
;MOV S911 <8/FCOLOR=253>
;#IF
;EQUAL <$STR(S912)> 8
;#ACT
;MOV S912 <8/FCOLOR=253>
;#IF
;EQUAL <$STR(S913)> 8
;#ACT
;MOV S913 <8/FCOLOR=253>
;#IF
;EQUAL <$STR(S914)> 8
;#ACT
;MOV S914 <8/FCOLOR=253>
;#IF
;EQUAL <$STR(S915)> 8
;#ACT
;MOV S915 <8/FCOLOR=253>
;#IF
;EQUAL <$STR(S917)> 8
;#ACT
;MOV S917 <8/FCOLOR=253>

#If
equal N900 4
#Act
Mov N$洗髓费用 100
#If
equal N900 3
#Act
Mov N$洗髓费用 60
#If
equal N900 2
#Act
Mov N$洗髓费用 40
#If
equal N900 1
#Act
Mov N$洗髓费用 20


#IF
#act
OPENMERCHANTBIGDLG 2 234 0 0 0 0 1 436 8
SetStringBlank <$STR(S910)> 2 1
SetStringBlank <$STR(S911)> 2 1
SetStringBlank <$STR(S912)> 2 1
SetStringBlank <$STR(S913)> 2 1
SetStringBlank <$STR(S914)> 2 1
SetStringBlank <$STR(S915)> 2 1
SetStringBlank <$STR(S916)> 2 1
SetStringBlank <$STR(S917)> 2 1
SetStringBlank <$STR(S$111)> 2 1
SetStringBlank <$STR(S$222)> 2 1
SetStringBlank <$STR(S$333)> 2 1
SetStringBlank <$STR(S$444)> 2 1
SetStringBlank <$STR(S$555)> 2 1
SetStringBlank <$STR(S$666)> 2 1
SetStringBlank <$STR(S$777)> 2 1
SetStringBlank <$STR(S$888)> 2 1
#SAY
\<&ImgEx:8:60:61:62:402:10/@main>\<&Text:当前血炼费用：:260:80{fcolor=254;fsize=10}><&Text:<$STR(N$洗髓费用)> 龍币:350:80{fcolor=250;fsize=10}>\
;<Hot~/FCOLOR=249><我是元素大师,只要给我元宝,剩下的事交给我。请放入装备：/FCOLOR=254>\
<><Text:元素属性  刷新前 刷新后  状  态  操  作:0:0/FCOLOR=253>\
<><暴击几率：/FCOLOR=254>     <$STR(S910)> <$STR(S$111)>  [ <$STR(S920)> ]\
<><攻击伤害：/FCOLOR=254>     <$STR(S911)> <$STR(S$222)>  [ <$STR(S921)> ]\
<><物理减伤：/FCOLOR=254>     <$STR(S912)> <$STR(S$333)>  [ <$STR(S922)> ]\
<><魔法减伤：/FCOLOR=254>     <$STR(S913)> <$STR(S$444)>  [ <$STR(S923)> ]\
<><忽视防御：/FCOLOR=254>     <$STR(S914)> <$STR(S$555)>  [ <$STR(S924)> ]\
<><伤害反弹：/FCOLOR=254>     <$STR(S915)> <$STR(S$666)>  [ <$STR(S925)> ]\
<><体力增加：/FCOLOR=254>     <$STR(S916)> <$STR(S$777)>  [ <$STR(S926)> ]\
<><暴击抗性：/FCOLOR=254>     <$STR(S917)> <$STR(S$888)>  [ <$STR(S927)> ]\
<><&text:刷新元素属性|
250#每次消耗20龍币(锁定一条增加40,两条增加60,三条100)。^
254#每件装备最多8条元素,每种元素最高20点,祝你好运！:300:158{fcolor=251;fsize=10}/@开始血炼>\
;<ITEMBOX:0:2:63:260:-90:42:42:5,6,10,11,15,19,20,21,22,23,24,26,30,62,63,64:254#只能放入衣服、武器、勋章、头盔、项链、手镯、戒指、腰带、靴子、宝石类装备>


[@血炼参数]
#IF
CHECKNEWITEMVALUE 52 0 > <$STR(M900)>
#ACT
INC M900 1
GOTO @血炼参数
#ELSEACT
MOV S900 <$STR(M900)>
MOV S910 <$STR(M900)>
#IF
CHECKNEWITEMVALUE 52 1 > <$STR(M901)>
#ACT
INC M901 1
GOTO @血炼参数
#ELSEACT
MOV S901 <$STR(M901)>
MOV S911 <$STR(M901)>
#IF
CHECKNEWITEMVALUE 52 2 > <$STR(M902)>
#ACT
INC M902 1
GOTO @血炼参数
#ELSEACT
MOV S902 <$STR(M902)>
MOV S912 <$STR(M902)>
#IF
CHECKNEWITEMVALUE 52 3 > <$STR(M903)>
#ACT
INC M903 1
GOTO @血炼参数
#ELSEACT
MOV S903 <$STR(M903)>
MOV S913 <$STR(M903)>
#IF
CHECKNEWITEMVALUE 52 4 > <$STR(M904)>
#ACT
INC M904 1
GOTO @血炼参数
#ELSEACT
MOV S904 <$STR(M904)>
MOV S914 <$STR(M904)>
#IF
CHECKNEWITEMVALUE 52 5 > <$STR(M905)>
#ACT
INC M905 1
GOTO @血炼参数
#ELSEACT
MOV S905 <$STR(M905)>
MOV S915 <$STR(M905)>
#IF
CHECKNEWITEMVALUE 52 7 > <$STR(M906)>
#ACT
INC M906 1
GOTO @血炼参数
#ELSEACT
MOV S906 <$STR(M906)>
MOV S916 <$STR(M906)>
#IF
CHECKNEWITEMVALUE 52 11 > <$STR(M907)>
#ACT
INC M907 1
GOTO @血炼参数
#ELSEACT
MOV S907 <$STR(M907)>
MOV S917 <$STR(M907)>

#if
#act
GOTO @血炼界面

[@锁定点击]
#IF
EQUAL N900 4
#Act
Messagebox \\提示：最多仅可锁定三条属性！
Set [<$SCRIPTPARAM1>] 0
dec N900 1
dec T20 <$SCRIPTPARAM2>:
GOTO @血炼
BREAK

#IF
Check [<$SCRIPTPARAM1>] 0
#ACT
Set [<$SCRIPTPARAM1>] 1
Inc N900 1
Inc T20 <$SCRIPTPARAM2>:
GOTO @血炼
#ELSEACT
Set [<$SCRIPTPARAM1>] 0
dec N900 1
dec T20 <$SCRIPTPARAM2>:
GOTO @血炼

[@开始血炼]
#If
CheckItemAddValueEx 52 > 6 1 N$元素总和
#Act
sendmsg 6 法宝的元素属性总和为:<$STR(N$元素总和)>点.

#If
large N$元素总和 38
#Act
Messagebox \\提示：属性异常,请联系客服处理..当前属性总合为<$STR(N$元素总和)>点元素...
Break

#If
#Act
RandomText NEWRANDOM*0|1|2|3|4|5|7|11* | S$元素位置
mov N$位置 <$STR(S$元素位置)>

#If
EQUAL <$STR(N$位置)> 0
CheckContainsText T20 暴击:
#Act
Goto @开始血炼
break
#If
EQUAL <$STR(N$位置)> 1
CheckContainsText T20 攻伤:
#Act
Goto @开始血炼
break
#If
EQUAL <$STR(N$位置)> 2
CheckContainsText T20 物减:
#Act
Goto @开始血炼
break
#If
EQUAL <$STR(N$位置)> 3
CheckContainsText T20 魔减:
#Act
Goto @开始血炼
break
#If
EQUAL <$STR(N$位置)> 4
CheckContainsText T20 忽视:
#Act
Goto @开始血炼
break
#If
EQUAL <$STR(N$位置)> 5
CheckContainsText T20 反弹:
#Act
Goto @开始血炼
break
#If
EQUAL <$STR(N$位置)> 7
CheckContainsText T20 体力:
#Act
Goto @开始血炼
break
#If
EQUAL <$STR(N$位置)> 11
CheckContainsText T20 暴抗:
#Act
Goto @开始血炼
break
#If
#Act
GoTo @元素抽取
;break

#If
Not Checkitemw 猎☆飞星·S 1
#Act
Messagebox \\提示：请先将“{猎☆飞星/SCOLOR=254}”穿戴身上.
Break

#If
equal N900 4
#Act
Mov N$洗髓费用 100
#If
equal N900 3
#Act
Mov N$洗髓费用 60
#If
equal N900 2
#Act
Mov N$洗髓费用 40
#If
equal N900 1
#Act
Mov N$洗髓费用 20


#If
#Act
sendmsg 6 费用：<$STR(N$洗髓费用)>

#If
Checkgamegird ? <$STR(N$洗髓费用)>
#Elseact
Messagebox \\提示：你当前没有<$STR(N$洗髓费用)>龍币。
Break

#If
;equal N$元素总和 32
Checknewitemvalue 52 <$Str(N$位置)> < 20
#Act
Gamegird - <$STR(N$洗髓费用)>
Take 金币 20000
SetNewItemValue 52 <$STR(N$位置)> + 1
SetNewItemValue 52 <$STR(N$扣除)> - 1
inc U95 1
Inc U96 <$STR(N$洗髓费用)>
goto @血炼
Break



[@元素抽取]
#IF
#ACT
Mov S$111
Mov S$222
Mov S$333
Mov S$444
Mov S$555
Mov S$666
Mov S$777
Mov S$888

#If
Equal <$Str(N$位置)> 0
#Act
RandomText NewranDom*1|2|3|4|5|7|11* | S$扣除元素
Mov S$增加元素 暴击几率
Mov S$111 {↑/SCOLOR=249}
#If
Equal <$Str(N$位置)> 1
#Act
RandomText NewranDom*0|2|3|4|5|7|11* | S$扣除元素
Mov S$增加元素 攻击伤害
Mov S$222 {↑/SCOLOR=249}

#If
Equal <$Str(N$位置)> 2
#Act
RandomText NewranDom*0|1|3|4|5|7|11* | S$扣除元素
Mov S$增加元素 物伤减少
Mov S$333 {↑/SCOLOR=249}

#If
Equal <$Str(N$位置)> 3
#Act
RandomText NewranDom*0|1|2|4|5|7|11* | S$扣除元素
Mov S$增加元素 魔伤减少
Mov S$444 {↑/SCOLOR=249}

#If
Equal <$Str(N$位置)> 4
#Act
RandomText NewranDom*0|1|2|3|5|7|11* | S$扣除元素
Mov S$增加元素 忽视防御
Mov S$555 {↑/SCOLOR=249}

#If
Equal <$Str(N$位置)> 5
#Act
RandomText NewranDom*0|1|2|3|4|7|11* | S$扣除元素
Mov S$增加元素 伤害反弹
Mov S$666 {↑/SCOLOR=249}

#If
Equal <$Str(N$位置)> 7
#Act
RandomText NewranDom*0|1|2|3|4|5|11* | S$扣除元素
Mov S$增加元素 体力增加
Mov S$777 {↑/SCOLOR=249}

#If
Equal <$Str(N$位置)> 11
#Act
RandomText NewranDom*0|1|2|3|4|5|7* | S$扣除元素
Mov S$增加元素 体力增加
Mov S$888 {↑/SCOLOR=249}

#If
#Act
Mov N$扣除 <$STR(S$扣除元素)>


#If
EQUAL <$STR(N$扣除)> 0
CheckContainsText T20 暴击:
#Act
Goto @元素抽取
break
#If
EQUAL <$STR(N$扣除)> 1
CheckContainsText T20 攻伤:
#Act
Goto @元素抽取
break
#If
EQUAL <$STR(N$扣除)> 2
CheckContainsText T20 物减:
#Act
Goto @元素抽取
break
#If
EQUAL <$STR(N$扣除)> 3
CheckContainsText T20 魔减:
#Act
Goto @元素抽取
break
#If
EQUAL <$STR(N$扣除)> 4
CheckContainsText T20 忽视:
#Act
Goto @元素抽取
break
#If
EQUAL <$STR(N$扣除)> 5
CheckContainsText T20 反弹:
#Act
Goto @元素抽取
break
#If
EQUAL <$STR(N$扣除)> 7
CheckContainsText T20 体力:
#Act
Goto @元素抽取
break
#If
EQUAL <$STR(N$扣除)> 11
CheckContainsText T20 暴抗:
#Act
Goto @元素抽取
break

#If
Equal <$Str(N$扣除)> 0
#Act
Mov S$随机扣元素 暴击几率
Mov S$111 {↓/SCOLOR=250}
#If
Equal <$Str(N$扣除)> 1
#Act
Mov S$随机扣元素 攻击伤害
Mov S$222 {↓/SCOLOR=250}
#If
Equal <$Str(N$扣除)> 2
#Act
Mov S$随机扣元素 物伤减少
Mov S$333 {↓/SCOLOR=250}
#If
Equal <$Str(N$扣除)> 3
#Act
Mov S$随机扣元素 魔伤减少
Mov S$444 {↓/SCOLOR=250}
#If
Equal <$Str(N$扣除)> 4
#Act
Mov S$随机扣元素 忽视防御
Mov S$555 {↓/SCOLOR=250}
#If
Equal <$Str(N$扣除)> 5
#Act
Mov S$随机扣元素 伤害反弹
Mov S$666 {↓/SCOLOR=250}
#If
Equal <$Str(N$扣除)> 7
#Act
Mov S$随机扣元素 体力增加
Mov S$777 {↓/SCOLOR=250}
#If
Equal <$Str(N$扣除)> 11
#Act
Mov S$随机扣元素 体力增加
Mov S$888 {↓/SCOLOR=250}

#If
#Act
sendmsg 6 扣<$STR(N$扣除)>|

#If
Checknewitemvalue 52 <$Str(N$扣除)> = 0
#Act
Sendmsg 7 抽到“当前抽到扣除属性<$STR(S$随机扣元素)>为0无法扣除”重新抽取！
goto @元素抽取 1
Break

回复

举报

qq154886255

1

主题

228

回帖

1585

积分

金牌会员

积分
1585
发表于 2026-6-5 11:06:15 | 显示全部楼层
回帖是种美德！还有积分可以拿！
回复

举报

jianchao9488

25

主题

57

回帖

1393

积分

金牌会员

积分
1393
发表于 2026-6-5 20:22:04 | 显示全部楼层

回帖是种美德！还有积分可以拿！
回复

举报

qq154886255

1

主题

228

回帖

1585

积分

金牌会员

积分
1585
发表于 2026-6-6 09:00:07 | 显示全部楼层
马上就可以用vv了，好激动
回复

举报

返回列表 发新帖
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

Copyright © 2001-2020, Tencent Cloud . Powered by Discuz! X3.5
VV Engine 开发者论坛
快速回复 返回顶部 返回列表