武器升级脚本看能不能精简!现在能完美运行
[@main]#IF
#ACT
OPENMERCHANTBIGDLG 13 319 1 4 10 10 1 492 23 1
mov N$成功进度 341
MOV N$成功几率 0
#SAY
赤血魔剑
checkjob taoist
#ACT
mov S$升级属性 道术
GOTO @道术需求
#IF
CheckContainsTextList ..\\QuestDiary\\装备升级\\武器升级\\战士装备.txt <$BOXITEM.NAME>
#ACT
mov S$升级属性 攻击
GOTO @攻击需求
#IF
CheckContainsTextList ..\\QuestDiary\\装备升级\\武器升级\\道士装备.txt <$BOXITEM.NAME>
#ACT
mov S$升级属性 道术
GOTO @道术需求
#IF
CheckContainsTextList ..\\QuestDiary\\装备升级\\武器升级\\法师装备.txt <$BOXITEM.NAME>
#ACT
mov S$升级属性 魔法
GOTO @魔法需求
[@攻击需求]
#IF
CHECKITEMADDVALUE boxitem1 0 < 3
#ACT
INC N$成功进度 7
INC N$成功几率 40
MOV S$是否消失 否
MOV N$需求金币 200000
MOV N$需求矿石 1
GOTO @强化界面
#IF
CHECKITEMADDVALUE boxitem1 0 > 2
CHECKITEMADDVALUE boxitem1 0 < 6
#ACT
INC N$成功进度 5
INC N$成功几率 30
MOV S$是否消失 否
MOV N$需求金币 400000
MOV N$需求矿石 2
GOTO @强化界面
#IF
CHECKITEMADDVALUE boxitem1 0 > 5
CHECKITEMADDVALUE boxitem1 0 < 8
#ACT
INC N$成功进度 3
INC N$成功几率 20
MOV S$是否消失 是
MOV N$需求金币 500000
MOV N$需求矿石 5
GOTO @强化界面
[@道术需求]
#IF
CHECKITEMADDVALUE boxitem1 1 < 3
#ACT
INC N$成功进度 7
INC N$成功几率 40
MOV S$是否消失 否
MOV N$需求金币 200000
MOV N$需求矿石 1
GOTO @强化界面
#IF
CHECKITEMADDVALUE boxitem1 1 > 2
CHECKITEMADDVALUE boxitem1 1 < 6
#ACT
INC N$成功进度 5
INC N$成功几率 30
MOV S$是否消失 否
MOV N$需求金币 400000
MOV N$需求矿石 2
GOTO @强化界面
#IF
CHECKITEMADDVALUE boxitem1 1 > 5
CHECKITEMADDVALUE boxitem1 1 < 8
#ACT
INC N$成功进度 3
INC N$成功几率 20
MOV S$是否消失 是
MOV N$需求金币 500000
MOV N$需求矿石 5
GOTO @强化界面
[@魔法需求]
#IF
CHECKITEMADDVALUE boxitem1 2 < 3
#ACT
INC N$成功进度 7
INC N$成功几率 40
MOV S$是否消失 否
MOV N$需求金币 200000
MOV N$需求矿石 1
GOTO @强化界面
#IF
CHECKITEMADDVALUE boxitem1 2 > 2
CHECKITEMADDVALUE boxitem1 2 < 6
#ACT
INC N$成功进度 5
INC N$成功几率 30
MOV S$是否消失 否
MOV N$需求金币 400000
MOV N$需求矿石 2
GOTO @强化界面
#IF
CHECKITEMADDVALUE boxitem1 2 > 5
CHECKITEMADDVALUE boxitem1 2 < 8
#ACT
INC N$成功进度 3
INC N$成功几率 20
MOV S$是否消失 是
MOV N$需求金币 500000
MOV N$需求矿石 5
GOTO @强化界面
[@ItemIntoBox2]
#IF
EQUAL <$BOXITEM.NAME> 黑铁矿石
#ACT
INC N$成功几率 5
INC N$成功进度 1
GOTO @强化界面
#ELSEACT
ReturnBoxItem 2
MessageBox [提示]\\\\请放入黑铁矿石。
Break
[@ItemIntoBox3]
#IF
EQUAL <$BOXITEM.NAME> 升级保护符
#ACT
INC N$成功几率 20
INC N$成功进度 4
MOV S$是否消失 否
GOTO @强化界面
#ELSEACT
ReturnBoxItem 3
MessageBox [提示]\\\\请放入升级保护符。
Break
[@ItemOutBox1]
#IF
#ACT
ReturnBoxItem 2
ReturnBoxItem 3
GOTO @main
[@ItemOutBox2]
#IF
LARGE <$STR(N$成功进度)> 341
#ACT
DEC N$成功几率 5
DEC N$成功进度 1
GOTO @强化界面
[@ItemOutBox3]
#IF
CHECKITEMADDVALUE boxitem1 0 > 5
CHECKITEMADDVALUE boxitem1 0 < 8
#ACT
MOV S$是否消失 是
#IF
CHECKITEMADDVALUE boxitem1 1 > 5
CHECKITEMADDVALUE boxitem1 1 < 8
#ACT
MOV S$是否消失 是
#IF
CHECKITEMADDVALUE boxitem1 2 > 5
CHECKITEMADDVALUE boxitem1 2 < 8
#ACT
MOV S$是否消失 是
#IF
LARGE <$STR(N$成功进度)> 341
#ACT
DEC N$成功几率 20
DEC N$成功进度 4
GOTO @强化界面
[@强化界面]
#IF
#SAY
]/SCOLOR=250}在强化{[<$BOXITEM.Name>]/SCOLOR=146}<$STR(S$升级属性)>时失败,装备破碎了。 14 10 0 0
DelBoxItem 1
[@刷新]
#IF
#ACT
mov N$成功进度 341
MOV N$成功几率 0
goto @ItemIntoBox1
#IF
Equal <$BOXITEM.NAME> 黑铁矿石
#ACT
goto @ItemIntoBox2
#IF
Equal <$BOXITEM.NAME> 升级保护符
#ACT
goto @ItemIntoBox3
现在能完美运行!但是我总觉得我写得非常繁琐! 求精简 [@main]
#IF
#ACT
OPENMERCHANTBIGDLG 13 319 1 4 10 10 1 492 23 1
#SAY
#ACT
mov N$成功进度 341
MOV N$成功几率 0
MOV S$是否消失 是
#ELSEACT
MessageBox [提示]\\\\你放入的<$BOXITEM.NAME>不能进行升级
ReturnBoxItem 1
Break
#IF
CheckContainsTextList ..\\QuestDiary\\装备升级\\武器升级\\战士装备.txt <$BOXITEM.NAME>
#ACT
mov S$升级属性 攻击
MOV N$升级位置 0
#IF
CheckContainsTextList ..\\QuestDiary\\装备升级\\武器升级\\道士装备.txt <$BOXITEM.NAME>
#ACT
mov S$升级属性 道术
MOV N$升级位置 2
#IF
CheckContainsTextList ..\\QuestDiary\\装备升级\\武器升级\\法师装备.txt <$BOXITEM.NAME>
#ACT
mov S$升级属性 魔法
MOV N$升级位置 1
#IF
Equal <$BOXITEM.NAME> 赤血魔剑
checkjob warrior
#ACT
mov S$升级属性 攻击
MOV N$升级位置 0
#IF
Equal <$BOXITEM.NAME> 赤血魔剑
checkjob wizard
#ACT
mov S$升级属性 魔法
MOV N$升级位置 1
#IF
Equal <$BOXITEM.NAME> 赤血魔剑
checkjob taoist
#ACT
mov S$升级属性 道术
MOV N$升级位置 2
#IF
CHECKITEMADDVALUE boxitem1 N$升级位置 < 3
#ACT
INC N$成功进度 7
INC N$成功几率 40
MOV S$是否消失 否
MOV N$需求金币 200000
MOV N$需求矿石 1
#IF
CHECKITEMADDVALUE boxitem1 N$升级位置 > 2
CHECKITEMADDVALUE boxitem1 N$升级位置 < 6
#ACT
INC N$成功进度 5
INC N$成功几率 30
MOV S$是否消失 否
MOV N$需求金币 400000
MOV N$需求矿石 2
#IF
CHECKITEMADDVALUE boxitem1 N$升级位置 > 5
CHECKITEMADDVALUE boxitem1 N$升级位置 < 8
#ACT
INC N$成功进度 3
INC N$成功几率 20
MOV N$需求金币 500000
MOV N$需求矿石 5
#IF
EQUAL <$BOXITEM.NAME> 黑铁矿石
#ACT
INC N$成功几率 5
INC N$成功进度 1
#IF
EQUAL <$BOXITEM.NAME> 升级保护符
#ACT
MOV S$是否消失 否
INC N$成功几率 20
INC N$成功进度 4
#IF
#SAY
]/SCOLOR=146}<$STR(S$升级属性)>时失败,装备破碎了。 14 10 0 0
DelBoxItem 1
#IF
Equal <$BOXITEM.NAME> 升级保护符
Equal S$升级状态 失败
#ACT
SENDMOVEMSG 0 70 0 50 1 玩家{[<$USERNAME>]/SCOLOR=250}升级{[<$BOXITEM.Name>]/SCOLOR=146}<$STR(S$升级属性)>时失败,幸好使用了{升级保护符/SCOLOR=70},装备完好无损。 14 10 0 0
DelBoxItem 3
#IF
CheckBoxItemCount 1 1
#ACT
goto @ItemIntoBox1
#ELSEACT
GOTO @Main
精简并优化了一些,脚本能一个标签写完就一个标签写完 太长了...头晕...楼下大佬来吧 可以啊,直接放上去,点击强化,扣除材料,强化成功最方便 别折腾了0320的引擎能 完美1:1用脚本还原 武器升级包括开刀 51614445 发表于 2022-4-18 22:11 别折腾了0320的引擎能 完美1:1用脚本还原 武器升级包括开刀
引擎自带武器升级脚本吗 51614445 发表于 2022-4-18 22:11 别折腾了0320的引擎能 完美1:1用脚本还原 武器升级包括开刀
啥意思?求解答 czy7812 发表于 2022-4-18 22:33 引擎自带武器升级脚本吗
NPC写脚本啊。。。引擎得算法不行。。脚本自定义算法 包括人物幸运 首饰上下限 武器自身幸运都写进去。加上0320得背包遍历完美实现...琢磨好久才实现了开刀.. 51614445 发表于 2022-4-18 23:31 NPC写脚本啊。。。引擎得算法不行。。脚本自定义算法 包括人物幸运 首饰上下限 武器自身幸运都写进去。加 ...
可是自己写脚本无法实现1小时取回啊,如果实在要实现1小时取回,那取回的就是原来的那把武器了。 czy7812 发表于 2022-4-18 23:50 可是自己写脚本无法实现1小时取回啊,如果实在要实现1小时取回,那取回的就是原来的那把武器了。
3小时取也没问题啊
页:
[1]
2