官方微博诗风博客TG官方群EG官方群
开启辅助访问      

传世单机社区

 找回密码
 立即注册
https://www.wooolc.com
传世单机社区»论坛 › 传世单机 ╃ 分享交流 › 脚本交流 › 求一本体转职脚本
123下一页
返回列表 发新帖
查看: 2665|回复: 21

[定制脚本] 求一本体转职脚本

[复制链接]
糖糖

升级   100%

发表于 2018-5-25 18:20:55 | 显示全部楼层 |阅读模式

马上注册，结交更多好友，享用更多功能，让你轻松玩转社区。

您需要 登录 才可以下载或查看，没有账号？立即注册

x
这个是元神的
[@转换元神1]
如果你想换一换职业，这里提供转职业服务.\
<color=red 注:>有元宝的大款才能具有转职业的功能\
<color=red 注:>转换职业要用5000元宝才可以\\
『<元神转武士/@当战士z1>』\
『<元神转法师/@当法师z1>』\
『<元神转道士/@当道士z1>』\


[@当道士z1]
#IF
!CheckONLINE $PNEUMANAME
#SAY
　　你的分身呢？都没有释放出来，怎么转职呢？\
　　<我马上放出我的分身。/@exit>\
#ACT
Break
#IF
EQUAL $PNEUMAJOB 道士
#SAY
　　你当前元神的职业就是道士，不需要进行更换。
#ACT
Break
#IF
CheckGameGold < 5000
#ACT
MessageBox 变更职业失败，你当前元宝不足5000个！
Break
#ELSESAY
\<COLOR=red 转职将删除所有技能和融合元神组合技能!是否确定转职？>\
转职后会习此新元神的部分技能。\\\
　　<确定变更/@元神变道士确定>\
　　<离开/@exit>\

[@元神变道士确定]
#IF
HasPneuma
#ACT
#ELSESAY
　　你的分身呢？都没有释放出来，怎么转职呢？\
　　<我马上放出我的分身。/@exit>\
#ELSEACT
Break
#IF
!CheckONLINE $PNEUMANAME
#SAY
　　你的分身呢？都没有释放出来，怎么转职呢？\
　　<我马上放出我的分身。/@exit>\
#ACT
Break
#IF
ISMERGED
#ACT
MESSAGEBOX \　\　\　\　　　　　　元神处于融合状态不能进行转职　请解除融合状态
SENDMSG 5 元神处于融合状态不能进行转职，请解除融合状态
break
#IF
CheckGameGold < 5000
#ACT
MessageBox 变更职业失败，你当前元宝不足5000个！
Break
#ELSEACT
GAMEGOLD - 5000
$PNEUMANAME.clearskill
DELSKILL 战争牢笼
DELSKILL 连锁闪电
DELSKILL 涅槃重生
DELSKILL 火龙附体
DELSKILL 乾坤冰冻
DELSKILL 挣脱束缚
GMexecute 调整职业 $PNEUMANAME taos
$PNEUMANAME.ADDSKILL 治疗术 3
$PNEUMANAME.ADDSKILL 精神战法 3
$PNEUMANAME.ADDSKILL 施毒术 3
$PNEUMANAME.ADDSKILL 灵魂道符 3
$PNEUMANAME.ADDSKILL 狮子吼 3
$PNEUMANAME.ADDSKILL 幽灵盾 3
$PNEUMANAME.ADDSKILL 神圣战甲术 3
$PNEUMANAME.ADDSKILL 骷髅召唤术 3
$PNEUMANAME.ADDSKILL 集体隐身术 3
$PNEUMANAME.ADDSKILL 群体治愈术 3
$PNEUMANAME.ADDSKILL 召唤神兽 3
FormatStr S0 %s|%s <$PNEUMANAME>|<$PNEUMALEVEL>
ADDVARLIST $STR(S0) ..\QuestDiary\数据文件\元神转职名单.txt
SENDMSG 0 恭喜<$USERNAME>变更职业成功，你的元神已经成为了一名道士！
MessageBox 变更职业成功，请小退一下在上线！
Break
Close


[@当法师z1]
#IF
!CheckONLINE $PNEUMANAME
#SAY
　　你的分身呢？都没有释放出来，怎么转职呢？\
　　<我马上放出我的分身。/@exit>\
#ACT
Break
#IF
EQUAL $PNEUMAJOB 法师
#SAY
　　你当前元神的职业就是法师，不需要进行更换。
#ACT
Break
#IF
CheckGameGold < 5000
#ACT
MessageBox 变更职业失败，你当前元宝不足5000个！
Break
#ELSESAY
\<COLOR=red 转职将删除所有技能和融合元神组合技能!是否确定转职？>\
转职后会习此新元神的部分技能。\\\
　　<确定变更/@元神变法师确定>\
　　<离开/@exit>\

[@元神变法师确定]
#IF
HasPneuma
#ACT
#ELSESAY
　　你的分身呢？都没有释放出来，怎么转职呢？\
　　<我马上放出我的分身。/@exit>\
#ELSEACT
Break
#IF
!CheckONLINE $PNEUMANAME
#SAY
　　你的分身呢？都没有释放出来，怎么转职呢？\
　　<我马上放出我的分身。/@exit>\
#ACT
Break
#IF
ISMERGED
#ACT
MESSAGEBOX \　\　\　\　　　　　　元神处于融合状态不能进行转职　请解除融合状态
SENDMSG 5 元神处于融合状态不能进行转职，请解除融合状态
break
#IF
CheckGameGold < 5000
#ACT
MessageBox 变更职业失败，你当前元宝不足5000个！
Break
#ELSEACT
GAMEGOLD - 5000
$PNEUMANAME.clearskill
DELSKILL 战争牢笼
DELSKILL 连锁闪电
DELSKILL 涅槃重生
DELSKILL 火龙附体
DELSKILL 乾坤冰冻
DELSKILL 挣脱束缚
GMexecute 调整职业 $PNEUMANAME Wizard
$PNEUMANAME.ADDSKILL 小火球 3
$PNEUMANAME.ADDSKILL 火炎刀 3
$PNEUMANAME.ADDSKILL 抗拒火环 3
$PNEUMANAME.ADDSKILL 地狱火焰 3
$PNEUMANAME.ADDSKILL 疾光电影 3
$PNEUMANAME.ADDSKILL 雷电术 3
$PNEUMANAME.ADDSKILL 爆裂火焰 3
$PNEUMANAME.ADDSKILL 地狱雷光 3
$PNEUMANAME.ADDSKILL 魔法盾 3
$PNEUMANAME.ADDSKILL 风影盾 3
$PNEUMANAME.ADDSKILL 狂龙紫电 3
FormatStr S0 %s|%s <$PNEUMANAME>|<$PNEUMALEVEL>
ADDVARLIST $STR(S0) ..\QuestDiary\数据文件\元神转职名单.txt
SENDMSG 0 恭喜<$USERNAME>变更职业成功，你的元神已经成为了一名法师！
MessageBox 变更职业成功，请小退一下在上线！
Break
Close

[@当战士z1]
#IF
!CheckONLINE $PNEUMANAME
#SAY
　　你的分身呢？都没有释放出来，怎么转职呢？\
　　<我马上放出我的分身。/@exit>\
#ACT
Break
#IF
EQUAL $PNEUMAJOB 战士
#SAY
　　你当前元神的职业就是战士，不需要进行更换。
#ACT
Break
#IF
CheckGameGold < 5000
#ACT
MessageBox 变更职业失败，你当前元宝不足5000个！
Break
#ELSESAY
\<COLOR=red 转职将删除所有技能和融合元神组合技能!是否确定转职？>\
转职后会习此新元神的部分技能。\\\
　　<确定变更/@元神变战士确定>\
　　<离开/@exit>\

[@元神变战士确定]
#IF
HasPneuma
#ACT
#ELSESAY
　　你的分身呢？都没有释放出来，怎么转职呢？\
　　<我马上放出我的分身。/@exit>\
#ELSEACT
Break
#IF
!CheckONLINE $PNEUMANAME
#SAY
　　你的分身呢？都没有释放出来，怎么转职呢？\
　　<我马上放出我的分身。/@exit>\
#ACT
Break
#IF
ISMERGED
#ACT
MESSAGEBOX \　\　\　\　　　　　　元神处于融合状态不能进行转职　请解除融合状态
SENDMSG 5 元神处于融合状态不能进行转职，请解除融合状态
break
#IF
CheckGameGold < 5000
#ACT
MessageBox 变更职业失败，你当前元宝不足5000个！
Break
#ELSEACT
GAMEGOLD - 5000
$PNEUMANAME.clearskill
DELSKILL 战争牢笼
DELSKILL 连锁闪电
DELSKILL 涅槃重生
DELSKILL 火龙附体
DELSKILL 乾坤冰冻
DELSKILL 挣脱束缚
GMexecute 调整职业 $PNEUMANAME warr
$PNEUMANAME.ADDSKILL 初级剑法 3
$PNEUMANAME.ADDSKILL 护身真气 3
$PNEUMANAME.ADDSKILL 刺杀剑术 3
$PNEUMANAME.ADDSKILL 攻杀剑法 3
$PNEUMANAME.ADDSKILL 护身真气 3
$PNEUMANAME.ADDSKILL 半月弯刀 3
$PNEUMANAME.ADDSKILL 野蛮冲撞 3
$PNEUMANAME.ADDSKILL 烈火剑法 3
$PNEUMANAME.ADDSKILL 破击剑法 3
$PNEUMANAME.ADDSKILL 破盾斩 3
$PNEUMANAME.ADDSKILL 突斩 3
$PNEUMANAME.ADDSKILL 金刚护体 3
FormatStr S0 %s|%s <$PNEUMANAME>|<$PNEUMALEVEL>
ADDVARLIST $STR(S0) ..\QuestDiary\数据文件\元神转职名单.txt
SENDMSG 0 恭喜<$USERNAME>变更职业成功，你的元神已经成为了一名战士！
MessageBox 变更职业成功，请小退一下在上线！
Break
Close


回复

使用道具 举报

yao332685

升级   65.44%

发表于 2018-10-23 20:34:35 | 显示全部楼层
       
强烈支持楼主ing……

回复 支持 反对

使用道具 举报

嗨佩奇

升级   0.6%

发表于 2018-12-14 21:48:08 | 显示全部楼层
这样写会不会太繁琐了？

回复 支持 反对

使用道具 举报

santian

升级   73.87%

发表于 2022-2-17 11:52:43 | 显示全部楼层
good  棒！！！！

回复 支持 反对

使用道具 举报

laowai

升级   0%

发表于 2022-2-25 13:43:06 | 显示全部楼层
啥也不说，楼主就是给力！

回复 支持 反对

使用道具 举报

santian

升级   73.87%

发表于 2022-2-28 12:23:42 | 显示全部楼层
谢谢分享 搂住好人

回复 支持 反对

使用道具 举报

laowai

升级   0%

发表于 2022-3-6 13:36:39 | 显示全部楼层
感谢分享。。。  学习

回复 支持 反对

使用道具 举报

santian

升级   73.87%

发表于 2022-3-16 10:40:12 | 显示全部楼层
激动人心，无法言表！

回复 支持 反对

使用道具 举报

laowai

升级   0%

发表于 2022-3-19 13:39:12 | 显示全部楼层
很好的网站，希望越办越好！

回复 支持 反对

使用道具 举报

santian

升级   73.87%

发表于 2022-3-30 11:50:33 | 显示全部楼层
看看 给力不

回复 支持 反对

使用道具 举报

下一页 »
123下一页
返回列表 发新帖
懒得打字嘛，点击右侧快捷回复
高级模式
B Color Image Link Quote Code Smilies
您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

■1、请认真发帖，禁止回复纯表情，纯数字等无意义的内容！帖子内容不要太简单!
■2、提倡文明上网，净化网络环境！抵制低俗不良违法有害信息。
■3、如果你对主帖作者的帖子不屑一顾的话，请勿回帖。谢谢合作！
关闭

站长推荐 上一条 /1 下一条

传奇世界单机版|传世服务端|传世版本|关于我们|小黑屋|手机版| 传世单机社区 |网站地图

GMT+8, 2024-4-25 13:27 , Processed in 0.155325 second(s), 32 queries , Gzip On.

Powered by Discuz! X3.4

© 2001-2018 Comsenz Inc.

快速回复 返回顶部 返回列表