22pk论坛

查看: 1917|回复: 0

[传奇脚本] GOM引擎转职变态发型专用脚本

[复制链接]
  • TA的每日心情
    慵懒
    2015-11-3 13:52
  • 签到天数: 9 天

    [LV.3]偶尔看看II

    7745

    主题

    8123

    帖子

    74万

    积分

    Rank: 9Rank: 9Rank: 9

    元宝
    590216

    最佳新人活跃会员热心会员推广达人宣传达人灌水之王突出贡献优秀版主荣誉管理论坛元老

    发表于 2018-5-25 08:20:50 | 显示全部楼层 |阅读模式
    [@main]
    转职是趋势.变性是潮流.\
    一切只为了自己喜欢.来把.重新选择你的去向.\ \

    <改变性别/@性别变更> 需要花费50W金币\ \

    <改变职业/@职业变更> 需要花费500W金币\ \

    <改变名字/@@InPutString20> 需要花费1000W金币\ \


    <离开/@exit>




    [@性别变更]
    #IF
    gender man
    #SAY
    是不是做猛男没什么意思呀,想不想尝尝做淑女的滋味呀!!!\ \
    『<尝尝/@towoman>』\ \
    〖<返回/@main>〗 〖<关闭/@exit>〗
    #ELSESAY
    是不是做淑女挺累的,想不想尝尝做猛男的滋味呀!!!\ \
    『<尝尝/@toman>』\ \
    〖<返回/@main>〗 〖<关闭/@exit>〗


    [@toman]
    #IF
    LARGE <$GOLDCOUNT> 499999
    #ACT
    take 金币 500000
    CHANGEGENDER 0
    KICK 1
    #SAY
    呵呵,你已经变成一位猛男了。\ \
    <返回/@main>
    #ELSEACT
    MESSAGEBOX 对不起,您的金币不够50W
    [@towoman]
    #IF
    LARGE <$GOLDCOUNT> 499999
    #ACT
    take 金币 500000
    CHANGEGENDER 1
    KICK 1
    #SAY
    呵呵,你已经变成一位淑女了。\ \
    〖<返回/@main>〗 〖<关闭/@exit>〗
    #ELSEACT
    MESSAGEBOX 对不起,您的金币不够50W






    [@职业变更]
    #IF
    CHECKJOB warrior
    #SAY
    是不是战士不好玩呀,换换别的职业试试吧!\ \
    『<玩玩法师/@法师>』\
    『<玩玩道士/@道士>』\ \
    〖<返回/@main>〗〖<关闭/@exit>〗
    #ACT
    break
    #IF
    CHECKJOB wizard
    #SAY
    是不是法师不好玩呀,换换别的职业试试吧!\ \
    『<玩玩战士/@战士>』\
    『<玩玩道士/@道士>』\ \
    〖<返回/@main>〗〖<关闭/@exit>〗
    #ACT
    break
    #IF
    CHECKJOB taoist
    #SAY
    是不是道士不好玩呀,换换别的职业试试吧!\ \
    『<玩玩战士/@战士>』\
    『<玩玩法师/@法师>』\ \
    〖<返回/@main>〗〖<关闭/@exit>〗
    #ACT
    break

    [@战士]
    #IF
    LARGE <$GOLDCOUNT> 4999999
    #ACT
    take 金币 5000000
    CLEARSKILL
    CHANGEJOB warrior
    Gmexecute JN <$USERNAME> 心灵召唤 3
    Gmexecute JN <$USERNAME> 基本剑术 3
    GOTO @职业变更
    SENDMSG 0 恭喜:玩家「<$USERNAME>」成功转职。
    KICK 1
    #ELSEACT
    MESSAGEBOX 对不起,您的金币不够500W
    BREAK

    [@法师]
    #IF
    LARGE <$GOLDCOUNT> 4999999
    #ACT
    take 金币 5000000
    CLEARSKILL
    CHANGEJOB WIZARD
    Gmexecute JN <$USERNAME> 心灵召唤 3
    Gmexecute JN <$USERNAME> 雷电术 3
    GOTO @职业变更
    SENDMSG 0 恭喜:玩家「<$USERNAME>」成功转职。
    KICK 1
    #ELSEACT
    MESSAGEBOX 对不起,您的金币不够500W
    BREAK

    [@道士]
    #IF
    LARGE <$GOLDCOUNT> 4999999
    #ACT
    take 金币 5000000
    CLEARSKILL
    CHANGEJOB taoist
    Gmexecute JN <$USERNAME> 心灵召唤 3
    Gmexecute JN <$USERNAME> 灵魂火符 3
    GOTO @职业变更
    SENDMSG 0 恭喜:玩家「<$USERNAME>」成功转职。
    KICK 1
    #ELSEACT
    MESSAGEBOX 对不起,您的金币不够500W
    BREAK









    [@InPutString20]
    #IF
    LARGE <$GOLDCOUNT> 9999999
    #ACT
    #ELSEACT
    MESSAGEBOX 对不起,您的金币不够1000W
    BREAK


    #IF
    Equal S20
    #ACT
    SENDMSG 6 请输入一个正确的名称
    Break

    #OR
    CheckStringlength S20 > 14
    CheckStringlength S20 < 4
    #ACT
    SENDMSG 6 输入名称长度不正确
    Break


    #IF
    #ACT
    CHANGEHUMNAME S20





    本站所有版本 24小时在线购买 金币不够请 点击 金币充值 版本GM亲测无误可直接开区
    回复

    使用道具 举报

    您需要登录后才可以回帖 登录 | QQ注册登录

    本版积分规则

    GM基地开传奇一条龙服务及商业服务端下载

    All rights reserved.www.22pk.com 版权所有 网站分类 网站地图

    22pk论坛打造行业第一传奇版本论坛,所有商业版本均免费开放下载,力争做行业最大的教程及版本发布基地

    © 2001-2015 爱上gm论坛

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