|
马上注册,结交更多好友,享用更多功能,让你轻松玩转社区。
您需要 登录 才可以下载或查看,没有账号?立即注册
x
本帖最后由 996传世-小黑 于 2021-12-28 15:53 编辑
脚本内容如下:
需要自取
新增灵兽复活命令ReLivePet 参数一
新增灵兽改名命令SetPetName 参数一
检测是否放出灵兽CHECKPETFOLLOW
- [@MAIN]
- #SAY
- 欢迎光临,有什么可以帮助你的?\\
- <灵兽改名/@灵兽改名>\
- <复活灵兽/@复活灵兽>\
- [@复活灵兽]
- #IF
- RANDOM 1
- #ACT
- ShowSpotDlg 6 请放入灵兽石: @复活灵兽
- [@复活灵兽]
- #IF
- !EQUAL $ITEMINFO[$PARAM(1)].STDMODE 49
- !EQUAL $ITEMINFO[$PARAM(1)].STDMODE 51
- #ACT
- MESSAGEBOX 您提供的不是灵兽石。
- break
- #IF
- !EQUAL $ITEMINFO[$PARAM(1)].VALUE(14) 0
- #ACT
- MESSAGEBOX 您的灵兽还没有死亡。
- break
- #ELSEACT
- ReLivePet $PARAM(1)
- SENDMSG 5 你的灵兽已经成功复活了,请好好爱护你的灵兽。
- BREAK
- [@灵兽改名]
- #IF
- CHECKPETFOLLOW
- #ACT
- QUERYVAL 10 0 14 @改名儿 请输入要给灵兽取的名字
- BREAK
- #ELSEACT
- SENDMSG 5 请先将你的灵兽放出来
- BREAK
- [@改名儿]
- #ACT
- SetPetName $STR(S49)
- SENDMSG 5 灵兽改名成功!
- break
复制代码
|
-
-
示例.txt
725 Bytes, 下载次数: 36, 下载积分: 金钱 -2
|